Преглед изворни кода

* Fix error committing : previous version must be in branch USE_SYSUTILS

mazen пре 21 година
родитељ
комит
da1c3fb6f0

+ 6 - 6
compiler/systems/t_beos.pas

@@ -382,8 +382,8 @@ end;
 
 
 function TLinkerBeOS.MakeExecutable:boolean;
 function TLinkerBeOS.MakeExecutable:boolean;
 var
 var
-  binstr : String;
-  cmdstr  : AnsiString;
+  binstr,
+  cmdstr  : string;
   success : boolean;
   success : boolean;
   DynLinkStr : string[60];
   DynLinkStr : string[60];
   StaticStr,
   StaticStr,
@@ -433,8 +433,8 @@ end;
 
 
 Function TLinkerBeOS.MakeSharedLibrary:boolean;
 Function TLinkerBeOS.MakeSharedLibrary:boolean;
 var
 var
-  binstr : String;
-  cmdstr  : AnsiString;
+  binstr,
+  cmdstr  : string;
   success : boolean;
   success : boolean;
   DynLinkStr : string[60];
   DynLinkStr : string[60];
   StaticStr,
   StaticStr,
@@ -505,8 +505,8 @@ initialization
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.11  2004-09-22 15:14:37  mazen
-  * use SysUtils unit instead of Dos Unit
+  Revision 1.12  2004-09-22 15:25:14  mazen
+  * Fix error committing : previous version must be in branch USE_SYSUTILS
 
 
   Revision 1.10  2004/06/20 08:55:32  florian
   Revision 1.10  2004/06/20 08:55:32  florian
     * logs truncated
     * logs truncated

+ 6 - 6
compiler/systems/t_bsd.pas

@@ -490,8 +490,8 @@ end;
 
 
 function TLinkerBSD.MakeExecutable:boolean;
 function TLinkerBSD.MakeExecutable:boolean;
 var
 var
-  binstr : String;
-  cmdstr  : AnsiString;
+  binstr,
+  cmdstr  : string;
   success : boolean;
   success : boolean;
   DynLinkStr : string[60];
   DynLinkStr : string[60];
   StaticStr,
   StaticStr,
@@ -547,8 +547,8 @@ end;
 
 
 Function TLinkerBSD.MakeSharedLibrary:boolean;
 Function TLinkerBSD.MakeSharedLibrary:boolean;
 var
 var
-  binstr : String;
-  cmdstr  : AnsiString;
+  binstr,
+  cmdstr  : string;
   success : boolean;
   success : boolean;
 begin
 begin
   MakeSharedLibrary:=false;
   MakeSharedLibrary:=false;
@@ -627,8 +627,8 @@ initialization
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.20  2004-09-22 15:14:37  mazen
-  * use SysUtils unit instead of Dos Unit
+  Revision 1.21  2004-09-22 15:25:14  mazen
+  * Fix error committing : previous version must be in branch USE_SYSUTILS
 
 
   Revision 1.19  2004/06/20 08:55:32  florian
   Revision 1.19  2004/06/20 08:55:32  florian
     * logs truncated
     * logs truncated

+ 4 - 4
compiler/systems/t_emx.pas

@@ -436,8 +436,8 @@ end;
 
 
 function TLinkerEMX.MakeExecutable:boolean;
 function TLinkerEMX.MakeExecutable:boolean;
 var
 var
-  binstr : String;
-  cmdstr  : AnsiString;
+  binstr,
+  cmdstr  : string;
   success : boolean;
   success : boolean;
   i       : longint;
   i       : longint;
   AppTypeStr,
   AppTypeStr,
@@ -518,8 +518,8 @@ initialization
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.6  2004-09-22 15:14:37  mazen
-  * use SysUtils unit instead of Dos Unit
+  Revision 1.7  2004-09-22 15:25:14  mazen
+  * Fix error committing : previous version must be in branch USE_SYSUTILS
 
 
   Revision 1.5  2004/09/08 11:23:31  michael
   Revision 1.5  2004/09/08 11:23:31  michael
   + Check if outputdir exists,  Fix exitcode when displaying help pages
   + Check if outputdir exists,  Fix exitcode when displaying help pages

+ 4 - 4
compiler/systems/t_go32v2.pas

@@ -211,8 +211,8 @@ end;
 
 
 function TLinkerGo32v2.MakeExecutable:boolean;
 function TLinkerGo32v2.MakeExecutable:boolean;
 var
 var
