mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-07 06:08:22 +02:00
14 lines
253 B
ObjectPascal
14 lines
253 B
ObjectPascal
{ %CPU=i386 }
|
|
{ Old file: tbs0226.pp }
|
|
{ Asm, offset of var is not allowed as constant OK 0.99.11 (PFV) }
|
|
|
|
{$ifdef fpc}{$asmmode intel}{$endif}
|
|
var
|
|
test : longint;
|
|
begin
|
|
exit; { don't run this code below !! }
|
|
asm
|
|
dd test
|
|
end;
|
|
end.
|