Procházet zdrojové kódy

* quote parameters

git-svn-id: trunk@26584 -
florian před 11 roky
rodič
revize
0ea0b5c34d
1 změnil soubory, kde provedl 1 přidání a 1 odebrání
  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');