* readln internalerror

tests/tbf/tb0124.pp

@@ -0,0 +1,7 @@
+{ %fail }
+
+var
+  a,b : string;
+begin
+  readln(a,' ',b);
+end.