You cannot select more than 25 topics
			Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
		
		
		
		
		
			
		
			
				
	
	
		
			373 lines
		
	
	
		
			15 KiB
		
	
	
	
		
			Plaintext
		
	
			
		
		
	
	
			373 lines
		
	
	
		
			15 KiB
		
	
	
	
		
			Plaintext
		
	
------------------------------------------------------------------------
 | 
						|
-- dsEncode.decTest -- decimal four-byte format testcases             --
 | 
						|
-- Copyright (c) IBM Corporation, 2000, 2008.  All rights reserved.   --
 | 
						|
------------------------------------------------------------------------
 | 
						|
-- Please see the document "General Decimal Arithmetic Testcases"     --
 | 
						|
-- at http://www2.hursley.ibm.com/decimal for the description of      --
 | 
						|
-- these testcases.                                                   --
 | 
						|
--                                                                    --
 | 
						|
-- These testcases are experimental ('beta' versions), and they       --
 | 
						|
-- may contain errors.  They are offered on an as-is basis.  In       --
 | 
						|
-- particular, achieving the same results as the tests here is not    --
 | 
						|
-- a guarantee that an implementation complies with any Standard      --
 | 
						|
-- or specification.  The tests are not exhaustive.                   --
 | 
						|
--                                                                    --
 | 
						|
-- Please send comments, suggestions, and corrections to the author:  --
 | 
						|
--   Mike Cowlishaw, IBM Fellow                                       --
 | 
						|
--   IBM UK, PO Box 31, Birmingham Road, Warwick CV34 5JL, UK         --
 | 
						|
--   mfc@uk.ibm.com                                                   --
 | 
						|
------------------------------------------------------------------------
 | 
						|
-- [Previously called decimal32.decTest]
 | 
						|
version: 2.58
 | 
						|
 | 
						|
-- This set of tests is for the four-byte concrete representation.
 | 
						|
-- Its characteristics are:
 | 
						|
--
 | 
						|
--  1 bit  sign
 | 
						|
--  5 bits combination field
 | 
						|
--  6 bits exponent continuation
 | 
						|
-- 20 bits coefficient continuation
 | 
						|
--
 | 
						|
-- Total exponent length 8 bits
 | 
						|
-- Total coefficient length 24 bits (7 digits)
 | 
						|
--
 | 
						|
-- Elimit =  191 (maximum encoded exponent)
 | 
						|
-- Emax   =   96 (largest exponent value)
 | 
						|
-- Emin   =  -95 (smallest exponent value)
 | 
						|
-- bias   =  101 (subtracted from encoded exponent) = -Etiny
 | 
						|
 | 
						|
-- The testcases here have only exactly representable data on the
 | 
						|
-- 'left-hand-side'; rounding from strings is tested in 'base'
 | 
						|
-- testcase groups.
 | 
						|
 | 
						|
extended:    1
 | 
						|
clamp:       1
 | 
						|
precision:   7
 | 
						|
rounding:    half_up
 | 
						|
maxExponent: 96
 | 
						|
minExponent: -95
 | 
						|
 | 
						|
-- General testcases
 | 
						|
-- (mostly derived from the Strawman 4 document and examples)
 | 
						|
decs001 apply   #A23003D0          -> -7.50
 | 
						|
decs002 apply   -7.50              -> #A23003D0
 | 
						|
-- derivative canonical plain strings
 | 
						|
decs003 apply   #A26003D0         -> -7.50E+3
 | 
						|
decs004 apply   -7.50E+3          -> #A26003D0
 | 
						|
decs005 apply   #A25003D0         -> -750
 | 
						|
decs006 apply   -750              -> #A25003D0
 | 
						|
decs007 apply   #A24003D0         -> -75.0
 | 
						|
decs008 apply   -75.0             -> #A24003D0
 | 
						|
decs009 apply   #A22003D0         -> -0.750
 | 
						|
decs010 apply   -0.750            -> #A22003D0
 | 
						|
decs011 apply   #A21003D0         -> -0.0750
 | 
						|
