http://code.google.com/p/decnum-dynpmcs/source/detail?r=166
Added:
/trunk/t/exp.t
Modified:
/trunk/aux/decTest/src/inc/procs.pir
=======================================
--- /dev/null
+++ /trunk/t/exp.t Wed Aug 12 10:09:40 2009
@@ -0,0 +1,5596 @@
+#! /usr/bin/env parrot
+
+.namespace []
+.sub "tests" :subid("10_1250096198")
+.annotate "line", 0
+ .const 'Sub' $P1442 = "297_1250096198"
+ capture_lex $P1442
+ .const 'Sub' $P1437 = "296_1250096198"
+ capture_lex $P1437
+ .const 'Sub' $P1432 = "295_1250096198"
+ capture_lex $P1432
+ .const 'Sub' $P1427 = "294_1250096198"
+ capture_lex $P1427
+ .const 'Sub' $P1422 = "293_1250096198"
+ capture_lex $P1422
+ .const 'Sub' $P1417 = "292_1250096198"
+ capture_lex $P1417
+ .const 'Sub' $P1412 = "291_1250096198"
+ capture_lex $P1412
+ .const 'Sub' $P1407 = "290_1250096198"
+ capture_lex $P1407
+ .const 'Sub' $P1402 = "289_1250096198"
+ capture_lex $P1402
+ .const 'Sub' $P1397 = "288_1250096198"
+ capture_lex $P1397
+ .const 'Sub' $P1392 = "287_1250096198"
+ capture_lex $P1392
+ .const 'Sub' $P1387 = "286_1250096198"
+ capture_lex $P1387
+ .const 'Sub' $P1382 = "285_1250096198"
+ capture_lex $P1382
+ .const 'Sub' $P1377 = "284_1250096198"
+ capture_lex $P1377
+ .const 'Sub' $P1372 = "283_1250096198"
+ capture_lex $P1372
+ .const 'Sub' $P1367 = "282_1250096198"
+ capture_lex $P1367
+ .const 'Sub' $P1362 = "281_1250096198"
+ capture_lex $P1362
+ .const 'Sub' $P1357 = "280_1250096198"
+ capture_lex $P1357
+ .const 'Sub' $P1352 = "279_1250096198"
+ capture_lex $P1352
+ .const 'Sub' $P1347 = "278_1250096198"
+ capture_lex $P1347
+ .const 'Sub' $P1342 = "277_1250096198"
+ capture_lex $P1342
+ .const 'Sub' $P1337 = "276_1250096198"
+ capture_lex $P1337
+ .const 'Sub' $P1332 = "275_1250096198"
+ capture_lex $P1332
+ .const 'Sub' $P1327 = "274_1250096198"
+ capture_lex $P1327
+ .const 'Sub' $P1322 = "273_1250096198"
+ capture_lex $P1322
+ .const 'Sub' $P1317 = "272_1250096198"
+ capture_lex $P1317
+ .const 'Sub' $P1312 = "271_1250096198"
+ capture_lex $P1312
+ .const 'Sub' $P1307 = "270_1250096198"
+ capture_lex $P1307
+ .const 'Sub' $P1302 = "269_1250096198"
+ capture_lex $P1302
+ .const 'Sub' $P1297 = "268_1250096198"
+ capture_lex $P1297
+ .const 'Sub' $P1292 = "267_1250096198"
+ capture_lex $P1292
+ .const 'Sub' $P1287 = "266_1250096198"
+ capture_lex $P1287
+ .const 'Sub' $P1282 = "265_1250096198"
+ capture_lex $P1282
+ .const 'Sub' $P1277 = "264_1250096198"
+ capture_lex $P1277
+ .const 'Sub' $P1272 = "263_1250096198"
+ capture_lex $P1272
+ .const 'Sub' $P1267 = "262_1250096198"
+ capture_lex $P1267
+ .const 'Sub' $P1262 = "261_1250096198"
+ capture_lex $P1262
+ .const 'Sub' $P1257 = "260_1250096198"
+ capture_lex $P1257
+ .const 'Sub' $P1252 = "259_1250096198"
+ capture_lex $P1252
+ .const 'Sub' $P1247 = "258_1250096198"
+ capture_lex $P1247
+ .const 'Sub' $P1242 = "257_1250096198"
+ capture_lex $P1242
+ .const 'Sub' $P1237 = "256_1250096198"
+ capture_lex $P1237
+ .const 'Sub' $P1232 = "255_1250096198"
+ capture_lex $P1232
+ .const 'Sub' $P1227 = "254_1250096198"
+ capture_lex $P1227
+ .const 'Sub' $P1222 = "253_1250096198"
+ capture_lex $P1222
+ .const 'Sub' $P1217 = "252_1250096198"
+ capture_lex $P1217
+ .const 'Sub' $P1212 = "251_1250096198"
+ capture_lex $P1212
+ .const 'Sub' $P1207 = "250_1250096198"
+ capture_lex $P1207
+ .const 'Sub' $P1202 = "249_1250096198"
+ capture_lex $P1202
+ .const 'Sub' $P1197 = "248_1250096198"
+ capture_lex $P1197
+ .const 'Sub' $P1192 = "247_1250096198"
+ capture_lex $P1192
+ .const 'Sub' $P1187 = "246_1250096198"
+ capture_lex $P1187
+ .const 'Sub' $P1182 = "245_1250096198"
+ capture_lex $P1182
+ .const 'Sub' $P1177 = "244_1250096198"
+ capture_lex $P1177
+ .const 'Sub' $P1172 = "243_1250096198"
+ capture_lex $P1172
+ .const 'Sub' $P1167 = "242_1250096198"
+ capture_lex $P1167
+ .const 'Sub' $P1162 = "241_1250096198"
+ capture_lex $P1162
+ .const 'Sub' $P1157 = "240_1250096198"
+ capture_lex $P1157
+ .const 'Sub' $P1152 = "239_1250096198"
+ capture_lex $P1152
+ .const 'Sub' $P1147 = "238_1250096198"
+ capture_lex $P1147
+ .const 'Sub' $P1142 = "237_1250096198"
+ capture_lex $P1142
+ .const 'Sub' $P1137 = "236_1250096198"
+ capture_lex $P1137
+ .const 'Sub' $P1132 = "235_1250096198"
+ capture_lex $P1132
+ .const 'Sub' $P1127 = "234_1250096198"
+ capture_lex $P1127
+ .const 'Sub' $P1122 = "233_1250096198"
+ capture_lex $P1122
+ .const 'Sub' $P1117 = "232_1250096198"
+ capture_lex $P1117
+ .const 'Sub' $P1112 = "231_1250096198"
+ capture_lex $P1112
+ .const 'Sub' $P1107 = "230_1250096198"
+ capture_lex $P1107
+ .const 'Sub' $P1102 = "229_1250096198"
+ capture_lex $P1102
+ .const 'Sub' $P1097 = "228_1250096198"
+ capture_lex $P1097
+ .const 'Sub' $P1092 = "227_1250096198"
+ capture_lex $P1092
+ .const 'Sub' $P1087 = "226_1250096198"
+ capture_lex $P1087
+ .const 'Sub' $P1082 = "225_1250096198"
+ capture_lex $P1082
+ .const 'Sub' $P1077 = "224_1250096198"
+ capture_lex $P1077
+ .const 'Sub' $P1072 = "223_1250096198"
+ capture_lex $P1072
+ .const 'Sub' $P1067 = "222_1250096198"
+ capture_lex $P1067
+ .const 'Sub' $P1062 = "221_1250096198"
+ capture_lex $P1062
+ .const 'Sub' $P1057 = "220_1250096198"
+ capture_lex $P1057
+ .const 'Sub' $P1052 = "219_1250096198"
+ capture_lex $P1052
+ .const 'Sub' $P1047 = "218_1250096198"
+ capture_lex $P1047
+ .const 'Sub' $P1042 = "217_1250096198"
+ capture_lex $P1042
+ .const 'Sub' $P1037 = "216_1250096198"
+ capture_lex $P1037
+ .const 'Sub' $P1032 = "215_1250096198"
+ capture_lex $P1032
+ .const 'Sub' $P1027 = "214_1250096198"
+ capture_lex $P1027
+ .const 'Sub' $P1022 = "213_1250096198"
+ capture_lex $P1022
+ .const 'Sub' $P1017 = "212_1250096198"
+ capture_lex $P1017
+ .const 'Sub' $P1012 = "211_1250096198"
+ capture_lex $P1012
+ .const 'Sub' $P1007 = "210_1250096198"
+ capture_lex $P1007
+ .const 'Sub' $P1002 = "209_1250096198"
+ capture_lex $P1002
+ .const 'Sub' $P997 = "208_1250096198"
+ capture_lex $P997
+ .const 'Sub' $P992 = "207_1250096198"
+ capture_lex $P992
+ .const 'Sub' $P987 = "206_1250096198"
+ capture_lex $P987
+ .const 'Sub' $P982 = "205_1250096198"
+ capture_lex $P982
+ .const 'Sub' $P977 = "204_1250096198"
+ capture_lex $P977
+ .const 'Sub' $P972 = "203_1250096198"
+ capture_lex $P972
+ .const 'Sub' $P967 = "202_1250096198"
+ capture_lex $P967
+ .const 'Sub' $P962 = "201_1250096198"
+ capture_lex $P962
+ .const 'Sub' $P957 = "200_1250096198"
+ capture_lex $P957
+ .const 'Sub' $P952 = "199_1250096198"
+ capture_lex $P952
+ .const 'Sub' $P947 = "198_1250096198"
+ capture_lex $P947
+ .const 'Sub' $P942 = "197_1250096198"
+ capture_lex $P942
+ .const 'Sub' $P937 = "196_1250096198"
+ capture_lex $P937
+ .const 'Sub' $P932 = "195_1250096198"
+ capture_lex $P932
+ .const 'Sub' $P927 = "194_1250096198"
+ capture_lex $P927
+ .const 'Sub' $P922 = "193_1250096198"
+ capture_lex $P922
+ .const 'Sub' $P917 = "192_1250096198"
+ capture_lex $P917
+ .const 'Sub' $P912 = "191_1250096198"
+ capture_lex $P912
+ .const 'Sub' $P907 = "190_1250096198"
+ capture_lex $P907
+ .const 'Sub' $P902 = "189_1250096198"
+ capture_lex $P902
+ .const 'Sub' $P897 = "188_1250096198"
+ capture_lex $P897
+ .const 'Sub' $P892 = "187_1250096198"
+ capture_lex $P892
+ .const 'Sub' $P887 = "186_1250096198"
+ capture_lex $P887
+ .const 'Sub' $P882 = "185_1250096198"
+ capture_lex $P882
+ .const 'Sub' $P877 = "184_1250096198"
+ capture_lex $P877
+ .const 'Sub' $P872 = "183_1250096198"
+ capture_lex $P872
+ .const 'Sub' $P867 = "182_1250096198"
+ capture_lex $P867
+ .const 'Sub' $P862 = "181_1250096198"
+ capture_lex $P862
+ .const 'Sub' $P857 = "180_1250096198"
+ capture_lex $P857
+ .const 'Sub' $P852 = "179_1250096198"
+ capture_lex $P852
+ .const 'Sub' $P847 = "178_1250096198"
+ capture_lex $P847
+ .const 'Sub' $P842 = "177_1250096198"
+ capture_lex $P842
+ .const 'Sub' $P837 = "176_1250096198"
+ capture_lex $P837
+ .const 'Sub' $P832 = "175_1250096198"
+ capture_lex $P832
+ .const 'Sub' $P827 = "174_1250096198"
+ capture_lex $P827
+ .const 'Sub' $P822 = "173_1250096198"
+ capture_lex $P822
+ .const 'Sub' $P817 = "172_1250096198"
+ capture_lex $P817
+ .const 'Sub' $P812 = "171_1250096198"
+ capture_lex $P812
+ .const 'Sub' $P807 = "170_1250096198"
+ capture_lex $P807
+ .const 'Sub' $P802 = "169_1250096198"
+ capture_lex $P802
+ .const 'Sub' $P797 = "168_1250096198"
+ capture_lex $P797
+ .const 'Sub' $P792 = "167_1250096198"
+ capture_lex $P792
+ .const 'Sub' $P787 = "166_1250096198"
+ capture_lex $P787
+ .const 'Sub' $P782 = "165_1250096198"
+ capture_lex $P782
+ .const 'Sub' $P777 = "164_1250096198"
+ capture_lex $P777
+ .const 'Sub' $P772 = "163_1250096198"
+ capture_lex $P772
+ .const 'Sub' $P767 = "162_1250096198"
+ capture_lex $P767
+ .const 'Sub' $P762 = "161_1250096198"
+ capture_lex $P762
+ .const 'Sub' $P757 = "160_1250096198"
+ capture_lex $P757
+ .const 'Sub' $P752 = "159_1250096198"
+ capture_lex $P752
+ .const 'Sub' $P747 = "158_1250096198"
+ capture_lex $P747
+ .const 'Sub' $P742 = "157_1250096198"
+ capture_lex $P742
+ .const 'Sub' $P737 = "156_1250096198"
+ capture_lex $P737
+ .const 'Sub' $P732 = "155_1250096198"
+ capture_lex $P732
+ .const 'Sub' $P727 = "154_1250096198"
+ capture_lex $P727
+ .const 'Sub' $P722 = "153_1250096198"
+ capture_lex $P722
+ .const 'Sub' $P717 = "152_1250096198"
+ capture_lex $P717
+ .const 'Sub' $P712 = "151_1250096198"
+ capture_lex $P712
+ .const 'Sub' $P707 = "150_1250096198"
+ capture_lex $P707
+ .const 'Sub' $P702 = "149_1250096198"
+ capture_lex $P702
+ .const 'Sub' $P697 = "148_1250096198"
+ capture_lex $P697
+ .const 'Sub' $P692 = "147_1250096198"
+ capture_lex $P692
+ .const 'Sub' $P687 = "146_1250096198"
+ capture_lex $P687
+ .const 'Sub' $P682 = "145_1250096198"
+ capture_lex $P682
+ .const 'Sub' $P677 = "144_1250096198"
+ capture_lex $P677
+ .const 'Sub' $P672 = "143_1250096198"
+ capture_lex $P672
+ .const 'Sub' $P667 = "142_1250096198"
+ capture_lex $P667
+ .const 'Sub' $P662 = "141_1250096198"
+ capture_lex $P662
+ .const 'Sub' $P657 = "140_1250096198"
+ capture_lex $P657
+ .const 'Sub' $P652 = "139_1250096198"
+ capture_lex $P652
+ .const 'Sub' $P647 = "138_1250096198"
+ capture_lex $P647
+ .const 'Sub' $P642 = "137_1250096198"
+ capture_lex $P642
+ .const 'Sub' $P637 = "136_1250096198"
+ capture_lex $P637
+ .const 'Sub' $P632 = "135_1250096198"
+ capture_lex $P632
+ .const 'Sub' $P627 = "134_1250096198"
+ capture_lex $P627
+ .const 'Sub' $P622 = "133_1250096198"
+ capture_lex $P622
+ .const 'Sub' $P617 = "132_1250096198"
+ capture_lex $P617
+ .const 'Sub' $P612 = "131_1250096198"
+ capture_lex $P612
+ .const 'Sub' $P607 = "130_1250096198"
+ capture_lex $P607
+ .const 'Sub' $P602 = "129_1250096198"
+ capture_lex $P602
+ .const 'Sub' $P597 = "128_1250096198"
+ capture_lex $P597
+ .const 'Sub' $P592 = "127_1250096198"
+ capture_lex $P592
+ .const 'Sub' $P587 = "126_1250096198"
+ capture_lex $P587
+ .const 'Sub' $P582 = "125_1250096198"
+ capture_lex $P582
+ .const 'Sub' $P577 = "124_1250096198"
+ capture_lex $P577
+ .const 'Sub' $P572 = "123_1250096198"
+ capture_lex $P572
+ .const 'Sub' $P567 = "122_1250096198"
+ capture_lex $P567
+ .const 'Sub' $P562 = "121_1250096198"
+ capture_lex $P562
+ .const 'Sub' $P557 = "120_1250096198"
+ capture_lex $P557
+ .const 'Sub' $P552 = "119_1250096198"
+ capture_lex $P552
+ .const 'Sub' $P547 = "118_1250096198"
+ capture_lex $P547
+ .const 'Sub' $P542 = "117_1250096198"
+ capture_lex $P542
+ .const 'Sub' $P537 = "116_1250096198"
+ capture_lex $P537
+ .const 'Sub' $P532 = "115_1250096198"
+ capture_lex $P532
+ .const 'Sub' $P527 = "114_1250096198"
+ capture_lex $P527
+ .const 'Sub' $P522 = "113_1250096198"
+ capture_lex $P522
+ .const 'Sub' $P517 = "112_1250096198"
+ capture_lex $P517
+ .const 'Sub' $P512 = "111_1250096198"
+ capture_lex $P512
+ .const 'Sub' $P507 = "110_1250096198"
+ capture_lex $P507
+ .const 'Sub' $P502 = "109_1250096198"
+ capture_lex $P502
+ .const 'Sub' $P497 = "108_1250096198"
+ capture_lex $P497
+ .const 'Sub' $P492 = "107_1250096198"
+ capture_lex $P492
+ .const 'Sub' $P487 = "106_1250096198"
+ capture_lex $P487
+ .const 'Sub' $P482 = "105_1250096198"
+ capture_lex $P482
+ .const 'Sub' $P477 = "104_1250096198"
+ capture_lex $P477
+ .const 'Sub' $P472 = "103_1250096198"
+ capture_lex $P472
+ .const 'Sub' $P467 = "102_1250096198"
+ capture_lex $P467
+ .const 'Sub' $P462 = "101_1250096198"
+ capture_lex $P462
+ .const 'Sub' $P457 = "100_1250096198"
+ capture_lex $P457
+ .const 'Sub' $P452 = "99_1250096198"
+ capture_lex $P452
+ .const 'Sub' $P447 = "98_1250096198"
+ capture_lex $P447
+ .const 'Sub' $P442 = "97_1250096198"
+ capture_lex $P442
+ .const 'Sub' $P437 = "96_1250096198"
+ capture_lex $P437
+ .const 'Sub' $P432 = "95_1250096198"
+ capture_lex $P432
+ .const 'Sub' $P427 = "94_1250096198"
+ capture_lex $P427
+ .const 'Sub' $P422 = "93_1250096198"
+ capture_lex $P422
+ .const 'Sub' $P417 = "92_1250096198"
+ capture_lex $P417
+ .const 'Sub' $P412 = "91_1250096198"
+ capture_lex $P412
+ .const 'Sub' $P407 = "90_1250096198"
+ capture_lex $P407
+ .const 'Sub' $P402 = "89_1250096198"
+ capture_lex $P402
+ .const 'Sub' $P397 = "88_1250096198"
+ capture_lex $P397
+ .const 'Sub' $P392 = "87_1250096198"
+ capture_lex $P392
+ .const 'Sub' $P387 = "86_1250096198"
+ capture_lex $P387
+ .const 'Sub' $P382 = "85_1250096198"
+ capture_lex $P382
+ .const 'Sub' $P377 = "84_1250096198"
+ capture_lex $P377
+ .const 'Sub' $P372 = "83_1250096198"
+ capture_lex $P372
+ .const 'Sub' $P367 = "82_1250096198"
+ capture_lex $P367
+ .const 'Sub' $P362 = "81_1250096198"
+ capture_lex $P362
+ .const 'Sub' $P357 = "80_1250096198"
+ capture_lex $P357
+ .const 'Sub' $P352 = "79_1250096198"
+ capture_lex $P352
+ .const 'Sub' $P347 = "78_1250096198"
+ capture_lex $P347
+ .const 'Sub' $P342 = "77_1250096198"
+ capture_lex $P342
+ .const 'Sub' $P337 = "76_1250096198"
+ capture_lex $P337
+ .const 'Sub' $P332 = "75_1250096198"
+ capture_lex $P332
+ .const 'Sub' $P327 = "74_1250096198"
+ capture_lex $P327
+ .const 'Sub' $P322 = "73_1250096198"
+ capture_lex $P322
+ .const 'Sub' $P317 = "72_1250096198"
+ capture_lex $P317
+ .const 'Sub' $P312 = "71_1250096198"
+ capture_lex $P312
+ .const 'Sub' $P307 = "70_1250096198"
+ capture_lex $P307
+ .const 'Sub' $P302 = "69_1250096198"
+ capture_lex $P302
+ .const 'Sub' $P297 = "68_1250096198"
+ capture_lex $P297
+ .const 'Sub' $P292 = "67_1250096198"
+ capture_lex $P292
+ .const 'Sub' $P287 = "66_1250096198"
+ capture_lex $P287
+ .const 'Sub' $P282 = "65_1250096198"
+ capture_lex $P282
+ .const 'Sub' $P277 = "64_1250096198"
+ capture_lex $P277
+ .const 'Sub' $P272 = "63_1250096198"
+ capture_lex $P272
+ .const 'Sub' $P267 = "62_1250096198"
+ capture_lex $P267
+ .const 'Sub' $P262 = "61_1250096198"
+ capture_lex $P262
+ .const 'Sub' $P257 = "60_1250096198"
+ capture_lex $P257
+ .const 'Sub' $P252 = "59_1250096198"
+ capture_lex $P252
+ .const 'Sub' $P247 = "58_1250096198"
+ capture_lex $P247
+ .const 'Sub' $P242 = "57_1250096198"
+ capture_lex $P242
+ .const 'Sub' $P237 = "56_1250096198"
+ capture_lex $P237
+ .const 'Sub' $P232 = "55_1250096198"
+ capture_lex $P232
+ .const 'Sub' $P227 = "54_1250096198"
+ capture_lex $P227
+ .const 'Sub' $P222 = "53_1250096198"
+ capture_lex $P222
+ .const 'Sub' $P217 = "52_1250096198"
+ capture_lex $P217
+ .const 'Sub' $P212 = "51_1250096198"
+ capture_lex $P212
+ .const 'Sub' $P207 = "50_1250096198"
+ capture_lex $P207
+ .const 'Sub' $P202 = "49_1250096198"
+ capture_lex $P202
+ .const 'Sub' $P197 = "48_1250096198"
+ capture_lex $P197
+ .const 'Sub' $P192 = "47_1250096198"
+ capture_lex $P192
+ .const 'Sub' $P187 = "46_1250096198"
+ capture_lex $P187
+ .const 'Sub' $P182 = "45_1250096198"
+ capture_lex $P182
+ .const 'Sub' $P177 = "44_1250096198"
+ capture_lex $P177
+ .const 'Sub' $P172 = "43_1250096198"
+ capture_lex $P172
+ .const 'Sub' $P167 = "42_1250096198"
+ capture_lex $P167
+ .const 'Sub' $P162 = "41_1250096198"
+ capture_lex $P162
+ .const 'Sub' $P157 = "40_1250096198"
+ capture_lex $P157
+ .const 'Sub' $P152 = "39_1250096198"
+ capture_lex $P152
+ .const 'Sub' $P147 = "38_1250096198"
+ capture_lex $P147
+ .const 'Sub' $P142 = "37_1250096198"
+ capture_lex $P142
+ .const 'Sub' $P137 = "36_1250096198"
+ capture_lex $P137
+ .const 'Sub' $P132 = "35_1250096198"
+ capture_lex $P132
+ .const 'Sub' $P127 = "34_1250096198"
+ capture_lex $P127
+ .const 'Sub' $P122 = "33_1250096198"
+ capture_lex $P122
+ .const 'Sub' $P117 = "32_1250096198"
+ capture_lex $P117
+ .const 'Sub' $P112 = "31_1250096198"
+ capture_lex $P112
+ .const 'Sub' $P107 = "30_1250096198"
+ capture_lex $P107
+ .const 'Sub' $P102 = "29_1250096198"
+ capture_lex $P102
+ .const 'Sub' $P97 = "28_1250096198"
+ capture_lex $P97
+ .const 'Sub' $P92 = "27_1250096198"
+ capture_lex $P92
+ .const 'Sub' $P87 = "26_1250096198"
+ capture_lex $P87
+ .const 'Sub' $P82 = "25_1250096198"
+ capture_lex $P82
+ .const 'Sub' $P77 = "24_1250096198"
+ capture_lex $P77
+ .const 'Sub' $P72 = "23_1250096198"
+ capture_lex $P72
+ .const 'Sub' $P67 = "22_1250096198"
+ capture_lex $P67
+ .const 'Sub' $P62 = "21_1250096198"
+ capture_lex $P62
+ .const 'Sub' $P57 = "20_1250096198"
+ capture_lex $P57
+ .const 'Sub' $P52 = "19_1250096198"
+ capture_lex $P52
+ .const 'Sub' $P47 = "18_1250096198"
+ capture_lex $P47
+ .const 'Sub' $P42 = "17_1250096198"
+ capture_lex $P42
+ .const 'Sub' $P37 = "16_1250096198"
+ capture_lex $P37
+ .const 'Sub' $P32 = "15_1250096198"
+ capture_lex $P32
+ .const 'Sub' $P27 = "14_1250096198"
+ capture_lex $P27
+ .const 'Sub' $P22 = "13_1250096198"
+ capture_lex $P22
+ .const 'Sub' $P17 = "12_1250096198"
+ capture_lex $P17
+ .const 'Sub' $P12 = "11_1250096198"
+ capture_lex $P12
+.annotate "line", 1
+.include "test_more.pir"
+.include "inc/decnum.pasm"
+load_bytecode "aux/decTest/src/inc/procs.pbc"
+$P0 = loadlib "build/decnum_group"
+.local pmc ctx
+ ctx = new "DecNumContext"
+ ctx."set_ieee754_cmp"(1)
+ ctx."set_exceptions"(0)
+ "plan"(287)
+.annotate "line", 26
+ ctx."set_digits"(9)
+.annotate "line", 27
+ ctx."set_rounding_mode"(.DEC_ROUND_HALF_EVEN)
+.annotate "line", 28
+ ctx."set_emax"(384)
+.annotate "line", 29
+ ctx."set_emin"(-383)
+.annotate "line", 32
+ .const 'Sub' $P12 = "11_1250096198"
+ capture_lex $P12
+ $P12()
+.annotate "line", 33
+ .const 'Sub' $P17 = "12_1250096198"
+ capture_lex $P17
+ $P17()
+.annotate "line", 34
+ .const 'Sub' $P22 = "13_1250096198"
+ capture_lex $P22
+ $P22()
+.annotate "line", 35
+ .const 'Sub' $P27 = "14_1250096198"
+ capture_lex $P27
+ $P27()
+.annotate "line", 36
+ .const 'Sub' $P32 = "15_1250096198"
+ capture_lex $P32
+ $P32()
+.annotate "line", 37
+ .const 'Sub' $P37 = "16_1250096198"
+ capture_lex $P37
+ $P37()
+.annotate "line", 38
+ .const 'Sub' $P42 = "17_1250096198"
+ capture_lex $P42
+ $P42()
+.annotate "line", 39
+ .const 'Sub' $P47 = "18_1250096198"
+ capture_lex $P47
+ $P47()
+.annotate "line", 40
+ .const 'Sub' $P52 = "19_1250096198"
+ capture_lex $P52
+ $P52()
+.annotate "line", 43
+ ctx."set_digits"(7)
+.annotate "line", 44
+ .const 'Sub' $P57 = "20_1250096198"
+ capture_lex $P57
+ $P57()
+.annotate "line", 45
+ .const 'Sub' $P62 = "21_1250096198"
+ capture_lex $P62
+ $P62()
+.annotate "line", 46
+ .const 'Sub' $P67 = "22_1250096198"
+ capture_lex $P67
+ $P67()
+.annotate "line", 47
+ .const 'Sub' $P72 = "23_1250096198"
+ capture_lex $P72
+ $P72()
+.annotate "line", 48
+ .const 'Sub' $P77 = "24_1250096198"
+ capture_lex $P77
+ $P77()
+.annotate "line", 49
+ .const 'Sub' $P82 = "25_1250096198"
+ capture_lex $P82
+ $P82()
+.annotate "line", 50
+ .const 'Sub' $P87 = "26_1250096198"
+ capture_lex $P87
+ $P87()
+.annotate "line", 51
+ .const 'Sub' $P92 = "27_1250096198"
+ capture_lex $P92
+ $P92()
+.annotate "line", 52
+ .const 'Sub' $P97 = "28_1250096198"
+ capture_lex $P97
+ $P97()
+.annotate "line", 53
+ .const 'Sub' $P102 = "29_1250096198"
+ capture_lex $P102
+ $P102()
+.annotate "line", 54
+ .const 'Sub' $P107 = "30_1250096198"
+ capture_lex $P107
+ $P107()
+.annotate "line", 55
+ .const 'Sub' $P112 = "31_1250096198"
+ capture_lex $P112
+ $P112()
+.annotate "line", 56
+ .const 'Sub' $P117 = "32_1250096198"
+ capture_lex $P117
+ $P117()
+.annotate "line", 57
+ .const 'Sub' $P122 = "33_1250096198"
+ capture_lex $P122
+ $P122()
+.annotate "line", 58
+ .const 'Sub' $P127 = "34_1250096198"
+ capture_lex $P127
+ $P127()
+.annotate "line", 59
+ .const 'Sub' $P132 = "35_1250096198"
+ capture_lex $P132
+ $P132()
+.annotate "line", 60
+ .const 'Sub' $P137 = "36_1250096198"
+ capture_lex $P137
+ $P137()
+.annotate "line", 61
+ .const 'Sub' $P142 = "37_1250096198"
+ capture_lex $P142
+ $P142()
+.annotate "line", 64
+ .const 'Sub' $P147 = "38_1250096198"
+ capture_lex $P147
+ $P147()
+.annotate "line", 65
+ .const 'Sub' $P152 = "39_1250096198"
+ capture_lex $P152
+ $P152()
+.annotate "line", 66
+ .const 'Sub' $P157 = "40_1250096198"
+ capture_lex $P157
+ $P157()
+.annotate "line", 67
+ .const 'Sub' $P162 = "41_1250096198"
+ capture_lex $P162
+ $P162()
+.annotate "line", 68
+ .const 'Sub' $P167 = "42_1250096198"
+ capture_lex $P167
+ $P167()
+.annotate "line", 69
+ .const 'Sub' $P172 = "43_1250096198"
+ capture_lex $P172
+ $P172()
+.annotate "line", 72
+ ctx."set_digits"(7)
+.annotate "line", 73
+ .const 'Sub' $P177 = "44_1250096198"
+ capture_lex $P177
+ $P177()
+.annotate "line", 74
+ .const 'Sub' $P182 = "45_1250096198"
+ capture_lex $P182
+ $P182()
+.annotate "line", 75
+ .const 'Sub' $P187 = "46_1250096198"
+ capture_lex $P187
+ $P187()
+.annotate "line", 76
+ .const 'Sub' $P192 = "47_1250096198"
+ capture_lex $P192
+ $P192()
+.annotate "line", 77
+ .const 'Sub' $P197 = "48_1250096198"
+ capture_lex $P197
+ $P197()
+.annotate "line", 78
+ .const 'Sub' $P202 = "49_1250096198"
+ capture_lex $P202
+ $P202()
+.annotate "line", 79
+ .const 'Sub' $P207 = "50_1250096198"
+ capture_lex $P207
+ $P207()
+.annotate "line", 80
+ .const 'Sub' $P212 = "51_1250096198"
+ capture_lex $P212
+ $P212()
+.annotate "line", 81
+ .const 'Sub' $P217 = "52_1250096198"
+ capture_lex $P217
+ $P217()
+.annotate "line", 82
+ .const 'Sub' $P222 = "53_1250096198"
+ capture_lex $P222
+ $P222()
+.annotate "line", 85
+ ctx."set_digits"(50)
+.annotate "line", 86
+ .const 'Sub' $P227 = "54_1250096198"
+ capture_lex $P227
+ $P227()
+.annotate "line", 87
+ ctx."set_digits"(31)
+.annotate "line", 88
+ .const 'Sub' $P232 = "55_1250096198"
+ capture_lex $P232
+ $P232()
+.annotate "line", 89
+ ctx."set_digits"(30)
+.annotate "line", 90
+ .const 'Sub' $P237 = "56_1250096198"
+ capture_lex $P237
+ $P237()
+.annotate "line", 91
+ ctx."set_digits"(29)
+.annotate "line", 92
+ .const 'Sub' $P242 = "57_1250096198"
+ capture_lex $P242
+ $P242()
+.annotate "line", 93
+ ctx."set_digits"(28)
+.annotate "line", 94
+ .const 'Sub' $P247 = "58_1250096198"
+ capture_lex $P247
+ $P247()
+.annotate "line", 95
+ ctx."set_digits"(27)
+.annotate "line", 96
+ .const 'Sub' $P252 = "59_1250096198"
+ capture_lex $P252
+ $P252()
+.annotate "line", 97
+ ctx."set_digits"(26)
+.annotate "line", 98
+ .const 'Sub' $P257 = "60_1250096198"
+ capture_lex $P257
+ $P257()
+.annotate "line", 99
+ ctx."set_digits"(25)
+.annotate "line", 100
+ .const 'Sub' $P262 = "61_1250096198"
+ capture_lex $P262
+ $P262()
+.annotate "line", 101
+ ctx."set_digits"(24)
+.annotate "line", 102
+ .const 'Sub' $P267 = "62_1250096198"
+ capture_lex $P267
+ $P267()
+.annotate "line", 103
+ ctx."set_digits"(23)
+.annotate "line", 104
+ .const 'Sub' $P272 = "63_1250096198"
+ capture_lex $P272
+ $P272()
+.annotate "line", 105
+ ctx."set_digits"(22)
+.annotate "line", 106
+ .const 'Sub' $P277 = "64_1250096198"
+ capture_lex $P277
+ $P277()
+.annotate "line", 107
+ ctx."set_digits"(21)
+.annotate "line", 108
+ .const 'Sub' $P282 = "65_1250096198"
+ capture_lex $P282
+ $P282()
+.annotate "line", 109
+ ctx."set_digits"(20)
+.annotate "line", 110
+ .const 'Sub' $P287 = "66_1250096198"
+ capture_lex $P287
+ $P287()
+.annotate "line", 111
+ ctx."set_digits"(19)
+.annotate "line", 112
+ .const 'Sub' $P292 = "67_1250096198"
+ capture_lex $P292
+ $P292()
+.annotate "line", 113
+ ctx."set_digits"(18)
+.annotate "line", 114
+ .const 'Sub' $P297 = "68_1250096198"
+ capture_lex $P297
+ $P297()
+.annotate "line", 115
+ ctx."set_digits"(17)
+.annotate "line", 116
+ .const 'Sub' $P302 = "69_1250096198"
+ capture_lex $P302
+ $P302()
+.annotate "line", 117
+ ctx."set_digits"(16)
+.annotate "line", 118
+ .const 'Sub' $P307 = "70_1250096198"
+ capture_lex $P307
+ $P307()
+.annotate "line", 119
+ ctx."set_digits"(15)
+.annotate "line", 120
+ .const 'Sub' $P312 = "71_1250096198"
+ capture_lex $P312
+ $P312()
+.annotate "line", 121
+ ctx."set_digits"(14)
+.annotate "line", 122
+ .const 'Sub' $P317 = "72_1250096198"
+ capture_lex $P317
+ $P317()
+.annotate "line", 123
+ ctx."set_digits"(13)
+.annotate "line", 124
+ .const 'Sub' $P322 = "73_1250096198"
+ capture_lex $P322
+ $P322()
+.annotate "line", 125
+ ctx."set_digits"(12)
+.annotate "line", 126
+ .const 'Sub' $P327 = "74_1250096198"
+ capture_lex $P327
+ $P327()
+.annotate "line", 127
+ ctx."set_digits"(11)
+.annotate "line", 128
+ .const 'Sub' $P332 = "75_1250096198"
+ capture_lex $P332
+ $P332()
+.annotate "line", 129
+ ctx."set_digits"(10)
+.annotate "line", 130
+ .const 'Sub' $P337 = "76_1250096198"
+ capture_lex $P337
+ $P337()
+.annotate "line", 131
+ ctx."set_digits"(9)
+.annotate "line", 132
+ .const 'Sub' $P342 = "77_1250096198"
+ capture_lex $P342
+ $P342()
+.annotate "line", 133
+ ctx."set_digits"(8)
+.annotate "line", 134
+ .const 'Sub' $P347 = "78_1250096198"
+ capture_lex $P347
+ $P347()
+.annotate "line", 135
+ ctx."set_digits"(7)
+.annotate "line", 136
+ .const 'Sub' $P352 = "79_1250096198"
+ capture_lex $P352
+ $P352()
+.annotate "line", 137
+ ctx."set_digits"(6)
+.annotate "line", 138
+ .const 'Sub' $P357 = "80_1250096198"
+ capture_lex $P357
+ $P357()
+.annotate "line", 141
+ ctx."set_digits"(250)
+.annotate "line", 142
+ .const 'Sub' $P362 = "81_1250096198"
+ capture_lex $P362
+ $P362()
+.annotate "line", 145
+ ctx."set_digits"(16)
+.annotate "line", 146
+ ctx."set_emax"(999999)
+.annotate "line", 147
+ ctx."set_emin"(-999999)
+.annotate "line", 149
+ .const 'Sub' $P367 = "82_1250096198"
+ capture_lex $P367
+ $P367()
+.annotate "line", 150
+ .const 'Sub' $P372 = "83_1250096198"
+ capture_lex $P372
+ $P372()
+.annotate "line", 152
+ .const 'Sub' $P377 = "84_1250096198"
+ capture_lex $P377
+ $P377()
+.annotate "line", 153
+ .const 'Sub' $P382 = "85_1250096198"
+ capture_lex $P382
+ $P382()
+.annotate "line", 154
+ .const 'Sub' $P387 = "86_1250096198"
+ capture_lex $P387
+ $P387()
+.annotate "line", 155
+ .const 'Sub' $P392 = "87_1250096198"
+ capture_lex $P392
+ $P392()
+.annotate "line", 156
+ .const 'Sub' $P397 = "88_1250096198"
+ capture_lex $P397
+ $P397()
+.annotate "line", 157
+ .const 'Sub' $P402 = "89_1250096198"
+ capture_lex $P402
+ $P402()
+.annotate "line", 160
+ ctx."set_digits"(30)
+.annotate "line", 161
+ .const 'Sub' $P407 = "90_1250096198"
+ capture_lex $P407
+ $P407()
+.annotate "line", 162
+ .const 'Sub' $P412 = "91_1250096198"
+ capture_lex $P412
+ $P412()
+.annotate "line", 163
+ .const 'Sub' $P417 = "92_1250096198"
+ capture_lex $P417
+ $P417()
+.annotate "line", 164
+ ctx."set_digits"(20)
+.annotate "line", 165
+ .const 'Sub' $P422 = "93_1250096198"
+ capture_lex $P422
***The diff for this file has been truncated for email.***
=======================================
--- /trunk/aux/decTest/src/inc/procs.pir Tue Aug 11 16:42:01 2009
+++ /trunk/aux/decTest/src/inc/procs.pir Wed Aug 12 10:09:40 2009
@@ -69,9 +69,8 @@
.sub exp
.param pmc x
- .param pmc y
.local pmc z
- z = x.'exp'( y )
+ z = x.'exp'()
.return ( z )
.end