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

* quote parameters

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

+ 1 - 1
tests/utils/fptime.pp

@@ -9,7 +9,7 @@ begin
   if paramcount>0 then
     begin
       for i:=2 to paramcount do
-        ps:=ps+' '+paramstr(i);
+        ps:=ps+' "'+paramstr(i)+'"';
       sticks:=GetMicroSTicks;
       ExecuteProcess(paramstr(1),ps);
       writeln(stderr,(GetMicroSTicks-sticks)/1000:0:3,' ms');