Change declaration of DynLinkStr local variable of MakeExecutable method to ansitring to avoid short string overflows

compiler/systems/t_amiga.pas

@@ -350,7 +350,7 @@ var
   BinStr,
   CmdStr  : TCmdStr;
   StripStr: string[40];
-  DynLinkStr : string;
+  DynLinkStr : ansistring;
   GCSectionsStr : string;
   MapStr: string;
 begin
@@ -391,7 +391,7 @@ var
   BinStr,
   CmdStr  : TCmdStr;
   StripStr: string[40];
-  DynLinkStr : string;
+  DynLinkStr : ansistring;
   GCSectionsStr : string;
   MapStr: string;
 begin

compiler/systems/t_atari.pas

@@ -214,7 +214,7 @@ var
   BinStr,
   CmdStr  : TCmdStr;
   StripStr: string[40];
-  DynLinkStr : string;
+  DynLinkStr : ansistring;
   GCSectionsStr : string;
   FlagsStr : string;
   MapStr: string;

compiler/systems/t_beos.pas

@@ -364,7 +364,7 @@ var
   cmdstr : TCmdStr;
   success,
   useshell : boolean;
-  DynLinkStr : string[60];
+  DynLinkStr : ansistring;
   GCSectionsStr,
   StaticStr,
   StripStr   : string[40];
@@ -426,7 +426,7 @@ var
   cmdstr,
   SoNameStr : TCmdStr;
   success : boolean;
-  DynLinkStr : string[60];
+  DynLinkStr : ansistring;
   StaticStr,
   StripStr   : string[40];
 

compiler/systems/t_bsd.pas

@@ -432,7 +432,7 @@ var
   ltostr,
   ordersymfile: TCmdStr;
   linkscript: TAsmScript;
-  DynLinkStr : string[60];
+  DynLinkStr : ansistring;
   GCSectionsStr,
   StaticStr,
   StripStr   : string[63];

compiler/systems/t_haiku.pas

@@ -404,7 +404,7 @@ var
   cmdstr : TCmdStr;
   success,
   useshell : boolean;
-  DynLinkStr : string[60];
+  DynLinkStr : ansistring;
   GCSectionsStr,
   StaticStr,
   StripStr   : string[40];
@@ -466,7 +466,7 @@ var
   cmdstr,
   SoNameStr : TCmdStr;
   success : boolean;
-  DynLinkStr : string[60];
+  DynLinkStr : ansistring;
   StaticStr,
   StripStr   : string[40];
 

compiler/systems/t_linux.pas

@@ -738,7 +738,7 @@ var
   mapstr,
   ltostr  : TCmdStr;
   success : boolean;
-  DynLinkStr : string;
+  DynLinkStr : ansistring;
   GCSectionsStr,
   StaticStr,
   StripStr   : string[40];

compiler/systems/t_macos.pas

@@ -200,7 +200,7 @@ var
   binstr,
   cmdstr  : TCmdStr;
   success : boolean;
-  DynLinkStr : string[60];
+  DynLinkStr : ansistring;
   StaticStr,
   StripStr   : string[40];
 begin
@@ -389,7 +389,7 @@ var
   BinStr,
   CmdStr  : TCmdStr;
   StripStr: string[40];
-  DynLinkStr : string;
+  DynLinkStr : ansistring;
   GCSectionsStr : string;
   ExeName: string;
 begin

compiler/systems/t_sinclairql.pas

@@ -243,7 +243,7 @@ var
   BinStr,
   CmdStr  : TCmdStr;
   StripStr: string[40];
-  DynLinkStr : string;
+  DynLinkStr : ansistring;
   GCSectionsStr : string;
   FlagsStr : string;
   QLFlagsStr: string;

compiler/systems/t_sunos.pas

@@ -457,7 +457,7 @@ var
   s, linkstr,
   cmdstr  : TCmdStr;
   success : boolean;
-  DynLinkStr : string[60];
+  DynLinkStr : ansistring;
   StaticStr, RedirectStr,
   StripStr   : string[40];
 begin