mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-18 17:19:32 +02:00
Remove readln and add mode delphi
git-svn-id: trunk@24807 -
This commit is contained in:
parent
2a09070108
commit
55252e82f2
@ -1,3 +1,8 @@
|
||||
|
||||
{ As this is a Delphi compatibility test
|
||||
I suppose delphi mode is OK, PM 2013-06-05 }
|
||||
{$mode delphi}
|
||||
|
||||
program tstrtest;
|
||||
|
||||
{$APPTYPE CONSOLE}
|
||||
@ -69,5 +74,5 @@ begin
|
||||
TestOpenArray([], []);
|
||||
|
||||
Writeln('ok');
|
||||
Readln;
|
||||
// Readln;
|
||||
end.
|
||||
|
Loading…
Reference in New Issue
Block a user