pierre пре 24 година
родитељ
комит
f329e6bfca
1 измењених фајлова са 10 додато и 0 уклоњено
  1. 10 0
      tests/webtbf/tw1395.pp

+ 10 - 0
tests/webtbf/tw1395.pp

@@ -0,0 +1,10 @@
+{ %FAIL }
+{ Source provided for Free Pascal Bug Report 1395 }
+{ Submitted by "Stian Skjelstad" on  2001-02-08 }
+{ e-mail: [email protected] }
+var
+ a, b : pointer;
+
+begin
+ a^:=b^;
+end.