updated to current situation

This commit is contained in:
ceriel 1988-04-28 13:38:24 +00:00
parent 81e724d4f6
commit 2a11727622
8 changed files with 406 additions and 279 deletions

View file

@ -18,9 +18,8 @@ ctmargt
ctprof
ctstruct
ctsys
ctsetjmp
local.h
makefile
makefile.i86
makefile.int
makefile.std
run

View file

@ -1,8 +1,8 @@
Thu Mar 5 23:10:57 MET 1987
Wed Apr 27 13:01:47 MET DST 1988
***** ctconv
vax2 -DNOFLOAT conv.c
int24 -DNOFLOAT conv.c
conv.c
"conv.c", line 48: (warning) overflow in constant expression
"conv.c", line 38: (warning) overflow in constant expression
running conv.cem
comparing conv
2a3,4
@ -15,8 +15,12 @@ comparing conv
< 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
@ -29,6 +33,8 @@ comparing conv
> From long
> char -3, int -3, unsigned 37777777775, long -3
> float -3.000000
> Casts from long
> 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
@ -36,17 +42,21 @@ comparing conv
> long 1223432064, float 1223432064.000000
> a[l] (l==3) -17
> a[3l] -17
> (unsigned short) 0x1f010L = 0xf010
> (short) 0x1f010L = 0xfffff010
*** Error code 1 (ignored)
***** ctdecl
vax2 -DNOFLOAT decl.c
int24 -DNOFLOAT decl.c
decl.c
running decl.cem
comparing decl
***** ctdivers
vax2 -DNOFLOAT ops.c
int24 -DNOFLOAT ops.c
ops.c
running ops.cem
comparing ops
24,39c24,39
22,37c22,39
< u<<0 150715
< u<<1 121632
< u<<2 43464
< u<<3 107150
@ -62,8 +72,9 @@ comparing ops
< u<<13 120000
< u<<14 40000
< u<<15 100000
< u<<16 0
---
> u>>16 0
> u<<0 150715
> u<<1 321632
> u<<2 643464
> u<<3 1507150
@ -80,14 +91,15 @@ comparing ops
> u<<14 6434640000
> u<<15 15071500000
> u<<16 32163200000
*** Error code 1 (ignored)
***** cterr
vax2 -DNOFLOAT bugs.c
int24 -DNOFLOAT bugs.c
bugs.c
"bugs.c", line 98: (warning) overflow in constant expression
"bugs.c", line 88: (warning) overflow in constant expression
running bugs.cem
comparing bugs
***** ctest1
vax2 -DNOFLOAT test.c
int24 -DNOFLOAT test.c
test.c
running test.cem
comparing test
@ -95,29 +107,30 @@ comparing test
< End of test program, 10 tests completed, 0 errors detected
---
> End of test program, 11 tests completed, 0 errors detected
*** Error code 1 (ignored)
***** ctest2
vax2 -DNOFLOAT t7.c
int24 -DNOFLOAT t7.c
t7.c
running t7.cem
comparing t7
***** ctest3
vax2 -DNOFLOAT test2.c
int24 -DNOFLOAT test2.c
test2.c
"test2.c", line 459: (warning) conversion of pointer to int loses accuracy
"test2.c", line 459: (warning) conversion of pointer to int loses accuracy
"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
vax2 -DNOFLOAT test1.c
int24 -DNOFLOAT test1.c
test1.c
"test1.c", line 386: (warning) incompatible pointers in =
"test1.c", line 387: (warning) incompatible pointers in =
"test1.c", line 388: (warning) incompatible pointers in =
"test1.c", line 400: (warning) incompatible pointers in =
"test1.c", line 423: (warning) incompatible pointers in =
"test1.c", line 424: (warning) incompatible pointers in =
"test1.c", line 425: (warning) incompatible pointers in =
"test1.c", line 437: (warning) incompatible pointers in =
"test1.c", line 375: (warning) incompatible pointers in =
"test1.c", line 376: (warning) incompatible pointers in =
"test1.c", line 377: (warning) incompatible pointers in =
"test1.c", line 389: (warning) incompatible pointers in =
"test1.c", line 412: (warning) incompatible pointers in =
"test1.c", line 413: (warning) incompatible pointers in =
"test1.c", line 414: (warning) incompatible pointers in =
"test1.c", line 426: (warning) incompatible pointers in =
running test1.cem
comparing test1
1,$c1,$
@ -127,19 +140,20 @@ comparing test1
> error 13 in test 11
> program test1
> 11 tests completed. Number of errors = 1
*** Error code 1 (ignored)
***** ctgen
sed -f bf.sed <OPS >bf.c
vax2 -DNOFLOAT bf.c
int24 -DNOFLOAT bf.c
bf.c
running bf.cem
comparing bf
sed -f cel.sed <OPS >cel.c
vax2 -DNOFLOAT cel.c
int24 -DNOFLOAT cel.c
cel.c
running cel.cem
comparing cel
sed -f clu.sed <OPS >clu.c
vax2 -DNOFLOAT clu.c
int24 -DNOFLOAT clu.c
clu.c
"clu.c", line 60: (warning) overflow in unsigned constant expression
"clu.c", line 66: (warning) overflow in unsigned constant expression
@ -235,15 +249,16 @@ comparing clu
> no if ( x &= 40000 ) yes() ; else no() 0
> yes if ( x |= 40000 ) yes() ; else no() 40010
> yes if ( x ^= 40000 ) yes() ; else no() 40010
*** Error code 1 (ignored)
sed -f ec.sed <OPS >ec.c
vax2 -DNOFLOAT ec.c
int24 -DNOFLOAT ec.c
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
vax2 -DNOFLOAT ef.c
int24 -DNOFLOAT ef.c
ef.c
running ef.cem
comparing ef
@ -322,7 +337,7 @@ comparing ef
> yes if ( ++ x ) yes() ; else no() 4.141500e+00
*** Error code 1 (ignored)
sed -f ei.sed <OPS >ei.c
vax2 -DNOFLOAT ei.c
int24 -DNOFLOAT ei.c
ei.c
"ei.c", line 22: (warning) overflow in constant expression
"ei.c", line 65: (warning) overflow in constant expression
@ -349,13 +364,14 @@ comparing ei
< yes if ( x <<= 15 ) yes() ; else no() -32768
---
> yes if ( x <<= 15 ) yes() ; else no() 8355840
*** Error code 1 (ignored)
sed -f el.sed <OPS >el.c
vax2 -DNOFLOAT el.c
int24 -DNOFLOAT el.c
el.c
running el.cem
comparing el
sed -f eu.sed <OPS >eu.c
vax2 -DNOFLOAT eu.c
int24 -DNOFLOAT eu.c
eu.c
"eu.c", line 58: (warning) overflow in unsigned constant expression
"eu.c", line 64: (warning) overflow in unsigned constant expression
@ -451,50 +467,95 @@ comparing eu
> no if ( x &= 40000 ) yes() ; else no() 0
> yes if ( x |= 40000 ) yes() ; else no() 40010
> yes if ( x ^= 40000 ) yes() ; else no() 40010
*** Error code 1 (ignored)
sed -f id.sed <OPS >id.c
vax2 -DNOFLOAT id.c
int24 -DNOFLOAT id.c
id.c
running id.cem
comparing id
26,28c26,28
< y = ( (-40) - 300 ) -15190
< y = ( (-40) / 300 ) 0
< y = ( (-40) * 300 ) -14533
---
> y = ( (-40) - 300 ) 50346
0a1,$
> (-40) + 300
> (-40) - 300
> (-40) / 300
> (-40) * 300
> (-40) || 300
> (-40) && 300
> -(-40)
> !(-40)
> (-40) == 300
> (-40) != 300
> (-40) <= 300
> (-40) >= 300
> (-40) < 300
> (-40) > 300
> (-40) ? (-40) : 300
> x = (-40) -4.000000e+01
> x += (-40) -3.685850e+01
> x -= (-40) 4.314150e+01
> x /= (-40) -7.853750e-02
> x *= (-40) -1.256600e+02
> x ++ 4.141500e+00
> x -- 2.141500e+00
> -- x 2.141500e+00
> ++ x 4.141500e+00
> y = ( (-40) + 300 ) 260
> y = ( (-40) - 300 ) -340
> y = ( (-40) / 300 ) 0
> y = ( (-40) * 300 ) -2147432645
39,48c39,48
< y = ( (-40) ? (-40) : 300 ) -15584
< y = ( x = (-40) ) -4.000000e+01 -15584
< y = ( x += (-40) ) -3.685850e+01 -15597
< y = ( x -= (-40) ) 4.314150e+01 17196
< y = ( x /= (-40) ) -7.853750e-02 -16736
< y = ( x *= (-40) ) -1.256600e+02 -15365
< y = ( x ++ ) 4.141500e+00 16713
< y = ( x -- ) 2.141500e+00 16713
< y = ( -- x ) 2.141500e+00 16649
< y = ( ++ x ) 4.141500e+00 16772
---
> y = ( (-40) ? (-40) : 300 ) 49952
> y = ( x = (-40) ) -4.000000e+01 49952
> y = ( x += (-40) ) -3.685850e+01 1864024851
> y = ( x -= (-40) ) 4.314150e+01 -1864023252
> y = ( x /= (-40) ) -7.853750e-02 -666583392
> y = ( x *= (-40) ) -1.256600e+02 1374405627
> y = ( x ++ ) 4.141500e+00 240533833
> y = ( x -- ) 2.141500e+00 240533833
> y = ( -- x ) 2.141500e+00 240533769
> y = ( ++ x ) 4.141500e+00 -2027208316
> y = ( (-40) * 300 ) -12000
> y = ( (-40) || 300 ) 1
> y = ( (-40) && 300 ) 1
> y = ( -(-40) ) 40
> y = ( !(-40) ) 0
> y = ( (-40) == 300 ) 0
> y = ( (-40) != 300 ) 1
> y = ( (-40) <= 300 ) 1
> y = ( (-40) >= 300 ) 0
> y = ( (-40) < 300 ) 1
> y = ( (-40) > 300 ) 0
> y = ( (-40) ? (-40) : 300 ) -40
> y = ( x = (-40) ) -4.000000e+01 -40
> y = ( x += (-40) ) -3.685850e+01 -36
> y = ( x -= (-40) ) 4.314150e+01 43
> y = ( x /= (-40) ) -7.853750e-02 0
> y = ( x *= (-40) ) -1.256600e+02 -125
> y = ( x ++ ) 4.141500e+00 3
> y = ( x -- ) 2.141500e+00 3
> y = ( -- x ) 2.141500e+00 2
> y = ( ++ x ) 4.141500e+00 4
> yes if ( (-40) + 300 ) yes() ; else no()
> yes if ( (-40) - 300 ) yes() ; else no()
> no if ( (-40) / 300 ) yes() ; else no()
> yes if ( (-40) * 300 ) yes() ; else no()
> yes if ( (-40) || 300 ) yes() ; else no()
> yes if ( (-40) && 300 ) yes() ; else no()
> yes if ( -(-40) ) yes() ; else no()
> no if ( !(-40) ) yes() ; else no()
> no if ( (-40) == 300 ) yes() ; else no()
> yes if ( (-40) != 300 ) yes() ; else no()
> yes if ( (-40) <= 300 ) yes() ; else no()
> no if ( (-40) >= 300 ) yes() ; else no()
> yes if ( (-40) < 300 ) yes() ; else no()
> no if ( (-40) > 300 ) yes() ; else no()
> yes if ( (-40) ? (-40) : 300 ) yes() ; else no()
> yes if ( x = (-40) ) yes() ; else no() -4.000000e+01
> yes if ( x += (-40) ) yes() ; else no() -3.685850e+01
> yes if ( x -= (-40) ) yes() ; else no() 4.314150e+01
> yes if ( x /= (-40) ) yes() ; else no() -7.853750e-02
> yes if ( x *= (-40) ) yes() ; else no() -1.256600e+02
> yes if ( x ++ ) yes() ; else no() 4.141500e+00
> 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)
sed -f lc.sed <OPS >lc.c
vax2 -DNOFLOAT lc.c
int24 -DNOFLOAT lc.c
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
vax2 -DNOFLOAT ld.c
int24 -DNOFLOAT ld.c
ld.c
running ld.cem
comparing ld
@ -573,7 +634,7 @@ comparing ld
> yes if ( ++ x ) yes() ; else no() 4.141500e+00
*** Error code 1 (ignored)
sed -f lf.sed <OPS >lf.c
vax2 -DNOFLOAT lf.c
int24 -DNOFLOAT lf.c
lf.c
running lf.cem
comparing lf
@ -652,7 +713,7 @@ comparing lf
> yes if ( ++ x ) yes() ; else no() 4.141500e+00
*** Error code 1 (ignored)
sed -f li.sed <OPS >li.c
vax2 -DNOFLOAT li.c
int24 -DNOFLOAT li.c
li.c
"li.c", line 22: (warning) overflow in constant expression
"li.c", line 67: (warning) overflow in constant expression
@ -679,13 +740,14 @@ comparing li
< yes if ( x <<= 15 ) yes() ; else no() -32768
---
> yes if ( x <<= 15 ) yes() ; else no() 8355840
*** Error code 1 (ignored)
sed -f ll.sed <OPS >ll.c
vax2 -DNOFLOAT ll.c
int24 -DNOFLOAT ll.c
ll.c
running ll.cem
comparing ll
sed -f lu.sed <OPS >lu.c
vax2 -DNOFLOAT lu.c
int24 -DNOFLOAT lu.c
lu.c
running lu.cem
comparing lu
@ -779,17 +841,18 @@ comparing lu
> yes if ( z &= x ) yes() ; else no() 10
> yes if ( z |= x ) yes() ; else no() 40234
> yes if ( z ^= x ) yes() ; else no() 40224
*** Error code 1 (ignored)
***** ctill
----- All program(s) in this directory should fail to compile.
vax2 -DNOFLOAT noarg.c
int24 -DNOFLOAT noarg.c
noarg.c
"noarg.c", line 10: name not in parameter list
"noarg.c", line 14: name not in parameter list
*** Error code 1
`gen' not remade because of errors
***** ctinit
vax2 -DNOFLOAT init.c
int24 -DNOFLOAT init.c
init.c
"init.c", line 183: (warning) overflow in constant expression
"init.c", line 172: (warning) overflow in constant expression
running init.cem
comparing init
41,$c41,$
@ -890,35 +953,41 @@ comparing init
> sizeof stb 8
> stb -1 -2 3 4 -1 6 7
>
*** Error code 1 (ignored)
***** ctmargt
vax2 -DNOFLOAT margt.c
int24 -DNOFLOAT margt.c
margt.c
running margt.cem
comparing margt
***** ctprof
test profiling
procentry.c
vax2 -DNOFLOAT tp.c procentry.k
int24 -DNOFLOAT tp.c procentry.m
tp.c
procentry.k
running tp
running tp.cem
comparing tp
***** ctsetjmp
int24 -DNOFLOAT stjmp.c
stjmp.c
running stjmp.cem
comparing stjmp
***** ctstruct
vax2 -DNOFLOAT str.c
int24 -DNOFLOAT str.c
str.c
running str.cem
comparing str
***** ctsys
vax2 -DNOFLOAT tfork.c
int24 -DNOFLOAT tfork.c
tfork.c
running tfork.cem
comparing tfork
1,$c1,$
< childno 29134
< Child 29134, status 0x800
< childno 14497
< Child 14497, status 0x800
< fork/wait ok
---
> childno 16276
> Child 16276, status 0x800
> fork/wait ok
Thu Mar 5 23:59:20 MET 1987
*** Error code 1 (ignored)
Wed Apr 27 13:39:12 MET DST 1988

View file

@ -1,11 +1,11 @@
Tue Feb 24 16:31:18 MET 1987
Thu Apr 28 12:20:53 MET DST 1988
***** ctconv
vax2 conv.c
int24 conv.c
conv.c
"conv.c", line 48: (warning) overflow in constant expression
"conv.c", line 38: (warning) overflow in constant expression
running conv.cem
comparing conv
14,22c14,22
14,25c14,25
< char -1, int -1, unsigned 177777, long -1
< float -1.000000
< char -1, int -1, unsigned 177777, long -1
@ -15,6 +15,9 @@ comparing conv
< 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
@ -25,17 +28,22 @@ comparing conv
> float -64.000000
> From long
> char -3, int -3, unsigned 37777777775, long -3
> float -3.000000
> Casts from long
> char -8, int 75000, unsigned short 22370, long 75000
*** Error code 1 (ignored)
***** ctdecl
vax2 decl.c
int24 decl.c
decl.c
running decl.cem
comparing decl
***** ctdivers
vax2 ops.c
int24 ops.c
ops.c
running ops.cem
comparing ops
24,39c24,39
22,37c22,39
< u<<0 150715
< u<<1 121632
< u<<2 43464
< u<<3 107150
@ -51,8 +59,9 @@ comparing ops
< u<<13 120000
< u<<14 40000
< u<<15 100000
< u<<16 0
---
> u>>16 0
> u<<0 150715
> u<<1 321632
> u<<2 643464
> u<<3 1507150
@ -69,55 +78,56 @@ comparing ops
> u<<14 6434640000
> u<<15 15071500000
> u<<16 32163200000
*** Error code 1 (ignored)
***** cterr
vax2 bugs.c
int24 bugs.c
bugs.c
"bugs.c", line 98: (warning) overflow in constant expression
"bugs.c", line 88: (warning) overflow in constant expression
running bugs.cem
comparing bugs
***** ctest1
vax2 test.c
int24 test.c
test.c
running test.cem
comparing test
***** ctest2
vax2 t7.c
int24 t7.c
t7.c
running t7.cem
comparing t7
***** ctest3
vax2 test2.c
int24 test2.c
test2.c
"test2.c", line 459: (warning) conversion of pointer to int loses accuracy
"test2.c", line 459: (warning) conversion of pointer to int loses accuracy
"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
vax2 test1.c
int24 test1.c
test1.c
"test1.c", line 386: (warning) incompatible pointers in =
"test1.c", line 387: (warning) incompatible pointers in =
"test1.c", line 388: (warning) incompatible pointers in =
"test1.c", line 400: (warning) incompatible pointers in =
"test1.c", line 423: (warning) incompatible pointers in =
"test1.c", line 424: (warning) incompatible pointers in =
"test1.c", line 425: (warning) incompatible pointers in =
"test1.c", line 437: (warning) incompatible pointers in =
"test1.c", line 375: (warning) incompatible pointers in =
"test1.c", line 376: (warning) incompatible pointers in =
"test1.c", line 377: (warning) incompatible pointers in =
"test1.c", line 389: (warning) incompatible pointers in =
"test1.c", line 412: (warning) incompatible pointers in =
"test1.c", line 413: (warning) incompatible pointers in =
"test1.c", line 414: (warning) incompatible pointers in =
"test1.c", line 426: (warning) incompatible pointers in =
running test1.cem
comparing test1
***** ctgen
sed -f bf.sed <OPS >bf.c
vax2 bf.c
int24 bf.c
bf.c
running bf.cem
comparing bf
sed -f cel.sed <OPS >cel.c
vax2 cel.c
int24 cel.c
cel.c
running cel.cem
comparing cel
sed -f clu.sed <OPS >clu.c
vax2 clu.c
int24 clu.c
clu.c
"clu.c", line 60: (warning) overflow in unsigned constant expression
"clu.c", line 66: (warning) overflow in unsigned constant expression
@ -213,20 +223,21 @@ comparing clu
> no if ( x &= 40000 ) yes() ; else no() 0
> yes if ( x |= 40000 ) yes() ; else no() 40010
> yes if ( x ^= 40000 ) yes() ; else no() 40010
*** Error code 1 (ignored)
sed -f ec.sed <OPS >ec.c
vax2 ec.c
int24 ec.c
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
vax2 ef.c
int24 ef.c
ef.c
running ef.cem
comparing ef
sed -f ei.sed <OPS >ei.c
vax2 ei.c
int24 ei.c
ei.c
"ei.c", line 22: (warning) overflow in constant expression
"ei.c", line 65: (warning) overflow in constant expression
@ -253,13 +264,14 @@ comparing ei
< yes if ( x <<= 15 ) yes() ; else no() -32768
---
> yes if ( x <<= 15 ) yes() ; else no() 8355840
*** Error code 1 (ignored)
sed -f el.sed <OPS >el.c
vax2 el.c
int24 el.c
el.c
running el.cem
comparing el
sed -f eu.sed <OPS >eu.c
vax2 eu.c
int24 eu.c
eu.c
"eu.c", line 58: (warning) overflow in unsigned constant expression
"eu.c", line 64: (warning) overflow in unsigned constant expression
@ -355,60 +367,31 @@ comparing eu
> no if ( x &= 40000 ) yes() ; else no() 0
> yes if ( x |= 40000 ) yes() ; else no() 40010
> yes if ( x ^= 40000 ) yes() ; else no() 40010
*** Error code 1 (ignored)
sed -f id.sed <OPS >id.c
vax2 id.c
int24 id.c
id.c
running id.cem
comparing id
26,28c26,28
< y = ( (-40) - 300 ) -15190
< y = ( (-40) / 300 ) 0
< y = ( (-40) * 300 ) -14533
---
> y = ( (-40) - 300 ) 50346
> y = ( (-40) / 300 ) 0
> y = ( (-40) * 300 ) -2147432645
39,48c39,48
< y = ( (-40) ? (-40) : 300 ) -15584
< y = ( x = (-40) ) -4.000000e+01 -15584
< y = ( x += (-40) ) -3.685850e+01 -15597
< y = ( x -= (-40) ) 4.314150e+01 17196
< y = ( x /= (-40) ) -7.853750e-02 -16736
< y = ( x *= (-40) ) -1.256600e+02 -15365
< y = ( x ++ ) 4.141500e+00 16713
< y = ( x -- ) 2.141500e+00 16713
< y = ( -- x ) 2.141500e+00 16649
< y = ( ++ x ) 4.141500e+00 16772
---
> y = ( (-40) ? (-40) : 300 ) 49952
> y = ( x = (-40) ) -4.000000e+01 49952
> y = ( x += (-40) ) -3.685850e+01 1864024851
> y = ( x -= (-40) ) 4.314150e+01 -1864023252
> y = ( x /= (-40) ) -7.853750e-02 -666583392
> y = ( x *= (-40) ) -1.256600e+02 1374405627
> y = ( x ++ ) 4.141500e+00 240533833
> y = ( x -- ) 2.141500e+00 240533833
> y = ( -- x ) 2.141500e+00 240533769
> y = ( ++ x ) 4.141500e+00 -2027208316
sed -f lc.sed <OPS >lc.c
vax2 lc.c
int24 lc.c
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
vax2 ld.c
int24 ld.c
ld.c
running ld.cem
comparing ld
sed -f lf.sed <OPS >lf.c
vax2 lf.c
int24 lf.c
lf.c
running lf.cem
comparing lf
sed -f li.sed <OPS >li.c
vax2 li.c
int24 li.c
li.c
"li.c", line 22: (warning) overflow in constant expression
"li.c", line 67: (warning) overflow in constant expression
@ -435,13 +418,14 @@ comparing li
< yes if ( x <<= 15 ) yes() ; else no() -32768
---
> yes if ( x <<= 15 ) yes() ; else no() 8355840
*** Error code 1 (ignored)
sed -f ll.sed <OPS >ll.c
vax2 ll.c
int24 ll.c
ll.c
running ll.cem
comparing ll
sed -f lu.sed <OPS >lu.c
vax2 lu.c
int24 lu.c
lu.c
running lu.cem
comparing lu
@ -535,23 +519,30 @@ comparing lu
> yes if ( z &= x ) yes() ; else no() 10
> yes if ( z |= x ) yes() ; else no() 40234
> yes if ( z ^= x ) yes() ; else no() 40224
*** Error code 1 (ignored)
***** ctill
----- All program(s) in this directory should fail to compile.
vax2 noarg.c
int24 noarg.c
noarg.c
"noarg.c", line 10: name not in parameter list
"noarg.c", line 14: name not in parameter list
*** Error code 1
`gen' not remade because of errors
***** ctinit
vax2 init.c
int24 init.c
init.c
"init.c", line 183: (warning) overflow in constant expression
"init.c", line 172: (warning) overflow in constant expression
running init.cem
comparing init
48c48
< fl6 1.70141173319264427000e+38
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
---
@ -564,54 +555,41 @@ comparing init
> sizeof stb 8
> stb -1 -2 3 4 -1 6 7
>
*** Error code 1 (ignored)
***** ctmargt
vax2 margt.c
int24 margt.c
margt.c
running margt.cem
comparing margt
5,$c5,$
< CDPATH=:~:~em:/usr/spool
< CWD=/usr/em/lang/cem/ctest/ctmargt
< ESHKEYS=dcl=^?:dcl=^H:dcr=^D:dlr=^K:dtm=^W:dwl=^[h:dew=^[d:eof=^[^C:eof=^X^C:eof=^X^F:exp=^u:fcl=^[?:fcr=^[/:gcl=^B:gcr=^F:gll=^A:glr=^E:gwl=^[b:gew=^[f:hlp=^[H:hst=^_:int=^G:lnx=^V:prh=^P:rdr=^L:rtn=^J:rtn=^M:stm=^@:tab=^I:xgm=^X^X:xpl=^[^J:xpl=^[^M:yn< k=^Y:ipl=^N
< HOME=/user0/ceriel
< M2PATH=.:/user0/ceriel/modula-2/lib/m2v
< PAGER=/user0/ceriel/bin/yap
< PATH=/user0/ceriel/bin:/usr/local:/usr/ucb:/bin:/usr/bin:/usr/em/bin:/usr/new::/user0/ceriel/modula-2/bin/m2v
< REFS=/user0/ceriel/etc/refer/refs
< SHELL=/usr/local/esh
< TERM=sun
< TERMCAP=Mu|sun:li#34:co#80:cl=^L:cm=\E[%i%d;%dH:nd=\E[C:up=\E[A:am:bs:mi:ms:ce=\E[K:cd=\E[J:so=\E[7m:se=\E[m:kd=\E[B:kl=\E[D:ku=\E[A:kr=\E[C:kh=\E[H:k1=\EOP:k2=\EOQ:k3=\EOR:k4=\EOS:al=\E[L:dl=\E[M:im=:ei=:ic=\E[@:dc=\E[P
< USER=ceriel
---
> HOME=/usr/em
> PATH=:/bin:/usr/ucb:/usr/local:/usr/bin:/usr/em/bin
> SHELL=/usr/local/esh
> TERM=dialup
> USER=em
***** ctprof
test profiling
procentry.c
vax2 tp.c procentry.k
int24 tp.c procentry.m
tp.c
procentry.k
running tp
running tp.cem
comparing tp
***** ctsetjmp
int24 stjmp.c
stjmp.c
running stjmp.cem
comparing stjmp
***** ctstruct
vax2 str.c
int24 str.c
str.c
running str.cem
comparing str
***** ctsys
vax2 tfork.c
int24 tfork.c
tfork.c
running tfork.cem
comparing tfork
1,$c1,$
< childno 3050
< Child 3050, status 0x800
< childno 6310
< Child 6310, status 0x800
< fork/wait ok
---
> childno 16276
> Child 16276, status 0x800
> fork/wait ok
Tue Feb 24 17:56:16 MET 1987
*** Error code 1 (ignored)
Thu Apr 28 12:54:21 MET DST 1988

View file

@ -1,8 +1,8 @@
Thu Mar 5 20:10:52 MET 1987
Tue Apr 26 14:36:39 MET DST 1988
***** ctconv
acc -DNOFLOAT conv.c
conv.c
"conv.c", line 48: (warning) overflow in constant expression
"conv.c", line 38: (warning) overflow in constant expression
running conv.cem
comparing conv
2a3,4
@ -15,8 +15,12 @@ comparing conv
< 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
---
> float 127.000000
> char -1, int -1, unsigned 37777777777, long -1
@ -29,6 +33,8 @@ comparing conv
> From long
> char -3, int -3, unsigned 37777777775, long -3
> float -3.000000
> Casts from long
> 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
@ -36,6 +42,9 @@ comparing conv
> long 1223432064, float 1223432064.000000
> a[l] (l==3) -17
> a[3l] -17
> (unsigned short) 0x1f010L = 0xf010
> (short) 0x1f010L = 0xfffff010
*** Error code 1 (ignored)
***** ctdecl
acc -DNOFLOAT decl.c
decl.c
@ -49,9 +58,8 @@ comparing ops
***** cterr
acc -DNOFLOAT bugs.c
bugs.c
"bugs.c", line 98: (warning) overflow in constant expression
"bugs.c", line 88: (warning) overflow in constant expression
running bugs.cem
*** Error code -37 (ignored)
comparing bugs
***** ctest1
acc -DNOFLOAT test.c
@ -62,6 +70,7 @@ comparing test
< End of test program, 10 tests completed, 0 errors detected
---
> End of test program, 11 tests completed, 0 errors detected
*** Error code 1 (ignored)
***** ctest2
acc -DNOFLOAT t7.c
t7.c
@ -75,14 +84,14 @@ comparing test2
***** ctest5
acc -DNOFLOAT test1.c
test1.c
"test1.c", line 386: (warning) incompatible pointers in =
"test1.c", line 387: (warning) incompatible pointers in =
"test1.c", line 388: (warning) incompatible pointers in =
"test1.c", line 400: (warning) incompatible pointers in =
"test1.c", line 423: (warning) incompatible pointers in =
"test1.c", line 424: (warning) incompatible pointers in =
"test1.c", line 425: (warning) incompatible pointers in =
"test1.c", line 437: (warning) incompatible pointers in =
"test1.c", line 375: (warning) incompatible pointers in =
"test1.c", line 376: (warning) incompatible pointers in =
"test1.c", line 377: (warning) incompatible pointers in =
"test1.c", line 389: (warning) incompatible pointers in =
"test1.c", line 412: (warning) incompatible pointers in =
"test1.c", line 413: (warning) incompatible pointers in =
"test1.c", line 414: (warning) incompatible pointers in =
"test1.c", line 426: (warning) incompatible pointers in =
running test1.cem
comparing test1
1,$c1,$
@ -92,6 +101,7 @@ comparing test1
> error 13 in test 11
> program test1
> 11 tests completed. Number of errors = 1
*** Error code 1 (ignored)
***** ctgen
sed -f bf.sed <OPS >bf.c
acc -DNOFLOAT bf.c
@ -214,6 +224,80 @@ acc -DNOFLOAT id.c
id.c
running id.cem
comparing id
0a1,$
> (-40) + 300
> (-40) - 300
> (-40) / 300
> (-40) * 300
> (-40) || 300
> (-40) && 300
> -(-40)
> !(-40)
> (-40) == 300
> (-40) != 300
> (-40) <= 300
> (-40) >= 300
> (-40) < 300
> (-40) > 300
> (-40) ? (-40) : 300
> x = (-40) -4.000000e+01
> x += (-40) -3.685850e+01
> x -= (-40) 4.314150e+01
> x /= (-40) -7.853750e-02
> x *= (-40) -1.256600e+02
> x ++ 4.141500e+00
> x -- 2.141500e+00
> -- x 2.141500e+00
> ++ x 4.141500e+00
> y = ( (-40) + 300 ) 260
> y = ( (-40) - 300 ) -340
> y = ( (-40) / 300 ) 0
> y = ( (-40) * 300 ) -12000
> y = ( (-40) || 300 ) 1
> y = ( (-40) && 300 ) 1
> y = ( -(-40) ) 40
> y = ( !(-40) ) 0
> y = ( (-40) == 300 ) 0
> y = ( (-40) != 300 ) 1
> y = ( (-40) <= 300 ) 1
> y = ( (-40) >= 300 ) 0
> y = ( (-40) < 300 ) 1
> y = ( (-40) > 300 ) 0
> y = ( (-40) ? (-40) : 300 ) -40
> y = ( x = (-40) ) -4.000000e+01 -40
> y = ( x += (-40) ) -3.685850e+01 -36
> y = ( x -= (-40) ) 4.314150e+01 43
> y = ( x /= (-40) ) -7.853750e-02 0
> y = ( x *= (-40) ) -1.256600e+02 -125
> y = ( x ++ ) 4.141500e+00 3
> y = ( x -- ) 2.141500e+00 3
> y = ( -- x ) 2.141500e+00 2
> y = ( ++ x ) 4.141500e+00 4
> yes if ( (-40) + 300 ) yes() ; else no()
> yes if ( (-40) - 300 ) yes() ; else no()
> no if ( (-40) / 300 ) yes() ; else no()
> yes if ( (-40) * 300 ) yes() ; else no()
> yes if ( (-40) || 300 ) yes() ; else no()
> yes if ( (-40) && 300 ) yes() ; else no()
> yes if ( -(-40) ) yes() ; else no()
> no if ( !(-40) ) yes() ; else no()
> no if ( (-40) == 300 ) yes() ; else no()
> yes if ( (-40) != 300 ) yes() ; else no()
> yes if ( (-40) <= 300 ) yes() ; else no()
> no if ( (-40) >= 300 ) yes() ; else no()
> yes if ( (-40) < 300 ) yes() ; else no()
> no if ( (-40) > 300 ) yes() ; else no()
> yes if ( (-40) ? (-40) : 300 ) yes() ; else no()
> yes if ( x = (-40) ) yes() ; else no() -4.000000e+01
> yes if ( x += (-40) ) yes() ; else no() -3.685850e+01
> yes if ( x -= (-40) ) yes() ; else no() 4.314150e+01
> yes if ( x /= (-40) ) yes() ; else no() -7.853750e-02
> yes if ( x *= (-40) ) yes() ; else no() -1.256600e+02
> yes if ( x ++ ) yes() ; else no() 4.141500e+00
> 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)
sed -f lc.sed <OPS >lc.c
acc -DNOFLOAT lc.c
lc.c
@ -398,7 +482,7 @@ comparing lu
----- All program(s) in this directory should fail to compile.
acc -DNOFLOAT noarg.c
noarg.c
"noarg.c", line 10: name not in parameter list
"noarg.c", line 14: name not in parameter list
*** Error code 1
`gen' not remade because of errors
***** ctinit
@ -504,25 +588,25 @@ comparing init
> sizeof stb 8
> stb -1 -2 3 4 -1 6 7
>
*** Error code 1 (ignored)
***** ctmargt
acc -DNOFLOAT margt.c
margt.c
running margt.cem
comparing margt
8,$c8,$
< TERM=remote
< USER=em
---
> TERM=dialup
> USER=em
***** ctprof
test profiling
procentry.c
acc -DNOFLOAT tp.c procentry.k
acc -DNOFLOAT tp.c procentry.m
tp.c
procentry.k
procentry.m
running tp
comparing tp
***** ctsetjmp
acc -DNOFLOAT stjmp.c
stjmp.c
running stjmp.cem
comparing stjmp
***** ctstruct
acc -DNOFLOAT str.c
str.c
@ -534,11 +618,12 @@ tfork.c
running tfork.cem
comparing tfork
1,$c1,$
< childno 26226
< Child 26226, status 0x800
< childno 26404
< Child 26404, status 0x800
< fork/wait ok
---
> childno 16276
> Child 16276, status 0x800
> fork/wait ok
Thu Mar 5 21:01:02 MET 1987
*** Error code 1 (ignored)
Tue Apr 26 14:49:48 MET DST 1988

View file

@ -1,195 +1,192 @@
Tue Feb 24 13:49:31 MET 1987
Tue Apr 26 14:08:56 MET DST 1988
***** ctconv
acc conv.c
acc -fp conv.c
conv.c
"conv.c", line 48: (warning) overflow in constant expression
"conv.c", line 38: (warning) overflow in constant expression
running conv.cem
comparing conv
***** ctdecl
acc decl.c
acc -fp decl.c
decl.c
running decl.cem
comparing decl
***** ctdivers
acc ops.c
acc -fp ops.c
ops.c
running ops.cem
comparing ops
***** cterr
acc bugs.c
acc -fp bugs.c
bugs.c
"bugs.c", line 98: (warning) overflow in constant expression
"bugs.c", line 88: (warning) overflow in constant expression
running bugs.cem
*** Error code -21 (ignored)
comparing bugs
***** ctest1
acc test.c
acc -fp test.c
test.c
running test.cem
comparing test
***** ctest2
acc t7.c
acc -fp t7.c
t7.c
running t7.cem
comparing t7
***** ctest3
acc test2.c
acc -fp test2.c
test2.c
running test2.cem
comparing test2
***** ctest5
acc test1.c
acc -fp test1.c
test1.c
"test1.c", line 386: (warning) incompatible pointers in =
"test1.c", line 387: (warning) incompatible pointers in =
"test1.c", line 388: (warning) incompatible pointers in =
"test1.c", line 400: (warning) incompatible pointers in =
"test1.c", line 423: (warning) incompatible pointers in =
"test1.c", line 424: (warning) incompatible pointers in =
"test1.c", line 425: (warning) incompatible pointers in =
"test1.c", line 437: (warning) incompatible pointers in =
"test1.c", line 375: (warning) incompatible pointers in =
"test1.c", line 376: (warning) incompatible pointers in =
"test1.c", line 377: (warning) incompatible pointers in =
"test1.c", line 389: (warning) incompatible pointers in =
"test1.c", line 412: (warning) incompatible pointers in =
"test1.c", line 413: (warning) incompatible pointers in =
"test1.c", line 414: (warning) incompatible pointers in =
"test1.c", line 426: (warning) incompatible pointers in =
running test1.cem
comparing test1
***** ctgen
sed -f bf.sed <OPS >bf.c
acc bf.c
acc -fp bf.c
bf.c
running bf.cem
comparing bf
sed -f cel.sed <OPS >cel.c
acc cel.c
acc -fp cel.c
cel.c
running cel.cem
comparing cel
sed -f clu.sed <OPS >clu.c
acc clu.c
acc -fp clu.c
clu.c
running clu.cem
comparing clu
sed -f ec.sed <OPS >ec.c
acc ec.c
acc -fp ec.c
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 ef.c
acc -fp ef.c
ef.c
running ef.cem
comparing ef
sed -f ei.sed <OPS >ei.c
acc ei.c
acc -fp ei.c
ei.c
running ei.cem
comparing ei
sed -f el.sed <OPS >el.c
acc el.c
acc -fp el.c
el.c
running el.cem
comparing el
sed -f eu.sed <OPS >eu.c
acc eu.c
acc -fp eu.c
eu.c
running eu.cem
comparing eu
sed -f id.sed <OPS >id.c
acc id.c
acc -fp id.c
id.c
running id.cem
comparing id
sed -f lc.sed <OPS >lc.c
acc lc.c
acc -fp lc.c
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 ld.c
acc -fp ld.c
ld.c
running ld.cem
comparing ld
sed -f lf.sed <OPS >lf.c
acc lf.c
acc -fp lf.c
lf.c
running lf.cem
comparing lf
sed -f li.sed <OPS >li.c
acc li.c
acc -fp li.c
li.c
running li.cem
comparing li
sed -f ll.sed <OPS >ll.c
acc ll.c
acc -fp ll.c
ll.c
running ll.cem
comparing ll
sed -f lu.sed <OPS >lu.c
acc lu.c
acc -fp lu.c
lu.c
running lu.cem
comparing lu
***** ctill
----- All program(s) in this directory should fail to compile.
acc noarg.c
acc -fp noarg.c
noarg.c
"noarg.c", line 10: name not in parameter list
"noarg.c", line 14: name not in parameter list
*** Error code 1
`gen' not remade because of errors
***** ctinit
acc init.c
acc -fp init.c
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 margt.c
acc -fp margt.c
margt.c
running margt.cem
comparing margt
5,$c5,$
< CDPATH=:~:~em:/usr/spool
< CWD=/usr/em/lang/cem/ctest/ctmargt
< ESHKEYS=dcl=^?:dcl=^H:dcr=^D:dlr=^K:dtm=^W:dwl=^[h:dew=^[d:eof=^[^C:eof=^X^C:eof=^X^F:exp=^u:fcl=^[?:fcr=^[/:gcl=^B:gcr=^F:gll=^A:glr=^E:gwl=^[b:gew=^[f:hlp=^[H:hst=^_:int=^G:lnx=^V:prh=^P:rdr=^L:rtn=^J:rtn=^M:stm=^@:tab=^I:xgm=^X^X:xpl=^[^J:xpl=^[^M:yn< k=^Y:ipl=^N
< HOME=/user0/ceriel
< M2PATH=.:/user0/ceriel/modula-2/lib/m2v
< PAGER=/user0/ceriel/bin/yap
< PATH=/user0/ceriel/bin:/usr/local:/usr/ucb:/bin:/usr/bin:/usr/em/bin:/usr/new::/user0/ceriel/modula-2/bin/m2v
< REFS=/user0/ceriel/etc/refer/refs
< SHELL=/usr/local/esh
< TERM=sun
< TERMCAP=Mu|sun:li#34:co#80:cl=^L:cm=\E[%i%d;%dH:nd=\E[C:up=\E[A:am:bs:mi:ms:ce=\E[K:cd=\E[J:so=\E[7m:se=\E[m:kd=\E[B:kl=\E[D:ku=\E[A:kr=\E[C:kh=\E[H:k1=\EOP:k2=\EOQ:k3=\EOR:k4=\EOS:al=\E[L:dl=\E[M:im=:ei=:ic=\E[@:dc=\E[P
< USER=ceriel
---
> HOME=/usr/em
> PATH=:/bin:/usr/ucb:/usr/local:/usr/bin:/usr/em/bin
> SHELL=/usr/local/esh
> TERM=dialup
> USER=em
***** ctprof
test profiling
procentry.c
acc tp.c procentry.k
acc -fp tp.c procentry.m
tp.c
procentry.k
procentry.m
running tp
comparing tp
***** ctsetjmp
acc -fp stjmp.c
stjmp.c
running stjmp.cem
comparing stjmp
***** ctstruct
acc str.c
acc -fp str.c
str.c
running str.cem
comparing str
***** ctsys
acc tfork.c
acc -fp tfork.c
tfork.c
running tfork.cem
comparing tfork
1,$c1,$
< childno 1066
< Child 1066, status 0x800
< childno 25349
< Child 25349, status 0x800
< fork/wait ok
---
> childno 16276
> Child 16276, status 0x800
> fork/wait ok
Tue Feb 24 16:01:13 MET 1987
*** Error code 1 (ignored)
Tue Apr 26 14:26:04 MET DST 1988

View file

@ -49,6 +49,5 @@ If one has a implementation without floating point one can
use the -DNOFLOAT flag.
Most programs use compile time #ifdef's to hide the use of
floating point they make.
For an example, look at makefile.i86.
Differences are to be expected in the output of such a run.
Look at the file Out2.nf.std or Out4.nf.std to see what can be expected.

View file

@ -1,5 +1,5 @@
.SILENT:
CEM=acc -fp # -Oego -IL -s0 -SP -BO -CJ -CS -SR -UD -LV -SA
CEM=acc
head:
echo use run
@ -50,4 +50,4 @@ opr:
make pr | opr
clean:
-rm -f $P.[kmsoe] $P.*.r core a.out *.old
-rm -f $P.[kmsoe] $P.*.r core a.out *.old em_last em_runinf e.out

View file

@ -14,7 +14,7 @@ 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
rm -f $P.e
$P.e: $P.c $(CEM)
$P.e: $P.c
$(CEM) -c.e $P.c
$P.pcc.r: $P.pcc
echo running $P.pcc
@ -50,4 +50,4 @@ opr:
make pr | opr
clean:
-rm -f $P.[kmsoe] $P.*.r core a.out *.old
-rm -f $P.[kmsoe] $P.*.r core a.out *.old em_last em_runinf e.out