diff --git a/tests/test/testti1.pp b/tests/test/testti1.pp
new file mode 100644
index 0000000000..f3a4366d7c
--- /dev/null
+++ b/tests/test/testti1.pp
@@ -0,0 +1,8 @@
+type
+   pbyte = ^byte;
+
+begin
+   if (pbyte(typeinfo(longint))^<>1 then
+     halt(1);
+end.
+