mirror of https://github.com/OpenTTD/OpenTTD
(svn r24928) -Fix [FS#5408]: [Squirrel] Update line information before processing 'while' token of 'do'-'while' statement.
parent
f8fd13dea1
commit
dafff99b2a
|
@ -917,6 +917,7 @@ public:
|
||||||
_last_stacksize = _fs->GetStackSize();
|
_last_stacksize = _fs->GetStackSize();
|
||||||
Statement();
|
Statement();
|
||||||
CleanStack(stacksize);
|
CleanStack(stacksize);
|
||||||
|
_fs->AddLineInfos(_lex._currentline, _lineinfo, true);
|
||||||
Expect(TK_WHILE);
|
Expect(TK_WHILE);
|
||||||
SQInteger continuetrg = _fs->GetCurrentPos();
|
SQInteger continuetrg = _fs->GetCurrentPos();
|
||||||
Expect(_SC('(')); CommaExpr(); Expect(_SC(')'));
|
Expect(_SC('(')); CommaExpr(); Expect(_SC(')'));
|
||||||
|
|
Loading…
Reference in New Issue