freepascal.compiler/tests/test/tasmread.pp

program test;

{$asmmode intel}

var l: longint;

begin
  asm
     mov test.l, 5
  end;
end.