-  binstr : String;
-  cmdstr : AnsiString;
+  binstr,
+  cmdstr  : string;
   success : boolean;
   success : boolean;
   StripStr : string[40];
   StripStr : string[40];
 begin
 begin
@@ -362,8 +362,8 @@ initialization
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.5  2004-09-22 15:14:37  mazen
-  * use SysUtils unit instead of Dos Unit
+  Revision 1.6  2004-09-22 15:25:14  mazen
+  * Fix error committing : previous version must be in branch USE_SYSUTILS
 
 
   Revision 1.4  2004/06/20 08:55:32  florian
   Revision 1.4  2004/06/20 08:55:32  florian
     * logs truncated
     * logs truncated

+ 6 - 6
compiler/systems/t_linux.pas

@@ -425,8 +425,8 @@ end;
 
 
 function TLinkerLinux.MakeExecutable:boolean;
 function TLinkerLinux.MakeExecutable:boolean;
 var
 var
-  binstr : String;
-  cmdstr  : AnsiString;
+  binstr,
+  cmdstr  : string;
   success : boolean;
   success : boolean;
   DynLinkStr : string[60];
   DynLinkStr : string[60];
   StaticStr,
   StaticStr,
@@ -479,8 +479,8 @@ var
   InitStr,
   InitStr,
   FiniStr,
   FiniStr,
   SoNameStr : string[80];
   SoNameStr : string[80];
-  binstr : String;
-  cmdstr  : AnsiString;
+  binstr,
+  cmdstr  : string;
   success : boolean;
   success : boolean;
 begin
 begin
   MakeSharedLibrary:=false;
   MakeSharedLibrary:=false;
