Remove an unnecessary variable.

This commit is contained in:
Stephen Heumann 2022-02-13 21:36:03 -06:00
parent c96cf4f1dd
commit 8c0d65616c

View File

@ -266,8 +266,7 @@ function StringType(prefix: charStrPrefixEnum): typePtr;
implementation
var
staticNum, {static variable number}
firstStaticNum: packed array[1..6] of char; {staticNum at start of function}
staticNum: packed array[1..6] of char; {static variable number}
{- Imported from expression.pas --------------------------------}
@ -2027,8 +2026,6 @@ repeat
done := i = 1;
end; {if}
until done;
if table = globalTable then {update fistStaticNum}
firstStaticNum := staticNum;
new(tPtr); {create a new symbol table}
ClearTable(tPtr^);
tPtr^.next := table;