I made a repeatable crash case (Windows 10, single user mode). This import crashes when I run it 4th time in a row in 2021-04-18 version and 3rd time in 2022-11-25 version. In 2022-11-25 version the import is also much slower than the older version.
Line 7489 is the last line in the file. First 2-3 runs everything is OK, then it crashes.
2022-12-28 11:57:26 AD SomeFunction call. Line 7489
2022-12-28 11:57:26 AD runtime error, hal stack is:Stack empty
2022-12-28 11:57:26 AD dump of call stack
updating function boolean SomeFunction(var record CUVc CUr)
begin
RecordClear(CUr);
RecordNew(CUr);
SomeFunction = true;
return;
end;
global
updating procedure ImportTestIn(record RcVc RepSpec)
begin
string 255 tstr;
record NotepadVc Noter;
record MailVc Mailr;
record CUVc CUr,oldCUr,tCUr;
longint LineNr;
LineNr = 0;
while (NextImportLine(false)) begin
LineNr = LineNr + 1;
RecordClear(Mailr);
RecordClear(tCUr);
if (SomeFunction(CUr)) then begin
LogText(0,"SomeFunction call. Line " & LineNr);
RecordCopy(oldCUr,CUr);
end else begin
end;
end;
return;
end;