fpc/tests/webtbs/tw35965.pp
2019-08-15 13:29:19 +00:00

7 lines
81 B
ObjectPascal

program tw35965;
begin
if TObject.UnitName <> 'System' then
Halt(1);
end.