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

Added support for debugger messages

Browse source
This commit is contained in:
ceriel 1990-07-30 16:05:27 +00:00
parent 76fd4c3d7b
commit f4e1a15dfb
4 changed files with 28 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
modules/src/em_mes/.distr
View file

@ -8,5 +8,7 @@ C_ms_opt.c
C_ms_par.c C_ms_par.c
C_ms_reg.c C_ms_reg.c
C_ms_src.c C_ms_src.c
C_ms_std.c
C_ms_stb.c
Makefile Makefile
em_mes.3 em_mes.3

5
modules/src/em_mes/C_ms_stb.c
View file

@ -12,6 +12,7 @@ C_ms_stb_cst(s, e1, e2, e3)
arith e3; arith e3;
{ {
C_mes_begin(ms_stb); C_mes_begin(ms_stb);
if (s) C_scon(s, (arith) (strlen(s)+1));
C_cst((arith)e1); C_cst((arith)e1);
C_cst((arith)e2); C_cst((arith)e2);
C_cst(e3); C_cst(e3);
@ -25,6 +26,7 @@ C_ms_stb_dlb(s, e1, e2, l, off)
arith off; arith off;
{ {
C_mes_begin(ms_stb); C_mes_begin(ms_stb);
if (s) C_scon(s, (arith) (strlen(s)+1));
C_cst((arith)e1); C_cst((arith)e1);
C_cst((arith)e2); C_cst((arith)e2);
C_dlb(l, off); C_dlb(l, off);
@ -38,6 +40,7 @@ C_ms_stb_dnam(s, e1, e2, l, off)
arith off; arith off;
{ {
C_mes_begin(ms_stb); C_mes_begin(ms_stb);
if (s) C_scon(s, (arith) (strlen(s)+1));
C_cst((arith)e1); C_cst((arith)e1);
C_cst((arith)e2); C_cst((arith)e2);
C_dnam(l, off); C_dnam(l, off);
@ -50,6 +53,7 @@ C_ms_stb_ilb(s, e1, e2, l)
label l; label l;
{ {
C_mes_begin(ms_stb); C_mes_begin(ms_stb);
if (s) C_scon(s, (arith) (strlen(s)+1));
C_cst((arith)e1); C_cst((arith)e1);
C_cst((arith)e2); C_cst((arith)e2);
C_ilb(l); C_ilb(l);
@ -62,6 +66,7 @@ C_ms_stb_pnam(s, e1, e2, p)
char *p; char *p;
{ {
C_mes_begin(ms_stb); C_mes_begin(ms_stb);
if (s) C_scon(s, (arith) (strlen(s)+1));
C_cst((arith)e1); C_cst((arith)e1);
C_cst((arith)e2); C_cst((arith)e2);
C_pnam(p); C_pnam(p);

19
modules/src/em_mes/C_ms_std.c Normal file
View file

@ -0,0 +1,19 @@
/* $Header$ */
/*
* (c) copyright 1990 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
#include <em.h>
#include <em_mes.h>
C_ms_std(s, e1, l)
char *s;
int e1;
int l;
{
C_mes_begin(ms_std);
if (s) C_scon(s, (arith) (strlen(s)+1));
C_cst((arith) e1);
C_cst((arith) l);
C_mes_end();
}

4
modules/src/em_mes/Makefile
View file

@ -10,10 +10,10 @@ LIBSUF = a
SRC = C_ms_err.c C_ms_opt.c C_ms_emx.c C_ms_reg.c C_ms_src.c\ SRC = C_ms_err.c C_ms_opt.c C_ms_emx.c C_ms_reg.c C_ms_src.c\
C_ms_flt.c C_ms_com.c C_ms_par.c C_ms_ego.c C_ms_gto.c\ C_ms_flt.c C_ms_com.c C_ms_par.c C_ms_ego.c C_ms_gto.c\
C_ms_stb.c C_ms_lin.c C_ms_stb.c C_ms_std.c
OBJ = C_ms_err.$(SUF) C_ms_opt.$(SUF) C_ms_emx.$(SUF) C_ms_reg.$(SUF) C_ms_src.$(SUF)\ OBJ = C_ms_err.$(SUF) C_ms_opt.$(SUF) C_ms_emx.$(SUF) C_ms_reg.$(SUF) C_ms_src.$(SUF)\
C_ms_flt.$(SUF) C_ms_com.$(SUF) C_ms_par.$(SUF) C_ms_ego.$(SUF) C_ms_gto.$(SUF)\ C_ms_flt.$(SUF) C_ms_com.$(SUF) C_ms_par.$(SUF) C_ms_ego.$(SUF) C_ms_gto.$(SUF)\
C_ms_stb.$(SUF) C_ms_lin.$(SUF) C_ms_stb.$(SUF) C_ms_std.$(SUF)
.SUFFIXES: .$(SUF) .SUFFIXES: .$(SUF)
.c.$(SUF): .c.$(SUF):