ソースを参照

* 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');