Ver Fonte

+ Added maxpathlen constant (maximum length of filename path)

michael há 20 anos atrás
pai
commit
2e48181661

+ 5 - 1
rtl/atari/system.pas

@@ -45,6 +45,7 @@ const
  PathSeparator = ';';
  FileNameCaseSensitive = false;
  maxExitCode = 255;
+ MaxPathLen = 255;
 
  sLineBreak: string [1] = LineEnding;
     { used for single computations }
@@ -773,7 +774,10 @@ end.
 
 {
   $Log$
-  Revision 1.14  2005-04-03 21:10:59  hajny
+  Revision 1.15  2005-05-12 20:29:04  michael
+  + Added maxpathlen constant (maximum length of filename path)
+
+  Revision 1.14  2005/04/03 21:10:59  hajny
     * EOF_CTRLZ conditional define replaced with CtrlZMarksEOF, #26 handling made more consistent (fix for bug 2453)
 
   Revision 1.13  2005/02/14 17:13:21  peter

+ 6 - 2
rtl/beos/system.pp

@@ -43,7 +43,8 @@ const
  PathSeparator = ':';
 { FileNameCaseSensitive is defined separately below!!! }
  maxExitCode = 255;
-
+ MaxPathLen = 256;
+ 
 const
   FileNameCaseSensitive : boolean = true;
   CtrlZMarksEOF: boolean = false; (* #26 not considered as end of file *)
@@ -548,7 +549,10 @@ begin
 end.
 {
   $Log$
-  Revision 1.23  2005-04-13 20:10:50  florian
+  Revision 1.24  2005-05-12 20:29:04  michael
+  + Added maxpathlen constant (maximum length of filename path)
+
+  Revision 1.23  2005/04/13 20:10:50  florian
     + TThreadID
 
   Revision 1.22  2005/04/03 21:10:59  hajny

+ 5 - 1
rtl/emx/system.pas

@@ -37,6 +37,7 @@ const
  PathSeparator = ';';
 { FileNameCaseSensitive is defined separately below!!! }
  maxExitCode = 255;
+ MaxPathLen = 256;
 
 type    Tos=(osDOS,osOS2,osDPMI);
 
@@ -591,7 +592,10 @@ begin
 end.
 {
   $Log$
-  Revision 1.35  2005-04-03 21:10:59  hajny
+  Revision 1.36  2005-05-12 20:29:04  michael
+  + Added maxpathlen constant (maximum length of filename path)
+
+  Revision 1.35  2005/04/03 21:10:59  hajny
     * EOF_CTRLZ conditional define replaced with CtrlZMarksEOF, #26 handling made more consistent (fix for bug 2453)
 
   Revision 1.34  2005/02/14 17:13:22  peter

+ 5 - 2
rtl/go32v2/system.pp

@@ -43,7 +43,7 @@ const
  PathSeparator = ';';
 { FileNameCaseSensitive is defined separately below!!! }
  maxExitCode = 255;
-
+ MaxPathLen = 256;
 
 const
 { Default filehandles }
@@ -658,7 +658,10 @@ Begin
 End.
 {
   $Log$
-  Revision 1.52  2005-05-05 11:40:23  peter
+  Revision 1.53  2005-05-12 20:29:04  michael
+  + Added maxpathlen constant (maximum length of filename path)
+
+  Revision 1.52  2005/05/05 11:40:23  peter
   Call InitSystemThreads
 
   Revision 1.51  2005/05/01 13:00:53  peter

+ 7 - 3
rtl/macos/system.pp

@@ -28,9 +28,10 @@ const
  PathSeparator = ',';  {Is used in MPW and OzTeX}
  FileNameCaseSensitive = false;
  CtrlZMarksEOF: boolean = false; (* #26 not considered as end of file *)
-
+  
  maxExitCode = 65535;
-
+ MaxPathLen = 256;
+  
 const
 { Default filehandles }
   UnusedHandle    : Longint = -1;
@@ -560,7 +561,10 @@ end.
 
 {
   $Log$
-  Revision 1.32  2005-04-03 21:10:59  hajny
+  Revision 1.33  2005-05-12 20:29:04  michael
+  + Added maxpathlen constant (maximum length of filename path)
+
+  Revision 1.32  2005/04/03 21:10:59  hajny
     * EOF_CTRLZ conditional define replaced with CtrlZMarksEOF, #26 handling made more consistent (fix for bug 2453)
 
   Revision 1.31  2005/03/20 19:37:31  olle

+ 6 - 2
rtl/morphos/system.pp

@@ -35,7 +35,8 @@ const
   DriveSeparator = ':';
   PathSeparator = ';';
   maxExitCode = 255;
-
+  MaxPathLen = 256;
+  
 const
   UnusedHandle    : LongInt = -1;
   StdInputHandle  : LongInt = 0;
@@ -335,7 +336,10 @@ end.
 
 {
   $Log$
-  Revision 1.34  2005-05-10 21:45:08  hajny
+  Revision 1.35  2005-05-12 20:29:04  michael
+  + Added maxpathlen constant (maximum length of filename path)
+
+  Revision 1.34  2005/05/10 21:45:08  hajny
     * fix for potential SIGSEGV during argv allocation
 
   Revision 1.33  2005/04/03 21:10:59  hajny

+ 5 - 2
rtl/netware/system.pp

@@ -42,7 +42,7 @@ const
  PathSeparator = ';';
 { FileNameCaseSensitive is defined separately below!!! }
  maxExitCode = 255;
-
+ MaxPathLen = 256;
 
 CONST
   { Default filehandles }
@@ -489,7 +489,10 @@ Begin
 End.
 {
   $Log$
-  Revision 1.37  2005-04-03 21:10:59  hajny
+  Revision 1.38  2005-05-12 20:29:04  michael
+  + Added maxpathlen constant (maximum length of filename path)
+
+  Revision 1.37  2005/04/03 21:10:59  hajny
     * EOF_CTRLZ conditional define replaced with CtrlZMarksEOF, #26 handling made more consistent (fix for bug 2453)
 
   Revision 1.36  2005/02/14 17:13:30  peter

+ 5 - 2
rtl/netwlibc/system.pp

@@ -48,7 +48,7 @@ const
  PathSeparator = ';';
 { FileNameCaseSensitive is defined separately below!!! }
  maxExitCode = $ffff;
-
+ MaxPathLen = 256;
 
 CONST
   { Default filehandles }
@@ -560,7 +560,10 @@ Begin
 End.
 {
   $Log$
-  Revision 1.15  2005-04-03 21:10:59  hajny
+  Revision 1.16  2005-05-12 20:29:04  michael
+  + Added maxpathlen constant (maximum length of filename path)
+
+  Revision 1.15  2005/04/03 21:10:59  hajny
     * EOF_CTRLZ conditional define replaced with CtrlZMarksEOF, #26 handling made more consistent (fix for bug 2453)
 
   Revision 1.14  2005/02/14 17:13:30  peter

+ 6 - 2
rtl/os2/system.pas

@@ -50,7 +50,8 @@ const
   PathSeparator = ';';
 { FileNameCaseSensitive is defined separately below!!! }
   MaxExitCode = 65535;
-
+  MaxPathLen = 256;
+  
 type    Tos=(osDOS,osOS2,osDPMI);
 
 const   os_mode: Tos = osOS2;
@@ -773,7 +774,10 @@ begin
 end.
 {
   $Log$
-  Revision 1.85  2005-05-03 22:17:26  hajny
+  Revision 1.86  2005-05-12 20:29:04  michael
+  + Added maxpathlen constant (maximum length of filename path)
+
+  Revision 1.85  2005/05/03 22:17:26  hajny
     * SysAllocMem used for ArgV [Idx] allocation again
 
   Revision 1.84  2005/05/01 13:01:03  peter

+ 5 - 1
rtl/palmos/system.pp

@@ -32,6 +32,7 @@ const
  FileNameCaseSensitive = false;
  CtrlZMarksEOF: boolean = false; (* #26 not considered as end of file *)
  maxExitCode = 255; {$ERROR TODO: CONFIRM THIS}
+ MaxPathLen = 256;
 
     Type
        { type and constant declartions doesn't hurt }
@@ -110,7 +111,10 @@ end.
 
 {
   $Log$
-  Revision 1.8  2005-04-03 21:10:59  hajny
+  Revision 1.9  2005-05-12 20:29:04  michael
+  + Added maxpathlen constant (maximum length of filename path)
+
+  Revision 1.8  2005/04/03 21:10:59  hajny
     * EOF_CTRLZ conditional define replaced with CtrlZMarksEOF, #26 handling made more consistent (fix for bug 2453)
 
   Revision 1.7  2005/02/14 17:13:31  peter

+ 6 - 2
rtl/unix/sysunixh.inc

@@ -33,7 +33,8 @@ const
  PathSeparator = ':';
 { FileNameCaseSensitive is defined below! }
  maxExitCode = 255;
-
+ MaxPathLen = 256; 
+ 
 const
   UnusedHandle    = -1;
   StdInputHandle  = 0;
@@ -56,7 +57,10 @@ var argc:longint;external name 'operatingsystem_parameter_argc';
 
 {
   $Log$
-  Revision 1.26  2005-04-03 21:10:59  hajny
+  Revision 1.27  2005-05-12 20:29:16  michael
+  + Added maxpathlen constant (maximum length of filename path)
+
+  Revision 1.26  2005/04/03 21:10:59  hajny
     * EOF_CTRLZ conditional define replaced with CtrlZMarksEOF, #26 handling made more consistent (fix for bug 2453)
 
   Revision 1.25  2005/02/14 17:13:31  peter

+ 6 - 2
rtl/watcom/system.pp

@@ -44,7 +44,8 @@ const
  PathSeparator = ';';
 { FileNameCaseSensitive is defined separately below!!! }
  maxExitCode = 255;
-
+ MaxPathLen = 256;
+ 
 const
 { Default filehandles }
   UnusedHandle    = -1;
@@ -1539,7 +1540,10 @@ End.
 
 {
   $Log$
-  Revision 1.23  2005-05-10 21:45:08  hajny
+  Revision 1.24  2005-05-12 20:29:04  michael
+  + Added maxpathlen constant (maximum length of filename path)
+
+  Revision 1.23  2005/05/10 21:45:08  hajny
     * fix for potential SIGSEGV during argv allocation
 
   Revision 1.22  2005/04/13 20:10:50  florian

+ 6 - 2
rtl/win32/system.pp

@@ -39,7 +39,8 @@ const
  PathSeparator = ';';
 { FileNameCaseSensitive is defined separately below!!! }
  maxExitCode = 65535;
-
+ MaxPathLen = 260;
+ 
 type
    PEXCEPTION_FRAME = ^TEXCEPTION_FRAME;
    TEXCEPTION_FRAME = record
@@ -1108,7 +1109,10 @@ end.
 
 {
   $Log$
-  Revision 1.73  2005-04-03 21:10:59  hajny
+  Revision 1.74  2005-05-12 20:29:04  michael
+  + Added maxpathlen constant (maximum length of filename path)
+
+  Revision 1.73  2005/04/03 21:10:59  hajny
     * EOF_CTRLZ conditional define replaced with CtrlZMarksEOF, #26 handling made more consistent (fix for bug 2453)
 
   Revision 1.72  2005/03/21 16:31:33  peter