paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-17 01:39:26 +02:00
Code Issues Packages Projects Releases Wiki Activity

Remove readln and add mode delphi

Browse Source 
git-svn-id: trunk@24807 -
This commit is contained in:
pierre 2013-06-05 15:42:46 +00:00
parent 2a09070108
commit 55252e82f2
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
tests/test/tstring11.pp
View File

@ -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; program tstrtest;
{$APPTYPE CONSOLE} {$APPTYPE CONSOLE}
@ -69,5 +74,5 @@ begin
TestOpenArray([], []); TestOpenArray([], []);
Writeln('ok'); Writeln('ok');
Readln; // Readln;
end. end.