d0p1/ack
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

changed int?? to em??

Browse source
This commit is contained in:
ceriel 1988-05-06 13:46:55 +00:00
parent 7f7078c9f0
commit 066439ec19
35 changed files with 149 additions and 118 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
Action
View file

@ -107,15 +107,15 @@ dir mach/i80
indir indir
end end
name "2-2 Interpreter support" name "2-2 Interpreter support"
dir mach/int22 dir mach/em22
indir indir
end end
name "2-4 Interpreter support" name "2-4 Interpreter support"
dir mach/int24 dir mach/em24
indir indir
end end
name "4-4 Interpreter support" name "4-4 Interpreter support"
dir mach/int44 dir mach/em24
indir indir
end end
name "Motorola 68000 2-4 support" name "Motorola 68000 2-4 support"

4
doc/ack.doc
View file

@ -393,7 +393,7 @@ var l=4 # long size 4
var f=4 # float size 4 var f=4 # float size 4
var d=8 # double size 8 var d=8 # double size 8
var M=int # Unused in this example var M=int # Unused in this example
var NAME=int22 # for cpp (NAME=int results in #define int 1) var NAME=em22 # for cpp (NAME=em22 results in #define em22 1)
var LIB=mach/int/lib/tail_ # part of file name for libraries var LIB=mach/int/lib/tail_ # part of file name for libraries
var RT=mach/int/lib/head_ # part of file name for run-time startoff var RT=mach/int/lib/head_ # part of file name for run-time startoff
var SIZE_FLAG=\-sm # default internal table size flag var SIZE_FLAG=\-sm # default internal table size flag
@ -425,7 +425,7 @@ would result in the following
calls (with exec(II)): calls (with exec(II)):
.DS X .DS X
.ta 4n .ta 4n
1) /lib/cpp \-I../h \-I/usr/em/include \-Dint22 \-DEM_WSIZE=2 \-DEM_PSIZE=2 \e 1) /lib/cpp \-I../h \-I/usr/em/include \-Dem22 \-DEM_WSIZE=2 \-DEM_PSIZE=2 \e
\-DEM_SSIZE=2 \-DEM_LSIZE=4 \-DEM_FSIZE=4 \-DEM_DSIZE=8 prog.c \-DEM_SSIZE=2 \-DEM_LSIZE=4 \-DEM_FSIZE=4 \-DEM_DSIZE=8 prog.c
2) /usr/em/lib/em_cem \-Vw2i2p2f4s2l4d8 \-l 2) /usr/em/lib/em_cem \-Vw2i2p2f4s2l4d8 \-l
3) /usr/em/lib/em_ass \-sm /usr/em/mach/int/lib/head_cc \-o e.out prog.k 3) /usr/em/lib/em_ass \-sm /usr/em/mach/int/lib/head_cc \-o e.out prog.k

10
doc/install.doc
View file

@ -852,19 +852,19 @@ z8000 Zilog 8000 2/2 C z8000 Central Data
Occam Occam
Modula-2 Modula-2
int22 EM machine 2/2 C * int22 Needs interpreter em22 EM machine 2/2 C * em22 Needs interpreter
Pascal Pascal
Basic Basic
Occam Occam
Modula-2 Modula-2
int24 EM machine 2/4 C * int24 Needs interpreter em24 EM machine 2/4 C * em24 Needs interpreter
Pascal Pascal
Basic Basic
Occam Occam
Modula-2 Modula-2
int44 EM machine 4/4 C * int44 Needs interpreter em44 EM machine 4/4 C * em44 Needs interpreter
Pascal Pascal
Basic Basic
Occam Occam
@ -903,7 +903,7 @@ z80 Hermac/z80 2/2 C z80 \fIi80\fP is faster
s2650 Signetics 2650 s2650 Assembler only s2650 Signetics 2650 s2650 Assembler only
.TE .TE
.PP .PP
The commands \fBint22\fP, \fBint24\fP and \fBint44\fP The commands \fBem22\fP, \fBem24\fP and \fBem44\fP
produce e.out files with EM machine code which must be interpreted. produce e.out files with EM machine code which must be interpreted.
The Kit contains two interpreters: one running under PDP 11/V7 UNIX, The Kit contains two interpreters: one running under PDP 11/V7 UNIX,
and one for the M68000, running under the PMDS system, SUN systems, and one for the M68000, running under the PMDS system, SUN systems,
@ -915,7 +915,7 @@ The interpreter for the M68000 traps if you try to use floating point.
.LP .LP
The program \fBem\fP in the bin directory calls the appropriate The program \fBem\fP in the bin directory calls the appropriate
interpreter. interpreter.
The interpreters are sought in the int22, int24 and int44 The interpreters are sought in the em22, em24 and em44
subdirectories of lib. subdirectories of lib.
.NH .NH
Compilation on a different machine. Compilation on a different machine.

2
first/first
View file

