several improvements

This commit is contained in:
ceriel
1990-02-05 10:06:42 +00:00
parent 64c20956eb
commit 64e9a24564
17 changed files with 69 additions and 63 deletions

View File

@@ -159,7 +159,7 @@ var
iclass: insclass; { true for escaped opcodes }
dispat: array[insclass,byte] of dispatch;
retsize:size; { holds size of last LFR }
insr: mnem; { holds the instructionnumber }
insr: mnem; { holds the instruction number }
halted: boolean; { normally false }
exitstatus:word; { parameter of MON 1 }
ignmask:word; { ignore mask for traps }
@@ -522,7 +522,7 @@ begin j:=0;
end;
{---------------------------------------------------------------------------}
{ Array indexing
{ Array indexing }
{---------------------------------------------------------------------------}
function arraycalc(c:adr):adr; { subscript calculation }