case PAR_L:
assert(t == sp_cstx);
if (argval >= 0)
- argval += EM_BSIZE;
+ argval += TEM_BSIZE;
lp->em_optyp = OPINT;
lp->em_u.em_ioper = argval;
lp->em_soper = tostring((word) argval);
getarg(ptyp(sp_cst2));
if (argval == ms_emx) {
getarg(ptyp(sp_cst2));
- if (argval != EM_WSIZE)
+ if (argval != TEM_WSIZE)
fatal("bad word size");
getarg(ptyp(sp_cst2));
- if (argval != EM_PSIZE)
+ if (argval != TEM_PSIZE)
fatal("bad pointer size");
if ( getarg(any_ptyp)!=sp_cend )
fatal("too many parameters");
regallowed=0;
} else {
r_off = argval;
-#ifdef EM_BSIZE
if (r_off >= 0)
- r_off += EM_BSIZE;
-#endif
+ r_off += TEM_BSIZE;
getarg(ptyp(sp_cst2));
r_size = argval;
getarg(ptyp(sp_cst2));
bss(n,t,b) full n; {
register long s;
- if (n % EM_WSIZE)
+ if (n % TEM_WSIZE)
fatal("bad BSS size");
if (b==0
#ifdef BSS_INIT
dumplab();
while (n > 0)
n -= (s = con(t));
- if (s % EM_WSIZE)
+ if (s % TEM_WSIZE)
fatal("bad BSS initializer");
}
case sp_pnam:
part_flush();
con_ilb(argstr);
- return((long)EM_PSIZE);
+ return((long)TEM_PSIZE);
case sp_dlb1:
case sp_dlb2:
case sp_dnam:
case sp_doff:
part_flush();
con_dlb(argstr);
- return((long)EM_PSIZE);
+ return((long)TEM_PSIZE);
case sp_cstx:
- con_part(EM_WSIZE,(word)argval);
- return((long)EM_WSIZE);
+ con_part(TEM_WSIZE,(word)argval);
+ return((long)TEM_WSIZE);
case sp_scon:
for (i = 0; i < strsiz; i++)
con_part(1,(word) str[i]);
return((long)strsiz);
case sp_icon:
case sp_ucon:
- if (argval > EM_WSIZE) {
+ if (argval > TEM_WSIZE) {
part_flush();
con_mult((word)argval);
} else {
if (saveall) {
struct reginfo *rp;
rp= &machregs[rvnumbers[rvtyp][i]];
- regsave(codestrings[rp->r_repr],(long)-EM_WSIZE,rp->r_size);
+ regsave(codestrings[rp->r_repr],(long)-TEM_WSIZE,rp->r_size);
} else if(regassigned[rvtyp][i].ra_score>0) {
rv=regassigned[rvtyp][i].ra_rv;
rv->rv_reg=rvnumbers[rvtyp][i];
}
}
f_regsave();
-#ifndef EM_BSIZE
- for(rv=rvlist;rv!=0;rv=rv->rv_next)
- if (rv->rv_off >= 0) rv->rv_off += EM_BSIZE;
-#endif
}
isregvar(off) long off; {
/* $Header$ */
-#ifndef EM_WSIZE
-EM_WSIZE should be defined at this point
+#ifndef TEM_WSIZE
+TEM_WSIZE should be defined at this point
#endif
-#ifndef EM_PSIZE
-EM_PSIZE should be defined at this point
+#ifndef TEM_PSIZE
+TEM_PSIZE should be defined at this point
#endif
-#if EM_WSIZE>4 || EM_PSIZE>4
+#if TEM_WSIZE>4 || TEM_PSIZE>4
Implementation will not be correct unless a long integer
has more then 4 bytes of precision.
#endif
typedef char byte;
typedef char * string;
-#if EM_WSIZE>2 || EM_PSIZE>2
+#if TEM_WSIZE>2 || TEM_PSIZE>2
#define full long
#else
#define full int
#endif
-#if EM_WSIZE>2
+#if TEM_WSIZE>2
#define word long
#ifndef WRD_FMT
#define WRD_FMT "%D"