Forráskód Böngészése

adapted to new ip_spec.t

ceriel 36 éve
szülő
commit
41355b0622
3 módosított fájl, 8 hozzáadás és 4 törlés
  1. 4 4
      doc/em/int/Makefile
  2. 1 0
      doc/em/int/em.p
  3. 3 0
      doc/em/int/mktables.c

+ 4 - 4
doc/em/int/Makefile

@@ -4,12 +4,12 @@ HOME=../../..
 install \
 all:            em emdmp tables
 
-tables:         mktables $(HOME)/util/ass/ip_spec.t
-		mktables $(HOME)/util/ass/ip_spec.t tables
+tables:         mktables $(HOME)/etc/ip_spec.t
+		mktables $(HOME)/etc/ip_spec.t tables
 
 mktables:       mktables.c $(HOME)/h/em_spec.h $(HOME)/h/em_flag.h \
-		$(HOME)/util/data/em_data.a $(HOME)/util/ass/ip_spec.h
-		cc -I$(HOME) -O -o mktables mktables.c $(HOME)/util/data/em_data.a
+		$(HOME)/lib/em_data.a $(HOME)/util/ass/ip_spec.h
+		cc -I$(HOME) -O -o mktables mktables.c $(HOME)/lib/em_data.a
 
 em.out:         em.p
 		apc -mint -O em.p >emerrs ; mv e.out em.out

+ 1 - 0
doc/em/int/em.p

@@ -962,6 +962,7 @@ begin
       begin
 	iflag:=f; instr:=insr;
 	if '2' in cset      then ilength:=2
+	else if 'u' in cset then ilength:=2
 	else if '4' in cset then ilength:=4
 	else if '8' in cset then ilength:=8
 	else if (mini in f) or (short in f) then

+ 3 - 0
doc/em/int/mktables.c

@@ -166,6 +166,8 @@ int decflag(str,opc) char *str ; {
 			check(type) ; type=OP32 ; break ;
 		case '8' :
 			check(type) ; type=OP64 ; break ;
+		case 'u' :
+			check(type) ; type=OP16U ; break ;
 		case 'e' :
 			check(escape) ; escape=0 ; break ;
 		case 'N' :
@@ -188,6 +190,7 @@ int decflag(str,opc) char *str ; {
 		if ( escape!=ILLGL ) error("Conflicting escapes") ;
 		escape=ILLGL ;
 	case OP16 :
+	case OP16U :
 	case OP8 :
 	case OPSHORT :
 	case OPNO :