decs012 apply   -0.0750           -> #A21003D0
 | 
						|
decs013 apply   #A1f003D0         -> -0.000750
 | 
						|
decs014 apply   -0.000750         -> #A1f003D0
 | 
						|
decs015 apply   #A1d003D0         -> -0.00000750
 | 
						|
decs016 apply   -0.00000750       -> #A1d003D0
 | 
						|
decs017 apply   #A1c003D0         -> -7.50E-7
 | 
						|
decs018 apply   -7.50E-7          -> #A1c003D0
 | 
						|
 | 
						|
-- Normality
 | 
						|
decs020 apply   1234567            -> #2654d2e7
 | 
						|
decs021 apply  -1234567            -> #a654d2e7
 | 
						|
decs022 apply   1111111            -> #26524491
 | 
						|
 | 
						|
-- Nmax and similar
 | 
						|
decs031 apply   9.999999E+96            -> #77f3fcff
 | 
						|
decs032 apply   #77f3fcff               -> 9.999999E+96
 | 
						|
decs033 apply   1.234567E+96            -> #47f4d2e7
 | 
						|
decs034 apply   #47f4d2e7               -> 1.234567E+96
 | 
						|
-- fold-downs (more below)
 | 
						|
decs035 apply   1.23E+96                -> #47f4c000 Clamped
 | 
						|
decs036 apply   #47f4c000               -> 1.230000E+96
 | 
						|
decs037 apply   1E+96                   -> #47f00000 Clamped
 | 
						|
decs038 apply   #47f00000               -> 1.000000E+96
 | 
						|
 | 
						|
decs051 apply   12345                   -> #225049c5
 | 
						|
decs052 apply   #225049c5               -> 12345
 | 
						|
decs053 apply   1234                    -> #22500534
 | 
						|
decs054 apply   #22500534               -> 1234
 | 
						|
decs055 apply   123                     -> #225000a3
 | 
						|
decs056 apply   #225000a3               -> 123
 | 
						|
decs057 apply   12                      -> #22500012
 | 
						|
decs058 apply   #22500012               -> 12
 | 
						|
decs059 apply   1                       -> #22500001
 | 
						|
decs060 apply   #22500001               -> 1
 | 
						|
decs061 apply   1.23                    -> #223000a3
 | 
						|
decs062 apply   #223000a3               -> 1.23
 | 
						|
decs063 apply   123.45                  -> #223049c5
 | 
						|
decs064 apply   #223049c5               -> 123.45
 | 
						|
 | 
						|
-- Nmin and below
 | 
						|
decs071 apply   1E-95                   -> #00600001
 | 
						|
decs072 apply   #00600001               -> 1E-95
 | 
						|
decs073 apply   1.000000E-95            -> #04000000
 | 
						|
decs074 apply   #04000000               -> 1.000000E-95
 | 
						|
decs075 apply   1.000001E-95            -> #04000001
 | 
						|
decs076 apply   #04000001               -> 1.000001E-95
 | 
						|
 | 
						|
decs077 apply   0.100000E-95            -> #00020000     Subnormal
 | 
						|
decs07x apply   1.00000E-96             -> 1.00000E-96   Subnormal
 | 
						|
decs078 apply   #00020000               -> 1.00000E-96   Subnormal
 | 
						|
decs079 apply   0.000010E-95            -> #00000010     Subnormal
 | 
						|
decs080 apply   #00000010               -> 1.0E-100      Subnormal
 | 
						|
decs081 apply   0.000001E-95            -> #00000001     Subnormal
 | 
						|
decs082 apply   #00000001               -> 1E-101        Subnormal
 | 
						|
decs083 apply   1e-101                  -> #00000001     Subnormal
 | 
						|
decs084 apply   #00000001               -> 1E-101        Subnormal
 | 
						|
decs08x apply   1e-101                  -> 1E-101        Subnormal
 | 
						|
 | 
						|
-- underflows cannot be tested; just check edge case
 | 
						|
