+ bug report #1827 testing

tests/webtbs/tw1827.pp

@@ -0,0 +1,15 @@
+{ %RESULTCODE=1 }
+
+begin
+  ReadLn('SomeText');
+end.
+
+{
+  $Log$
+  Revision 1.1  2002-03-07 21:44:14  carl
+  + bug report #1827 testing
+
+
+}  
+
+