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

corrected

Browse source
This commit is contained in:
ceriel 1988-09-14 14:05:11 +00:00
parent b725b0af8b
commit eaaa335e50
2 changed files with 12 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
util/ceg/defaults/.distr
View file

@ -5,3 +5,8 @@ not_impl
pseudo pseudo
pseudo_vars.c pseudo_vars.c
storage storage
m_C_mnem
m_C_mnem_na
argtype
C_out_skel.c
mk_C_out

7
util/ceg/defaults/C_out_skel.c
View file

@ -10,6 +10,8 @@
*/ */
#define CODE_EXPANDER #define CODE_EXPANDER
#define EXPORT
#define PRIVATE static
#include <em_spec.h> #include <em_spec.h>
#include <em_mnem.h> #include <em_mnem.h>
@ -23,6 +25,7 @@
extern char em_flag[]; /* One per EM instruction: indicates parameter kind */ extern char em_flag[]; /* One per EM instruction: indicates parameter kind */
extern short em_ptyp[]; /* One per parameter kind: indicates parameter type */ extern short em_ptyp[]; /* One per parameter kind: indicates parameter type */
static char *C_error; static char *C_error;
char *C_tmpdir;
static int listtype = 0; /* indicates pseudo when generating code for static int listtype = 0; /* indicates pseudo when generating code for
variable length argument lists variable length argument lists
@ -97,6 +100,7 @@ EM_doinstr(p)
#include "C_mnem" #include "C_mnem"
} }
#ifdef ____
PRIVATE PRIVATE
EM_dopseudo(p) EM_dopseudo(p)
register struct e_instr *p; register struct e_instr *p;
@ -328,6 +332,7 @@ EM_dopseudo(p)
break; break;
} }
} }
#endif
PRIVATE PRIVATE
EM_docon(p) EM_docon(p)
@ -406,6 +411,7 @@ C_out(line)
/* defining occurrence of an instruction label */ /* defining occurrence of an instruction label */
C_df_ilb(line->em_ilb); C_df_ilb(line->em_ilb);
break; break;
#ifdef ____
case EM_DEFDLB: case EM_DEFDLB:
/* defining occurrence of a global data label */ /* defining occurrence of a global data label */
C_df_dlb(line->em_dlb); C_df_dlb(line->em_dlb);
@ -418,6 +424,7 @@ C_out(line)
/* pseudo */ /* pseudo */
EM_dopseudo(line); EM_dopseudo(line);
break; break;
#endif
case EM_STARTMES: case EM_STARTMES:
/* start of a MES pseudo */ /* start of a MES pseudo */
EM_dostartmes(line); EM_dostartmes(line);