2
{ Source provided for Free Pascal Bug Report 1023 }
3
{ Submitted by "Denis Yarkovoy" on 2000-07-03 }
4
{ e-mail: gunky9@geocities.com }
12
procedure p1; assembler; asm
15
mov dword ptr [edi],eax
18
procedure p; assembler; asm
29
Writeln('Bug 1023 fixed');