Fix for records
This commit is contained in:
parent
42b6a91cbd
commit
bbb3916764
|
@ -1303,7 +1303,7 @@ Begin
|
|||
If VarData[VarNum]^.vType <> iRecord Then
|
||||
Error (mpsTypeMismatch, '');
|
||||
|
||||
OutWord (VarNum);
|
||||
OutWord (VarData[VarNum]^.VarID);
|
||||
End;
|
||||
|
||||
Procedure TParserEngine.NewBooleanCrap;
|
||||
|
|
Loading…
Reference in New Issue