@@ -0,0 +1,9 @@
+
+function f:longint;
+begin
+ exit(1);
+end;
+ writeln(f);
+end.
@@ -167,3 +167,4 @@ bug0118.pp Procedural vars cannot be assigned nil ?
bug0119.pp problem with methods
bug0120.pp inc/dec(enumeration) doesn't work
bug0121.pp cardinal -> byte conversion not work (and crashes)
+bug0122.pp exit() gives a warning that the result is not set