Stack Fix

This commit is contained in:
2019-01-02 15:52:49 +03:00
parent b837d46736
commit b2c7619176
2 changed files with 40 additions and 3 deletions

View File

@@ -339,7 +339,7 @@ if Stack.Count<>0 then
Result:=Stack.Peek
else
begin
Result:=Get;
Result:=Get(Tokenizer);
Stack.Push(Result);
end;
end;
@@ -380,7 +380,7 @@ begin
if Stack.Count<>0 then
Result:=Stack.Pop
else
Result:=Get;
Result:=Get(Tokenizer);
end;
{$ENDIF}