Jonas Maebe пре 21 година
родитељ
комит
b45bdb4991
1 измењених фајлова са 7 додато и 0 уклоњено
  1. 7 0
      tests/tbf/tb0168.pp

+ 7 - 0
tests/tbf/tb0168.pp

@@ -0,0 +1,7 @@
+{ %fail }
+
+var c: char;
+    p: pchar;
+begin
+  p := pchar(c);
+end.