adapted to new ip_spec.t

This commit is contained in:
ceriel 1988-03-15 13:17:42 +00:00
parent a739c9a0ff
commit 628b9699e8
2 changed files with 2 additions and 0 deletions

View file

@ -866,6 +866,7 @@ begin
begin begin
iflag:=f; instr:=insr; iflag:=f; instr:=insr;
if '2' in cset then ilength:=2 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 '4' in cset then ilength:=4
else if '8' in cset then ilength:=8 else if '8' in cset then ilength:=8
else if (mini in f) or (short in f) then else if (mini in f) or (short in f) then

View file

@ -248,6 +248,7 @@ begin
begin begin
iflag:=f; instr:=insr; iflag:=f; instr:=insr;
if '2' in cset then ilength:=2 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 '4' in cset then ilength:=4
else if '8' in cset then ilength:=8 else if '8' in cset then ilength:=8
else if (mini in f) or (short in f) then else if (mini in f) or (short in f) then