decs090 apply   1e-101                  -> #00000001  Subnormal
 | 
						|
 | 
						|
-- same again, negatives --
 | 
						|
 | 
						|
-- Nmax and similar
 | 
						|
decs122 apply  -9.999999E+96            -> #f7f3fcff
 | 
						|
decs123 apply   #f7f3fcff               -> -9.999999E+96
 | 
						|
decs124 apply  -1.234567E+96            -> #c7f4d2e7
 | 
						|
decs125 apply   #c7f4d2e7               -> -1.234567E+96
 | 
						|
-- fold-downs (more below)
 | 
						|
decs130 apply  -1.23E+96                -> #c7f4c000 Clamped
 | 
						|
decs131 apply   #c7f4c000               -> -1.230000E+96
 | 
						|
decs132 apply  -1E+96                   -> #c7f00000 Clamped
 | 
						|
decs133 apply   #c7f00000               -> -1.000000E+96
 | 
						|
 | 
						|
decs151 apply  -12345                   -> #a25049c5
 | 
						|
decs152 apply   #a25049c5               -> -12345
 | 
						|
decs153 apply  -1234                    -> #a2500534
 | 
						|
decs154 apply   #a2500534               -> -1234
 | 
						|
decs155 apply  -123                     -> #a25000a3
 | 
						|
decs156 apply   #a25000a3               -> -123
 | 
						|
decs157 apply  -12                      -> #a2500012
 | 
						|
decs158 apply   #a2500012               -> -12
 | 
						|
decs159 apply  -1                       -> #a2500001
 | 
						|
decs160 apply   #a2500001               -> -1
 | 
						|
decs161 apply  -1.23                    -> #a23000a3
 | 
						|
decs162 apply   #a23000a3               -> -1.23
 | 
						|
decs163 apply  -123.45                  -> #a23049c5
 | 
						|
decs164 apply   #a23049c5               -> -123.45
 | 
						|
 | 
						|
-- Nmin and below
 | 
						|
decs171 apply  -1E-95                   -> #80600001
 | 
						|
decs172 apply   #80600001               -> -1E-95
 | 
						|
decs173 apply  -1.000000E-95            -> #84000000
 | 
						|
decs174 apply   #84000000               -> -1.000000E-95
 | 
						|
decs175 apply  -1.000001E-95            -> #84000001
 | 
						|
decs176 apply   #84000001               -> -1.000001E-95
 | 
						|
 | 
						|
decs177 apply  -0.100000E-95            -> #80020000     Subnormal
 | 
						|
decs178 apply   #80020000               -> -1.00000E-96  Subnormal
 | 
						|
decs179 apply  -0.000010E-95            -> #80000010     Subnormal
 | 
						|
decs180 apply   #80000010               -> -1.0E-100     Subnormal
 | 
						|
decs181 apply  -0.000001E-95            -> #80000001     Subnormal
 | 
						|
decs182 apply   #80000001               -> -1E-101       Subnormal
 | 
						|
decs183 apply  -1e-101                  -> #80000001     Subnormal
 | 
						|
decs184 apply   #80000001               -> -1E-101       Subnormal
 | 
						|
 | 
						|
-- underflow edge case
 | 
						|
decs190 apply  -1e-101                  -> #80000001  Subnormal
 | 
						|
 | 
						|
-- zeros
 | 
						|
decs400 apply   0E-400                  -> #00000000  Clamped
 | 
						|
decs401 apply   0E-101                  -> #00000000
 | 
						|
decs402 apply   #00000000               -> 0E-101
 | 
						|
decs403 apply   0.000000E-95            -> #00000000
 | 
						|
decs404 apply   #00000000               -> 0E-101
 | 
						|
decs405 apply   0E-2                    -> #22300000
 | 
						|
decs406 apply   #22300000               -> 0.00
 | 
						|
decs407 apply   0                       -> #22500000
 | 
						|
decs408 apply   #22500000               -> 0
 | 
						|
decs409 apply   0E+3                    -> #22800000
 | 
						|
