Bläddra i källkod

* add maybequoted for filenames

git-svn-id: trunk@5245 -
peter 19 år sedan
förälder
incheckning
2900d02f0b
1 ändrade filer med 3 tillägg och 3 borttagningar
  1. 3 3
      compiler/systems/t_win.pas

+ 3 - 3
compiler/systems/t_win.pas

@@ -899,19 +899,19 @@ implementation
               begin
                 s:=ObjectFiles.GetFirst;
                 if s<>'' then
-                  Concat('READOBJECT '+s);
+                  Concat('READOBJECT '+MaybeQuoted(s));
               end;
             while not StaticLibFiles.Empty do
               begin
                 s:=StaticLibFiles.GetFirst;
                 if s<>'' then
-                  Concat('READSTATICLIBRARY '+s);
+                  Concat('READSTATICLIBRARY '+MaybeQuoted(s));
               end;
             While not SharedLibFiles.Empty do
               begin
                 S:=SharedLibFiles.GetFirst;
                 if FindLibraryFile(s,target_info.staticClibprefix,target_info.staticClibext,s2) then
-                  Concat('READSTATICLIBRARY '+s2)
+                  Concat('READSTATICLIBRARY '+MaybeQuoted(s2))
                 else
                   Comment(V_Error,'Import library not found for '+S);
               end;