fixed

diff --git a/modules/src/em_code/make.sh b/modules/src/em_code/make.sh
index 41c1f3c..0c4dee2 100755 (executable)
--- a/modules/src/em_code/make.sh
+++ b/modules/src/em_code/make.sh
@@ -45,7 +45,6 @@ if $cc $cflags pspnam.c ; then : ; else exit 1 ; fi
 if $cc $cflags scon.c ; then : ; else exit 1 ; fi
 if $cc $cflags ucon.c ; then : ; else exit 1 ; fi
 if $cc $cflags -I../read_em C_out.c ; then : ; else exit 1 ; fi
-if  ; then : ; else exit 1 ; fi
 if $cc $cflags $1/em.c ; then : ; else exit 1 ; fi
 if mv em.o em$1.o ; then : ; else exit 1 ; fi
 if $ar rc libem$1.a bhcst.o bhdlb.o bhdnam.o bhfcon.o bhicon.o bhilb.o bhpnam.o bhucon.o crcst.o crdlb.o crdnam.o crfcon.o cricon.o crilb.o crpnam.o crscon.o crucon.o cst.o dfdlb.o dfdnam.o dfilb.o dlb.o dnam.o end.o endarg.o exc.o fcon.o getid.o icon.o ilb.o insert.o internerr.o msend.o op.o opcst.o opdlb.o opdnam.o opilb.o opnarg.o oppnam.o pnam.o pro.o pronarg.o msstart.o psdlb.o psdnam.o pspnam.o scon.o ucon.o C_out.o em$1.o failed.o ; then : ; else exit 1 ; fi

diff --git a/util/LLgen/src/types.h b/util/LLgen/src/types.h
index 40b9007..2b0973a 100644 (file)
--- a/util/LLgen/src/types.h
+++ b/util/LLgen/src/types.h
@@ -174,8 +174,8 @@ typedef short t_reps,*p_reps;
  */
 # define r_getkind(q)  ((q)->t_repeats&03)
 # define r_getnum(q)   (((q)->t_repeats>>2)&037777)
-# define r_setkind(q,s)        { assert(((unsigned)(s))<=03);(q)->t_repeats=((q)->t_repi&0177774)|(s);}
-# define r_setnum(q,s) { assert(((unsigned)(s))<=037777);(q)->t_repeats=((q)->t_repi&03)|((s)<<2);}
+# define r_setkind(q,s)        { assert(((unsigned)(s))<=03);(q)->t_repeats=((q)->t_repeats&0177774)|(s);}
+# define r_setnum(q,s) { assert(((unsigned)(s))<=037777);(q)->t_repeats=((q)->t_repeats&03)|((s)<<2);}
 
 /*
  * header structure for        a term