decs410 apply   #22800000               -> 0E+3
 | 
						|
decs411 apply   0E+90                   -> #43f00000
 | 
						|
decs412 apply   #43f00000               -> 0E+90
 | 
						|
-- clamped zeros...
 | 
						|
decs413 apply   0E+91                   -> #43f00000  Clamped
 | 
						|
decs414 apply   #43f00000               -> 0E+90
 | 
						|
decs415 apply   0E+96                   -> #43f00000  Clamped
 | 
						|
decs416 apply   #43f00000               -> 0E+90
 | 
						|
decs417 apply   0E+400                  -> #43f00000  Clamped
 | 
						|
decs418 apply   #43f00000               -> 0E+90
 | 
						|
 | 
						|
-- negative zeros
 | 
						|
decs420 apply   -0E-400                 -> #80000000  Clamped
 | 
						|
decs421 apply   -0E-101                 -> #80000000
 | 
						|
decs422 apply   #80000000               -> -0E-101
 | 
						|
decs423 apply   -0.000000E-95           -> #80000000
 | 
						|
decs424 apply   #80000000               -> -0E-101
 | 
						|
decs425 apply   -0E-2                   -> #a2300000
 | 
						|
decs426 apply   #a2300000               -> -0.00
 | 
						|
decs427 apply   -0                      -> #a2500000
 | 
						|
decs428 apply   #a2500000               -> -0
 | 
						|
decs429 apply   -0E+3                   -> #a2800000
 | 
						|
decs430 apply   #a2800000               -> -0E+3
 | 
						|
decs431 apply   -0E+90                  -> #c3f00000
 | 
						|
decs432 apply   #c3f00000               -> -0E+90
 | 
						|
-- clamped zeros...
 | 
						|
decs433 apply   -0E+91                  -> #c3f00000  Clamped
 | 
						|
decs434 apply   #c3f00000               -> -0E+90
 | 
						|
decs435 apply   -0E+96                  -> #c3f00000  Clamped
 | 
						|
decs436 apply   #c3f00000               -> -0E+90
 | 
						|
decs437 apply   -0E+400                 -> #c3f00000  Clamped
 | 
						|
decs438 apply   #c3f00000               -> -0E+90
 | 
						|
 | 
						|
-- Specials
 | 
						|
decs500 apply   Infinity  -> #78000000
 | 
						|
decs501 apply   #78787878 -> #78000000
 | 
						|
decs502 apply   #78000000 -> Infinity
 | 
						|
decs503 apply   #79797979 -> #78000000
 | 
						|
decs504 apply   #79000000 -> Infinity
 | 
						|
decs505 apply   #7a7a7a7a -> #78000000
 | 
						|
decs506 apply   #7a000000 -> Infinity
 | 
						|
decs507 apply   #7b7b7b7b -> #78000000
 | 
						|
decs508 apply   #7b000000 -> Infinity
 | 
						|
decs509 apply   #7c7c7c7c -> #7c0c7c7c
 | 
						|
 | 
						|
decs510 apply   NaN       -> #7c000000
 | 
						|
decs511 apply   #7c000000 -> NaN
 | 
						|
decs512 apply   #7d7d7d7d -> #7c0d7d7d
 | 
						|
decs513 apply   #7d000000 -> NaN
 | 
						|
decs514 apply   #7e7e7e7e -> #7e0e7c7e
 | 
						|
decs515 apply   #7e000000 -> sNaN
 | 
						|
decs516 apply   #7f7f7f7f -> #7e0f7c7f
 | 
						|
decs517 apply   #7f000000 -> sNaN
 | 
						|
decs518 apply   #7fffffff -> sNaN999999
 | 
						|
decs519 apply   #7fffffff -> #7e03fcff
 | 
						|
 | 
						|
decs520 apply   -Infinity -> #f8000000
 | 
						|
decs521 apply   #f8787878 -> #f8000000
 | 
						|
decs522 apply   #f8000000 -> -Infinity
 | 
						|
