* Improved output

tests/test/texception1.pp

@@ -170,7 +170,8 @@ Procedure Finish;
 
 begin
   Writeln;
-  Write ('Finished.');
+  Writeln ('Finished.');
+  writeln;
   { Press enter to continue.');
   Readln; tests/test/test... must be non interactive !! PM }
 end;