changed references to EM_?SIZE to TEM_?SIZE
This commit is contained in:
		
							parent
							
								
									62f42d18f7
								
							
						
					
					
						commit
						a4a5fc4bfa
					
				
					 3 changed files with 19 additions and 25 deletions
				
			
		| 
						 | 
					@ -147,7 +147,7 @@ fillemlines() {
 | 
				
			||||||
		case PAR_L:
 | 
							case PAR_L:
 | 
				
			||||||
			assert(t == sp_cstx);
 | 
								assert(t == sp_cstx);
 | 
				
			||||||
			if (argval >= 0)
 | 
								if (argval >= 0)
 | 
				
			||||||
				argval += EM_BSIZE;
 | 
									argval += TEM_BSIZE;
 | 
				
			||||||
			lp->em_optyp = OPINT;
 | 
								lp->em_optyp = OPINT;
 | 
				
			||||||
			lp->em_u.em_ioper = argval;
 | 
								lp->em_u.em_ioper = argval;
 | 
				
			||||||
			lp->em_soper = tostring((word) argval);
 | 
								lp->em_soper = tostring((word) argval);
 | 
				
			||||||
| 
						 | 
					@ -263,10 +263,10 @@ dopseudo() {
 | 
				
			||||||
		getarg(ptyp(sp_cst2));
 | 
							getarg(ptyp(sp_cst2));
 | 
				
			||||||
		if (argval == ms_emx) {
 | 
							if (argval == ms_emx) {
 | 
				
			||||||
			getarg(ptyp(sp_cst2));
 | 
								getarg(ptyp(sp_cst2));
 | 
				
			||||||
			if (argval != EM_WSIZE)
 | 
								if (argval != TEM_WSIZE)
 | 
				
			||||||
				fatal("bad word size");
 | 
									fatal("bad word size");
 | 
				
			||||||
			getarg(ptyp(sp_cst2));
 | 
								getarg(ptyp(sp_cst2));
 | 
				
			||||||
			if (argval != EM_PSIZE)
 | 
								if (argval != TEM_PSIZE)
 | 
				
			||||||
				fatal("bad pointer size");
 | 
									fatal("bad pointer size");
 | 
				
			||||||
			if ( getarg(any_ptyp)!=sp_cend )
 | 
								if ( getarg(any_ptyp)!=sp_cend )
 | 
				
			||||||
				fatal("too many parameters");
 | 
									fatal("too many parameters");
 | 
				
			||||||
| 
						 | 
					@ -289,10 +289,8 @@ dopseudo() {
 | 
				
			||||||
				regallowed=0;
 | 
									regallowed=0;
 | 
				
			||||||
			} else {
 | 
								} else {
 | 
				
			||||||
				r_off = argval;
 | 
									r_off = argval;
 | 
				
			||||||
#ifdef EM_BSIZE
 | 
					 | 
				
			||||||
  				if (r_off >= 0)
 | 
					  				if (r_off >= 0)
 | 
				
			||||||
  					r_off += EM_BSIZE;
 | 
					  					r_off += TEM_BSIZE;
 | 
				
			||||||
#endif
 | 
					 | 
				
			||||||
				getarg(ptyp(sp_cst2));
 | 
									getarg(ptyp(sp_cst2));
 | 
				
			||||||
				r_size = argval;
 | 
									r_size = argval;
 | 
				
			||||||
				getarg(ptyp(sp_cst2));
 | 
									getarg(ptyp(sp_cst2));
 | 
				
			||||||
| 
						 | 
					@ -514,7 +512,7 @@ char *strarg(t) {
 | 
				
			||||||
bss(n,t,b) full n; {
 | 
					bss(n,t,b) full n; {
 | 
				
			||||||
	register long s;
 | 
						register long s;
 | 
				
			||||||
 | 
					
 | 
				
			||||||
	if (n % EM_WSIZE)
 | 
						if (n % TEM_WSIZE)
 | 
				
			||||||
		fatal("bad BSS size");
 | 
							fatal("bad BSS size");
 | 
				
			||||||
	if (b==0
 | 
						if (b==0
 | 
				
			||||||
#ifdef BSS_INIT
 | 
					#ifdef BSS_INIT
 | 
				
			||||||
| 
						 | 
					@ -530,7 +528,7 @@ bss(n,t,b) full n; {
 | 
				
			||||||
	dumplab();
 | 
						dumplab();
 | 
				
			||||||
	while (n > 0)
 | 
						while (n > 0)
 | 
				
			||||||
		n -= (s = con(t));
 | 
							n -= (s = con(t));
 | 
				
			||||||
	if (s % EM_WSIZE)
 | 
						if (s % TEM_WSIZE)
 | 
				
			||||||
		fatal("bad BSS initializer");
 | 
							fatal("bad BSS initializer");
 | 
				
			||||||
}
 | 
					}
 | 
				
			||||||
 | 
					
 | 
				
			||||||
| 
						 | 
					@ -544,24 +542,24 @@ long con(t) {
 | 
				
			||||||
	case sp_pnam:
 | 
						case sp_pnam:
 | 
				
			||||||
		part_flush();
 | 
							part_flush();
 | 
				
			||||||
		con_ilb(argstr);
 | 
							con_ilb(argstr);
 | 
				
			||||||
		return((long)EM_PSIZE);
 | 
							return((long)TEM_PSIZE);
 | 
				
			||||||
	case sp_dlb1:
 | 
						case sp_dlb1:
 | 
				
			||||||
	case sp_dlb2:
 | 
						case sp_dlb2:
 | 
				
			||||||
	case sp_dnam:
 | 
						case sp_dnam:
 | 
				
			||||||
	case sp_doff:
 | 
						case sp_doff:
 | 
				
			||||||
		part_flush();
 | 
							part_flush();
 | 
				
			||||||
		con_dlb(argstr);
 | 
							con_dlb(argstr);
 | 
				
			||||||
		return((long)EM_PSIZE);
 | 
							return((long)TEM_PSIZE);
 | 
				
			||||||
	case sp_cstx:
 | 
						case sp_cstx:
 | 
				
			||||||
		con_part(EM_WSIZE,(word)argval);
 | 
							con_part(TEM_WSIZE,(word)argval);
 | 
				
			||||||
		return((long)EM_WSIZE);
 | 
							return((long)TEM_WSIZE);
 | 
				
			||||||
	case sp_scon:
 | 
						case sp_scon:
 | 
				
			||||||
		for (i = 0; i < strsiz; i++)
 | 
							for (i = 0; i < strsiz; i++)
 | 
				
			||||||
			con_part(1,(word) str[i]);
 | 
								con_part(1,(word) str[i]);
 | 
				
			||||||
		return((long)strsiz);
 | 
							return((long)strsiz);
 | 
				
			||||||
	case sp_icon:
 | 
						case sp_icon:
 | 
				
			||||||
	case sp_ucon:
 | 
						case sp_ucon:
 | 
				
			||||||
		if (argval > EM_WSIZE) {
 | 
							if (argval > TEM_WSIZE) {
 | 
				
			||||||
			part_flush();
 | 
								part_flush();
 | 
				
			||||||
			con_mult((word)argval);
 | 
								con_mult((word)argval);
 | 
				
			||||||
		} else {
 | 
							} else {
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
| 
						 | 
					@ -107,7 +107,7 @@ fixregvars(saveall) {
 | 
				
			||||||
		if (saveall) {
 | 
							if (saveall) {
 | 
				
			||||||
			struct reginfo *rp;
 | 
								struct reginfo *rp;
 | 
				
			||||||
			rp= &machregs[rvnumbers[rvtyp][i]];
 | 
								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) {
 | 
							} else if(regassigned[rvtyp][i].ra_score>0) {
 | 
				
			||||||
			rv=regassigned[rvtyp][i].ra_rv;
 | 
								rv=regassigned[rvtyp][i].ra_rv;
 | 
				
			||||||
			rv->rv_reg=rvnumbers[rvtyp][i];
 | 
								rv->rv_reg=rvnumbers[rvtyp][i];
 | 
				
			||||||
| 
						 | 
					@ -116,10 +116,6 @@ fixregvars(saveall) {
 | 
				
			||||||
		}
 | 
							}
 | 
				
			||||||
	}
 | 
						}
 | 
				
			||||||
	f_regsave();
 | 
						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; {
 | 
					isregvar(off) long off; {
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
| 
						 | 
					@ -1,12 +1,12 @@
 | 
				
			||||||
/* $Header$ */
 | 
					/* $Header$ */
 | 
				
			||||||
 | 
					
 | 
				
			||||||
#ifndef EM_WSIZE
 | 
					#ifndef TEM_WSIZE
 | 
				
			||||||
EM_WSIZE should be defined at this point
 | 
					TEM_WSIZE should be defined at this point
 | 
				
			||||||
#endif
 | 
					#endif
 | 
				
			||||||
#ifndef EM_PSIZE
 | 
					#ifndef TEM_PSIZE
 | 
				
			||||||
EM_PSIZE should be defined at this point
 | 
					TEM_PSIZE should be defined at this point
 | 
				
			||||||
#endif
 | 
					#endif
 | 
				
			||||||
#if EM_WSIZE>4 || EM_PSIZE>4
 | 
					#if TEM_WSIZE>4 || TEM_PSIZE>4
 | 
				
			||||||
Implementation will not be correct unless a long integer
 | 
					Implementation will not be correct unless a long integer
 | 
				
			||||||
has more then 4 bytes of precision.
 | 
					has more then 4 bytes of precision.
 | 
				
			||||||
#endif
 | 
					#endif
 | 
				
			||||||
| 
						 | 
					@ -14,13 +14,13 @@ has more then 4 bytes of precision.
 | 
				
			||||||
typedef char byte;
 | 
					typedef char byte;
 | 
				
			||||||
typedef char * string;
 | 
					typedef char * string;
 | 
				
			||||||
 | 
					
 | 
				
			||||||
#if EM_WSIZE>2 || EM_PSIZE>2
 | 
					#if TEM_WSIZE>2 || TEM_PSIZE>2
 | 
				
			||||||
#define full            long
 | 
					#define full            long
 | 
				
			||||||
#else
 | 
					#else
 | 
				
			||||||
#define full            int
 | 
					#define full            int
 | 
				
			||||||
#endif
 | 
					#endif
 | 
				
			||||||
 | 
					
 | 
				
			||||||
#if EM_WSIZE>2
 | 
					#if TEM_WSIZE>2
 | 
				
			||||||
#define word long
 | 
					#define word long
 | 
				
			||||||
#ifndef WRD_FMT
 | 
					#ifndef WRD_FMT
 | 
				
			||||||
#define WRD_FMT "%D"
 | 
					#define WRD_FMT "%D"
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
		Loading…
	
	Add table
		
		Reference in a new issue