no message

This commit is contained in:
florian 2001-04-04 20:26:38 +00:00
parent 64d54c2fcb
commit 007f366bd3

9
tests/tbs/tb0350.pp Normal file
View File

@ -0,0 +1,9 @@
{ $VERSION=1.1}
{$mode objfpc}
var
a : longint absolute 0;
begin
if @a<>nil then
halt(1);
end.