modules/src/em_code/em.nogen

   1 /* Definition of EM procedural interface: hand-written definitions
   2
   3   C_open        | char *:filename       | <hand-written>
   4   C_busy        |       | <hand-written>
   5   C_close       |       | <hand-written>
   6   C_magic       |       | <hand-written>
   7 */
   8
   9 /* $Id: em.nogen,v 1.7 1994/06/24 11:10:29 ceriel Exp $ */
  10
  11 #define C_df_dlb(l)     CC_dfdlb(l)
  12 #define C_df_dnam(s)    CC_dfdnam(s)
  13 #define C_df_ilb(l)     CC_dfilb(l)
  14
  15 #define C_pro(s,l)      CC_pro(s, l)
  16 #define C_pro_narg(s)   CC_pronarg(s)
  17 #define C_end(l)        CC_end(l)
  18 #define C_end_narg()    CC_endnarg()
  19
  20 #define C_exa_dnam(s)   CC_psdnam(ps_exa, s)
  21 #define C_exa_dlb(l)    CC_psdlb(ps_exa, l)
  22 #define C_ina_dnam(s)   CC_psdnam(ps_ina, s)
  23 #define C_ina_dlb(l)    CC_psdlb(ps_ina, l)
  24 #define C_exp(s)        CC_pspnam(ps_exp, s)
  25 #define C_inp(s)        CC_pspnam(ps_inp, s)
  26
  27 #define C_bss_cst(n,w,i)        CC_bhcst(ps_bss, n, w, i)
  28 #define C_hol_cst(n,w,i)        CC_bhcst(ps_hol, n, w, i)
  29 #define C_bss_icon(n,s,sz,i)    CC_bhicon(ps_bss,n,s,sz,i)
  30 #define C_hol_icon(n,s,sz,i)    CC_bhicon(ps_hol,n,s,sz,i)
  31 #define C_bss_ucon(n,s,sz,i)    CC_bhucon(ps_bss,n,s,sz,i)
  32 #define C_hol_ucon(n,s,sz,i)    CC_bhucon(ps_hol,n,s,sz,i)
  33 #define C_bss_fcon(n,s,sz,i)    CC_bhfcon(ps_bss,n,s,sz,i)
  34 #define C_hol_fcon(n,s,sz,i)    CC_bhfcon(ps_hol,n,s,sz,i)
  35 #define C_bss_dnam(n,s,off,i)   CC_bhdnam(ps_bss,n,s,off,i)
  36 #define C_hol_dnam(n,s,off,i)   CC_bhdnam(ps_hol,n,s,off,i)
  37 #define C_bss_dlb(n,l,off,i)    CC_bhdlb(ps_bss,n,l,off,i)
  38 #define C_hol_dlb(n,l,off,i)    CC_bhdlb(ps_hol,n,l,off,i)
  39 #define C_bss_ilb(n,l,i)        CC_bhilb(ps_bss,n,l,i)
  40 #define C_hol_ilb(n,l,i)        CC_bhilb(ps_hol,n,l,i)
  41 #define C_bss_pnam(n,s,i)       CC_bhpnam(ps_bss,n,s,i)
  42 #define C_hol_pnam(n,s,i)       CC_bhpnam(ps_hol,n,s,i)
  43
  44 #define C_con_cst(v)    CC_crcst(ps_con,v)
  45 #define C_con_icon(v,s) CC_crxcon(ps_con,sp_icon,v,s)
  46 #define C_con_ucon(v,s) CC_crxcon(ps_con,sp_ucon,v,s)
  47 #define C_con_fcon(v,s) CC_crxcon(ps_con,sp_fcon,v,s)
  48 #define C_con_scon(v,s) CC_crscon(ps_con,v,s)
  49 #define C_con_dnam(v,s) CC_crdnam(ps_con,v,s)
  50 #define C_con_dlb(v,s)  CC_crdlb(ps_con,v,s)
  51 #define C_con_ilb(v)    CC_crilb(ps_con,v)
  52 #define C_con_pnam(v)   CC_crpnam(ps_con,v)
  53
  54 #define C_rom_cst(v)    CC_crcst(ps_rom,v)
  55 #define C_rom_icon(v,s) CC_crxcon(ps_rom,sp_icon,v,s)
  56 #define C_rom_ucon(v,s) CC_crxcon(ps_rom,sp_ucon,v,s)
  57 #define C_rom_fcon(v,s) CC_crxcon(ps_rom,sp_fcon,v,s)
  58 #define C_rom_scon(v,s) CC_crscon(ps_rom,v,s)
  59 #define C_rom_dnam(v,s) CC_crdnam(ps_rom,v,s)
  60 #define C_rom_dlb(v,s)  CC_crdlb(ps_rom,v,s)
  61 #define C_rom_ilb(v)    CC_crilb(ps_rom,v)
  62 #define C_rom_pnam(v)   CC_crpnam(ps_rom,v)
  63
  64 #define C_cst(l)        CC_cst(l)
  65 #define C_icon(v,s)     CC_icon(v,s)
  66 #define C_ucon(v,s)     CC_ucon(v,s)
  67 #define C_fcon(v,s)     CC_fcon(v,s)
  68 #define C_scon(v,s)     CC_scon(v,s)
  69 #define C_dnam(v,s)     CC_dnam(v,s)
  70 #define C_dlb(v,s)      CC_dlb(v,s)
  71 #define C_ilb(l)        CC_ilb(l)
  72 #define C_pnam(s)       CC_pnam(s)
  73
  74 #define C_mes_begin(ms) CC_msstart(ms)
  75 #define C_mes_end()     CC_msend()
  76
  77 #define C_exc(c1,c2)    CC_exc(c1,c2)
  78
  79 #ifndef ps_rom
  80 #include <em_pseu.h>
  81 #endif
  82
  83 #ifndef op_lol
  84 #include <em_mnem.h>
  85 #endif
  86
  87 #ifndef sp_icon
  88 #include <em_spec.h>
  89 #endif
  90
  91 /* prototypes, also hand written. */
  92 _PROTOTYPE(void CC_bhcst, (int, arith, arith, int));
  93 _PROTOTYPE(void CC_bhdlb, (int, arith, label, arith, int));
  94 _PROTOTYPE(void CC_bhdnam, (int, arith, char *, arith, int));
  95 _PROTOTYPE(void CC_bhfcon, (int, arith, char *, arith, int));
  96 _PROTOTYPE(void CC_bhicon, (int, arith, char *, arith, int));
  97 _PROTOTYPE(void CC_bhilb, (int, arith, label, int));
  98 _PROTOTYPE(void CC_bhpnam, (int, arith, char *, int));
  99 _PROTOTYPE(void CC_bhucon, (int, arith, char *, arith, int));
 100 _PROTOTYPE(void CC_crcst, (int, arith));
 101 _PROTOTYPE(void CC_crdlb, (int, label, arith));
 102 _PROTOTYPE(void CC_crdnam, (int, char *, arith));
 103 _PROTOTYPE(void CC_crilb, (int, label));
 104 _PROTOTYPE(void CC_crpnam, (int, char *));
 105 _PROTOTYPE(void CC_crscon, (int, char *, arith));
 106 _PROTOTYPE(void CC_crxcon, (int, int, char *, arith));
 107 _PROTOTYPE(void CC_cst, (arith));
 108 _PROTOTYPE(void CC_dfdlb, (label));
 109 _PROTOTYPE(void CC_dfdnam, (char *));
 110 _PROTOTYPE(void CC_dfilb, (label));
 111 _PROTOTYPE(void CC_dlb, (label, arith));
 112 _PROTOTYPE(void CC_dnam, (char *, arith));
 113 _PROTOTYPE(void CC_end, (arith));
 114 _PROTOTYPE(void CC_endnarg, (void));
 115 _PROTOTYPE(void CC_exc, (arith, arith));
 116 _PROTOTYPE(void CC_fcon, (char *, arith));
 117 _PROTOTYPE(void CC_icon, (char *, arith));
 118 _PROTOTYPE(void CC_ilb, (label));
 119 _PROTOTYPE(void CC_msend, (void));
 120 _PROTOTYPE(void CC_msstart, (int));
 121 _PROTOTYPE(void CC_op, (int));
 122 _PROTOTYPE(void CC_opcst, (int, arith));
 123 _PROTOTYPE(void CC_opdlb, (int, label, arith));
 124 _PROTOTYPE(void CC_opdnam, (int, char *, arith));
 125 _PROTOTYPE(void CC_opilb, (int, label));
 126 _PROTOTYPE(void CC_opnarg, (int));
 127 _PROTOTYPE(void CC_oppnam, (int, char *));
 128 _PROTOTYPE(void CC_pnam, (char *));
 129 _PROTOTYPE(void CC_pro, (char *, arith));
 130 _PROTOTYPE(void CC_pronarg, (char *));
 131 _PROTOTYPE(void CC_psdlb, (int, label));
 132 _PROTOTYPE(void CC_psdnam, (int, char *));
 133 _PROTOTYPE(void CC_pspnam, (int, char *));
 134 _PROTOTYPE(void CC_scon, (char *, arith));
 135 _PROTOTYPE(void CC_ucon, (char *, arith));
 136
 137 _PROTOTYPE(void C_init, (arith, arith));
 138 _PROTOTYPE(void C_failed, (void));
 139 _PROTOTYPE(void C_internal_error, (void));
 140 _PROTOTYPE(int C_open, (char *));
 141 _PROTOTYPE(void C_close, (void));
 142 _PROTOTYPE(int C_busy, (void));
 143 _PROTOTYPE(void C_magic, (void));
 144 _PROTOTYPE(int C_getid, (void));
 145 _PROTOTYPE(void C_insertpart, (int));
 146 _PROTOTYPE(void C_beginpart, (int));
 147 _PROTOTYPE(void C_endpart, (int));