tests/webtbf/tw18225b.pp


1
2
3
4
5
6
7
8
9
10

{ %fail }
{ %cpu=i386,x86_64 }
{$asmmode intel}
procedure CallProc(p: pointer); assembler;
asm
          call dword ptr p
          call dword ptr CallProc
end; { CallProc }
begin
end.