ソースを参照

* beautified output

git-svn-id: trunk@3219 -
florian 19 年 前
コミット
abfb6d0668
1 ファイル変更1 行追加1 行削除
  1. 1 1
      tests/test/units/dos/tdos.pp

+ 1 - 1
tests/test/units/dos/tdos.pp

@@ -104,7 +104,7 @@ begin
   AddDisk('/fd0');
   writeln('DiskSize 4 : ',DiskSize(4));
 {$ENDIF}
-  write('FindFirst/FindNext Test');
+  writeln('FindFirst/FindNext Test');
 
   FindFirst('*.*',$20,Dir);
   while (DosError=0) do