浏览代码

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