Skip to content

Internal error 99080501

#41292 (closed) 🤣

program ie99080501;

procedure proc(arg: array of const);
var
  p: TVarRec absolute arg;
begin
  writeln(PtrInt(@p)); // Error: Internal error 99080501
end;

begin
  proc([100, 'foo', 'bar']);
  readln;
end.
Edited by Fibonacci
To upload designs, you'll need to enable LFS and have an admin enable hashed storage. More information