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

some minor improvements

Browse source
This commit is contained in:
ceriel 1988-10-28 13:37:48 +00:00
parent 78237f3ef8
commit 7a6913dea1
2 changed files with 8 additions and 14 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
modules/src/em_opt/aux.c
View file

@ -25,21 +25,14 @@ OO_signsame(a,b)
OO_sfit(val,nbits)
arith val, nbits;
{
register long mask = 0;
register int i;
for(i=nbits-1;i<8*sizeof(mask);i++)
mask |= (1<<i);
register long mask = ~((1L << (nbits - 1)) - 1);
return(((val&mask) == 0) | (val&mask)==mask);
}
OO_ufit(val, nbits)
arith val, nbits;
{
register long mask = 0;
register int i;
for(i=nbits;i<8*sizeof(mask);i++)
mask |= (1<<i);
return((val&mask) == 0);
return((val&(~((1L << (nbits - 1)) - 1))) == 0);
}
OO_extsame(a1,a2)

11
modules/src/em_opt/nopt.c
View file

@ -3,6 +3,7 @@ static char rcsid2[] = "$Header$";
#endif
#include "nopt.h"
#include <system.h>
extern struct dfa OO_checknext[]; /* Initialized in dfa.c */
extern struct dfa *OO_base[]; /* Initialized in dfa.c */
@ -80,7 +81,7 @@ OO_dfa(last)
for(;;) {
printstate("OO_dfa");
if((b=OO_base[OO_state]) && ((b += last)->check==OO_state)) {
if(f=OO_ftrans[OO_state = b->next]) f();
if(f=OO_ftrans[OO_state = b->next]) (*f)();
}
else if (OO_state) {
/* consult default entry */
@ -88,7 +89,7 @@ OO_dfa(last)
if(!OO_endbackup) OO_endbackup = OO_nxtpatt;
OO_nxtpatt--;
OO_patternqueue += d->numout;
if(f=OO_ftrans[OO_state = d->next]) f();
if(f=OO_ftrans[OO_state = d->next]) (*f)();
}
else OO_flush();
if (!OO_endbackup) return;
@ -103,9 +104,9 @@ fatal(s,a)
char *s;
int a;
{
fprintf(stderr, "%s: ", filename ? filename : "standard input");
fprintf(stderr,s,a);
fprintf(stderr,"\n");
fprint(STDERR, "%s: ", filename ? filename : "standard input");
fprint(STDERR,s,a);
fprint(STDERR,"\n");
sys_stop(S_EXIT);
}