decs523 apply   #f9797979 -> #f8000000
 | 
						|
decs524 apply   #f9000000 -> -Infinity
 | 
						|
decs525 apply   #fa7a7a7a -> #f8000000
 | 
						|
decs526 apply   #fa000000 -> -Infinity
 | 
						|
decs527 apply   #fb7b7b7b -> #f8000000
 | 
						|
decs528 apply   #fb000000 -> -Infinity
 | 
						|
 | 
						|
decs529 apply   -NaN      -> #fc000000
 | 
						|
decs530 apply   #fc7c7c7c -> #fc0c7c7c
 | 
						|
decs531 apply   #fc000000 -> -NaN
 | 
						|
decs532 apply   #fd7d7d7d -> #fc0d7d7d
 | 
						|
decs533 apply   #fd000000 -> -NaN
 | 
						|
decs534 apply   #fe7e7e7e -> #fe0e7c7e
 | 
						|
decs535 apply   #fe000000 -> -sNaN
 | 
						|
decs536 apply   #ff7f7f7f -> #fe0f7c7f
 | 
						|
decs537 apply   #ff000000 -> -sNaN
 | 
						|
decs538 apply   #ffffffff -> -sNaN999999
 | 
						|
decs539 apply   #ffffffff -> #fe03fcff
 | 
						|
 | 
						|
-- diagnostic NaNs
 | 
						|
decs540 apply   NaN       -> #7c000000
 | 
						|
decs541 apply   NaN0      -> #7c000000
 | 
						|
decs542 apply   NaN1      -> #7c000001
 | 
						|
decs543 apply   NaN12     -> #7c000012
 | 
						|
decs544 apply   NaN79     -> #7c000079
 | 
						|
decs545 apply   NaN12345   -> #7c0049c5
 | 
						|
decs546 apply   NaN123456  -> #7c028e56
 | 
						|
decs547 apply   NaN799799  -> #7c0f7fdf
 | 
						|
decs548 apply   NaN999999  -> #7c03fcff
 | 
						|
 | 
						|
 | 
						|
-- fold-down full sequence
 | 
						|
decs601 apply   1E+96                   -> #47f00000 Clamped
 | 
						|
decs602 apply   #47f00000               -> 1.000000E+96
 | 
						|
decs603 apply   1E+95                   -> #43f20000 Clamped
 | 
						|
decs604 apply   #43f20000               -> 1.00000E+95
 | 
						|
decs605 apply   1E+94                   -> #43f04000 Clamped
 | 
						|
decs606 apply   #43f04000               -> 1.0000E+94
 | 
						|
decs607 apply   1E+93                   -> #43f00400 Clamped
 | 
						|
decs608 apply   #43f00400               -> 1.000E+93
 | 
						|
decs609 apply   1E+92                   -> #43f00080 Clamped
 | 
						|
decs610 apply   #43f00080               -> 1.00E+92
 | 
						|
decs611 apply   1E+91                   -> #43f00010 Clamped
 | 
						|
decs612 apply   #43f00010               -> 1.0E+91
 | 
						|
decs613 apply   1E+90                   -> #43f00001
 | 
						|
decs614 apply   #43f00001               -> 1E+90
 | 
						|
 | 
						|
 | 
						|
-- Selected DPD codes
 | 
						|
decs700 apply   #22500000       -> 0
 | 
						|
decs701 apply   #22500009       -> 9
 | 
						|
decs702 apply   #22500010       -> 10
 | 
						|
decs703 apply   #22500019       -> 19
 | 
						|
decs704 apply   #22500020       -> 20
 | 
						|
decs705 apply   #22500029       -> 29
 | 
						|
decs706 apply   #22500030       -> 30
 | 
						|
decs707 apply   #22500039       -> 39
 | 
						|
decs708 apply   #22500040       -> 40
 | 
						|
decs709 apply   #22500049       -> 49
 | 
						|
decs710 apply   #22500050       -> 50
 | 
						|
decs711 apply   #22500059       -> 59
 | 
						|
