fpc/tests/webtbf/tw39640.pp

12 lines
191 B
ObjectPascal

{ %fail }
{ %target=linux,win32,win64,embedded,freebsd,darwin }
program test;
var
execBase: pointer;
procedure test_a_syscall; syscall execBase 6;
begin
writeln('syscall test');
end.