@@ -572,8 +572,8 @@ end.
 
 
 {
 {
   $Log$
   $Log$
-  Revision 1.22  2004-09-22 15:14:37  mazen
-  * use SysUtils unit instead of Dos Unit
+  Revision 1.23  2004-09-22 15:25:14  mazen
+  * Fix error committing : previous version must be in branch USE_SYSUTILS
 
 
   Revision 1.21  2004/09/21 17:25:13  peter
   Revision 1.21  2004/09/21 17:25:13  peter
     * paraloc branch merged
     * paraloc branch merged

+ 4 - 4
compiler/systems/t_nwl.pas

@@ -547,8 +547,8 @@ Const
 
 
 function TLinkerNetwlibc.MakeNetwareLoadableModule (isLib : boolean):boolean;
 function TLinkerNetwlibc.MakeNetwareLoadableModule (isLib : boolean):boolean;
 var
 var
-  binstr : String;
-  cmdstr : AnsiString;
+  binstr,
+  cmdstr,
   xdcname : string;
   xdcname : string;
   success  : boolean;
   success  : boolean;
   StripStr : string[2];
   StripStr : string[2];
@@ -651,8 +651,8 @@ initialization
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.4  2004-09-22 15:14:37  mazen
-  * use SysUtils unit instead of Dos Unit
+  Revision 1.5  2004-09-22 15:25:14  mazen
+  * Fix error committing : previous version must be in branch USE_SYSUTILS
 
 
   Revision 1.3  2004/09/19 18:10:32  armin
   Revision 1.3  2004/09/19 18:10:32  armin
   * added library support
   * added library support

+ 4 - 4
compiler/systems/t_nwm.pas

@@ -515,8 +515,8 @@ end;
 
 
 function TLinkerNetware.MakeExecutable:boolean;
 function TLinkerNetware.MakeExecutable:boolean;
 var
 var
-  binstr : String;
-  cmdstr   : AnsiString;
+  binstr,
+  cmdstr   : string;
   success  : boolean;
   success  : boolean;
   StripStr : string[2];
   StripStr : string[2];
 begin
 begin
@@ -580,8 +580,8 @@ initialization
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.15  2004-09-22 15:14:37  mazen
-  * use SysUtils unit instead of Dos Unit
+  Revision 1.16  2004-09-22 15:25:14  mazen
+  * Fix error committing : previous version must be in branch USE_SYSUTILS
 
 
   Revision 1.14  2004/08/30 11:17:34  armin
   Revision 1.14  2004/08/30 11:17:34  armin
   * added support for libc
   * added support for libc

+ 4 - 4
compiler/systems/t_os2.pas

@@ -436,8 +436,8 @@ end;
 
 
 function TLinkeros2.MakeExecutable:boolean;
 function TLinkeros2.MakeExecutable:boolean;
 var
 var
-  binstr: String;
-  cmdstr  : AnsiString;
+  binstr,
+  cmdstr  : string;
   success : boolean;
   success : boolean;
   i       : longint;
   i       : longint;
   AppTypeStr,
   AppTypeStr,
@@ -518,8 +518,8 @@ initialization
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.10  2004-09-22 15:14:37  mazen
-  * use SysUtils unit instead of Dos Unit
+  Revision 1.11  2004-09-22 15:25:14  mazen
+  * Fix error committing : previous version must be in branch USE_SYSUTILS
 
 
   Revision 1.9  2004/09/08 11:23:31  michael
   Revision 1.9  2004/09/08 11:23:31  michael
   + Check if outputdir exists,  Fix exitcode when displaying help pages
   + Check if outputdir exists,  Fix exitcode when displaying help pages

+ 6 - 6
compiler/systems/t_sunos.pas

@@ -396,8 +396,8 @@ end;
 
 
 function TLinkersunos.MakeExecutable:boolean;
 function TLinkersunos.MakeExecutable:boolean;
 var
 var
-  binstr : String;
-  cmdstr  : AnsiString;
+  binstr,
+  cmdstr  : string;
   success : boolean;
   success : boolean;
   DynLinkStr : string[60];
   DynLinkStr : string[60];
   StaticStr,
   StaticStr,
@@ -442,8 +442,8 @@ end;
 
 
 Function TLinkersunos.MakeSharedLibrary:boolean;
 Function TLinkersunos.MakeSharedLibrary:boolean;
 var
 var
-  binstr : String;
-  cmdstr  : AnsiString;
+  binstr,
+  cmdstr  : string;
   success : boolean;
   success : boolean;
 begin
 begin
   MakeSharedLibrary:=false;
   MakeSharedLibrary:=false;
@@ -489,8 +489,8 @@ initialization
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.9  2004-09-22 15:14:37  mazen
-  * use SysUtils unit instead of Dos Unit
+  Revision 1.10  2004-09-22 15:25:14  mazen
+  * Fix error committing : previous version must be in branch USE_SYSUTILS
 
 
   Revision 1.8  2004/06/20 08:55:32  florian
   Revision 1.8  2004/06/20 08:55:32  florian
     * logs truncated
     * logs truncated

+ 4 - 4
compiler/systems/t_watcom.pas

@@ -133,8 +133,8 @@ end;
 
 
 function TLinkerWatcom.MakeExecutable:boolean;
 function TLinkerWatcom.MakeExecutable:boolean;
 var
 var
-  binstr : String;
-  cmdstr  : AnsiString;
+  binstr,
+  cmdstr  : string;
   success : boolean;
   success : boolean;
   StripStr : string[40];
   StripStr : string[40];
 begin
 begin
@@ -179,8 +179,8 @@ initialization
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.5  2004-09-22 15:14:37  mazen
-  * use SysUtils unit instead of Dos Unit
+  Revision 1.6  2004-09-22 15:25:14  mazen
+  * Fix error committing : previous version must be in branch USE_SYSUTILS
 
 
   Revision 1.4  2004/06/20 08:55:32  florian
   Revision 1.4  2004/06/20 08:55:32  florian
     * logs truncated
     * logs truncated

+ 6 - 6
compiler/systems/t_win32.pas

@@ -1014,8 +1014,8 @@ end;
 
 
 function TLinkerWin32.MakeExecutable:boolean;
 function TLinkerWin32.MakeExecutable:boolean;
 var
 var
-  binstr : String;
-  cmdstr  : AnsiString;
+  binstr,
+  cmdstr  : string;
   success : boolean;
   success : boolean;
   cmds,i       : longint;
   cmds,i       : longint;
   AsBinStr     : string[80];
   AsBinStr     : string[80];
@@ -1096,8 +1096,8 @@ end;
 
 
 Function TLinkerWin32.MakeSharedLibrary:boolean;
 Function TLinkerWin32.MakeSharedLibrary:boolean;
 var
 var
-  binstr : String;
-  cmdstr  : AnsiString;
+  binstr,
+  cmdstr  : string;
   success : boolean;
   success : boolean;
   cmds,
   cmds,
   i       : longint;
   i       : longint;
@@ -1659,8 +1659,8 @@ initialization
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.36  2004-09-22 15:14:37  mazen
-  * use SysUtils unit instead of Dos Unit
+  Revision 1.37  2004-09-22 15:25:14  mazen
+  * Fix error committing : previous version must be in branch USE_SYSUTILS
 
 
   Revision 1.35  2004/06/20 08:55:32  florian
   Revision 1.35  2004/06/20 08:55:32  florian
     * logs truncated
     * logs truncated