diff --git a/bugs/bug0296.pp b/bugs/bug0296.pp
new file mode 100644
index 0000000000..a0ef1b9f6e
--- /dev/null
+++ b/bugs/bug0296.pp
@@ -0,0 +1,11 @@
+
+function test : string;
+
+  begin
+    test:='This should not be printed';
+    exit('this should be printed');
+  end;
+
+begin
+  writeln(test);
+end.
diff --git a/bugs/readme.txt b/bugs/readme.txt
index 452d30ccc4..bc5ab17c1c 100644
--- a/bugs/readme.txt
+++ b/bugs/readme.txt
@@ -385,3 +385,4 @@ bug0263.pp   export directive is not necessary in delphi anymore
 bug0265.pp   nested proc with for-counter in other lex level
 bug0281.pp   dup id checking with property is wrong
 bug0293.pp   no error with variable name = type name
+bug0296.pp   exit(string) does not work (web form bug 613)