@ -254,7 +254,7 @@ ABC
) )
( cd ../mach ( cd ../mach
: machines with word or pointer size not 2 : machines with word or pointer size not 2
for i in int24 int44 m68020 m68k2 m68k4 mantra ns sun2 sun3 vax4 for i in em24 em44 m68020 m68k2 m68k4 mantra ns sun2 sun3 vax4
do do
cp $i/Action $i/Action.orig cp $i/Action $i/Action.orig
ed - $i/Action <<ABC ed - $i/Action <<ABC

60
lang/cem/ctest/Out2.nf.std
View file

@ -1,6 +1,6 @@
Wed Apr 27 13:01:47 MET DST 1988 Wed Apr 27 13:01:47 MET DST 1988
***** ctconv ***** ctconv
int24 -DNOFLOAT conv.c em24 -DNOFLOAT conv.c
conv.c conv.c
"conv.c", line 38: (warning) overflow in constant expression "conv.c", line 38: (warning) overflow in constant expression
running conv.cem running conv.cem
@ -46,12 +46,12 @@ comparing conv
> (short) 0x1f010L = 0xfffff010 > (short) 0x1f010L = 0xfffff010
*** Error code 1 (ignored) *** Error code 1 (ignored)
***** ctdecl ***** ctdecl
int24 -DNOFLOAT decl.c em24 -DNOFLOAT decl.c
decl.c decl.c
running decl.cem running decl.cem
comparing decl comparing decl
***** ctdivers ***** ctdivers
int24 -DNOFLOAT ops.c em24 -DNOFLOAT ops.c
ops.c ops.c
running ops.cem running ops.cem
comparing ops comparing ops
@ -93,13 +93,13 @@ comparing ops
> u<<16 32163200000 > u<<16 32163200000
*** Error code 1 (ignored) *** Error code 1 (ignored)
***** cterr ***** cterr
int24 -DNOFLOAT bugs.c em24 -DNOFLOAT bugs.c
bugs.c bugs.c
"bugs.c", line 88: (warning) overflow in constant expression "bugs.c", line 88: (warning) overflow in constant expression
running bugs.cem running bugs.cem
comparing bugs comparing bugs
***** ctest1 ***** ctest1
int24 -DNOFLOAT test.c em24 -DNOFLOAT test.c
test.c test.c
running test.cem running test.cem
comparing test comparing test
@ -109,19 +109,19 @@ comparing test
> End of test program, 11 tests completed, 0 errors detected > End of test program, 11 tests completed, 0 errors detected
*** Error code 1 (ignored) *** Error code 1 (ignored)
***** ctest2 ***** ctest2
int24 -DNOFLOAT t7.c em24 -DNOFLOAT t7.c
t7.c t7.c
running t7.cem running t7.cem
comparing t7 comparing t7
***** ctest3 ***** ctest3
int24 -DNOFLOAT test2.c em24 -DNOFLOAT test2.c
test2.c 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
"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 running test2.cem
comparing test2 comparing test2
***** ctest5 ***** ctest5
int24 -DNOFLOAT test1.c em24 -DNOFLOAT test1.c
test1.c test1.c
"test1.c", line 375: (warning) incompatible pointers in = "test1.c", line 375: (warning) incompatible pointers in =
"test1.c", line 376: (warning) incompatible pointers in = "test1.c", line 376: (warning) incompatible pointers in =
@ -143,17 +143,17 @@ comparing test1
*** Error code 1 (ignored) *** Error code 1 (ignored)
***** ctgen ***** ctgen
sed -f bf.sed <OPS >bf.c sed -f bf.sed <OPS >bf.c
int24 -DNOFLOAT bf.c em24 -DNOFLOAT bf.c
bf.c bf.c
running bf.cem running bf.cem
comparing bf comparing bf
sed -f cel.sed <OPS >cel.c sed -f cel.sed <OPS >cel.c
int24 -DNOFLOAT cel.c em24 -DNOFLOAT cel.c
cel.c cel.c
running cel.cem running cel.cem
comparing cel comparing cel
sed -f clu.sed <OPS >clu.c sed -f clu.sed <OPS >clu.c
int24 -DNOFLOAT clu.c em24 -DNOFLOAT clu.c
clu.c clu.c
"clu.c", line 60: (warning) overflow in unsigned constant expression "clu.c", line 60: (warning) overflow in unsigned constant expression
"clu.c", line 66: (warning) overflow in unsigned constant expression "clu.c", line 66: (warning) overflow in unsigned constant expression
@ -251,14 +251,14 @@ comparing clu
> yes if ( x ^= 40000 ) yes() ; else no() 40010 > yes if ( x ^= 40000 ) yes() ; else no() 40010
*** Error code 1 (ignored) *** Error code 1 (ignored)
sed -f ec.sed <OPS >ec.c sed -f ec.sed <OPS >ec.c
int24 -DNOFLOAT ec.c em24 -DNOFLOAT ec.c
ec.c ec.c
"ec.c", line 58: (warning) overflow in constant expression "ec.c", line 58: (warning) overflow in constant expression
"ec.c", line 64: (warning) overflow in constant expression "ec.c", line 64: (warning) overflow in constant expression
running ec.cem running ec.cem
comparing ec comparing ec
sed -f ef.sed <OPS >ef.c sed -f ef.sed <OPS >ef.c
int24 -DNOFLOAT ef.c em24 -DNOFLOAT ef.c
ef.c ef.c
running ef.cem running ef.cem
comparing ef comparing ef
@ -337,7 +337,7 @@ comparing ef
> yes if ( ++ x ) yes() ; else no() 4.141500e+00 > yes if ( ++ x ) yes() ; else no() 4.141500e+00
*** Error code 1 (ignored) *** Error code 1 (ignored)
sed -f ei.sed <OPS >ei.c sed -f ei.sed <OPS >ei.c
int24 -DNOFLOAT ei.c em24 -DNOFLOAT ei.c
ei.c ei.c
"ei.c", line 22: (warning) overflow in constant expression "ei.c", line 22: (warning) overflow in constant expression
"ei.c", line 65: (warning) overflow in constant expression "ei.c", line 65: (warning) overflow in constant expression
@ -366,12 +366,12 @@ comparing ei
> yes if ( x <<= 15 ) yes() ; else no() 8355840 > yes if ( x <<= 15 ) yes() ; else no() 8355840
*** Error code 1 (ignored) *** Error code 1 (ignored)
sed -f el.sed <OPS >el.c sed -f el.sed <OPS >el.c
int24 -DNOFLOAT el.c em24 -DNOFLOAT el.c
el.c el.c
running el.cem running el.cem
comparing el comparing el
sed -f eu.sed <OPS >eu.c sed -f eu.sed <OPS >eu.c
int24 -DNOFLOAT eu.c em24 -DNOFLOAT eu.c
eu.c eu.c
"eu.c", line 58: (warning) overflow in unsigned constant expression "eu.c", line 58: (warning) overflow in unsigned constant expression
"eu.c", line 64: (warning) overflow in unsigned constant expression "eu.c", line 64: (warning) overflow in unsigned constant expression
@ -469,7 +469,7 @@ comparing eu
> yes if ( x ^= 40000 ) yes() ; else no() 40010 > yes if ( x ^= 40000 ) yes() ; else no() 40010
*** Error code 1 (ignored) *** Error code 1 (ignored)
sed -f id.sed <OPS >id.c sed -f id.sed <OPS >id.c
int24 -DNOFLOAT id.c em24 -DNOFLOAT id.c
id.c id.c
running id.cem running id.cem
comparing id comparing id
@ -548,14 +548,14 @@ comparing id
> yes if ( ++ x ) yes() ; else no() 4.141500e+00 > yes if ( ++ x ) yes() ; else no() 4.141500e+00
*** Error code 1 (ignored) *** Error code 1 (ignored)
sed -f lc.sed <OPS >lc.c sed -f lc.sed <OPS >lc.c
int24 -DNOFLOAT lc.c em24 -DNOFLOAT lc.c
lc.c lc.c
"lc.c", line 60: (warning) overflow in constant expression "lc.c", line 60: (warning) overflow in constant expression
"lc.c", line 66: (warning) overflow in constant expression "lc.c", line 66: (warning) overflow in constant expression
running lc.cem running lc.cem
comparing lc comparing lc
sed -f ld.sed <OPS >ld.c sed -f ld.sed <OPS >ld.c
int24 -DNOFLOAT ld.c em24 -DNOFLOAT ld.c
ld.c ld.c
running ld.cem running ld.cem
comparing ld comparing ld
@ -634,7 +634,7 @@ comparing ld
> yes if ( ++ x ) yes() ; else no() 4.141500e+00 > yes if ( ++ x ) yes() ; else no() 4.141500e+00
*** Error code 1 (ignored) *** Error code 1 (ignored)
sed -f lf.sed <OPS >lf.c sed -f lf.sed <OPS >lf.c
int24 -DNOFLOAT lf.c em24 -DNOFLOAT lf.c
lf.c lf.c
running lf.cem running lf.cem
comparing lf comparing lf
@ -713,7 +713,7 @@ comparing lf
> yes if ( ++ x ) yes() ; else no() 4.141500e+00 > yes if ( ++ x ) yes() ; else no() 4.141500e+00
*** Error code 1 (ignored) *** Error code 1 (ignored)
sed -f li.sed <OPS >li.c sed -f li.sed <OPS >li.c
int24 -DNOFLOAT li.c em24 -DNOFLOAT li.c
li.c li.c
"li.c", line 22: (warning) overflow in constant expression "li.c", line 22: (warning) overflow in constant expression
"li.c", line 67: (warning) overflow in constant expression "li.c", line 67: (warning) overflow in constant expression
@ -742,12 +742,12 @@ comparing li
> yes if ( x <<= 15 ) yes() ; else no() 8355840 > yes if ( x <<= 15 ) yes() ; else no() 8355840
*** Error code 1 (ignored) *** Error code 1 (ignored)
sed -f ll.sed <OPS >ll.c sed -f ll.sed <OPS >ll.c
int24 -DNOFLOAT ll.c em24 -DNOFLOAT ll.c
ll.c ll.c
running ll.cem running ll.cem
comparing ll comparing ll
sed -f lu.sed <OPS >lu.c sed -f lu.sed <OPS >lu.c
int24 -DNOFLOAT lu.c em24 -DNOFLOAT lu.c
lu.c lu.c
running lu.cem running lu.cem
comparing lu comparing lu
@ -844,13 +844,13 @@ comparing lu
*** Error code 1 (ignored) *** Error code 1 (ignored)
***** ctill ***** ctill
----- All program(s) in this directory should fail to compile. ----- All program(s) in this directory should fail to compile.
int24 -DNOFLOAT noarg.c em24 -DNOFLOAT noarg.c
noarg.c noarg.c
"noarg.c", line 14: name not in parameter list "noarg.c", line 14: name not in parameter list
*** Error code 1 *** Error code 1
`gen' not remade because of errors `gen' not remade because of errors
***** ctinit ***** ctinit
int24 -DNOFLOAT init.c em24 -DNOFLOAT init.c
init.c init.c
"init.c", line 172: (warning) overflow in constant expression "init.c", line 172: (warning) overflow in constant expression
running init.cem running init.cem
@ -955,29 +955,29 @@ comparing init
> >
*** Error code 1 (ignored) *** Error code 1 (ignored)
***** ctmargt ***** ctmargt
int24 -DNOFLOAT margt.c em24 -DNOFLOAT margt.c
margt.c margt.c
running margt.cem running margt.cem
comparing margt comparing margt
***** ctprof ***** ctprof
test profiling test profiling
procentry.c procentry.c
int24 -DNOFLOAT tp.c procentry.m em24 -DNOFLOAT tp.c procentry.m
tp.c tp.c
running tp.cem running tp.cem
comparing tp comparing tp
***** ctsetjmp ***** ctsetjmp
int24 -DNOFLOAT stjmp.c em24 -DNOFLOAT stjmp.c
stjmp.c stjmp.c
running stjmp.cem running stjmp.cem
comparing stjmp comparing stjmp
***** ctstruct ***** ctstruct
int24 -DNOFLOAT str.c em24 -DNOFLOAT str.c
str.c str.c
running str.cem running str.cem
comparing str comparing str
***** ctsys ***** ctsys
int24 -DNOFLOAT tfork.c em24 -DNOFLOAT tfork.c
tfork.c tfork.c
running tfork.cem running tfork.cem
comparing tfork comparing tfork

60
lang/cem/ctest/Out2.std
View file

@ -1,6 +1,6 @@
Thu Apr 28 12:20:53 MET DST 1988 Thu Apr 28 12:20:53 MET DST 1988
***** ctconv ***** ctconv
int24 conv.c em24 conv.c
conv.c conv.c
"conv.c", line 38: (warning) overflow in constant expression "conv.c", line 38: (warning) overflow in constant expression
running conv.cem running conv.cem
@ -33,12 +33,12 @@ comparing conv
> char -8, int 75000, unsigned short 22370, long 75000 > char -8, int 75000, unsigned short 22370, long 75000
*** Error code 1 (ignored) *** Error code 1 (ignored)
***** ctdecl ***** ctdecl
int24 decl.c em24 decl.c
decl.c decl.c
running decl.cem running decl.cem
comparing decl comparing decl
***** ctdivers ***** ctdivers
int24 ops.c em24 ops.c
ops.c ops.c
running ops.cem running ops.cem
comparing ops comparing ops
@ -80,30 +80,30 @@ comparing ops
> u<<16 32163200000 > u<<16 32163200000
*** Error code 1 (ignored) *** Error code 1 (ignored)
***** cterr ***** cterr
int24 bugs.c em24 bugs.c
bugs.c bugs.c
"bugs.c", line 88: (warning) overflow in constant expression "bugs.c", line 88: (warning) overflow in constant expression
running bugs.cem running bugs.cem
comparing bugs comparing bugs
***** ctest1 ***** ctest1
int24 test.c em24 test.c
test.c test.c
running test.cem running test.cem
comparing test comparing test
***** ctest2 ***** ctest2
int24 t7.c em24 t7.c
t7.c t7.c
running t7.cem running t7.cem
comparing t7 comparing t7
***** ctest3 ***** ctest3
int24 test2.c em24 test2.c
test2.c 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
"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 running test2.cem
comparing test2 comparing test2
***** ctest5 ***** ctest5
int24 test1.c em24 test1.c
test1.c test1.c
"test1.c", line 375: (warning) incompatible pointers in = "test1.c", line 375: (warning) incompatible pointers in =
"test1.c", line 376: (warning) incompatible pointers in = "test1.c", line 376: (warning) incompatible pointers in =
@ -117,17 +117,17 @@ running test1.cem
comparing test1 comparing test1
***** ctgen ***** ctgen
sed -f bf.sed <OPS >bf.c sed -f bf.sed <OPS >bf.c
int24 bf.c em24 bf.c
bf.c bf.c
running bf.cem running bf.cem
comparing bf comparing bf
sed -f cel.sed <OPS >cel.c sed -f cel.sed <OPS >cel.c
int24 cel.c em24 cel.c
cel.c cel.c
running cel.cem running cel.cem
comparing cel comparing cel
sed -f clu.sed <OPS >clu.c sed -f clu.sed <OPS >clu.c
int24 clu.c em24 clu.c
clu.c clu.c
"clu.c", line 60: (warning) overflow in unsigned constant expression "clu.c", line 60: (warning) overflow in unsigned constant expression
"clu.c", line 66: (warning) overflow in unsigned constant expression "clu.c", line 66: (warning) overflow in unsigned constant expression
@ -225,19 +225,19 @@ comparing clu
> yes if ( x ^= 40000 ) yes() ; else no() 40010 > yes if ( x ^= 40000 ) yes() ; else no() 40010
*** Error code 1 (ignored) *** Error code 1 (ignored)
sed -f ec.sed <OPS >ec.c sed -f ec.sed <OPS >ec.c
int24 ec.c em24 ec.c
ec.c ec.c
"ec.c", line 58: (warning) overflow in constant expression "ec.c", line 58: (warning) overflow in constant expression
"ec.c", line 64: (warning) overflow in constant expression "ec.c", line 64: (warning) overflow in constant expression
running ec.cem running ec.cem
comparing ec comparing ec
sed -f ef.sed <OPS >ef.c sed -f ef.sed <OPS >ef.c
int24 ef.c em24 ef.c
ef.c ef.c
running ef.cem running ef.cem
comparing ef comparing ef
sed -f ei.sed <OPS >ei.c sed -f ei.sed <OPS >ei.c
int24 ei.c em24 ei.c
ei.c ei.c
"ei.c", line 22: (warning) overflow in constant expression "ei.c", line 22: (warning) overflow in constant expression
"ei.c", line 65: (warning) overflow in constant expression "ei.c", line 65: (warning) overflow in constant expression
@ -266,12 +266,12 @@ comparing ei
> yes if ( x <<= 15 ) yes() ; else no() 8355840 > yes if ( x <<= 15 ) yes() ; else no() 8355840
*** Error code 1 (ignored) *** Error code 1 (ignored)
sed -f el.sed <OPS >el.c sed -f el.sed <OPS >el.c
int24 el.c em24 el.c
el.c el.c
running el.cem running el.cem
comparing el comparing el
sed -f eu.sed <OPS >eu.c sed -f eu.sed <OPS >eu.c
int24 eu.c em24 eu.c
eu.c eu.c
"eu.c", line 58: (warning) overflow in unsigned constant expression "eu.c", line 58: (warning) overflow in unsigned constant expression
"eu.c", line 64: (warning) overflow in unsigned constant expression "eu.c", line 64: (warning) overflow in unsigned constant expression
@ -369,29 +369,29 @@ comparing eu
> yes if ( x ^= 40000 ) yes() ; else no() 40010 > yes if ( x ^= 40000 ) yes() ; else no() 40010
*** Error code 1 (ignored) *** Error code 1 (ignored)
sed -f id.sed <OPS >id.c sed -f id.sed <OPS >id.c
int24 id.c em24 id.c
id.c id.c
running id.cem running id.cem
comparing id comparing id
sed -f lc.sed <OPS >lc.c sed -f lc.sed <OPS >lc.c
int24 lc.c em24 lc.c
lc.c lc.c
"lc.c", line 60: (warning) overflow in constant expression "lc.c", line 60: (warning) overflow in constant expression
"lc.c", line 66: (warning) overflow in constant expression "lc.c", line 66: (warning) overflow in constant expression
running lc.cem running lc.cem
comparing lc comparing lc
sed -f ld.sed <OPS >ld.c sed -f ld.sed <OPS >ld.c
int24 ld.c em24 ld.c
ld.c ld.c
running ld.cem running ld.cem
comparing ld comparing ld
sed -f lf.sed <OPS >lf.c sed -f lf.sed <OPS >lf.c
int24 lf.c em24 lf.c
lf.c lf.c
running lf.cem running lf.cem
comparing lf comparing lf
sed -f li.sed <OPS >li.c sed -f li.sed <OPS >li.c
int24 li.c em24 li.c
li.c li.c
"li.c", line 22: (warning) overflow in constant expression "li.c", line 22: (warning) overflow in constant expression
"li.c", line 67: (warning) overflow in constant expression "li.c", line 67: (warning) overflow in constant expression
@ -420,12 +420,12 @@ comparing li
> yes if ( x <<= 15 ) yes() ; else no() 8355840 > yes if ( x <<= 15 ) yes() ; else no() 8355840
*** Error code 1 (ignored) *** Error code 1 (ignored)
sed -f ll.sed <OPS >ll.c sed -f ll.sed <OPS >ll.c
int24 ll.c em24 ll.c
ll.c ll.c
running ll.cem running ll.cem
comparing ll comparing ll
sed -f lu.sed <OPS >lu.c sed -f lu.sed <OPS >lu.c
int24 lu.c em24 lu.c
lu.c lu.c
running lu.cem running lu.cem
comparing lu comparing lu
@ -522,13 +522,13 @@ comparing lu
*** Error code 1 (ignored) *** Error code 1 (ignored)
***** ctill ***** ctill
----- All program(s) in this directory should fail to compile. ----- All program(s) in this directory should fail to compile.
int24 noarg.c em24 noarg.c
noarg.c noarg.c
"noarg.c", line 14: name not in parameter list "noarg.c", line 14: name not in parameter list
*** Error code 1 *** Error code 1
`gen' not remade because of errors `gen' not remade because of errors
***** ctinit ***** ctinit
int24 init.c em24 init.c
init.c init.c
"init.c", line 172: (warning) overflow in constant expression "init.c", line 172: (warning) overflow in constant expression
running init.cem running init.cem
@ -557,29 +557,29 @@ comparing init
> >
*** Error code 1 (ignored) *** Error code 1 (ignored)
***** ctmargt ***** ctmargt
int24 margt.c em24 margt.c
margt.c margt.c
running margt.cem running margt.cem
comparing margt comparing margt
***** ctprof ***** ctprof
test profiling test profiling
procentry.c procentry.c
int24 tp.c procentry.m em24 tp.c procentry.m
tp.c tp.c
running tp.cem running tp.cem
comparing tp comparing tp
***** ctsetjmp ***** ctsetjmp
int24 stjmp.c em24 stjmp.c
stjmp.c stjmp.c
running stjmp.cem running stjmp.cem
comparing stjmp comparing stjmp
***** ctstruct ***** ctstruct
int24 str.c em24 str.c
str.c str.c
running str.cem running str.cem
comparing str comparing str
***** ctsys ***** ctsys
int24 tfork.c em24 tfork.c
tfork.c tfork.c
running tfork.cem running tfork.cem
comparing tfork comparing tfork

6
lang/m2/libm2/catch.c
View file

@ -85,9 +85,9 @@ catch(trapno)
*p = 0; *p = 0;
_Traps__Message(q, 0, (int) (p - q), 1); _Traps__Message(q, 0, (int) (p - q), 1);
} }
#ifndef int24 #ifndef em24
#ifndef int44 #ifndef em44
#ifndef int22 #ifndef em22
if (trapno == M2_UNIXSIG) { if (trapno == M2_UNIXSIG) {
extern int __signo; extern int __signo;
signal(__signo, SIG_DFL); signal(__signo, SIG_DFL);

6
lang/m2/libm2/sigtrp.c
View file

@ -10,9 +10,9 @@
Version: $Header$ Version: $Header$
*/ */
#ifndef int22 #ifndef em22
#ifndef int24 #ifndef em24
#ifndef int44 #ifndef em44
#define EM_trap(n) TRP(n) /* define to whatever is needed to cause the trap */ #define EM_trap(n) TRP(n) /* define to whatever is needed to cause the trap */

6
lib/.distr
View file

@ -5,9 +5,9 @@
descr descr
i80 i80
i86 i86
int22 em22
int24 em24
int44 em44
m68020 m68020
m68k2 m68k2
m68k4 m68k4

8
lib/em22/descr
View file

@ -5,10 +5,10 @@ var s=2
var l=4 var l=4
var f=4 var f=4
var d=8 var d=8
var M=int var M=em22
var NAME=int22 var NAME=em22
var LIB=lib/int22/tail_ var LIB=lib/em22/tail_
var RT=lib/int22/head_ var RT=lib/em22/head_
var SIZE_FLAG=-sm var SIZE_FLAG=-sm
var CPP_F=-Dunix=unix var CPP_F=-Dunix=unix
var INCLUDES=-I{EM}/include/_tail_cc -I{EM}/include/_tail_mon var INCLUDES=-I{EM}/include/_tail_cc -I{EM}/include/_tail_mon

8
lib/em24/descr
View file

@ -5,10 +5,10 @@ var s=2
var l=4 var l=4
var f=4 var f=4
var d=8 var d=8
var M=int24 var M=em24
var NAME=int24 var NAME=em24
var LIB=lib/int24/tail_ var LIB=lib/em24/tail_
var RT=lib/int24/head_ var RT=lib/em24/head_
var SIZE_FLAG=-sm var SIZE_FLAG=-sm
var CPP_F=-Dunix=unix var CPP_F=-Dunix=unix
var INCLUDES=-I{EM}/include/_tail_cc -I{EM}/include/_tail_mon var INCLUDES=-I{EM}/include/_tail_cc -I{EM}/include/_tail_mon

8
lib/em44/descr
View file

@ -5,10 +5,10 @@ var s=2
var l=4 var l=4
var f=4 var f=4
var d=8 var d=8
var M=int44 var M=em44
var NAME=int44 var NAME=em44
var LIB=lib/int44/tail_ var LIB=lib/em44/tail_
var RT=lib/int44/head_ var RT=lib/em44/head_
var SIZE_FLAG=-sm var SIZE_FLAG=-sm
var CPP_F=-Dunix=unix var CPP_F=-Dunix=unix
var INCLUDES=-I{EM}/include/_tail_cc -I{EM}/include/_tail_mon var INCLUDES=-I{EM}/include/_tail_cc -I{EM}/include/_tail_mon

6
mach/.distr
View file

@ -6,9 +6,9 @@ i80
compare compare
i86 i86
install install
int22 em22
int24 em24
int44 em44
m68k2 m68k2
m68k4 m68k4
m68020 m68020

2
mach/em22/libbc/Makefile
View file

@ -1,6 +1,6 @@
SUF=m SUF=m
MAKEFILE=../../proto/libg/Makefile MAKEFILE=../../proto/libg/Makefile
MACHDEF="MACH=int22" "SUF=$(SUF)" MACHDEF="MACH=em22" "SUF=$(SUF)"
BCDEF="PREF=bc" "SUB=" "SRC=lang/basic/lib" BCDEF="PREF=bc" "SUB=" "SRC=lang/basic/lib"
install: install:

2
mach/em22/libcc/Makefile
View file

@ -1,6 +1,6 @@
SUF=m SUF=m
MAKEFILE=../../proto/libg/Makefile MAKEFILE=../../proto/libg/Makefile
MACHDEF="MACH=int22" "SUF=$(SUF)" MACHDEF="MACH=em22" "SUF=$(SUF)"
STDIO="PREF=cc" "SUB=.1s" "SRC=lang/cem/libcc/stdio" STDIO="PREF=cc" "SUB=.1s" "SRC=lang/cem/libcc/stdio"
GEN="PREF=cc" "SUB=.2g" "SRC=lang/cem/libcc/gen" GEN="PREF=cc" "SUB=.2g" "SRC=lang/cem/libcc/gen"
MON="PREF=mon" "SRC=lang/cem/libcc/mon" MON="PREF=mon" "SRC=lang/cem/libcc/mon"

2
mach/em22/libm2/Makefile
View file

@ -1,6 +1,6 @@
SUF=m SUF=m
MAKEFILE=../../proto/libg/Makefile MAKEFILE=../../proto/libg/Makefile
MACHDEF="MACH=int22" "SUF=$(SUF)" MACHDEF="MACH=em22" "SUF=$(SUF)"
M2DEF="PREF=m2" "SUB=" "SRC=lang/m2/libm2" M2DEF="PREF=m2" "SUB=" "SRC=lang/m2/libm2"
all: all:

2
mach/em22/liboc/Makefile
View file

@ -1,6 +1,6 @@
SUF=m SUF=m
MAKEFILE=../../proto/libg/Makefile MAKEFILE=../../proto/libg/Makefile
MACHDEF="MACH=int22" "SUF=$(SUF)" MACHDEF="MACH=em22" "SUF=$(SUF)"
PCDEF="PREF=ocm" "SUB=" "SRC=lang/occam/lib" PCDEF="PREF=ocm" "SUB=" "SRC=lang/occam/lib"
install: install:

2
mach/em22/libpc/Makefile
View file

@ -1,6 +1,6 @@
SUF=m SUF=m
MAKEFILE=../../proto/libg/Makefile MAKEFILE=../../proto/libg/Makefile
MACHDEF="MACH=int22" "SUF=$(SUF)" MACHDEF="MACH=em22" "SUF=$(SUF)"
PCDEF="PREF=pc" "SUB=" "SRC=lang/pc/libpc" PCDEF="PREF=pc" "SUB=" "SRC=lang/pc/libpc"
install: install:

2
mach/em24/libbc/Makefile
View file

@ -1,6 +1,6 @@
SUF=m SUF=m
MAKEFILE=../../proto/libg/Makefile MAKEFILE=../../proto/libg/Makefile
MACHDEF="MACH=int24" "SUF=$(SUF)" MACHDEF="MACH=em24" "SUF=$(SUF)"
BCDEF="PREF=bc" "SUB=" "SRC=lang/basic/lib" BCDEF="PREF=bc" "SUB=" "SRC=lang/basic/lib"
install: install:

2
mach/em24/libcc/Makefile
View file

@ -1,6 +1,6 @@
SUF=m SUF=m
MAKEFILE=../../proto/libg/Makefile MAKEFILE=../../proto/libg/Makefile
MACHDEF="MACH=int24" "SUF=$(SUF)" MACHDEF="MACH=em24" "SUF=$(SUF)"
STDIO="PREF=cc" "SUB=.1s" "SRC=lang/cem/libcc/stdio" STDIO="PREF=cc" "SUB=.1s" "SRC=lang/cem/libcc/stdio"
GEN="PREF=cc" "SUB=.2g" "SRC=lang/cem/libcc/gen" GEN="PREF=cc" "SUB=.2g" "SRC=lang/cem/libcc/gen"
MON="PREF=mon" "SRC=lang/cem/libcc/mon" MON="PREF=mon" "SRC=lang/cem/libcc/mon"

2
mach/em24/libm2/Makefile
View file

@ -1,6 +1,6 @@
SUF=m SUF=m
MAKEFILE=../../proto/libg/Makefile MAKEFILE=../../proto/libg/Makefile
MACHDEF="MACH=int24" "SUF=$(SUF)" MACHDEF="MACH=em24" "SUF=$(SUF)"
M2DEF="PREF=m2" "SUB=" "SRC=lang/m2/libm2" M2DEF="PREF=m2" "SUB=" "SRC=lang/m2/libm2"
all: all:

2
mach/em24/liboc/Makefile
View file

@ -1,6 +1,6 @@
SUF=m SUF=m
MAKEFILE=../../proto/libg/Makefile MAKEFILE=../../proto/libg/Makefile
MACHDEF="MACH=int24" "SUF=$(SUF)" MACHDEF="MACH=em24" "SUF=$(SUF)"
PCDEF="PREF=ocm" "SUB=" "SRC=lang/occam/lib" PCDEF="PREF=ocm" "SUB=" "SRC=lang/occam/lib"
install: install:

2
mach/em24/libpc/Makefile
View file

@ -1,6 +1,6 @@
SUF=m SUF=m
MAKEFILE=../../proto/libg/Makefile MAKEFILE=../../proto/libg/Makefile
MACHDEF="MACH=int24" "SUF=$(SUF)" MACHDEF="MACH=em24" "SUF=$(SUF)"
PCDEF="PREF=pc" "SUB=" "SRC=lang/pc/libpc" PCDEF="PREF=pc" "SUB=" "SRC=lang/pc/libpc"
install: install:

2
mach/em44/libbc/Makefile
View file

@ -1,6 +1,6 @@
SUF=m SUF=m
MAKEFILE=../../proto/libg/Makefile MAKEFILE=../../proto/libg/Makefile
MACHDEF="MACH=int44" "SUF=$(SUF)" MACHDEF="MACH=em44" "SUF=$(SUF)"
BCDEF="PREF=bc" "SUB=" "SRC=lang/basic/lib" BCDEF="PREF=bc" "SUB=" "SRC=lang/basic/lib"
install: install:

2
mach/em44/libcc/Makefile
View file

@ -1,6 +1,6 @@
SUF=m SUF=m
MAKEFILE=../../proto/libg/Makefile MAKEFILE=../../proto/libg/Makefile
MACHDEF="MACH=int44" "SUF=$(SUF)" MACHDEF="MACH=em44" "SUF=$(SUF)"
STDIO="PREF=cc" "SUB=.1s" "SRC=lang/cem/libcc/stdio" STDIO="PREF=cc" "SUB=.1s" "SRC=lang/cem/libcc/stdio"
GEN="PREF=cc" "SUB=.2g" "SRC=lang/cem/libcc/gen" GEN="PREF=cc" "SUB=.2g" "SRC=lang/cem/libcc/gen"
MON="PREF=mon" "SRC=lang/cem/libcc/mon" MON="PREF=mon" "SRC=lang/cem/libcc/mon"

2
mach/em44/libm2/Makefile
View file

@ -1,6 +1,6 @@
SUF=m SUF=m
MAKEFILE=../../proto/libg/Makefile MAKEFILE=../../proto/libg/Makefile
MACHDEF="MACH=int44" "SUF=$(SUF)" MACHDEF="MACH=em44" "SUF=$(SUF)"
M2DEF="PREF=m2" "SUB=" "SRC=lang/m2/libm2" M2DEF="PREF=m2" "SUB=" "SRC=lang/m2/libm2"
all: all:

2
mach/em44/liboc/Makefile
View file

@ -1,6 +1,6 @@
SUF=m SUF=m
MAKEFILE=../../proto/libg/Makefile MAKEFILE=../../proto/libg/Makefile
MACHDEF="MACH=int44" "SUF=$(SUF)" MACHDEF="MACH=em44" "SUF=$(SUF)"
PCDEF="PREF=ocm" "SUB=" "SRC=lang/occam/lib" PCDEF="PREF=ocm" "SUB=" "SRC=lang/occam/lib"
install: install:

2
mach/em44/libpc/Makefile
View file

@ -1,6 +1,6 @@
SUF=m SUF=m
MAKEFILE=../../proto/libg/Makefile MAKEFILE=../../proto/libg/Makefile
MACHDEF="MACH=int44" "SUF=$(SUF)" MACHDEF="MACH=em44" "SUF=$(SUF)"
PCDEF="PREF=pc" "SUB=" "SRC=lang/pc/libpc" PCDEF="PREF=pc" "SUB=" "SRC=lang/pc/libpc"
install: install:

2
mach/mantra/int/Makefile
View file

@ -3,7 +3,7 @@ em4_t--- em4_---- em4_t-cp em4_t-c- em4_t--p
P = mloop P = mloop
FILES=deffile $P0 $P1 $P2 $P3 $P4 $P5 $P6 $P7 $P8 $P9 $Pa $Pb $Pc FILES=deffile $P0 $P1 $P2 $P3 $P4 $P5 $P6 $P7 $P8 $P9 $Pa $Pb $Pc
CPP=../../../lib/cpp CPP=../../../lib/cpp
b=../../../lib/int b=../../../lib/em
FLTRAP= FLTRAP=
all: $(INTS) em all: $(INTS) em

6
mach/mantra/int/em.1
View file

@ -21,7 +21,7 @@ one for four byte words and pointers.
The information in the header of the e.out file is used by em to select the The information in the header of the e.out file is used by em to select the
right interpreter for the word size of used in the e.out file. right interpreter for the word size of used in the e.out file.
.PP .PP
This interpreter is searched for in ~em/lib/int[24]4. This interpreter is searched for in ~em/lib/em[24]4.
.PP .PP
The flags control the following options that can be turned off The flags control the following options that can be turned off
or on by prepending them with - or + respectively: or on by prepending them with - or + respectively:
@ -59,11 +59,11 @@ This option is used simultaneously with the test option.
.PP .PP
These flags These flags
give rise to 5 different interpreters which are in the give rise to 5 different interpreters which are in the
directory ~em/lib/int24 or in ~em/lib/int44 directory ~em/lib/em24 or in ~em/lib/em44
for the two byte word or the four byte word options, respectively. for the two byte word or the four byte word options, respectively.
.PP .PP
.SH "FILES" .SH "FILES"
.IP ~em/lib/int[24]4/em_???? 35 .IP ~em/lib/em[24]4/em_???? 35
interpreters proper interpreters proper
.IP em_profile .IP em_profile
profile data profile data

2
mach/z80/int/.distr
View file

@ -9,5 +9,5 @@ dvu4.s
eb.s eb.s
em.s em.s
fpp.s fpp.s
int22 em22
mli4.s mli4.s

2
mach/z80/int/READ_ME
View file

@ -5,7 +5,7 @@ which can be obtained by compiling the Pascal library with -DCPM,
because the UNIX and CP/M conventions because the UNIX and CP/M conventions
about end of file and end of line differ. about end of file and end of line differ.
Also, the size of "double" must be 4 bytes. Also, the size of "double" must be 4 bytes.
To accomplish this, use the "int22" ack-description file from this To accomplish this, use the "em22" ack-description file from this
directory, by putting it in the directory where you perform the compilation. directory, by putting it in the directory where you perform the compilation.
Then the following sequence can be used to transmit it to CP/M. Then the following sequence can be used to transmit it to CP/M.
cv <e.out >file.cv cv <e.out >file.cv

31
mach/z80/int/em22 Normal file
View file

@ -0,0 +1,31 @@
# $Revision$
var w=2
var p=2
var s=2
var l=4
var f=4
var d=4
var M=em22
var NAME=em22
var LIB=lib/em22/tail_
var RT=lib/em22/head_
var SIZE_FLAG=-sm
var CPP_F=-DCPM=CPM
var INCLUDES=-I{EM}/include/_tail_cc -I{EM}/include/_tail_mon
name asld
from .k.m.a.g
to .out
outfile e.out
program {EM}/lib/em_ass
mapflag -l* LNAME={EM}/{LIB}*
mapflag -+* ASS_F={ASS_F?} -+*
mapflag --* ASS_F={ASS_F?} --*
mapflag -s* SIZE_FLAG=-s*
args {SIZE_FLAG} \
({RTS}:.b.c={EM}/{RT}cc) ({RTS}:.p={EM}/{RT}pc) -o > < \
(.p:{TAIL}={EM}/{LIB}pc) \
(.b:{TAIL}={EM}/{LIB}bc) \
(.b.c:{TAIL}={EM}/{LIB}cc.1s {EM}/{LIB}cc.2g) \
(.b.c.p:{TAIL}={EM}/{LIB}mon)
linker
end

2
util/ack/Makefile
View file

@ -10,7 +10,7 @@ ACKDIR=$(EMHOME)/lib
FE=fe FE=fe
INTABLES=pdp INTABLES=pdp
LNTABLES=acc apc abc ocm m2 vax4 i86 m68k2 m68k4 pmds pmds4 mantra \ LNTABLES=acc apc abc ocm m2 vax4 i86 m68k2 m68k4 pmds pmds4 mantra \
m68020 z8000 int22 int24 int44 6500 6800 6805 6809 i80 ns s2650 z80 \ m68020 z8000 em22 em24 em44 6500 6800 6805 6809 i80 ns s2650 z80 \
sun3 sun2 xenix3 minix minixST sun3 sun2 xenix3 minix minixST
INCLUDES=-I$(EMHOME)/h INCLUDES=-I$(EMHOME)/h
CFLAGS=-O $(INCLUDES) CFLAGS=-O $(INCLUDES)

2
util/ack/ack.1.X
View file

@ -43,7 +43,7 @@ Two types of load files can be distinguished,
\fIa.out\fP files containing machine code and \fIe.out\fP \fIa.out\fP files containing machine code and \fIe.out\fP
files containing virtual EM machine code. files containing virtual EM machine code.
The last type is designed for interpretation; it is obtained by calling The last type is designed for interpretation; it is obtained by calling
the compiler as \fIint22\fP, \fIint24\fP, or \fIint44\fP. the compiler as \fIem22\fP, \fIem24\fP, or \fIem44\fP.
Compilation time for interpretation is fast and gives many Compilation time for interpretation is fast and gives many
runtime checks, runtime checks,
but execution is about seven times slower. but execution is about seven times slower.