*** empty log message ***

tests/test/testti1.pp

@@ -0,0 +1,8 @@
+type
+   pbyte = ^byte;
+
+begin
+   if (pbyte(typeinfo(longint))^<>1 then
+     halt(1);
+end.
+