2
0
Эх сурвалжийг харах

* some string -> TCmdStr fixes

git-svn-id: trunk@1225 -
Jonas Maebe 20 жил өмнө
parent
commit
65dd7465ae

+ 2 - 2
compiler/systems/t_macos.pas

@@ -198,8 +198,8 @@ end;
 
 function TLinkerMPW.MakeExecutable:boolean;
 var
-  binstr,
-  cmdstr  : string;
+  binstr  : string;
+  cmdstr  : TCmdStr;
   success : boolean;
   DynLinkStr : string[60];
   StaticStr,

+ 2 - 2
compiler/systems/t_morph.pas

@@ -201,8 +201,8 @@ end;
 
 function TLinkerMorphOS.MakeExecutable:boolean;
 var
-  binstr,
-  cmdstr  : string;
+  binstr  : string;
+  cmdstr  : TCmdStr;
   success : boolean;
   StripStr: string[40];
 begin