decs712 apply   #22500060       -> 60
 | 
						|
decs713 apply   #22500069       -> 69
 | 
						|
decs714 apply   #22500070       -> 70
 | 
						|
decs715 apply   #22500071       -> 71
 | 
						|
decs716 apply   #22500072       -> 72
 | 
						|
decs717 apply   #22500073       -> 73
 | 
						|
decs718 apply   #22500074       -> 74
 | 
						|
decs719 apply   #22500075       -> 75
 | 
						|
decs720 apply   #22500076       -> 76
 | 
						|
decs721 apply   #22500077       -> 77
 | 
						|
decs722 apply   #22500078       -> 78
 | 
						|
decs723 apply   #22500079       -> 79
 | 
						|
 | 
						|
decs730 apply   #2250029e       -> 994
 | 
						|
decs731 apply   #2250029f       -> 995
 | 
						|
decs732 apply   #225002a0       -> 520
 | 
						|
decs733 apply   #225002a1       -> 521
 | 
						|
 | 
						|
-- DPD: one of each of the huffman groups
 | 
						|
decs740 apply   #225003f7       -> 777
 | 
						|
decs741 apply   #225003f8       -> 778
 | 
						|
decs742 apply   #225003eb       -> 787
 | 
						|
decs743 apply   #2250037d       -> 877
 | 
						|
decs744 apply   #2250039f       -> 997
 | 
						|
decs745 apply   #225003bf       -> 979
 | 
						|
decs746 apply   #225003df       -> 799
 | 
						|
decs747 apply   #2250006e       -> 888
 | 
						|
 | 
						|
 | 
						|
-- DPD all-highs cases (includes the 24 redundant codes)
 | 
						|
decs750 apply   #2250006e       -> 888
 | 
						|
decs751 apply   #2250016e       -> 888
 | 
						|
decs752 apply   #2250026e       -> 888
 | 
						|
decs753 apply   #2250036e       -> 888
 | 
						|
decs754 apply   #2250006f       -> 889
 | 
						|
decs755 apply   #2250016f       -> 889
 | 
						|
decs756 apply   #2250026f       -> 889
 | 
						|
decs757 apply   #2250036f       -> 889
 | 
						|
 | 
						|
decs760 apply   #2250007e       -> 898
 | 
						|
decs761 apply   #2250017e       -> 898
 | 
						|
decs762 apply   #2250027e       -> 898
 | 
						|
decs763 apply   #2250037e       -> 898
 | 
						|
decs764 apply   #2250007f       -> 899
 | 
						|
decs765 apply   #2250017f       -> 899
 | 
						|
decs766 apply   #2250027f       -> 899
 | 
						|
decs767 apply   #2250037f       -> 899
 | 
						|
 | 
						|
decs770 apply   #225000ee       -> 988
 | 
						|
decs771 apply   #225001ee       -> 988
 | 
						|
decs772 apply   #225002ee       -> 988
 | 
						|
decs773 apply   #225003ee       -> 988
 | 
						|
decs774 apply   #225000ef       -> 989
 | 
						|
decs775 apply   #225001ef       -> 989
 | 
						|
decs776 apply   #225002ef       -> 989
 | 
						|
decs777 apply   #225003ef       -> 989
 | 
						|
 | 
						|
decs780 apply   #225000fe       -> 998
 | 
						|
decs781 apply   #225001fe       -> 998
 | 
						|
decs782 apply   #225002fe       -> 998
 | 
						|
decs783 apply   #225003fe       -> 998
 | 
						|
decs784 apply   #225000ff       -> 999
 | 
						|
decs785 apply   #225001ff       -> 999
 | 
						|
decs786 apply   #225002ff       -> 999
 | 
						|
decs787 apply   #225003ff       -> 999
 | 
						|
 | 
						|
-- narrowing case
 | 
						|
decs790 apply 2.00E-99 -> #00000100 Subnormal
 | 
						|
decs791 apply #00000100 -> 2.00E-99 Subnormal
 |