changed mechanism a bit
This commit is contained in:
ceriel
parent
6709f6e340
commit
c6134a1f59
|
|
@ -20,5 +20,5 @@ ctstruct
|
|||
ctsys
|
||||
ctsetjmp
|
||||
local.h
|
||||
makefile.std
|
||||
makefile
|
||||
run
|
||||
|
|
|
|||
|
|
@ -1,62 +1,55 @@
|
|||
Wed Apr 27 13:01:47 MET DST 1988
|
||||
Mon Nov 20 09:09:28 MET 1989
|
||||
Compilation command: acc -mem24 -DNOFLOAT
|
||||
Run command: em
|
||||
***** ctconv
|
||||
em24 -DNOFLOAT conv.c
|
||||
conv.c
|
||||
compiling conv.c
|
||||
"conv.c", line 38: (warning) overflow in constant expression
|
||||
running conv.cem
|
||||
comparing conv
|
||||
2a3,4
|
||||
> (float) 12 = 12.000000
|
||||
> (int) 3.14 = 3
|
||||
11,$c13,$
|
||||
11,12c13,17
|
||||
< char -1, int -1, unsigned 177777, long -1
|
||||
< char -1, int -1, unsigned 177777, long -1
|
||||
< From integer
|
||||
< char -64, int -64, unsigned 177700, long -64
|
||||
< From long
|
||||
< char -3, int -3, unsigned 177775, long -3
|
||||
< Casts from long
|
||||
< char -8, int 9464, unsigned short 22370, long 75000
|
||||
< a[l] (l==3) -17
|
||||
< a[3l] -17
|
||||
< (unsigned short) 0x1f010L = 0xf010
|
||||
< (short) 0x1f010L = 0xfffff010
|
||||
---
|
||||
> float 127.000000
|
||||
> char -1, int -1, unsigned 37777777777, long -1
|
||||
> float -1.000000
|
||||
> char -1, int -1, unsigned 37777777777, long -1
|
||||
> float -1.000000
|
||||
> From integer
|
||||
14c19,20
|
||||
< char -64, int -64, unsigned 177700, long -64
|
||||
---
|
||||
> char -64, int -64, unsigned 37777777700, long -64
|
||||
> float -64.000000
|
||||
> From long
|
||||
16c22,23
|
||||
< char -3, int -3, unsigned 177775, long -3
|
||||
---
|
||||
> char -3, int -3, unsigned 37777777775, long -3
|
||||
> float -3.000000
|
||||
> Casts from long
|
||||
18c25,30
|
||||
< char -8, int 9464, unsigned short 22370, long 75000
|
||||
---
|
||||
> char -8, int 75000, unsigned short 22370, long 75000
|
||||
> From float
|
||||
> char 121, int 121, unsigned 171, long 121, float 121.500000
|
||||
> char 0, int 0, unsigned 0, long 0, float 0.000100
|
||||
> int 32766, unsigned 77776, long 32766, float 32766.000000
|
||||
> long 1223432064, float 1223432064.000000
|
||||
> a[l] (l==3) -17
|
||||
> a[3l] -17
|
||||
> (unsigned short) 0x1f010L = 0xf010
|
||||
> (short) 0x1f010L = 0xfffff010
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f conv.cem.g ; then diff conv.cem.r conv.cem.g ; else echo creating conv.cem.g ; cp conv.cem.r conv.cem.g ; fi
|
||||
***** ctdecl
|
||||
em24 -DNOFLOAT decl.c
|
||||
decl.c
|
||||
compiling decl.c
|
||||
running decl.cem
|
||||
comparing decl
|
||||
***** ctdivers
|
||||
em24 -DNOFLOAT ops.c
|
||||
ops.c
|
||||
compiling ops.c
|
||||
running ops.cem
|
||||
comparing ops
|
||||
22,37c22,39
|
||||
< u<<0 150715
|
||||
21a22
|
||||
> u>>16 0
|
||||
23,37c24,39
|
||||
< u<<1 121632
|
||||
< u<<2 43464
|
||||
< u<<3 107150
|
||||
|
|
@ -73,8 +66,6 @@ comparing ops
|
|||
< u<<14 40000
|
||||
< u<<15 100000
|
||||
---
|
||||
> u>>16 0
|
||||
> u<<0 150715
|
||||
> u<<1 321632
|
||||
> u<<2 643464
|
||||
> u<<3 1507150
|
||||
|
|
@ -91,38 +82,35 @@ comparing ops
|
|||
> u<<14 6434640000
|
||||
> u<<15 15071500000
|
||||
> u<<16 32163200000
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f ops.cem.g ; then diff ops.cem.r ops.cem.g ; else echo creating ops.cem.g ; cp ops.cem.r ops.cem.g ; fi
|
||||
***** cterr
|
||||
em24 -DNOFLOAT bugs.c
|
||||
bugs.c
|
||||
compiling bugs.c
|
||||
"bugs.c", line 88: (warning) overflow in constant expression
|
||||
running bugs.cem
|
||||
comparing bugs
|
||||
***** ctest1
|
||||
em24 -DNOFLOAT test.c
|
||||
test.c
|
||||
compiling test.c
|
||||
running test.cem
|
||||
comparing test
|
||||
1,$c1,$
|
||||
1c1
|
||||
< End of test program, 10 tests completed, 0 errors detected
|
||||
---
|
||||
> End of test program, 11 tests completed, 0 errors detected
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f test.cem.g ; then diff test.cem.r test.cem.g ; else echo creating test.cem.g ; cp test.cem.r test.cem.g ; fi
|
||||
***** ctest2
|
||||
em24 -DNOFLOAT t7.c
|
||||
t7.c
|
||||
compiling t7.c
|
||||
running t7.cem
|
||||
comparing t7
|
||||
***** ctest3
|
||||
em24 -DNOFLOAT test2.c
|
||||
test2.c
|
||||
compiling test2.c
|
||||
"test2.c", line 448: (warning) conversion of pointer to int loses accuracy
|
||||
"test2.c", line 448: (warning) conversion of pointer to int loses accuracy
|
||||
running test2.cem
|
||||
comparing test2
|
||||
***** ctest5
|
||||
em24 -DNOFLOAT test1.c
|
||||
test1.c
|
||||
compiling test1.c
|
||||
"test1.c", line 375: (warning) incompatible pointers in =
|
||||
"test1.c", line 376: (warning) incompatible pointers in =
|
||||
"test1.c", line 377: (warning) incompatible pointers in =
|
||||
|
|
@ -133,136 +121,128 @@ test1.c
|
|||
"test1.c", line 426: (warning) incompatible pointers in =
|
||||
running test1.cem
|
||||
comparing test1
|
||||
1,$c1,$
|
||||
< program test1
|
||||
0a1
|
||||
> error 13 in test 11
|
||||
2c3
|
||||
< 10 tests completed. Number of errors = 0
|
||||
---
|
||||
> error 13 in test 11
|
||||
> program test1
|
||||
> 11 tests completed. Number of errors = 1
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f test1.cem.g ; then diff test1.cem.r test1.cem.g ; else echo creating test1.cem.g ; cp test1.cem.r test1.cem.g ; fi
|
||||
***** ctgen
|
||||
sed -f bf.sed <OPS >bf.c
|
||||
em24 -DNOFLOAT bf.c
|
||||
bf.c
|
||||
compiling bf.c
|
||||
running bf.cem
|
||||
comparing bf
|
||||
sed -f bfu.sed <OPS >bfu.c
|
||||
compiling bfu.c
|
||||
running bfu.cem
|
||||
comparing bfu
|
||||
sed -f cel.sed <OPS >cel.c
|
||||
em24 -DNOFLOAT cel.c
|
||||
cel.c
|
||||
compiling cel.c
|
||||
running cel.cem
|
||||
comparing cel
|
||||
sed -f clu.sed <OPS >clu.c
|
||||
em24 -DNOFLOAT clu.c
|
||||
clu.c
|
||||
compiling clu.c
|
||||
"clu.c", line 60: (warning) overflow in unsigned constant expression
|
||||
"clu.c", line 66: (warning) overflow in unsigned constant expression
|
||||
running clu.cem
|
||||
comparing clu
|
||||
23,31c23,31
|
||||
23,25c23,25
|
||||
< x = 40000 -25536
|
||||
< x += 40000 -25526
|
||||
< x -= 40000 25546
|
||||
< x /= 40000 0
|
||||
< x %= 40000 10
|
||||
< x *= 40000 6784
|
||||
< x &= 40000 0
|
||||
< x |= 40000 -25526
|
||||
< x ^= 40000 -25526
|
||||
---
|
||||
> x = 40000 40000
|
||||
> x += 40000 40010
|
||||
> x -= 40000 -39990
|
||||
> x /= 40000 0
|
||||
> x %= 40000 10
|
||||
28c28
|
||||
< x *= 40000 6784
|
||||
---
|
||||
> x *= 40000 400000
|
||||
> x &= 40000 0
|
||||
30,31c30,31
|
||||
< x |= 40000 -25526
|
||||
< x ^= 40000 -25526
|
||||
---
|
||||
> x |= 40000 40010
|
||||
> x ^= 40000 40010
|
||||
38c38
|
||||
< y = ( 40000 + 8012 ) -17524
|
||||
---
|
||||
> y = ( 40000 + 8012 ) 48012
|
||||
42,52c42,52
|
||||
42c42
|
||||
< y = ( 40000 * 8012 ) 8960
|
||||
< y = ( 40000 & 8012 ) 7232
|
||||
< y = ( 40000 | 8012 ) -24756
|
||||
< y = ( 40000 ^ 8012 ) -31988
|
||||
< y = ( 40000 || 8012 ) 1
|
||||
< y = ( 40000 && 8012 ) 1
|
||||
< y = ( 40000 << 9 ) -32768
|
||||
< y = ( 40000 >> 9 ) 78
|
||||
< y = ( -40000 ) 25536
|
||||
< y = ( !40000 ) 0
|
||||
< y = ( ~40000 ) 25535
|
||||
---
|
||||
> y = ( 40000 * 8012 ) 320480000
|
||||
> y = ( 40000 & 8012 ) 7232
|
||||
44,45c44,45
|
||||
< y = ( 40000 | 8012 ) -24756
|
||||
< y = ( 40000 ^ 8012 ) -31988
|
||||
---
|
||||
> y = ( 40000 | 8012 ) 40780
|
||||
> y = ( 40000 ^ 8012 ) 33548
|
||||
> y = ( 40000 || 8012 ) 1
|
||||
> y = ( 40000 && 8012 ) 1
|
||||
48c48
|
||||
< y = ( 40000 << 9 ) -32768
|
||||
---
|
||||
> y = ( 40000 << 9 ) 20480000
|
||||
> y = ( 40000 >> 9 ) 78
|
||||
50c50
|
||||
< y = ( -40000 ) 25536
|
||||
---
|
||||
> y = ( -40000 ) -40000
|
||||
> y = ( !40000 ) 0
|
||||
52c52
|
||||
< y = ( ~40000 ) 25535
|
||||
---
|
||||
> y = ( ~40000 ) -40001
|
||||
59,68c59,68
|
||||
59,62c59,62
|
||||
< y = ( 40000 ? 40000 : 8012 ) -25536
|
||||
< y = ( x = 40000 ) -25536 -25536
|
||||
< y = ( x += 40000 ) -25526 -25526
|
||||
< y = ( x -= 40000 ) 25546 25546
|
||||
< y = ( x /= 40000 ) 0 0
|
||||
< y = ( x %= 40000 ) 10 10
|
||||
< y = ( x *= 40000 ) 6784 6784
|
||||
< y = ( x &= 40000 ) 0 0
|
||||
< y = ( x |= 40000 ) -25526 -25526
|
||||
< y = ( x ^= 40000 ) -25526 -25526
|
||||
---
|
||||
> y = ( 40000 ? 40000 : 8012 ) 40000
|
||||
> y = ( x = 40000 ) 40000 40000
|
||||
> y = ( x += 40000 ) 40010 40010
|
||||
> y = ( x -= 40000 ) -39990 -39990
|
||||
> y = ( x /= 40000 ) 0 0
|
||||
> y = ( x %= 40000 ) 10 10
|
||||
65c65
|
||||
< y = ( x *= 40000 ) 6784 6784
|
||||
---
|
||||
> y = ( x *= 40000 ) 400000 400000
|
||||
> y = ( x &= 40000 ) 0 0
|
||||
67,68c67,68
|
||||
< y = ( x |= 40000 ) -25526 -25526
|
||||
< y = ( x ^= 40000 ) -25526 -25526
|
||||
---
|
||||
> y = ( x |= 40000 ) 40010 40010
|
||||
> y = ( x ^= 40000 ) 40010 40010
|
||||
97,105c97,105
|
||||
97,99c97,99
|
||||
< yes if ( x = 40000 ) yes() ; else no() -25536
|
||||
< yes if ( x += 40000 ) yes() ; else no() -25526
|
||||
< yes if ( x -= 40000 ) yes() ; else no() 25546
|
||||
< no if ( x /= 40000 ) yes() ; else no() 0
|
||||
< yes if ( x %= 40000 ) yes() ; else no() 10
|
||||
< yes if ( x *= 40000 ) yes() ; else no() 6784
|
||||
< no if ( x &= 40000 ) yes() ; else no() 0
|
||||
< yes if ( x |= 40000 ) yes() ; else no() -25526
|
||||
< yes if ( x ^= 40000 ) yes() ; else no() -25526
|
||||
---
|
||||
> yes if ( x = 40000 ) yes() ; else no() 40000
|
||||
> yes if ( x += 40000 ) yes() ; else no() 40010
|
||||
> yes if ( x -= 40000 ) yes() ; else no() -39990
|
||||
> no if ( x /= 40000 ) yes() ; else no() 0
|
||||
> yes if ( x %= 40000 ) yes() ; else no() 10
|
||||
102c102
|
||||
< yes if ( x *= 40000 ) yes() ; else no() 6784
|
||||
---
|
||||
> yes if ( x *= 40000 ) yes() ; else no() 400000
|
||||
> no if ( x &= 40000 ) yes() ; else no() 0
|
||||
104,105c104,105
|
||||
< yes if ( x |= 40000 ) yes() ; else no() -25526
|
||||
< yes if ( x ^= 40000 ) yes() ; else no() -25526
|
||||
---
|
||||
> yes if ( x |= 40000 ) yes() ; else no() 40010
|
||||
> yes if ( x ^= 40000 ) yes() ; else no() 40010
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f clu.cem.g ; then diff clu.cem.r clu.cem.g ; else echo creating clu.cem.g ; cp clu.cem.r clu.cem.g ; fi
|
||||
sed -f ec.sed <OPS >ec.c
|
||||
em24 -DNOFLOAT ec.c
|
||||
ec.c
|
||||
compiling ec.c
|
||||
"ec.c", line 58: (warning) overflow in constant expression
|
||||
"ec.c", line 64: (warning) overflow in constant expression
|
||||
running ec.cem
|
||||
comparing ec
|
||||
sed -f ef.sed <OPS >ef.c
|
||||
em24 -DNOFLOAT ef.c
|
||||
ef.c
|
||||
compiling ef.c
|
||||
running ef.cem
|
||||
comparing ef
|
||||
0a1,$
|
||||
0a1,72
|
||||
> .4e-5 + .3e-5
|
||||
> .4e-5 - .3e-5
|
||||
> .4e-5 / .3e-5
|
||||
|
|
@ -335,10 +315,10 @@ comparing ef
|
|||
> yes if ( x -- ) yes() ; else no() 2.141500e+00
|
||||
> yes if ( -- x ) yes() ; else no() 2.141500e+00
|
||||
> yes if ( ++ x ) yes() ; else no() 4.141500e+00
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f ef.cem.g ; then diff ef.cem.r ef.cem.g ; else echo creating ef.cem.g ; cp ef.cem.r ef.cem.g ; fi
|
||||
sed -f ei.sed <OPS >ei.c
|
||||
em24 -DNOFLOAT ei.c
|
||||
ei.c
|
||||
compiling ei.c
|
||||
"ei.c", line 22: (warning) overflow in constant expression
|
||||
"ei.c", line 65: (warning) overflow in constant expression
|
||||
"ei.c", line 108: (warning) overflow in constant expression
|
||||
|
|
@ -364,116 +344,107 @@ comparing ei
|
|||
< yes if ( x <<= 15 ) yes() ; else no() -32768
|
||||
---
|
||||
> yes if ( x <<= 15 ) yes() ; else no() 8355840
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f ei.cem.g ; then diff ei.cem.r ei.cem.g ; else echo creating ei.cem.g ; cp ei.cem.r ei.cem.g ; fi
|
||||
sed -f el.sed <OPS >el.c
|
||||
em24 -DNOFLOAT el.c
|
||||
el.c
|
||||
compiling el.c
|
||||
running el.cem
|
||||
comparing el
|
||||
sed -f eu.sed <OPS >eu.c
|
||||
em24 -DNOFLOAT eu.c
|
||||
eu.c
|
||||
compiling eu.c
|
||||
"eu.c", line 58: (warning) overflow in unsigned constant expression
|
||||
"eu.c", line 64: (warning) overflow in unsigned constant expression
|
||||
running eu.cem
|
||||
comparing eu
|
||||
23,31c23,31
|
||||
23,25c23,25
|
||||
< x = 40000 -25536
|
||||
< x += 40000 -25526
|
||||
< x -= 40000 25546
|
||||
< x /= 40000 0
|
||||
< x %= 40000 10
|
||||
< x *= 40000 6784
|
||||
< x &= 40000 0
|
||||
< x |= 40000 -25526
|
||||
< x ^= 40000 -25526
|
||||
---
|
||||
> x = 40000 40000
|
||||
> x += 40000 40010
|
||||
> x -= 40000 -39990
|
||||
> x /= 40000 0
|
||||
> x %= 40000 10
|
||||
28c28
|
||||
< x *= 40000 6784
|
||||
---
|
||||
> x *= 40000 400000
|
||||
> x &= 40000 0
|
||||
30,31c30,31
|
||||
< x |= 40000 -25526
|
||||
< x ^= 40000 -25526
|
||||
---
|
||||
> x |= 40000 40010
|
||||
> x ^= 40000 40010
|
||||
38c38
|
||||
< y = ( 40000 + 8012 ) -17524
|
||||
---
|
||||
> y = ( 40000 + 8012 ) 48012
|
||||
42,52c42,52
|
||||
42c42
|
||||
< y = ( 40000 * 8012 ) 8960
|
||||
< y = ( 40000 & 8012 ) 7232
|
||||
< y = ( 40000 | 8012 ) -24756
|
||||
< y = ( 40000 ^ 8012 ) -31988
|
||||
< y = ( 40000 || 8012 ) 1
|
||||
< y = ( 40000 && 8012 ) 1
|
||||
< y = ( 40000 << 9 ) -32768
|
||||
< y = ( 40000 >> 9 ) 78
|
||||
< y = ( -40000 ) 25536
|
||||
< y = ( !40000 ) 0
|
||||
< y = ( ~40000 ) 25535
|
||||
---
|
||||
> y = ( 40000 * 8012 ) 320480000
|
||||
> y = ( 40000 & 8012 ) 7232
|
||||
44,45c44,45
|
||||
< y = ( 40000 | 8012 ) -24756
|
||||
< y = ( 40000 ^ 8012 ) -31988
|
||||
---
|
||||
> y = ( 40000 | 8012 ) 40780
|
||||
> y = ( 40000 ^ 8012 ) 33548
|
||||
> y = ( 40000 || 8012 ) 1
|
||||
> y = ( 40000 && 8012 ) 1
|
||||
48c48
|
||||
< y = ( 40000 << 9 ) -32768
|
||||
---
|
||||
> y = ( 40000 << 9 ) 20480000
|
||||
> y = ( 40000 >> 9 ) 78
|
||||
50c50
|
||||
< y = ( -40000 ) 25536
|
||||
---
|
||||
> y = ( -40000 ) -40000
|
||||
> y = ( !40000 ) 0
|
||||
52c52
|
||||
< y = ( ~40000 ) 25535
|
||||
---
|
||||
> y = ( ~40000 ) -40001
|
||||
59,68c59,68
|
||||
59,62c59,62
|
||||
< y = ( 40000 ? 40000 : 8012 ) -25536
|
||||
< y = ( x = 40000 ) -25536 -25536
|
||||
< y = ( x += 40000 ) -25526 -25526
|
||||
< y = ( x -= 40000 ) 25546 25546
|
||||
< y = ( x /= 40000 ) 0 0
|
||||
< y = ( x %= 40000 ) 10 10
|
||||
< y = ( x *= 40000 ) 6784 6784
|
||||
< y = ( x &= 40000 ) 0 0
|
||||
< y = ( x |= 40000 ) -25526 -25526
|
||||
< y = ( x ^= 40000 ) -25526 -25526
|
||||
---
|
||||
> y = ( 40000 ? 40000 : 8012 ) 40000
|
||||
> y = ( x = 40000 ) 40000 40000
|
||||
> y = ( x += 40000 ) 40010 40010
|
||||
> y = ( x -= 40000 ) -39990 -39990
|
||||
> y = ( x /= 40000 ) 0 0
|
||||
> y = ( x %= 40000 ) 10 10
|
||||
65c65
|
||||
< y = ( x *= 40000 ) 6784 6784
|
||||
---
|
||||
> y = ( x *= 40000 ) 400000 400000
|
||||
> y = ( x &= 40000 ) 0 0
|
||||
67,68c67,68
|
||||
< y = ( x |= 40000 ) -25526 -25526
|
||||
< y = ( x ^= 40000 ) -25526 -25526
|
||||
---
|
||||
> y = ( x |= 40000 ) 40010 40010
|
||||
> y = ( x ^= 40000 ) 40010 40010
|
||||
97,105c97,105
|
||||
97,99c97,99
|
||||
< yes if ( x = 40000 ) yes() ; else no() -25536
|
||||
< yes if ( x += 40000 ) yes() ; else no() -25526
|
||||
< yes if ( x -= 40000 ) yes() ; else no() 25546
|
||||
< no if ( x /= 40000 ) yes() ; else no() 0
|
||||
< yes if ( x %= 40000 ) yes() ; else no() 10
|
||||
< yes if ( x *= 40000 ) yes() ; else no() 6784
|
||||
< no if ( x &= 40000 ) yes() ; else no() 0
|
||||
< yes if ( x |= 40000 ) yes() ; else no() -25526
|
||||
< yes if ( x ^= 40000 ) yes() ; else no() -25526
|
||||
---
|
||||
> yes if ( x = 40000 ) yes() ; else no() 40000
|
||||
> yes if ( x += 40000 ) yes() ; else no() 40010
|
||||
> yes if ( x -= 40000 ) yes() ; else no() -39990
|
||||
> no if ( x /= 40000 ) yes() ; else no() 0
|
||||
> yes if ( x %= 40000 ) yes() ; else no() 10
|
||||
102c102
|
||||
< yes if ( x *= 40000 ) yes() ; else no() 6784
|
||||
---
|
||||
> yes if ( x *= 40000 ) yes() ; else no() 400000
|
||||
> no if ( x &= 40000 ) yes() ; else no() 0
|
||||
104,105c104,105
|
||||
< yes if ( x |= 40000 ) yes() ; else no() -25526
|
||||
< yes if ( x ^= 40000 ) yes() ; else no() -25526
|
||||
---
|
||||
> yes if ( x |= 40000 ) yes() ; else no() 40010
|
||||
> yes if ( x ^= 40000 ) yes() ; else no() 40010
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f eu.cem.g ; then diff eu.cem.r eu.cem.g ; else echo creating eu.cem.g ; cp eu.cem.r eu.cem.g ; fi
|
||||
sed -f id.sed <OPS >id.c
|
||||
em24 -DNOFLOAT id.c
|
||||
id.c
|
||||
compiling id.c
|
||||
running id.cem
|
||||
comparing id
|
||||
0a1,$
|
||||
0a1,72
|
||||
> (-40) + 300
|
||||
> (-40) - 300
|
||||
> (-40) / 300
|
||||
|
|
@ -546,20 +517,19 @@ comparing id
|
|||
> yes if ( x -- ) yes() ; else no() 2.141500e+00
|
||||
> yes if ( -- x ) yes() ; else no() 2.141500e+00
|
||||
> yes if ( ++ x ) yes() ; else no() 4.141500e+00
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f id.cem.g ; then diff id.cem.r id.cem.g ; else echo creating id.cem.g ; cp id.cem.r id.cem.g ; fi
|
||||
sed -f lc.sed <OPS >lc.c
|
||||
em24 -DNOFLOAT lc.c
|
||||
lc.c
|
||||
compiling lc.c
|
||||
"lc.c", line 60: (warning) overflow in constant expression
|
||||
"lc.c", line 66: (warning) overflow in constant expression
|
||||
running lc.cem
|
||||
comparing lc
|
||||
sed -f ld.sed <OPS >ld.c
|
||||
em24 -DNOFLOAT ld.c
|
||||
ld.c
|
||||
compiling ld.c
|
||||
running ld.cem
|
||||
comparing ld
|
||||
0a1,$
|
||||
0a1,72
|
||||
> .4e-5 + .3e-5
|
||||
> .4e-5 - .3e-5
|
||||
> .4e-5 / .3e-5
|
||||
|
|
@ -632,13 +602,13 @@ comparing ld
|
|||
> yes if ( x -- ) yes() ; else no() 2.141500e+00
|
||||
> yes if ( -- x ) yes() ; else no() 2.141500e+00
|
||||
> yes if ( ++ x ) yes() ; else no() 4.141500e+00
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f ld.cem.g ; then diff ld.cem.r ld.cem.g ; else echo creating ld.cem.g ; cp ld.cem.r ld.cem.g ; fi
|
||||
sed -f lf.sed <OPS >lf.c
|
||||
em24 -DNOFLOAT lf.c
|
||||
lf.c
|
||||
compiling lf.c
|
||||
running lf.cem
|
||||
comparing lf
|
||||
0a1,$
|
||||
0a1,72
|
||||
> .4e-5 + .3e-5
|
||||
> .4e-5 - .3e-5
|
||||
> .4e-5 / .3e-5
|
||||
|
|
@ -711,10 +681,10 @@ comparing lf
|
|||
> yes if ( x -- ) yes() ; else no() 2.141500e+00
|
||||
> yes if ( -- x ) yes() ; else no() 2.141500e+00
|
||||
> yes if ( ++ x ) yes() ; else no() 4.141500e+00
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f lf.cem.g ; then diff lf.cem.r lf.cem.g ; else echo creating lf.cem.g ; cp lf.cem.r lf.cem.g ; fi
|
||||
sed -f li.sed <OPS >li.c
|
||||
em24 -DNOFLOAT li.c
|
||||
li.c
|
||||
compiling li.c
|
||||
"li.c", line 22: (warning) overflow in constant expression
|
||||
"li.c", line 67: (warning) overflow in constant expression
|
||||
"li.c", line 112: (warning) overflow in constant expression
|
||||
|
|
@ -740,155 +710,121 @@ comparing li
|
|||
< yes if ( x <<= 15 ) yes() ; else no() -32768
|
||||
---
|
||||
> yes if ( x <<= 15 ) yes() ; else no() 8355840
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f li.cem.g ; then diff li.cem.r li.cem.g ; else echo creating li.cem.g ; cp li.cem.r li.cem.g ; fi
|
||||
sed -f ll.sed <OPS >ll.c
|
||||
em24 -DNOFLOAT ll.c
|
||||
ll.c
|
||||
compiling ll.c
|
||||
running ll.cem
|
||||
comparing ll
|
||||
sed -f lu.sed <OPS >lu.c
|
||||
em24 -DNOFLOAT lu.c
|
||||
lu.c
|
||||
compiling lu.c
|
||||
running lu.cem
|
||||
comparing lu
|
||||
23,31c23,31
|
||||
23,25c23,25
|
||||
< z = x -25302
|
||||
< z += x -25292
|
||||
< z -= x 25312
|
||||
< z /= x 0
|
||||
< z %= x 10
|
||||
< z *= x 9124
|
||||
< z &= x 10
|
||||
< z |= x -25302
|
||||
< z ^= x -25312
|
||||
---
|
||||
> z = x 40234
|
||||
> z += x 40244
|
||||
> z -= x -40224
|
||||
> z /= x 0
|
||||
> z %= x 10
|
||||
28c28
|
||||
< z *= x 9124
|
||||
---
|
||||
> z *= x 402340
|
||||
> z &= x 10
|
||||
30,31c30,31
|
||||
< z |= x -25302
|
||||
< z ^= x -25312
|
||||
---
|
||||
> z |= x 40234
|
||||
> z ^= x 40224
|
||||
38c38
|
||||
< y = ( x + 8012 ) -17290
|
||||
---
|
||||
> y = ( x + 8012 ) 48246
|
||||
42,52c42,52
|
||||
42c42
|
||||
< y = ( x * 8012 ) -16776
|
||||
< y = ( x & 8012 ) 7432
|
||||
< y = ( x | 8012 ) -24722
|
||||
< y = ( x ^ 8012 ) -32154
|
||||
< y = ( x || 8012 ) 1
|
||||
< y = ( x && 8012 ) 1
|
||||
< y = ( x << 9 ) 21504
|
||||
< y = ( x >> 9 ) 78
|
||||
< y = ( -x ) 25302
|
||||
< y = ( !x ) 0
|
||||
< y = ( ~x ) 25301
|
||||
---
|
||||
> y = ( x * 8012 ) 322354808
|
||||
> y = ( x & 8012 ) 7432
|
||||
44,45c44,45
|
||||
< y = ( x | 8012 ) -24722
|
||||
< y = ( x ^ 8012 ) -32154
|
||||
---
|
||||
> y = ( x | 8012 ) 40814
|
||||
> y = ( x ^ 8012 ) 33382
|
||||
> y = ( x || 8012 ) 1
|
||||
> y = ( x && 8012 ) 1
|
||||
48c48
|
||||
< y = ( x << 9 ) 21504
|
||||
---
|
||||
> y = ( x << 9 ) 20599808
|
||||
> y = ( x >> 9 ) 78
|
||||
50c50
|
||||
< y = ( -x ) 25302
|
||||
---
|
||||
> y = ( -x ) -40234
|
||||
> y = ( !x ) 0
|
||||
52c52
|
||||
< y = ( ~x ) 25301
|
||||
---
|
||||
> y = ( ~x ) -40235
|
||||
59,68c59,68
|
||||
59,62c59,62
|
||||
< y = ( x ? x : 8012 ) -25302
|
||||
< y = ( z = x ) -25302 -25302
|
||||
< y = ( z += x ) -25292 -25292
|
||||
< y = ( z -= x ) 25312 25312
|
||||
< y = ( z /= x ) 0 0
|
||||
< y = ( z %= x ) 10 10
|
||||
< y = ( z *= x ) 9124 9124
|
||||
< y = ( z &= x ) 10 10
|
||||
< y = ( z |= x ) -25302 -25302
|
||||
< y = ( z ^= x ) -25312 -25312
|
||||
---
|
||||
> y = ( x ? x : 8012 ) 40234
|
||||
> y = ( z = x ) 40234 40234
|
||||
> y = ( z += x ) 40244 40244
|
||||
> y = ( z -= x ) -40224 -40224
|
||||
> y = ( z /= x ) 0 0
|
||||
> y = ( z %= x ) 10 10
|
||||
65c65
|
||||
< y = ( z *= x ) 9124 9124
|
||||
---
|
||||
> y = ( z *= x ) 402340 402340
|
||||
> y = ( z &= x ) 10 10
|
||||
67,68c67,68
|
||||
< y = ( z |= x ) -25302 -25302
|
||||
< y = ( z ^= x ) -25312 -25312
|
||||
---
|
||||
> y = ( z |= x ) 40234 40234
|
||||
> y = ( z ^= x ) 40224 40224
|
||||
97,105c97,105
|
||||
97,99c97,99
|
||||
< yes if ( z = x ) yes() ; else no() -25302
|
||||
< yes if ( z += x ) yes() ; else no() -25292
|
||||
< yes if ( z -= x ) yes() ; else no() 25312
|
||||
< no if ( z /= x ) yes() ; else no() 0
|
||||
< yes if ( z %= x ) yes() ; else no() 10
|
||||
< yes if ( z *= x ) yes() ; else no() 9124
|
||||
< yes if ( z &= x ) yes() ; else no() 10
|
||||
< yes if ( z |= x ) yes() ; else no() -25302
|
||||
< yes if ( z ^= x ) yes() ; else no() -25312
|
||||
---
|
||||
> yes if ( z = x ) yes() ; else no() 40234
|
||||
> yes if ( z += x ) yes() ; else no() 40244
|
||||
> yes if ( z -= x ) yes() ; else no() -40224
|
||||
> no if ( z /= x ) yes() ; else no() 0
|
||||
> yes if ( z %= x ) yes() ; else no() 10
|
||||
102c102
|
||||
< yes if ( z *= x ) yes() ; else no() 9124
|
||||
---
|
||||
> yes if ( z *= x ) yes() ; else no() 402340
|
||||
> yes if ( z &= x ) yes() ; else no() 10
|
||||
104,105c104,105
|
||||
< yes if ( z |= x ) yes() ; else no() -25302
|
||||
< yes if ( z ^= x ) yes() ; else no() -25312
|
||||
---
|
||||
> yes if ( z |= x ) yes() ; else no() 40234
|
||||
> yes if ( z ^= x ) yes() ; else no() 40224
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f lu.cem.g ; then diff lu.cem.r lu.cem.g ; else echo creating lu.cem.g ; cp lu.cem.r lu.cem.g ; fi
|
||||
***** ctill
|
||||
All program(s) in this directory should fail to compile.
|
||||
em24 -DNOFLOAT noarg.c
|
||||
noarg.c
|
||||
compiling noarg.c
|
||||
"noarg.c", line 14: name not in parameter list
|
||||
*** Error code 1
|
||||
`gen' not remade because of errors
|
||||
The following command caused the error:
|
||||
acc -mem24 -DNOFLOAT -o noarg.cem noarg.c 1>/dev/null
|
||||
make: Warning: Target `gen' not remade because of errors
|
||||
***** ctinit
|
||||
em24 -DNOFLOAT init.c
|
||||
init.c
|
||||
"init.c", line 172: (warning) overflow in constant expression
|
||||
compiling init.c
|
||||
running init.cem
|
||||
comparing init
|
||||
41,$c41,$
|
||||
< long
|
||||
<
|
||||
< lo1 14
|
||||
< lo2 -17
|
||||
< lo3 2147483647
|
||||
< lo4 0
|
||||
< lo5 0
|
||||
< lo6 1
|
||||
<
|
||||
< structures
|
||||
<
|
||||
< st1 sta[0..2]
|
||||
< s_i 0 1 2 3
|
||||
< s_ca[0] 0 97 0 0
|
||||
< s_ca[1] 0 98 0 0
|
||||
< s_ca[2] 0 99 0 0
|
||||
< s_l 0 10 0 0
|
||||
< (sta[0].s_s1)->s_i = 1
|
||||
<
|
||||
< bit fields:
|
||||
<
|
||||
< sizeof stb 6
|
||||
< stb -1 -2 3 4 -1 6 7
|
||||
<
|
||||
---
|
||||
40a41,86
|
||||
> Floats:
|
||||
>
|
||||
> fl1 0.00000000000000000000e+00
|
||||
> fl2 2.00000000000000000000e+00
|
||||
> fl2 2.00000000000000000000e+00
|
||||
> fl4 4.00000000000000000000e+00
|
||||
> fl5 2.93873587705571892581e-39
|
||||
> fl6 1.70141173319264428000e+38
|
||||
> fl5 2.93873587705571876995e-39
|
||||
> fl6 1.70141173319264429908e+38
|
||||
> fl7 0.00000000000000000000e+00
|
||||
> fla1 fla2 fla3
|
||||
> 1.000000e+00 -1.000000e+00 1.100000e+01
|
||||
|
|
@ -910,8 +846,8 @@ comparing init
|
|||
> dbl2 2.00000000000000000000e+00
|
||||
> dbl2 2.00000000000000000000e+00
|
||||
> dbl4 4.00000000000000000000e+00
|
||||
> dbl5 2.93873600000000034793e-39
|
||||
> dbl6 1.70141170000000000000e+38
|
||||
> dbl5 2.93873600000000015650e-39
|
||||
> dbl6 1.70141169999999996199e+38
|
||||
> dbl7 0.00000000000000000000e+00
|
||||
> dbla1 dbla2 dbla3
|
||||
> 1.000000e+00 -1.000000e+00 1.100000e+01
|
||||
|
|
@ -927,67 +863,44 @@ comparing init
|
|||
> 0.000000e+00 0.000000e+00 0.000000e+00
|
||||
> 0.000000e+00 0.000000e+00 0.000000e+00
|
||||
>
|
||||
> long
|
||||
>
|
||||
> lo1 14
|
||||
> lo2 -17
|
||||
> lo3 2147483647
|
||||
> lo4 -2147483648
|
||||
> lo5 0
|
||||
> lo6 1
|
||||
>
|
||||
> structures
|
||||
>
|
||||
> st1 sta[0..2]
|
||||
> s_i 0 1 2 3
|
||||
> s_ca[0] 0 97 0 0
|
||||
> s_ca[1] 0 98 0 0
|
||||
> s_ca[2] 0 99 0 0
|
||||
> s_l 0 10 0 0
|
||||
57a104,105
|
||||
> s_f 0.000000e+00 -1.000000e+01 0.000000e+00 0.000000e+00
|
||||
>
|
||||
> (sta[0].s_s1)->s_i = 1
|
||||
>
|
||||
> bit fields:
|
||||
>
|
||||
62c110
|
||||
< sizeof stb 6
|
||||
---
|
||||
> sizeof stb 8
|
||||
> stb -1 -2 3 4 -1 6 7
|
||||
>
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f init.cem.g ; then diff init.cem.r init.cem.g ; else echo creating init.cem.g ; cp init.cem.r init.cem.g ; fi
|
||||
***** ctmargt
|
||||
em24 -DNOFLOAT margt.c
|
||||
margt.c
|
||||
compiling margt.c
|
||||
running margt.cem
|
||||
comparing margt
|
||||
5c5
|
||||
< CEM=acc -mem24 -DNOFLOAT
|
||||
---
|
||||
> CEM=acc
|
||||
11c11
|
||||
< RUN=em
|
||||
---
|
||||
> RUN=
|
||||
The following command caused the error:
|
||||
if test -f margt.cem.g ; then diff margt.cem.r margt.cem.g ; else echo creating margt.cem.g ; cp margt.cem.r margt.cem.g ; fi
|
||||
***** ctprof
|
||||
test profiling
|
||||
procentry.c
|
||||
em24 -DNOFLOAT tp.c procentry.m
|
||||
compiling tp.c procentry.m
|
||||
tp.c
|
||||
running tp.cem
|
||||
comparing tp
|
||||
***** ctsetjmp
|
||||
em24 -DNOFLOAT stjmp.c
|
||||
stjmp.c
|
||||
compiling stjmp.c
|
||||
running stjmp.cem
|
||||
comparing stjmp
|
||||
***** ctstruct
|
||||
em24 -DNOFLOAT str.c
|
||||
str.c
|
||||
running str.cem
|
||||
comparing str
|
||||
***** ctsys
|
||||
em24 -DNOFLOAT tfork.c
|
||||
tfork.c
|
||||
compiling tfork.c
|
||||
running tfork.cem
|
||||
comparing tfork
|
||||
1,$c1,$
|
||||
< childno 14497
|
||||
< Child 14497, status 0x800
|
||||
< fork/wait ok
|
||||
---
|
||||
> childno 16276
|
||||
> Child 16276, status 0x800
|
||||
> fork/wait ok
|
||||
*** Error code 1 (ignored)
|
||||
Wed Apr 27 13:39:12 MET DST 1988
|
||||
Mon Nov 20 09:17:26 MET 1989
|
||||
|
|
|
|||
|
|
@ -1,49 +1,44 @@
|
|||
Thu Apr 28 12:20:53 MET DST 1988
|
||||
Fri Nov 17 17:19:16 MET 1989
|
||||
Compilation command: acc -mem24
|
||||
Run command: em
|
||||
***** ctconv
|
||||
em24 conv.c
|
||||
conv.c
|
||||
compiling conv.c
|
||||
"conv.c", line 38: (warning) overflow in constant expression
|
||||
running conv.cem
|
||||
comparing conv
|
||||
14,25c14,25
|
||||
14c14
|
||||
< char -1, int -1, unsigned 177777, long -1
|
||||
< float -1.000000
|
||||
< char -1, int -1, unsigned 177777, long -1
|
||||
< float -1.000000
|
||||
< From integer
|
||||
< char -64, int -64, unsigned 177700, long -64
|
||||
< float -64.000000
|
||||
< From long
|
||||
< char -3, int -3, unsigned 177775, long -3
|
||||
< float -3.000000
|
||||
< Casts from long
|
||||
< char -8, int 9464, unsigned short 22370, long 75000
|
||||
---
|
||||
> char -1, int -1, unsigned 37777777777, long -1
|
||||
> float -1.000000
|
||||
16c16
|
||||
< char -1, int -1, unsigned 177777, long -1
|
||||
---
|
||||
> char -1, int -1, unsigned 37777777777, long -1
|
||||
> float -1.000000
|
||||
> From integer
|
||||
19c19
|
||||
< char -64, int -64, unsigned 177700, long -64
|
||||
---
|
||||
> char -64, int -64, unsigned 37777777700, long -64
|
||||
> float -64.000000
|
||||
> From long
|
||||
22c22
|
||||
< char -3, int -3, unsigned 177775, long -3
|
||||
---
|
||||
> char -3, int -3, unsigned 37777777775, long -3
|
||||
> float -3.000000
|
||||
> Casts from long
|
||||
25c25
|
||||
< char -8, int 9464, unsigned short 22370, long 75000
|
||||
---
|
||||
> char -8, int 75000, unsigned short 22370, long 75000
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f conv.cem.g ; then diff conv.cem.r conv.cem.g ; else echo creating conv.cem.g ; cp conv.cem.r conv.cem.g ; fi
|
||||
***** ctdecl
|
||||
em24 decl.c
|
||||
decl.c
|
||||
compiling decl.c
|
||||
running decl.cem
|
||||
comparing decl
|
||||
***** ctdivers
|
||||
em24 ops.c
|
||||
ops.c
|
||||
compiling ops.c
|
||||
running ops.cem
|
||||
comparing ops
|
||||
22,37c22,39
|
||||
< u<<0 150715
|
||||
21a22
|
||||
> u>>16 0
|
||||
23,37c24,39
|
||||
< u<<1 121632
|
||||
< u<<2 43464
|
||||
< u<<3 107150
|
||||
|
|
@ -60,8 +55,6 @@ comparing ops
|
|||
< u<<14 40000
|
||||
< u<<15 100000
|
||||
---
|
||||
> u>>16 0
|
||||
> u<<0 150715
|
||||
> u<<1 321632
|
||||
> u<<2 643464
|
||||
> u<<3 1507150
|
||||
|
|
@ -78,33 +71,29 @@ comparing ops
|
|||
> u<<14 6434640000
|
||||
> u<<15 15071500000
|
||||
> u<<16 32163200000
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f ops.cem.g ; then diff ops.cem.r ops.cem.g ; else echo creating ops.cem.g ; cp ops.cem.r ops.cem.g ; fi
|
||||
***** cterr
|
||||
em24 bugs.c
|
||||
bugs.c
|
||||
compiling bugs.c
|
||||
"bugs.c", line 88: (warning) overflow in constant expression
|
||||
running bugs.cem
|
||||
comparing bugs
|
||||
***** ctest1
|
||||
em24 test.c
|
||||
test.c
|
||||
compiling test.c
|
||||
running test.cem
|
||||
comparing test
|
||||
***** ctest2
|
||||
em24 t7.c
|
||||
t7.c
|
||||
compiling t7.c
|
||||
running t7.cem
|
||||
comparing t7
|
||||
***** ctest3
|
||||
em24 test2.c
|
||||
test2.c
|
||||
compiling test2.c
|
||||
"test2.c", line 448: (warning) conversion of pointer to int loses accuracy
|
||||
"test2.c", line 448: (warning) conversion of pointer to int loses accuracy
|
||||
running test2.cem
|
||||
comparing test2
|
||||
***** ctest5
|
||||
em24 test1.c
|
||||
test1.c
|
||||
compiling test1.c
|
||||
"test1.c", line 375: (warning) incompatible pointers in =
|
||||
"test1.c", line 376: (warning) incompatible pointers in =
|
||||
"test1.c", line 377: (warning) incompatible pointers in =
|
||||
|
|
@ -117,128 +106,119 @@ running test1.cem
|
|||
comparing test1
|
||||
***** ctgen
|
||||
sed -f bf.sed <OPS >bf.c
|
||||
em24 bf.c
|
||||
bf.c
|
||||
compiling bf.c
|
||||
running bf.cem
|
||||
comparing bf
|
||||
sed -f bfu.sed <OPS >bfu.c
|
||||
compiling bfu.c
|
||||
running bfu.cem
|
||||
comparing bfu
|
||||
sed -f cel.sed <OPS >cel.c
|
||||
em24 cel.c
|
||||
cel.c
|
||||
compiling cel.c
|
||||
running cel.cem
|
||||
comparing cel
|
||||
sed -f clu.sed <OPS >clu.c
|
||||
em24 clu.c
|
||||
clu.c
|
||||
compiling clu.c
|
||||
"clu.c", line 60: (warning) overflow in unsigned constant expression
|
||||
"clu.c", line 66: (warning) overflow in unsigned constant expression
|
||||
running clu.cem
|
||||
comparing clu
|
||||
23,31c23,31
|
||||
23,25c23,25
|
||||
< x = 40000 -25536
|
||||
< x += 40000 -25526
|
||||
< x -= 40000 25546
|
||||
< x /= 40000 0
|
||||
< x %= 40000 10
|
||||
< x *= 40000 6784
|
||||
< x &= 40000 0
|
||||
< x |= 40000 -25526
|
||||
< x ^= 40000 -25526
|
||||
---
|
||||
> x = 40000 40000
|
||||
> x += 40000 40010
|
||||
> x -= 40000 -39990
|
||||
> x /= 40000 0
|
||||
> x %= 40000 10
|
||||
28c28
|
||||
< x *= 40000 6784
|
||||
---
|
||||
> x *= 40000 400000
|
||||
> x &= 40000 0
|
||||
30,31c30,31
|
||||
< x |= 40000 -25526
|
||||
< x ^= 40000 -25526
|
||||
---
|
||||
> x |= 40000 40010
|
||||
> x ^= 40000 40010
|
||||
38c38
|
||||
< y = ( 40000 + 8012 ) -17524
|
||||
---
|
||||
> y = ( 40000 + 8012 ) 48012
|
||||
42,52c42,52
|
||||
42c42
|
||||
< y = ( 40000 * 8012 ) 8960
|
||||
< y = ( 40000 & 8012 ) 7232
|
||||
< y = ( 40000 | 8012 ) -24756
|
||||
< y = ( 40000 ^ 8012 ) -31988
|
||||
< y = ( 40000 || 8012 ) 1
|
||||
< y = ( 40000 && 8012 ) 1
|
||||
< y = ( 40000 << 9 ) -32768
|
||||
< y = ( 40000 >> 9 ) 78
|
||||
< y = ( -40000 ) 25536
|
||||
< y = ( !40000 ) 0
|
||||
< y = ( ~40000 ) 25535
|
||||
---
|
||||
> y = ( 40000 * 8012 ) 320480000
|
||||
> y = ( 40000 & 8012 ) 7232
|
||||
44,45c44,45
|
||||
< y = ( 40000 | 8012 ) -24756
|
||||
< y = ( 40000 ^ 8012 ) -31988
|
||||
---
|
||||
> y = ( 40000 | 8012 ) 40780
|
||||
> y = ( 40000 ^ 8012 ) 33548
|
||||
> y = ( 40000 || 8012 ) 1
|
||||
> y = ( 40000 && 8012 ) 1
|
||||
48c48
|
||||
< y = ( 40000 << 9 ) -32768
|
||||
---
|
||||
> y = ( 40000 << 9 ) 20480000
|
||||
> y = ( 40000 >> 9 ) 78
|
||||
50c50
|
||||
< y = ( -40000 ) 25536
|
||||
---
|
||||
> y = ( -40000 ) -40000
|
||||
> y = ( !40000 ) 0
|
||||
52c52
|
||||
< y = ( ~40000 ) 25535
|
||||
---
|
||||
> y = ( ~40000 ) -40001
|
||||
59,68c59,68
|
||||
59,62c59,62
|
||||
< y = ( 40000 ? 40000 : 8012 ) -25536
|
||||
< y = ( x = 40000 ) -25536 -25536
|
||||
< y = ( x += 40000 ) -25526 -25526
|
||||
< y = ( x -= 40000 ) 25546 25546
|
||||
< y = ( x /= 40000 ) 0 0
|
||||
< y = ( x %= 40000 ) 10 10
|
||||
< y = ( x *= 40000 ) 6784 6784
|
||||
< y = ( x &= 40000 ) 0 0
|
||||
< y = ( x |= 40000 ) -25526 -25526
|
||||
< y = ( x ^= 40000 ) -25526 -25526
|
||||
---
|
||||
> y = ( 40000 ? 40000 : 8012 ) 40000
|
||||
> y = ( x = 40000 ) 40000 40000
|
||||
> y = ( x += 40000 ) 40010 40010
|
||||
> y = ( x -= 40000 ) -39990 -39990
|
||||
> y = ( x /= 40000 ) 0 0
|
||||
> y = ( x %= 40000 ) 10 10
|
||||
65c65
|
||||
< y = ( x *= 40000 ) 6784 6784
|
||||
---
|
||||
> y = ( x *= 40000 ) 400000 400000
|
||||
> y = ( x &= 40000 ) 0 0
|
||||
67,68c67,68
|
||||
< y = ( x |= 40000 ) -25526 -25526
|
||||
< y = ( x ^= 40000 ) -25526 -25526
|
||||
---
|
||||
> y = ( x |= 40000 ) 40010 40010
|
||||
> y = ( x ^= 40000 ) 40010 40010
|
||||
97,105c97,105
|
||||
97,99c97,99
|
||||
< yes if ( x = 40000 ) yes() ; else no() -25536
|
||||
< yes if ( x += 40000 ) yes() ; else no() -25526
|
||||
< yes if ( x -= 40000 ) yes() ; else no() 25546
|
||||
< no if ( x /= 40000 ) yes() ; else no() 0
|
||||
< yes if ( x %= 40000 ) yes() ; else no() 10
|
||||
< yes if ( x *= 40000 ) yes() ; else no() 6784
|
||||
< no if ( x &= 40000 ) yes() ; else no() 0
|
||||
< yes if ( x |= 40000 ) yes() ; else no() -25526
|
||||
< yes if ( x ^= 40000 ) yes() ; else no() -25526
|
||||
---
|
||||
> yes if ( x = 40000 ) yes() ; else no() 40000
|
||||
> yes if ( x += 40000 ) yes() ; else no() 40010
|
||||
> yes if ( x -= 40000 ) yes() ; else no() -39990
|
||||
> no if ( x /= 40000 ) yes() ; else no() 0
|
||||
> yes if ( x %= 40000 ) yes() ; else no() 10
|
||||
102c102
|
||||
< yes if ( x *= 40000 ) yes() ; else no() 6784
|
||||
---
|
||||
> yes if ( x *= 40000 ) yes() ; else no() 400000
|
||||
> no if ( x &= 40000 ) yes() ; else no() 0
|
||||
104,105c104,105
|
||||
< yes if ( x |= 40000 ) yes() ; else no() -25526
|
||||
< yes if ( x ^= 40000 ) yes() ; else no() -25526
|
||||
---
|
||||
> yes if ( x |= 40000 ) yes() ; else no() 40010
|
||||
> yes if ( x ^= 40000 ) yes() ; else no() 40010
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f clu.cem.g ; then diff clu.cem.r clu.cem.g ; else echo creating clu.cem.g ; cp clu.cem.r clu.cem.g ; fi
|
||||
sed -f ec.sed <OPS >ec.c
|
||||
em24 ec.c
|
||||
ec.c
|
||||
compiling ec.c
|
||||
"ec.c", line 58: (warning) overflow in constant expression
|
||||
"ec.c", line 64: (warning) overflow in constant expression
|
||||
running ec.cem
|
||||
comparing ec
|
||||
sed -f ef.sed <OPS >ef.c
|
||||
em24 ef.c
|
||||
ef.c
|
||||
compiling ef.c
|
||||
running ef.cem
|
||||
comparing ef
|
||||
sed -f ei.sed <OPS >ei.c
|
||||
em24 ei.c
|
||||
ei.c
|
||||
compiling ei.c
|
||||
"ei.c", line 22: (warning) overflow in constant expression
|
||||
"ei.c", line 65: (warning) overflow in constant expression
|
||||
"ei.c", line 108: (warning) overflow in constant expression
|
||||
|
|
@ -264,135 +244,122 @@ comparing ei
|
|||
< yes if ( x <<= 15 ) yes() ; else no() -32768
|
||||
---
|
||||
> yes if ( x <<= 15 ) yes() ; else no() 8355840
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f ei.cem.g ; then diff ei.cem.r ei.cem.g ; else echo creating ei.cem.g ; cp ei.cem.r ei.cem.g ; fi
|
||||
sed -f el.sed <OPS >el.c
|
||||
em24 el.c
|
||||
el.c
|
||||
compiling el.c
|
||||
running el.cem
|
||||
comparing el
|
||||
sed -f eu.sed <OPS >eu.c
|
||||
em24 eu.c
|
||||
eu.c
|
||||
compiling eu.c
|
||||
"eu.c", line 58: (warning) overflow in unsigned constant expression
|
||||
"eu.c", line 64: (warning) overflow in unsigned constant expression
|
||||
running eu.cem
|
||||
comparing eu
|
||||
23,31c23,31
|
||||
23,25c23,25
|
||||
< x = 40000 -25536
|
||||
< x += 40000 -25526
|
||||
< x -= 40000 25546
|
||||
< x /= 40000 0
|
||||
< x %= 40000 10
|
||||
< x *= 40000 6784
|
||||
< x &= 40000 0
|
||||
< x |= 40000 -25526
|
||||
< x ^= 40000 -25526
|
||||
---
|
||||
> x = 40000 40000
|
||||
> x += 40000 40010
|
||||
> x -= 40000 -39990
|
||||
> x /= 40000 0
|
||||
> x %= 40000 10
|
||||
28c28
|
||||
< x *= 40000 6784
|
||||
---
|
||||
> x *= 40000 400000
|
||||
> x &= 40000 0
|
||||
30,31c30,31
|
||||
< x |= 40000 -25526
|
||||
< x ^= 40000 -25526
|
||||
---
|
||||
> x |= 40000 40010
|
||||
> x ^= 40000 40010
|
||||
38c38
|
||||
< y = ( 40000 + 8012 ) -17524
|
||||
---
|
||||
> y = ( 40000 + 8012 ) 48012
|
||||
42,52c42,52
|
||||
42c42
|
||||
< y = ( 40000 * 8012 ) 8960
|
||||
< y = ( 40000 & 8012 ) 7232
|
||||
< y = ( 40000 | 8012 ) -24756
|
||||
< y = ( 40000 ^ 8012 ) -31988
|
||||
< y = ( 40000 || 8012 ) 1
|
||||
< y = ( 40000 && 8012 ) 1
|
||||
< y = ( 40000 << 9 ) -32768
|
||||
< y = ( 40000 >> 9 ) 78
|
||||
< y = ( -40000 ) 25536
|
||||
< y = ( !40000 ) 0
|
||||
< y = ( ~40000 ) 25535
|
||||
---
|
||||
> y = ( 40000 * 8012 ) 320480000
|
||||
> y = ( 40000 & 8012 ) 7232
|
||||
44,45c44,45
|
||||
< y = ( 40000 | 8012 ) -24756
|
||||
< y = ( 40000 ^ 8012 ) -31988
|
||||
---
|
||||
> y = ( 40000 | 8012 ) 40780
|
||||
> y = ( 40000 ^ 8012 ) 33548
|
||||
> y = ( 40000 || 8012 ) 1
|
||||
> y = ( 40000 && 8012 ) 1
|
||||
48c48
|
||||
< y = ( 40000 << 9 ) -32768
|
||||
---
|
||||
> y = ( 40000 << 9 ) 20480000
|
||||
> y = ( 40000 >> 9 ) 78
|
||||
50c50
|
||||
< y = ( -40000 ) 25536
|
||||
---
|
||||
> y = ( -40000 ) -40000
|
||||
> y = ( !40000 ) 0
|
||||
52c52
|
||||
< y = ( ~40000 ) 25535
|
||||
---
|
||||
> y = ( ~40000 ) -40001
|
||||
59,68c59,68
|
||||
59,62c59,62
|
||||
< y = ( 40000 ? 40000 : 8012 ) -25536
|
||||
< y = ( x = 40000 ) -25536 -25536
|
||||
< y = ( x += 40000 ) -25526 -25526
|
||||
< y = ( x -= 40000 ) 25546 25546
|
||||
< y = ( x /= 40000 ) 0 0
|
||||
< y = ( x %= 40000 ) 10 10
|
||||
< y = ( x *= 40000 ) 6784 6784
|
||||
< y = ( x &= 40000 ) 0 0
|
||||
< y = ( x |= 40000 ) -25526 -25526
|
||||
< y = ( x ^= 40000 ) -25526 -25526
|
||||
---
|
||||
> y = ( 40000 ? 40000 : 8012 ) 40000
|
||||
> y = ( x = 40000 ) 40000 40000
|
||||
> y = ( x += 40000 ) 40010 40010
|
||||
> y = ( x -= 40000 ) -39990 -39990
|
||||
> y = ( x /= 40000 ) 0 0
|
||||
> y = ( x %= 40000 ) 10 10
|
||||
65c65
|
||||
< y = ( x *= 40000 ) 6784 6784
|
||||
---
|
||||
> y = ( x *= 40000 ) 400000 400000
|
||||
> y = ( x &= 40000 ) 0 0
|
||||
67,68c67,68
|
||||
< y = ( x |= 40000 ) -25526 -25526
|
||||
< y = ( x ^= 40000 ) -25526 -25526
|
||||
---
|
||||
> y = ( x |= 40000 ) 40010 40010
|
||||
> y = ( x ^= 40000 ) 40010 40010
|
||||
97,105c97,105
|
||||
97,99c97,99
|
||||
< yes if ( x = 40000 ) yes() ; else no() -25536
|
||||
< yes if ( x += 40000 ) yes() ; else no() -25526
|
||||
< yes if ( x -= 40000 ) yes() ; else no() 25546
|
||||
< no if ( x /= 40000 ) yes() ; else no() 0
|
||||
< yes if ( x %= 40000 ) yes() ; else no() 10
|
||||
< yes if ( x *= 40000 ) yes() ; else no() 6784
|
||||
< no if ( x &= 40000 ) yes() ; else no() 0
|
||||
< yes if ( x |= 40000 ) yes() ; else no() -25526
|
||||
< yes if ( x ^= 40000 ) yes() ; else no() -25526
|
||||
---
|
||||
> yes if ( x = 40000 ) yes() ; else no() 40000
|
||||
> yes if ( x += 40000 ) yes() ; else no() 40010
|
||||
> yes if ( x -= 40000 ) yes() ; else no() -39990
|
||||
> no if ( x /= 40000 ) yes() ; else no() 0
|
||||
> yes if ( x %= 40000 ) yes() ; else no() 10
|
||||
102c102
|
||||
< yes if ( x *= 40000 ) yes() ; else no() 6784
|
||||
---
|
||||
> yes if ( x *= 40000 ) yes() ; else no() 400000
|
||||
> no if ( x &= 40000 ) yes() ; else no() 0
|
||||
104,105c104,105
|
||||
< yes if ( x |= 40000 ) yes() ; else no() -25526
|
||||
< yes if ( x ^= 40000 ) yes() ; else no() -25526
|
||||
---
|
||||
> yes if ( x |= 40000 ) yes() ; else no() 40010
|
||||
> yes if ( x ^= 40000 ) yes() ; else no() 40010
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f eu.cem.g ; then diff eu.cem.r eu.cem.g ; else echo creating eu.cem.g ; cp eu.cem.r eu.cem.g ; fi
|
||||
sed -f id.sed <OPS >id.c
|
||||
em24 id.c
|
||||
id.c
|
||||
compiling id.c
|
||||
running id.cem
|
||||
comparing id
|
||||
sed -f lc.sed <OPS >lc.c
|
||||
em24 lc.c
|
||||
lc.c
|
||||
compiling lc.c
|
||||
"lc.c", line 60: (warning) overflow in constant expression
|
||||
"lc.c", line 66: (warning) overflow in constant expression
|
||||
running lc.cem
|
||||
comparing lc
|
||||
sed -f ld.sed <OPS >ld.c
|
||||
em24 ld.c
|
||||
ld.c
|
||||
compiling ld.c
|
||||
running ld.cem
|
||||
comparing ld
|
||||
sed -f lf.sed <OPS >lf.c
|
||||
em24 lf.c
|
||||
lf.c
|
||||
compiling lf.c
|
||||
running lf.cem
|
||||
comparing lf
|
||||
sed -f li.sed <OPS >li.c
|
||||
em24 li.c
|
||||
li.c
|
||||
compiling li.c
|
||||
"li.c", line 22: (warning) overflow in constant expression
|
||||
"li.c", line 67: (warning) overflow in constant expression
|
||||
"li.c", line 112: (warning) overflow in constant expression
|
||||
|
|
@ -418,178 +385,147 @@ comparing li
|
|||
< yes if ( x <<= 15 ) yes() ; else no() -32768
|
||||
---
|
||||
> yes if ( x <<= 15 ) yes() ; else no() 8355840
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f li.cem.g ; then diff li.cem.r li.cem.g ; else echo creating li.cem.g ; cp li.cem.r li.cem.g ; fi
|
||||
sed -f ll.sed <OPS >ll.c
|
||||
em24 ll.c
|
||||
ll.c
|
||||
compiling ll.c
|
||||
running ll.cem
|
||||
comparing ll
|
||||
sed -f lu.sed <OPS >lu.c
|
||||
em24 lu.c
|
||||
lu.c
|
||||
compiling lu.c
|
||||
running lu.cem
|
||||
comparing lu
|
||||
23,31c23,31
|
||||
23,25c23,25
|
||||
< z = x -25302
|
||||
< z += x -25292
|
||||
< z -= x 25312
|
||||
< z /= x 0
|
||||
< z %= x 10
|
||||
< z *= x 9124
|
||||
< z &= x 10
|
||||
< z |= x -25302
|
||||
< z ^= x -25312
|
||||
---
|
||||
> z = x 40234
|
||||
> z += x 40244
|
||||
> z -= x -40224
|
||||
> z /= x 0
|
||||
> z %= x 10
|
||||
28c28
|
||||
< z *= x 9124
|
||||
---
|
||||
> z *= x 402340
|
||||
> z &= x 10
|
||||
30,31c30,31
|
||||
< z |= x -25302
|
||||
< z ^= x -25312
|
||||
---
|
||||
> z |= x 40234
|
||||
> z ^= x 40224
|
||||
38c38
|
||||
< y = ( x + 8012 ) -17290
|
||||
---
|
||||
> y = ( x + 8012 ) 48246
|
||||
42,52c42,52
|
||||
42c42
|
||||
< y = ( x * 8012 ) -16776
|
||||
< y = ( x & 8012 ) 7432
|
||||
< y = ( x | 8012 ) -24722
|
||||
< y = ( x ^ 8012 ) -32154
|
||||
< y = ( x || 8012 ) 1
|
||||
< y = ( x && 8012 ) 1
|
||||
< y = ( x << 9 ) 21504
|
||||
< y = ( x >> 9 ) 78
|
||||
< y = ( -x ) 25302
|
||||
< y = ( !x ) 0
|
||||
< y = ( ~x ) 25301
|
||||
---
|
||||
> y = ( x * 8012 ) 322354808
|
||||
> y = ( x & 8012 ) 7432
|
||||
44,45c44,45
|
||||
< y = ( x | 8012 ) -24722
|
||||
< y = ( x ^ 8012 ) -32154
|
||||
---
|
||||
> y = ( x | 8012 ) 40814
|
||||
> y = ( x ^ 8012 ) 33382
|
||||
> y = ( x || 8012 ) 1
|
||||
> y = ( x && 8012 ) 1
|
||||
48c48
|
||||
< y = ( x << 9 ) 21504
|
||||
---
|
||||
> y = ( x << 9 ) 20599808
|
||||
> y = ( x >> 9 ) 78
|
||||
50c50
|
||||
< y = ( -x ) 25302
|
||||
---
|
||||
> y = ( -x ) -40234
|
||||
> y = ( !x ) 0
|
||||
52c52
|
||||
< y = ( ~x ) 25301
|
||||
---
|
||||
> y = ( ~x ) -40235
|
||||
59,68c59,68
|
||||
59,62c59,62
|
||||
< y = ( x ? x : 8012 ) -25302
|
||||
< y = ( z = x ) -25302 -25302
|
||||
< y = ( z += x ) -25292 -25292
|
||||
< y = ( z -= x ) 25312 25312
|
||||
< y = ( z /= x ) 0 0
|
||||
< y = ( z %= x ) 10 10
|
||||
< y = ( z *= x ) 9124 9124
|
||||
< y = ( z &= x ) 10 10
|
||||
< y = ( z |= x ) -25302 -25302
|
||||
< y = ( z ^= x ) -25312 -25312
|
||||
---
|
||||
> y = ( x ? x : 8012 ) 40234
|
||||
> y = ( z = x ) 40234 40234
|
||||
> y = ( z += x ) 40244 40244
|
||||
> y = ( z -= x ) -40224 -40224
|
||||
> y = ( z /= x ) 0 0
|
||||
> y = ( z %= x ) 10 10
|
||||
65c65
|
||||
< y = ( z *= x ) 9124 9124
|
||||
---
|
||||
> y = ( z *= x ) 402340 402340
|
||||
> y = ( z &= x ) 10 10
|
||||
67,68c67,68
|
||||
< y = ( z |= x ) -25302 -25302
|
||||
< y = ( z ^= x ) -25312 -25312
|
||||
---
|
||||
> y = ( z |= x ) 40234 40234
|
||||
> y = ( z ^= x ) 40224 40224
|
||||
97,105c97,105
|
||||
97,99c97,99
|
||||
< yes if ( z = x ) yes() ; else no() -25302
|
||||
< yes if ( z += x ) yes() ; else no() -25292
|
||||
< yes if ( z -= x ) yes() ; else no() 25312
|
||||
< no if ( z /= x ) yes() ; else no() 0
|
||||
< yes if ( z %= x ) yes() ; else no() 10
|
||||
< yes if ( z *= x ) yes() ; else no() 9124
|
||||
< yes if ( z &= x ) yes() ; else no() 10
|
||||
< yes if ( z |= x ) yes() ; else no() -25302
|
||||
< yes if ( z ^= x ) yes() ; else no() -25312
|
||||
---
|
||||
> yes if ( z = x ) yes() ; else no() 40234
|
||||
> yes if ( z += x ) yes() ; else no() 40244
|
||||
> yes if ( z -= x ) yes() ; else no() -40224
|
||||
> no if ( z /= x ) yes() ; else no() 0
|
||||
> yes if ( z %= x ) yes() ; else no() 10
|
||||
102c102
|
||||
< yes if ( z *= x ) yes() ; else no() 9124
|
||||
---
|
||||
> yes if ( z *= x ) yes() ; else no() 402340
|
||||
> yes if ( z &= x ) yes() ; else no() 10
|
||||
104,105c104,105
|
||||
< yes if ( z |= x ) yes() ; else no() -25302
|
||||
< yes if ( z ^= x ) yes() ; else no() -25312
|
||||
---
|
||||
> yes if ( z |= x ) yes() ; else no() 40234
|
||||
> yes if ( z ^= x ) yes() ; else no() 40224
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f lu.cem.g ; then diff lu.cem.r lu.cem.g ; else echo creating lu.cem.g ; cp lu.cem.r lu.cem.g ; fi
|
||||
***** ctill
|
||||
All program(s) in this directory should fail to compile.
|
||||
em24 noarg.c
|
||||
noarg.c
|
||||
compiling noarg.c
|
||||
"noarg.c", line 14: name not in parameter list
|
||||
*** Error code 1
|
||||
`gen' not remade because of errors
|
||||
The following command caused the error:
|
||||
acc -mem24 -o noarg.cem noarg.c 1>/dev/null
|
||||
make: Warning: Target `gen' not remade because of errors
|
||||
***** ctinit
|
||||
em24 init.c
|
||||
init.c
|
||||
"init.c", line 172: (warning) overflow in constant expression
|
||||
compiling init.c
|
||||
running init.cem
|
||||
comparing init
|
||||
47,48c47,48
|
||||
< fl5 2.93873587705571956974e-39
|
||||
< fl6 1.70141173319264450000e+38
|
||||
---
|
||||
> fl5 2.93873587705571892581e-39
|
||||
> fl6 1.70141173319264428000e+38
|
||||
70c70
|
||||
< dbl5 2.93873600000000188004e-39
|
||||
---
|
||||
> dbl5 2.93873600000000034793e-39
|
||||
92c92
|
||||
< lo4 0
|
||||
---
|
||||
> lo4 -2147483648
|
||||
110,$c110,$
|
||||
110c110
|
||||
< sizeof stb 6
|
||||
< stb -1 -2 3 4 -1 6 7
|
||||
<
|
||||
---
|
||||
> sizeof stb 8
|
||||
> stb -1 -2 3 4 -1 6 7
|
||||
>
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f init.cem.g ; then diff init.cem.r init.cem.g ; else echo creating init.cem.g ; cp init.cem.r init.cem.g ; fi
|
||||
***** ctmargt
|
||||
em24 margt.c
|
||||
margt.c
|
||||
compiling margt.c
|
||||
running margt.cem
|
||||
comparing margt
|
||||
5c5
|
||||
< CEM=acc -mem24
|
||||
---
|
||||
> CEM=acc
|
||||
11c11
|
||||
< RUN=em
|
||||
---
|
||||
> RUN=
|
||||
The following command caused the error:
|
||||
if test -f margt.cem.g ; then diff margt.cem.r margt.cem.g ; else echo creating margt.cem.g ; cp margt.cem.r margt.cem.g ; fi
|
||||
***** ctprof
|
||||
test profiling
|
||||
procentry.c
|
||||
em24 tp.c procentry.m
|
||||
compiling tp.c procentry.m
|
||||
tp.c
|
||||
running tp.cem
|
||||
comparing tp
|
||||
***** ctsetjmp
|
||||
em24 stjmp.c
|
||||
stjmp.c
|
||||
compiling stjmp.c
|
||||
running stjmp.cem
|
||||
comparing stjmp
|
||||
***** ctstruct
|
||||
em24 str.c
|
||||
str.c
|
||||
running str.cem
|
||||
comparing str
|
||||
***** ctsys
|
||||
em24 tfork.c
|
||||
tfork.c
|
||||
compiling tfork.c
|
||||
running tfork.cem
|
||||
comparing tfork
|
||||
1,$c1,$
|
||||
< childno 6310
|
||||
< Child 6310, status 0x800
|
||||
< fork/wait ok
|
||||
---
|
||||
> childno 16276
|
||||
> Child 16276, status 0x800
|
||||
> fork/wait ok
|
||||
*** Error code 1 (ignored)
|
||||
Thu Apr 28 12:54:21 MET DST 1988
|
||||
Fri Nov 17 17:29:58 MET 1989
|
||||
|
|
|
|||
|
|
@ -1,89 +1,64 @@
|
|||
Tue Apr 26 14:36:39 MET DST 1988
|
||||
Fri Nov 17 15:33:31 MET 1989
|
||||
Compilation command: acc -DNOFLOAT
|
||||
***** ctconv
|
||||
acc -DNOFLOAT conv.c
|
||||
conv.c
|
||||
compiling conv.c
|
||||
"conv.c", line 38: (warning) overflow in constant expression
|
||||
running conv.cem
|
||||
comparing conv
|
||||
2a3,4
|
||||
> (float) 12 = 12.000000
|
||||
> (int) 3.14 = 3
|
||||
11,$c13,$
|
||||
< char -1, int -1, unsigned 37777777777, long -1
|
||||
< char -1, int -1, unsigned 37777777777, long -1
|
||||
< From integer
|
||||
< char -64, int -64, unsigned 37777777700, long -64
|
||||
< From long
|
||||
< char -3, int -3, unsigned 37777777775, long -3
|
||||
< Casts from long
|
||||
< char -8, int 75000, unsigned short 22370, long 75000
|
||||
< a[l] (l==3) -17
|
||||
< a[3l] -17
|
||||
< (unsigned short) 0x1f010L = 0xf010
|
||||
< (short) 0x1f010L = 0xfffff010
|
||||
---
|
||||
10a13
|
||||
> float 127.000000
|
||||
> char -1, int -1, unsigned 37777777777, long -1
|
||||
11a15
|
||||
> float -1.000000
|
||||
> char -1, int -1, unsigned 37777777777, long -1
|
||||
12a17
|
||||
> float -1.000000
|
||||
> From integer
|
||||
> char -64, int -64, unsigned 37777777700, long -64
|
||||
14a20
|
||||
> float -64.000000
|
||||
> From long
|
||||
> char -3, int -3, unsigned 37777777775, long -3
|
||||
16a23
|
||||
> float -3.000000
|
||||
> Casts from long
|
||||
> char -8, int 75000, unsigned short 22370, long 75000
|
||||
18a26,30
|
||||
> From float
|
||||
> char 121, int 121, unsigned 171, long 121, float 121.500000
|
||||
> char 0, int 0, unsigned 0, long 0, float 0.000100
|
||||
> int 32766, unsigned 77776, long 32766, float 32766.000000
|
||||
> long 1223432064, float 1223432064.000000
|
||||
> a[l] (l==3) -17
|
||||
> a[3l] -17
|
||||
> (unsigned short) 0x1f010L = 0xf010
|
||||
> (short) 0x1f010L = 0xfffff010
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f conv.cem.g ; then diff conv.cem.r conv.cem.g ; else echo creating conv.cem.g ; cp conv.cem.r conv.cem.g ; fi
|
||||
***** ctdecl
|
||||
acc -DNOFLOAT decl.c
|
||||
decl.c
|
||||
compiling decl.c
|
||||
running decl.cem
|
||||
comparing decl
|
||||
***** ctdivers
|
||||
acc -DNOFLOAT ops.c
|
||||
ops.c
|
||||
compiling ops.c
|
||||
running ops.cem
|
||||
comparing ops
|
||||
***** cterr
|
||||
acc -DNOFLOAT bugs.c
|
||||
bugs.c
|
||||
compiling bugs.c
|
||||
"bugs.c", line 88: (warning) overflow in constant expression
|
||||
running bugs.cem
|
||||
comparing bugs
|
||||
***** ctest1
|
||||
acc -DNOFLOAT test.c
|
||||
test.c
|
||||
compiling test.c
|
||||
running test.cem
|
||||
comparing test
|
||||
1,$c1,$
|
||||
1c1
|
||||
< End of test program, 10 tests completed, 0 errors detected
|
||||
---
|
||||
> End of test program, 11 tests completed, 0 errors detected
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f test.cem.g ; then diff test.cem.r test.cem.g ; else echo creating test.cem.g ; cp test.cem.r test.cem.g ; fi
|
||||
***** ctest2
|
||||
acc -DNOFLOAT t7.c
|
||||
t7.c
|
||||
compiling t7.c
|
||||
running t7.cem
|
||||
comparing t7
|
||||
***** ctest3
|
||||
acc -DNOFLOAT test2.c
|
||||
test2.c
|
||||
compiling test2.c
|
||||
running test2.cem
|
||||
comparing test2
|
||||
***** ctest5
|
||||
acc -DNOFLOAT test1.c
|
||||
test1.c
|
||||
compiling test1.c
|
||||
"test1.c", line 375: (warning) incompatible pointers in =
|
||||
"test1.c", line 376: (warning) incompatible pointers in =
|
||||
"test1.c", line 377: (warning) incompatible pointers in =
|
||||
|
|
@ -94,43 +69,42 @@ test1.c
|
|||
"test1.c", line 426: (warning) incompatible pointers in =
|
||||
running test1.cem
|
||||
comparing test1
|
||||
1,$c1,$
|
||||
< program test1
|
||||
0a1
|
||||
> error 13 in test 11
|
||||
2c3
|
||||
< 10 tests completed. Number of errors = 0
|
||||
---
|
||||
> error 13 in test 11
|
||||
> program test1
|
||||
> 11 tests completed. Number of errors = 1
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f test1.cem.g ; then diff test1.cem.r test1.cem.g ; else echo creating test1.cem.g ; cp test1.cem.r test1.cem.g ; fi
|
||||
***** ctgen
|
||||
sed -f bf.sed <OPS >bf.c
|
||||
acc -DNOFLOAT bf.c
|
||||
bf.c
|
||||
compiling bf.c
|
||||
running bf.cem
|
||||
comparing bf
|
||||
sed -f bfu.sed <OPS >bfu.c
|
||||
compiling bfu.c
|
||||
running bfu.cem
|
||||
comparing bfu
|
||||
sed -f cel.sed <OPS >cel.c
|
||||
acc -DNOFLOAT cel.c
|
||||
cel.c
|
||||
compiling cel.c
|
||||
running cel.cem
|
||||
comparing cel
|
||||
sed -f clu.sed <OPS >clu.c
|
||||
acc -DNOFLOAT clu.c
|
||||
clu.c
|
||||
compiling clu.c
|
||||
running clu.cem
|
||||
comparing clu
|
||||
sed -f ec.sed <OPS >ec.c
|
||||
acc -DNOFLOAT ec.c
|
||||
ec.c
|
||||
compiling ec.c
|
||||
"ec.c", line 58: (warning) overflow in constant expression
|
||||
"ec.c", line 64: (warning) overflow in constant expression
|
||||
running ec.cem
|
||||
comparing ec
|
||||
sed -f ef.sed <OPS >ef.c
|
||||
acc -DNOFLOAT ef.c
|
||||
ef.c
|
||||
compiling ef.c
|
||||
running ef.cem
|
||||
comparing ef
|
||||
0a1,$
|
||||
0a1,72
|
||||
> .4e-5 + .3e-5
|
||||
> .4e-5 - .3e-5
|
||||
> .4e-5 / .3e-5
|
||||
|
|
@ -203,28 +177,25 @@ comparing ef
|
|||
> yes if ( x -- ) yes() ; else no() 2.141500e+00
|
||||
> yes if ( -- x ) yes() ; else no() 2.141500e+00
|
||||
> yes if ( ++ x ) yes() ; else no() 4.141500e+00
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f ef.cem.g ; then diff ef.cem.r ef.cem.g ; else echo creating ef.cem.g ; cp ef.cem.r ef.cem.g ; fi
|
||||
sed -f ei.sed <OPS >ei.c
|
||||
acc -DNOFLOAT ei.c
|
||||
ei.c
|
||||
compiling ei.c
|
||||
running ei.cem
|
||||
comparing ei
|
||||
sed -f el.sed <OPS >el.c
|
||||
acc -DNOFLOAT el.c
|
||||
el.c
|
||||
compiling el.c
|
||||
running el.cem
|
||||
comparing el
|
||||
sed -f eu.sed <OPS >eu.c
|
||||
acc -DNOFLOAT eu.c
|
||||
eu.c
|
||||
compiling eu.c
|
||||
running eu.cem
|
||||
comparing eu
|
||||
sed -f id.sed <OPS >id.c
|
||||
acc -DNOFLOAT id.c
|
||||
id.c
|
||||
compiling id.c
|
||||
running id.cem
|
||||
comparing id
|
||||
0a1,$
|
||||
0a1,72
|
||||
> (-40) + 300
|
||||
> (-40) - 300
|
||||
> (-40) / 300
|
||||
|
|
@ -297,20 +268,19 @@ comparing id
|
|||
> yes if ( x -- ) yes() ; else no() 2.141500e+00
|
||||
> yes if ( -- x ) yes() ; else no() 2.141500e+00
|
||||
> yes if ( ++ x ) yes() ; else no() 4.141500e+00
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f id.cem.g ; then diff id.cem.r id.cem.g ; else echo creating id.cem.g ; cp id.cem.r id.cem.g ; fi
|
||||
sed -f lc.sed <OPS >lc.c
|
||||
acc -DNOFLOAT lc.c
|
||||
lc.c
|
||||
compiling lc.c
|
||||
"lc.c", line 60: (warning) overflow in constant expression
|
||||
"lc.c", line 66: (warning) overflow in constant expression
|
||||
running lc.cem
|
||||
comparing lc
|
||||
sed -f ld.sed <OPS >ld.c
|
||||
acc -DNOFLOAT ld.c
|
||||
ld.c
|
||||
compiling ld.c
|
||||
running ld.cem
|
||||
comparing ld
|
||||
0a1,$
|
||||
0a1,72
|
||||
> .4e-5 + .3e-5
|
||||
> .4e-5 - .3e-5
|
||||
> .4e-5 / .3e-5
|
||||
|
|
@ -383,13 +353,13 @@ comparing ld
|
|||
> yes if ( x -- ) yes() ; else no() 2.141500e+00
|
||||
> yes if ( -- x ) yes() ; else no() 2.141500e+00
|
||||
> yes if ( ++ x ) yes() ; else no() 4.141500e+00
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f ld.cem.g ; then diff ld.cem.r ld.cem.g ; else echo creating ld.cem.g ; cp ld.cem.r ld.cem.g ; fi
|
||||
sed -f lf.sed <OPS >lf.c
|
||||
acc -DNOFLOAT lf.c
|
||||
lf.c
|
||||
compiling lf.c
|
||||
running lf.cem
|
||||
comparing lf
|
||||
0a1,$
|
||||
0a1,72
|
||||
> .4e-5 + .3e-5
|
||||
> .4e-5 - .3e-5
|
||||
> .4e-5 / .3e-5
|
||||
|
|
@ -462,68 +432,41 @@ comparing lf
|
|||
> yes if ( x -- ) yes() ; else no() 2.141500e+00
|
||||
> yes if ( -- x ) yes() ; else no() 2.141500e+00
|
||||
> yes if ( ++ x ) yes() ; else no() 4.141500e+00
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f lf.cem.g ; then diff lf.cem.r lf.cem.g ; else echo creating lf.cem.g ; cp lf.cem.r lf.cem.g ; fi
|
||||
sed -f li.sed <OPS >li.c
|
||||
acc -DNOFLOAT li.c
|
||||
li.c
|
||||
compiling li.c
|
||||
running li.cem
|
||||
comparing li
|
||||
sed -f ll.sed <OPS >ll.c
|
||||
acc -DNOFLOAT ll.c
|
||||
ll.c
|
||||
compiling ll.c
|
||||
running ll.cem
|
||||
comparing ll
|
||||
sed -f lu.sed <OPS >lu.c
|
||||
acc -DNOFLOAT lu.c
|
||||
lu.c
|
||||
compiling lu.c
|
||||
running lu.cem
|
||||
comparing lu
|
||||
***** ctill
|
||||
All program(s) in this directory should fail to compile.
|
||||
acc -DNOFLOAT noarg.c
|
||||
noarg.c
|
||||
compiling noarg.c
|
||||
"noarg.c", line 14: name not in parameter list
|
||||
*** Error code 1
|
||||
`gen' not remade because of errors
|
||||
The following command caused the error:
|
||||
acc -DNOFLOAT -o noarg.cem noarg.c 1>/dev/null
|
||||
make: Warning: Target `gen' not remade because of errors
|
||||
***** ctinit
|
||||
acc -DNOFLOAT init.c
|
||||
init.c
|
||||
compiling init.c
|
||||
running init.cem
|
||||
comparing init
|
||||
41,$c41,$
|
||||
< long
|
||||
<
|
||||
< lo1 14
|
||||
< lo2 -17
|
||||
< lo3 2147483647
|
||||
< lo4 -2147483648
|
||||
< lo5 0
|
||||
< lo6 1
|
||||
<
|
||||
< structures
|
||||
<
|
||||
< st1 sta[0..2]
|
||||
< s_i 0 1 2 3
|
||||
< s_ca[0] 0 97 0 0
|
||||
< s_ca[1] 0 98 0 0
|
||||
< s_ca[2] 0 99 0 0
|
||||
< s_l 0 10 0 0
|
||||
< (sta[0].s_s1)->s_i = 1
|
||||
<
|
||||
< bit fields:
|
||||
<
|
||||
< sizeof stb 8
|
||||
< stb -1 -2 3 4 -1 6 7
|
||||
<
|
||||
---
|
||||
40a41,86
|
||||
> Floats:
|
||||
>
|
||||
> fl1 0.00000000000000000000e+00
|
||||
> fl2 2.00000000000000000000e+00
|
||||
> fl2 2.00000000000000000000e+00
|
||||
> fl4 4.00000000000000000000e+00
|
||||
> fl5 2.93873587705571892581e-39
|
||||
> fl6 1.70141173319264428000e+38
|
||||
> fl5 2.93873587705571876995e-39
|
||||
> fl6 1.70141173319264429908e+38
|
||||
> fl7 0.00000000000000000000e+00
|
||||
> fla1 fla2 fla3
|
||||
> 1.000000e+00 -1.000000e+00 1.100000e+01
|
||||
|
|
@ -545,8 +488,8 @@ comparing init
|
|||
> dbl2 2.00000000000000000000e+00
|
||||
> dbl2 2.00000000000000000000e+00
|
||||
> dbl4 4.00000000000000000000e+00
|
||||
> dbl5 2.93873600000000034793e-39
|
||||
> dbl6 1.70141170000000000000e+38
|
||||
> dbl5 2.93873600000000015650e-39
|
||||
> dbl6 1.70141169999999996199e+38
|
||||
> dbl7 0.00000000000000000000e+00
|
||||
> dbla1 dbla2 dbla3
|
||||
> 1.000000e+00 -1.000000e+00 1.100000e+01
|
||||
|
|
@ -562,68 +505,39 @@ comparing init
|
|||
> 0.000000e+00 0.000000e+00 0.000000e+00
|
||||
> 0.000000e+00 0.000000e+00 0.000000e+00
|
||||
>
|
||||
> long
|
||||
>
|
||||
> lo1 14
|
||||
> lo2 -17
|
||||
> lo3 2147483647
|
||||
> lo4 -2147483648
|
||||
> lo5 0
|
||||
> lo6 1
|
||||
>
|
||||
> structures
|
||||
>
|
||||
> st1 sta[0..2]
|
||||
> s_i 0 1 2 3
|
||||
> s_ca[0] 0 97 0 0
|
||||
> s_ca[1] 0 98 0 0
|
||||
> s_ca[2] 0 99 0 0
|
||||
> s_l 0 10 0 0
|
||||
57a104,105
|
||||
> s_f 0.000000e+00 -1.000000e+01 0.000000e+00 0.000000e+00
|
||||
>
|
||||
> (sta[0].s_s1)->s_i = 1
|
||||
>
|
||||
> bit fields:
|
||||
>
|
||||
> sizeof stb 8
|
||||
> stb -1 -2 3 4 -1 6 7
|
||||
>
|
||||
*** Error code 1 (ignored)
|
||||
The following command caused the error:
|
||||
if test -f init.cem.g ; then diff init.cem.r init.cem.g ; else echo creating init.cem.g ; cp init.cem.r init.cem.g ; fi
|
||||
***** ctmargt
|
||||
acc -DNOFLOAT margt.c
|
||||
margt.c
|
||||
compiling margt.c
|
||||
running margt.cem
|
||||
comparing margt
|
||||
5c5
|
||||
< CEM=acc -DNOFLOAT
|
||||
---
|
||||
> CEM=acc
|
||||
The following command caused the error:
|
||||
if test -f margt.cem.g ; then diff margt.cem.r margt.cem.g ; else echo creating margt.cem.g ; cp margt.cem.r margt.cem.g ; fi
|
||||
***** ctprof
|
||||
test profiling
|
||||
procentry.c
|
||||
acc -DNOFLOAT tp.c procentry.m
|
||||
compiling tp.c procentry.m
|
||||
tp.c
|
||||
procentry.m
|
||||
running tp
|
||||
running tp.cem
|
||||
comparing tp
|
||||
***** ctsetjmp
|
||||
acc -DNOFLOAT stjmp.c
|
||||
stjmp.c
|
||||
compiling stjmp.c
|
||||
running stjmp.cem
|
||||
comparing stjmp
|
||||
***** ctstruct
|
||||
acc -DNOFLOAT str.c
|
||||
str.c
|
||||
compiling str.c
|
||||
running str.cem
|
||||
comparing str
|
||||
***** ctsys
|
||||
acc -DNOFLOAT tfork.c
|
||||
tfork.c
|
||||
compiling tfork.c
|
||||
running tfork.cem
|
||||
comparing tfork
|
||||
1,$c1,$
|
||||
< childno 26404
|
||||
< Child 26404, status 0x800
|
||||
< fork/wait ok
|
||||
---
|
||||
> childno 16276
|
||||
> Child 16276, status 0x800
|
||||
> fork/wait ok
|
||||
*** Error code 1 (ignored)
|
||||
Tue Apr 26 14:49:48 MET DST 1988
|
||||
Fri Nov 17 15:44:00 MET 1989
|
||||
|
|
|
|||
|
|
@ -1,44 +1,37 @@
|
|||
Tue Apr 26 14:08:56 MET DST 1988
|
||||
Fri Nov 17 14:55:28 MET 1989
|
||||
Compilation command: acc
|
||||
***** ctconv
|
||||
acc -fp conv.c
|
||||
conv.c
|
||||
compiling conv.c
|
||||
"conv.c", line 38: (warning) overflow in constant expression
|
||||
running conv.cem
|
||||
comparing conv
|
||||
***** ctdecl
|
||||
acc -fp decl.c
|
||||
decl.c
|
||||
compiling decl.c
|
||||
running decl.cem
|
||||
comparing decl
|
||||
***** ctdivers
|
||||
acc -fp ops.c
|
||||
ops.c
|
||||
compiling ops.c
|
||||
running ops.cem
|
||||
comparing ops
|
||||
***** cterr
|
||||
acc -fp bugs.c
|
||||
bugs.c
|
||||
compiling bugs.c
|
||||
"bugs.c", line 88: (warning) overflow in constant expression
|
||||
running bugs.cem
|
||||
comparing bugs
|
||||
***** ctest1
|
||||
acc -fp test.c
|
||||
test.c
|
||||
compiling test.c
|
||||
running test.cem
|
||||
comparing test
|
||||
***** ctest2
|
||||
acc -fp t7.c
|
||||
t7.c
|
||||
compiling t7.c
|
||||
running t7.cem
|
||||
comparing t7
|
||||
***** ctest3
|
||||
acc -fp test2.c
|
||||
test2.c
|
||||
compiling test2.c
|
||||
running test2.cem
|
||||
comparing test2
|
||||
***** ctest5
|
||||
acc -fp test1.c
|
||||
test1.c
|
||||
compiling test1.c
|
||||
"test1.c", line 375: (warning) incompatible pointers in =
|
||||
"test1.c", line 376: (warning) incompatible pointers in =
|
||||
"test1.c", line 377: (warning) incompatible pointers in =
|
||||
|
|
@ -51,142 +44,107 @@ running test1.cem
|
|||
comparing test1
|
||||
***** ctgen
|
||||
sed -f bf.sed <OPS >bf.c
|
||||
acc -fp bf.c
|
||||
bf.c
|
||||
compiling bf.c
|
||||
running bf.cem
|
||||
comparing bf
|
||||
sed -f bfu.sed <OPS >bfu.c
|
||||
compiling bfu.c
|
||||
running bfu.cem
|
||||
comparing bfu
|
||||
sed -f cel.sed <OPS >cel.c
|
||||
acc -fp cel.c
|
||||
cel.c
|
||||
compiling cel.c
|
||||
running cel.cem
|
||||
comparing cel
|
||||
sed -f clu.sed <OPS >clu.c
|
||||
acc -fp clu.c
|
||||
clu.c
|
||||
compiling clu.c
|
||||
running clu.cem
|
||||
comparing clu
|
||||
sed -f ec.sed <OPS >ec.c
|
||||
acc -fp ec.c
|
||||
ec.c
|
||||
compiling ec.c
|
||||
"ec.c", line 58: (warning) overflow in constant expression
|
||||
"ec.c", line 64: (warning) overflow in constant expression
|
||||
running ec.cem
|
||||
comparing ec
|
||||
sed -f ef.sed <OPS >ef.c
|
||||
acc -fp ef.c
|
||||
ef.c
|
||||
compiling ef.c
|
||||
running ef.cem
|
||||
comparing ef
|
||||
sed -f ei.sed <OPS >ei.c
|
||||
acc -fp ei.c
|
||||
ei.c
|
||||
compiling ei.c
|
||||
running ei.cem
|
||||
comparing ei
|
||||
sed -f el.sed <OPS >el.c
|
||||
acc -fp el.c
|
||||
el.c
|
||||
compiling el.c
|
||||
running el.cem
|
||||
comparing el
|
||||
sed -f eu.sed <OPS >eu.c
|
||||
acc -fp eu.c
|
||||
eu.c
|
||||
compiling eu.c
|
||||
running eu.cem
|
||||
comparing eu
|
||||
sed -f id.sed <OPS >id.c
|
||||
acc -fp id.c
|
||||
id.c
|
||||
compiling id.c
|
||||
running id.cem
|
||||
comparing id
|
||||
sed -f lc.sed <OPS >lc.c
|
||||
acc -fp lc.c
|
||||
lc.c
|
||||
compiling lc.c
|
||||
"lc.c", line 60: (warning) overflow in constant expression
|
||||
"lc.c", line 66: (warning) overflow in constant expression
|
||||
running lc.cem
|
||||
comparing lc
|
||||
sed -f ld.sed <OPS >ld.c
|
||||
acc -fp ld.c
|
||||
ld.c
|
||||
compiling ld.c
|
||||
running ld.cem
|
||||
comparing ld
|
||||
sed -f lf.sed <OPS >lf.c
|
||||
acc -fp lf.c
|
||||
lf.c
|
||||
compiling lf.c
|
||||
running lf.cem
|
||||
comparing lf
|
||||
sed -f li.sed <OPS >li.c
|
||||
acc -fp li.c
|
||||
li.c
|
||||
compiling li.c
|
||||
running li.cem
|
||||
comparing li
|
||||
sed -f ll.sed <OPS >ll.c
|
||||
acc -fp ll.c
|
||||
ll.c
|
||||
compiling ll.c
|
||||
running ll.cem
|
||||
comparing ll
|
||||
sed -f lu.sed <OPS >lu.c
|
||||
acc -fp lu.c
|
||||
lu.c
|
||||
compiling lu.c
|
||||
running lu.cem
|
||||
comparing lu
|
||||
***** ctill
|
||||
All program(s) in this directory should fail to compile.
|
||||
acc -fp noarg.c
|
||||
noarg.c
|
||||
compiling noarg.c
|
||||
"noarg.c", line 14: name not in parameter list
|
||||
*** Error code 1
|
||||
`gen' not remade because of errors
|
||||
The following command caused the error:
|
||||
acc -o noarg.cem noarg.c 1>/dev/null
|
||||
make: Warning: Target `gen' not remade because of errors
|
||||
***** ctinit
|
||||
acc -fp init.c
|
||||
init.c
|
||||
compiling init.c
|
||||
running init.cem
|
||||
comparing init
|
||||
47,48c47,48
|
||||
< fl5 2.93873587705571956974e-39
|
||||
< fl6 1.70141173319264450000e+38
|
||||
---
|
||||
> fl5 2.93873587705571892581e-39
|
||||
> fl6 1.70141173319264428000e+38
|
||||
70c70
|
||||
< dbl5 2.93873600000000188004e-39
|
||||
---
|
||||
> dbl5 2.93873600000000034793e-39
|
||||
*** Error code 1 (ignored)
|
||||
***** ctmargt
|
||||
acc -fp margt.c
|
||||
margt.c
|
||||
compiling margt.c
|
||||
running margt.cem
|
||||
comparing margt
|
||||
***** ctprof
|
||||
test profiling
|
||||
procentry.c
|
||||
acc -fp tp.c procentry.m
|
||||
compiling tp.c procentry.m
|
||||
tp.c
|
||||
procentry.m
|
||||
running tp
|
||||
running tp.cem
|
||||
comparing tp
|
||||
***** ctsetjmp
|
||||
acc -fp stjmp.c
|
||||
stjmp.c
|
||||
compiling stjmp.c
|
||||
running stjmp.cem
|
||||
comparing stjmp
|
||||
***** ctstruct
|
||||
acc -fp str.c
|
||||
str.c
|
||||
compiling str.c
|
||||
running str.cem
|
||||
comparing str
|
||||
***** ctsys
|
||||
acc -fp tfork.c
|
||||
tfork.c
|
||||
compiling tfork.c
|
||||
running tfork.cem
|
||||
comparing tfork
|
||||
1,$c1,$
|
||||
< childno 25349
|
||||
< Child 25349, status 0x800
|
||||
< fork/wait ok
|
||||
---
|
||||
> childno 16276
|
||||
> Child 16276, status 0x800
|
||||
> fork/wait ok
|
||||
*** Error code 1 (ignored)
|
||||
Tue Apr 26 14:26:04 MET DST 1988
|
||||
Fri Nov 17 15:08:47 MET 1989
|
||||
|
|
|
|||
|
|
@ -1,5 +1,10 @@
|
|||
To run this test, first copy makefile.std to makefile, and adapt the
|
||||
CEM variable; set it to the compiler you want to test.
|
||||
To run this test, set the CEM variable to the compilation command,
|
||||
and the RUN variable to the run command (name of the interpreter or empty).
|
||||
For instance:
|
||||
|
||||
CEM=acc -mem24; export CEM
|
||||
RUN=em; export RUN
|
||||
|
||||
Then type: sh run > out 2>&1 &
|
||||
|
||||
The test are subdivided into several directories.
|
||||
|
|
|
|||
|
|
@ -1 +1 @@
|
|||
make "P=conv" -fsk ../makefile ${1-gen}
|
||||
make "P=conv" "CEM=${CEM-acc}" "RUN=${RUN-}" -fsk ../makefile ${1-gen}
|
||||
|
|
|
|||
|
|
@ -1 +1 @@
|
|||
make "P=decl" -fsk ../makefile ${1-gen}
|
||||
make "P=decl" "CEM=${CEM-acc}" "RUN=${RUN-}" -fsk ../makefile ${1-gen}
|
||||
|
|
|
|||
|
|
@ -1 +1 @@
|
|||
make "P=ops" -fskk ../makefile ${1-gen}
|
||||
make "P=ops" "CEM=${CEM-acc}" "RUN=${RUN-}" -fskk ../makefile ${1-gen}
|
||||
|
|
|
|||
|
|
@ -1 +1 @@
|
|||
make "P=bugs" -fsk ../makefile ${1-gen}
|
||||
make "P=bugs" "CEM=${CEM-acc}" "RUN=${RUN-}" -fsk ../makefile ${1-gen}
|
||||
|
|
|
|||
|
|
@ -1 +1 @@
|
|||
make "P=test" -fsk ../makefile ${1-gen}
|
||||
make "P=test" "CEM=${CEM-acc}" "RUN=${RUN-}" -fsk ../makefile ${1-gen}
|
||||
|
|
|
|||
|
|
@ -1 +1 @@
|
|||
make "P=t7" -fsk ../makefile ${1-gen}
|
||||
make "P=t7" "CEM=${CEM-acc}" "RUN=${RUN-}" -fsk ../makefile ${1-gen}
|
||||
|
|
|
|||
|
|
@ -1 +1 @@
|
|||
make "P=test2" -fsk ../makefile ${1-gen}
|
||||
make "P=test2" "CEM=${CEM-acc}" "RUN=${RUN-}" -fsk ../makefile ${1-gen}
|
||||
|
|
|
|||
|
|
@ -1 +1 @@
|
|||
make "P=test1" -fsk ../makefile ${1-gen}
|
||||
make "P=test1" "CEM=${CEM-acc}" "RUN=${RUN-}" -fsk ../makefile ${1-gen}
|
||||
|
|
|
|||
|
|
@ -5,5 +5,5 @@ clean)
|
|||
make "TS=$1"
|
||||
;;
|
||||
esac
|
||||
make "P=$1" -fk ../makefile $2
|
||||
make "P=$1" "CEM=${CEM-acc}" "RUN=${RUN-}" -fk ../makefile $2
|
||||
rm -f $1.[ckmos]
|
||||
|
|
|
|||
|
|
@ -1,2 +1,2 @@
|
|||
echo "All program(s) in this directory should fail to compile."
|
||||
make "P=noarg" -fsk ../makefile ${1-gen}
|
||||
make "P=noarg" "CEM=${CEM-acc}" "RUN=${RUN-}" -fsk ../makefile ${1-gen}
|
||||
|
|
|
|||
|
|
@ -44,8 +44,8 @@ fl1 0.00000000000000000000e+00
|
|||
fl2 2.00000000000000000000e+00
|
||||
fl2 2.00000000000000000000e+00
|
||||
fl4 4.00000000000000000000e+00
|
||||
fl5 2.93873587705571892581e-39
|
||||
fl6 1.70141173319264428000e+38
|
||||
fl5 2.93873587705571876995e-39
|
||||
fl6 1.70141173319264429908e+38
|
||||
fl7 0.00000000000000000000e+00
|
||||
fla1 fla2 fla3
|
||||
1.000000e+00 -1.000000e+00 1.100000e+01
|
||||
|
|
@ -67,8 +67,8 @@ dbl1 0.00000000000000000000e+00
|
|||
dbl2 2.00000000000000000000e+00
|
||||
dbl2 2.00000000000000000000e+00
|
||||
dbl4 4.00000000000000000000e+00
|
||||
dbl5 2.93873600000000034793e-39
|
||||
dbl6 1.70141170000000000000e+38
|
||||
dbl5 2.93873600000000015650e-39
|
||||
dbl6 1.70141169999999996199e+38
|
||||
dbl7 0.00000000000000000000e+00
|
||||
dbla1 dbla2 dbla3
|
||||
1.000000e+00 -1.000000e+00 1.100000e+01
|
||||
|
|
|
|||
|
|
@ -1 +1 @@
|
|||
make "P=init" -fsk ../makefile ${1-gen}
|
||||
make "P=init" "CEM=${CEM-acc}" "RUN=${RUN-}" -fsk ../makefile ${1-gen}
|
||||
|
|
|
|||
|
|
@ -2,8 +2,13 @@ main called with argc = 1
|
|||
Arguments:
|
||||
margt.cem
|
||||
Environment:
|
||||
HOME=/usr/em
|
||||
PATH=:/bin:/usr/ucb:/usr/local:/usr/bin:/usr/em/bin
|
||||
SHELL=/usr/local/esh
|
||||
TERM=dialup
|
||||
CEM=acc
|
||||
HOME=/usr/proj/em
|
||||
LOGNAME=em
|
||||
MAKEFLAGS=sk
|
||||
P=margt
|
||||
PATH=/usr/proj/em/Work/bin::/usr/ucb:/bin:/usr/bin
|
||||
RUN=
|
||||
SHELL=/bin/sh
|
||||
TERM=network
|
||||
USER=em
|
||||
|
|
|
|||
|
|
@ -1 +1 @@
|
|||
make "P=margt" -fsk ../makefile ${1-gen}
|
||||
make "P=margt" "CEM=${CEM-acc}" "RUN=${RUN-}" -fsk ../makefile ${1-gen}
|
||||
|
|
|
|||
|
|
@ -12,7 +12,7 @@ tp.e: tp.c
|
|||
procentry.m: procentry.c
|
||||
$(CEM) -c.m procentry.c
|
||||
tp.cem: tp.c procentry.m
|
||||
echo $(CEM) tp.c procentry.m
|
||||
echo compiling tp.c procentry.m
|
||||
$(CEM) -p -o tp.cem -O tp.c procentry.m
|
||||
rm -f procentry.[kosm] tp.[kmos]
|
||||
|
||||
|
|
|
|||
|
|
@ -1,10 +1,10 @@
|
|||
echo test profiling
|
||||
case ${1-gen} in
|
||||
gen|tp.cem.r)
|
||||
make -k "`grep CEM= ../makefile`" tp.cem
|
||||
make "P=tp" -fsk ../makefile ${1-gen}
|
||||
make -k "CEM=${CEM-acc}" tp.cem
|
||||
make "P=tp" "CEM=${CEM-acc}" "RUN=${RUN-}" -fsk ../makefile ${1-gen}
|
||||
;;
|
||||
*)
|
||||
make -k "`grep CEM= ../makefile`" $1
|
||||
make -k "CEM=${CEM-acc}" "RUN=${RUN-}" $1
|
||||
;;
|
||||
esac
|
||||
|
|
|
|||
|
|
@ -1 +1 @@
|
|||
make "P=stjmp" -fsk ../makefile ${1-gen}
|
||||
make "P=stjmp" "CEM=${CEM-acc}" "RUN=${RUN-}" -fsk ../makefile ${1-gen}
|
||||
|
|
|
|||
|
|
@ -1 +1 @@
|
|||
make "P=str" -fsk ../makefile ${1-gen}
|
||||
make "P=str" "CEM=${CEM-acc}" "RUN=${RUN-}" -fsk ../makefile ${1-gen}
|
||||
|
|
|
|||
|
|
@ -1 +1 @@
|
|||
make "P=tfork" -fsk ../makefile ${1-gen}
|
||||
make "P=tfork" "CEM=${CEM-acc}" "RUN=${RUN-}" -fsk ../makefile ${1-gen}
|
||||
|
|
|
|||
|
|
@ -14,10 +14,10 @@ main(argc,argv) char **argv ; {
|
|||
}
|
||||
if ( child ) {
|
||||
/* The parent */
|
||||
printf("childno %d\n",child ) ;
|
||||
/* printf("childno %d\n",child ) ; */
|
||||
do {
|
||||
waitchild= wait(&status ) ;
|
||||
printf("Child %d, status 0x%x\n",waitchild,status) ;
|
||||
/* printf("Child %d, status 0x%x\n",waitchild,status) ;*/
|
||||
if ( waitchild== -1 ) {
|
||||
printf("No children\n") ;
|
||||
return 1 ;
|
||||
|
|
|
|||
|
|
@ -1,3 +1 @@
|
|||
childno 16276
|
||||
Child 16276, status 0x800
|
||||
fork/wait ok
|
||||
|
|
|
|||
|
|
@ -12,7 +12,7 @@ diffs3: $P.pcc.r $P.cc.r $P.cem.r
|
|||
-diff3 $P.*.r | tee diffs
|
||||
egen: $P.e
|
||||
echo comparing $P.e
|
||||
-if test -f $P.e.g ; then diff -h $P.e $P.e.g ; else echo creating $P.e.g ; cp $P.e $P.e.g ; fi
|
||||
-if test -f $P.e.g ; then diff $P.e $P.e.g ; else echo creating $P.e.g ; cp $P.e $P.e.g ; fi
|
||||
rm -f $P.e
|
||||
$P.e: $P.c
|
||||
$(CEM) -c.e $P.c
|
||||
|
|
@ -26,7 +26,7 @@ $P.cc.r: $P.cc
|
|||
rm -f $P.cc
|
||||
$P.cem.r: $P.cem
|
||||
echo running $P.cem
|
||||
-$P.cem >$P.cem.r
|
||||
-$(RUN) $P.cem >$P.cem.r
|
||||
rm -f $P.cem
|
||||
$P.pcc: /tmp
|
||||
echo pcc $P.c
|
||||
|
|
@ -35,16 +35,16 @@ $P.cc: /tmp
|
|||
echo cc $P.c
|
||||
cc -o $P.cc $P.c
|
||||
$P.cem: /tmp
|
||||
echo $(CEM) $P.c
|
||||
$(CEM) -o $P.cem $P.c
|
||||
echo compiling $P.c
|
||||
$(CEM) -o $P.cem $P.c 1>/dev/null
|
||||
gen: $P.cem.r
|
||||
echo comparing $P
|
||||
-if test -f $P.cem.g ; then diff -h $P.cem.r $P.cem.g ; else echo creating $P.cem.g ; cp $P.cem.r $P.cem.g ; fi
|
||||
-if test -f $P.cem.g ; then diff $P.cem.r $P.cem.g ; else echo creating $P.cem.g ; cp $P.cem.r $P.cem.g ; fi
|
||||
|
||||
install cmp:
|
||||
|
||||
pr:
|
||||
@pr `pwd`/$P.c `pwd`/$P.cem.g
|
||||
pr `pwd`/$P.c `pwd`/$P.cem.g
|
||||
|
||||
opr:
|
||||
make pr | opr
|
||||
|
|
|
|||
|
|
@ -1,4 +1,19 @@
|
|||
date
|
||||
if test -f makefile
|
||||
then
|
||||
:
|
||||
else
|
||||
cp makefile.std makefile
|
||||
fi
|
||||
CEM="${CEM-acc}"
|
||||
RUN="${RUN-}"
|
||||
export CEM RUN
|
||||
echo "Compilation command: $CEM"
|
||||
case $RUN in
|
||||
?*)
|
||||
echo "Run command: $RUN"
|
||||
;;
|
||||
esac
|
||||
for A in ct*
|
||||
do (
|
||||
echo "***** $A"
|
||||
|
|
|
|||
Loading…
Reference in a new issue