Преглед изворни кода

* write output to stderr

git-svn-id: trunk@8620 -
florian пре 18 година
родитељ
комит
91956cdb54
1 измењених фајлова са 1 додато и 1 уклоњено
  1. 1 1
      tests/utils/fptime.pp

+ 1 - 1
tests/utils/fptime.pp

@@ -11,6 +11,6 @@ begin
         ps:=ps+' '+paramstr(i);
       sticks:=GetMicroSTicks;
       ExecuteProcess(paramstr(1),ps);
-      writeln((GetMicroSTicks-sticks)/1000:0:3,' ms');
+      writeln(stderr,(GetMicroSTicks-sticks)/1000:0:3,' ms');
     end;
 end.