compile-1ified

cvs
Doug Coleman 2006-01-21 05:20:21 +00:00
parent f411126dad
commit 59eb004b37
1 changed files with 65 additions and 45 deletions

View File

@ -80,60 +80,80 @@ Compile fails:
0.2875868408644093 + sin >bignum cos >float sin ; 0.2875868408644093 + sin >bignum cos >float sin ;
x86 fixnum problem? x86 problems below
100 [ test-integer>x ] times
IN: compiler-test : math-dummy -63545870 ceiling ; [ 0 bits>float ]
Compiling math-dummy Compiling G:455019
-63545870 3562994 4.203895392974451e-45 110.8125
IN: compiler-test : math-dummy -172512992 double>bits ; [ -1 float>bits ]
Compiling math-dummy Compiling G:455338
4800873998879566904 4780613886529085440 1099286058 4
IN: compiler-test : math-dummy 268435455 float>bits ; [ -15766735 double>bits ]
Compiling math-dummy Compiling G:455023
1102377402 4 4702233936300867587 4777205847159578624
IN: compiler-test : math-dummy 268435455 neg ; [ -23841331 bits>double ]
Compiling math-dummy Compiling G:455027
-268435455 1 5.127236739868035e-270 5.097526873523571e-270
IN: compiler-test : math-dummy 48191798 neg ; [ -251924354 1+ ]
Compiling math-dummy Compiling G:455128
-48191798 18917066 -251924353 16511103
IN: compiler-test : math-dummy -176408007 next-power-of-2 ; [ -258114108 1- ]
Compiling math-dummy Compiling G:455920
1 33554432 -258114109 10321347
IN: compiler-test : math-dummy -63194602 bits>float ; [ 259957324 bitnot ]
Compiling math-dummy Compiling G:455227
80.08636474609375 110.8125 -259957325 8478131
IN: compiler-test : math-dummy [ -268435456 quadrant ]
116813922808736214071768419862654566798144280646827276619588644136147298073359475589294679233724596355072 Compiling G:455335
bits>double ;
Compiling math-dummy
5.083189076777759e-270 5.097526873523571e-270
IN: compiler-test : math-dummy -43922848 1- ;
Compiling math-dummy
-43922849 23186015
IN: compiler-test : math-dummy -186662979 quadrant ;
Compiling math-dummy
1 0 1 0
IN: compiler-test : math-dummy -51219578 floor ; [ 620858855246776348355165240843829248 >fixnum ]
Compiling math-dummy Compiling G:457023
-51219578 15889286
IN: compiler-test : math-dummy -56213080 numerator ;
Compiling math-dummy
-56213080 10895784
IN: compiler-test : math-dummy -268435456 truncate ;
Compiling math-dummy
-268435456 0 -268435456 0
[ 268435455 neg ]
Compiling G:457031
-268435455 1
[ -60976708 next-power-of-2 ]
Compiling G:457308
1 8388608
[ -132458581 real ]
Compiling G:459251
-132458581 1759147
[ -200388566 floor ]
Compiling G:461226
-200388566 938026
2 ARGUEMENT INTEGER WORDS
[ 252475730 -1 * ]
Compiling G:452424
-252475730 15959726
[ -268435456 209630756 min ]
Compiling G:452492
-268435456 0
[ -258355397 -181752298 max ]
Compiling G:452699
-181752298 19574294
[ -14282409 -22156592 + ]
Compiling G:452838
-36439001 30669863
[ -48101335 0 - ]
Compiling G:454874
-48101335 19007529