Explorar o código

+ Added tb0160

daniel %!s(int64=22) %!d(string=hai) anos
pai
achega
8fb9867f9c
Modificáronse 1 ficheiros con 13 adicións e 0 borrados
  1. 13 0
      tests/tbf/tb0160.pp

+ 13 - 0
tests/tbf/tb0160.pp

@@ -0,0 +1,13 @@
+{%fail}
+{%OPT=-Sg}
+program tb0160;
+
+procedure crasher;
+
+begin
+end;
+
+begin
+  {The following caused ie 9999.}
+  crasher:
+end.