В контексте asm-блока существует недокументированная константа eof
. Это было проверено с помощью Delphi 7.
program TestEof;
{$APPTYPE CONSOLE}
var
example : Integer;
begin
asm
mov example, eof
end;
writeln(example);
readln;
end.
Отпечатает 14
.
Где эта константа eof
и значение значения $0E
или 14
исходит из?
EDIT: это результат компиляции
...
call @InitExe
// mov example, eof
mov [example], $0000000e
// writeln(example)
mov eax, [$004040a4]
mov edx, [example]
call @Write0Long
call @WriteLn
call @_IOTest
// readln;
...