Browse Source

* some string -> TCmdStr fixes

git-svn-id: trunk@1225 -
Jonas Maebe 20 years ago
parent
commit
65dd7465ae
2 changed files with 4 additions and 4 deletions
  1. 2 2
      compiler/systems/t_macos.pas
  2. 2 2
      compiler/systems/t_morph.pas

+ 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