+ added comment to ETXTBSY

  * changed i386 -> cpui386, m68k -> cpum68k

rtl/darwin/errno.inc

@@ -117,7 +117,10 @@
     { Inappropriate ioctl for device  }
        ESysENOTTY = 25;
 {$ifndef _POSIX_SOURCE}
-    { Text file busy  }
+    { Text file busy.  The new process was a pure procedure (shared text) file 
+          which was open for writing by another process, or file which was open for
+          writing by another process, or while the pure procedure file was being
+          executed an open(2) call requested write access  requested write access.}
        ESysETXTBSY = 26;
 {$endif}
     { File too large  }
@@ -280,7 +283,11 @@
 
 {
   $Log$
-  Revision 1.2  2003-05-25 12:59:56  jonas
+  Revision 1.3  2004-03-04 13:10:23  olle
+    + added comment to ETXTBSY
+    * changed i386 -> cpui386, m68k -> cpum68k
+
+  Revision 1.2  2003/05/25 12:59:56  jonas
     * several fixes, addition of Mach trap numbers (thye are simply syscalls
       with a negative number)
 

rtl/freebsd/errno.inc

@@ -46,7 +46,13 @@ Const
        	ESysENFILE		= 23;		{ Too many open files in system }
        	ESysEMFILE		= 24;		{ Too many open files }
        	ESysENOTTY		= 25;		{ Inappropriate ioctl for device }
-       	ESysETXTBSY		= 26;		{ Text file busy }
+       	ESysETXTBSY		= 26;		{ Text file busy. The new process was
+                                      a pure procedure (shared text) file which was
+                                      open for writing by another process, or file
+                                      which was open for writing by another process,
+                                      or while the pure procedure file was being
+                                      executed an open(2) call requested write access
+                                      requested write access.}
        	ESysEFBIG		= 27;		{ File too large }
        	ESysENOSPC		= 28;		{ No space left on device }
        	ESysESPIPE		= 29;		{ Illegal seek }
@@ -132,7 +138,11 @@ Const
 
 {
   $Log$
-  Revision 1.4  2003-01-21 14:03:03  marco
+  Revision 1.5  2004-03-04 13:10:24  olle
+    + added comment to ETXTBSY
+    * changed i386 -> cpui386, m68k -> cpum68k
+
+  Revision 1.4  2003/01/21 14:03:03  marco
    * Hmm, still was linux version in 1.1?
 
   Revision 1.3  2003/01/03 00:06:39  marco

rtl/freebsd/i386/sighnd.inc

@@ -46,7 +46,7 @@ begin
 { give runtime error at the position where the signal was raised }
   if res<>0 then
    begin
-{$ifdef I386}
+{$ifdef cpui386}
   HandleErrorAddrFrame(res,Pointer(SigContext.sc_eip),pointer(SigContext.sc_ebp));
 {$else}
      HandleError(res);
@@ -79,7 +79,11 @@ end;
 
 {
   $Log$
-  Revision 1.1  2004-01-03 12:29:36  marco
+  Revision 1.2  2004-03-04 13:10:26  olle
+    + added comment to ETXTBSY
+    * changed i386 -> cpui386, m68k -> cpum68k
+
+  Revision 1.1  2004/01/03 12:29:36  marco
    * now separately.
 
 }

rtl/linux/errno.inc

@@ -48,7 +48,13 @@ ESysEINVAL      = 22;   { Invalid argument }
 ESysENFILE      = 23;   { File table overflow }
 ESysEMFILE      = 24;   { Too many open files }
 ESysENOTTY      = 25;   { Not a typewriter }
-ESysETXTBSY     = 26;   { Text file busy }
+ESysETXTBSY     = 26;   { Text file busy. The new process was
+                          a pure procedure (shared text) file which was
+                          open for writing by another process, or file
+                          which was open for writing by another process,
+                          or while the pure procedure file was being
+                          executed an open(2) call requested write access
+                          requested write access.}
 ESysEFBIG       = 27;   { File too large }
 ESysENOSPC      = 28;   { No space left on device }
 ESysESPIPE      = 29;   { Illegal seek }
@@ -217,7 +223,11 @@ ESysEDQUOT      = 122;  { Quota exceeded }
 
 {
   $Log$
-  Revision 1.7  2003-05-17 13:06:22  marco
+  Revision 1.8  2004-03-04 13:10:29  olle
+    + added comment to ETXTBSY
+    * changed i386 -> cpui386, m68k -> cpum68k
+
+  Revision 1.7  2003/05/17 13:06:22  marco
    * done.
 
   Revision 1.6  2003/01/02 23:57:32  marco

rtl/netbsd/errno.inc

@@ -46,7 +46,13 @@ Const
        	ESysENFILE		= 23;		{ Too many open files in system }
        	ESysEMFILE		= 24;		{ Too many open files }
        	ESysENOTTY		= 25;		{ Inappropriate ioctl for device }
-       	ESysETXTBSY		= 26;		{ Text file busy }
+       	ESysETXTBSY		= 26;		{ Text file busy. The new process was
+                                      a pure procedure (shared text) file which was
+                                      open for writing by another process, or file
+                                      which was open for writing by another process,
+                                      or while the pure procedure file was being
+                                      executed an open(2) call requested write access
+                                      requested write access.}
        	ESysEFBIG		= 27;		{ File too large }
        	ESysENOSPC		= 28;		{ No space left on device }
        	ESysESPIPE		= 29;		{ Illegal seek }
@@ -132,7 +138,11 @@ Const
 
 {
   $Log$
-  Revision 1.1  2003-06-01 16:35:28  marco
+  Revision 1.2  2004-03-04 13:10:30  olle
+    + added comment to ETXTBSY
+    * changed i386 -> cpui386, m68k -> cpum68k
+
+  Revision 1.1  2003/06/01 16:35:28  marco
    * Several small fixes to harmonize the *BSD rtls and Linux.
 
   Revision 1.4  2003/01/21 14:03:03  marco

rtl/netbsd/i386/sighnd.inc

@@ -27,12 +27,12 @@ var
 begin
   res:=0;
 {$ifdef BSD}
-{$ifdef I386}
+{$ifdef cpui386}
   fpustate:=0;
   asm
     fnstsw fpustate
   end;
-{$endif I386}
+{$endif cpui386}
 {$endif BSD}
   case sig of
     SIGFPE :
@@ -71,7 +71,7 @@ begin
 { give runtime error at the position where the signal was raised }
   if res<>0 then
    begin
-{$ifdef I386}
+{$ifdef cpui386}
       HandleErrorAddrFrame(res,pointer(SigContext.sc_eip),pointer(SigContext.sc_ebp));
 {$endif}
    end;
@@ -80,7 +80,11 @@ end;
 
 {
   $Log$
-  Revision 1.1  2004-01-04 15:30:19  marco
+  Revision 1.2  2004-03-04 13:10:32  olle
+    + added comment to ETXTBSY
+    * changed i386 -> cpui386, m68k -> cpum68k
+
+  Revision 1.1  2004/01/04 15:30:19  marco
    * working version
 
   Revision 1.1  2004/01/03 12:29:36  marco

rtl/netbsd/unixsysc.inc

@@ -106,7 +106,7 @@ Function intAssignPipe(var pipe_in,pipe_out:longint;var errn:cint):cint; {$ifnde
 }
 
 begin
-{$ifdef i386}
+{$ifdef cpui386}
  asm
    mov $42,%eax
    int $0x80
@@ -277,7 +277,11 @@ end;
 
 {
   $Log$
-  Revision 1.6  2004-01-04 15:55:47  marco
+  Revision 1.7  2004-03-04 13:10:30  olle
+    + added comment to ETXTBSY
+    * changed i386 -> cpui386, m68k -> cpum68k
+
+  Revision 1.6  2004/01/04 15:55:47  marco
    * additions
 
   Revision 1.5  2004/01/04 01:11:28  marco

rtl/openbsd/errno.inc

@@ -46,7 +46,13 @@ Const
        	ESysENFILE		= 23;		{ Too many open files in system }
        	ESysEMFILE		= 24;		{ Too many open files }
        	ESysENOTTY		= 25;		{ Inappropriate ioctl for device }
-       	ESysETXTBSY		= 26;		{ Text file busy }
+       	ESysETXTBSY		= 26;		{ Text file busy. The new process was
+                                      a pure procedure (shared text) file which was
+                                      open for writing by another process, or file
+                                      which was open for writing by another process,
+                                      or while the pure procedure file was being
+                                      executed an open(2) call requested write access
+                                      requested write access.}
        	ESysEFBIG		= 27;		{ File too large }
        	ESysENOSPC		= 28;		{ No space left on device }
        	ESysESPIPE		= 29;		{ Illegal seek }
@@ -132,7 +138,11 @@ Const
 
 {
   $Log$
-  Revision 1.1  2004-01-22 13:55:02  marco
+  Revision 1.2  2004-03-04 13:11:47  olle
+    + added comment to ETXTBSY
+    * changed i386 -> cpui386, m68k -> cpum68k
+
+  Revision 1.1  2004/01/22 13:55:02  marco
    * first port that shows some life based on FPC_USE_LIBC
 
   Revision 1.1  2003/06/01 16:35:28  marco

rtl/openbsd/i386/sighnd.inc

@@ -27,12 +27,12 @@ var
 begin
   res:=0;
 {$ifdef BSD}
-{$ifdef I386}
+{$ifdef cpui386}
   fpustate:=0;
   asm
     fnstsw fpustate
   end;
-{$endif I386}
+{$endif cpui386}
 {$endif BSD}
   case sig of
     SIGFPE :
@@ -71,7 +71,7 @@ begin
 { give runtime error at the position where the signal was raised }
   if res<>0 then
    begin
-{$ifdef I386}
+{$ifdef cpui386}
       HandleErrorAddrFrame(res,pointer(SigContext.sc_eip),pointer(SigContext.sc_ebp));
 {$endif}
    end;
@@ -80,7 +80,11 @@ end;
 
 {
   $Log$
-  Revision 1.1  2004-01-20 17:01:42  marco
+  Revision 1.2  2004-03-04 13:11:51  olle
+    + added comment to ETXTBSY
+    * changed i386 -> cpui386, m68k -> cpum68k
+
+  Revision 1.1  2004/01/20 17:01:42  marco
    * working versions, untested
 
   Revision 1.1  2004/01/04 15:30:19  marco

rtl/openbsd/unixsysc.inc

@@ -106,7 +106,7 @@ Function intAssignPipe(var pipe_in,pipe_out:longint;var errn:cint):cint; {$ifnde
 }
 
 begin
-{$ifdef i386}
+{$ifdef cpui386}
  asm
    mov $42,%eax
    int $0x80
@@ -277,7 +277,11 @@ end;
 
 {
   $Log$
-  Revision 1.2  2004-01-22 13:55:02  marco
+  Revision 1.3  2004-03-04 13:11:47  olle
+    + added comment to ETXTBSY
+    * changed i386 -> cpui386, m68k -> cpum68k
+
+  Revision 1.2  2004/01/22 13:55:02  marco
    * first port that shows some life based on FPC_USE_LIBC
 
   Revision 1.6  2004/01/04 15:55:47  marco

rtl/sunos/errno.inc

@@ -60,7 +60,13 @@ Sys_EINVAL      = 22;   { Invalid argument }
 Sys_ENFILE      = 23;   { File table overflow }
 Sys_EMFILE      = 24;   { Too many open files }
 Sys_ENOTTY      = 25;   { Not a typewriter }
-Sys_ETXTBSY     = 26;   { Text file busy }
+Sys_ETXTBSY     = 26;   { Text file busy. The new process was
+                          a pure procedure (shared text) file which was
+                          open for writing by another process, or file
+                          which was open for writing by another process,
+                          or while the pure procedure file was being
+                          executed an open(2) call requested write access
+                          requested write access.}
 Sys_EFBIG       = 27;   { File too large }
 Sys_ENOSPC      = 28;   { No space left on device }
 Sys_ESPIPE      = 29;   { Illegal seek }
@@ -174,7 +180,11 @@ Sys_EDQUOT      = 122;  { Quota exceeded }
 
 {
   $Log$
-  Revision 1.2  2002-09-07 16:01:26  peter
+  Revision 1.3  2004-03-04 13:11:56  olle
+    + added comment to ETXTBSY
+    * changed i386 -> cpui386, m68k -> cpum68k
+
+  Revision 1.2  2002/09/07 16:01:26  peter
     * old logs removed and tabs fixed
 
 }

rtl/unix/errors.pp

@@ -48,7 +48,13 @@ const
         'File table overflow',                  { ENFILE }
         'Too many open files',                  { EMFILE }
         'Not a typewriter',                     { ENOTTY }
-        'Text file busy',                       { ETXTBSY }
+        'Text (code segment) file busy',        { ETXTBSY  Text file busy.  The new process was
+                                                    a pure procedure (shared text) file which was
+                                                    open for writing by another process, or file
+                                                    which was open for writing by another process,
+                                                    or while the pure procedure file was being
+                                                    executed an open(2) call requested write access
+                                                    requested write access.}
         'File too large',                       { EFBIG }
         'No space left on device',              { ENOSPC }
         'Illegal seek',                         { ESPIPE }
@@ -175,7 +181,11 @@ end.
 
 {
   $Log$
-  Revision 1.3  2002-09-07 16:01:27  peter
+  Revision 1.4  2004-03-04 13:12:06  olle
+    + added comment to ETXTBSY
+    * changed i386 -> cpui386, m68k -> cpum68k
+
+  Revision 1.3  2002/09/07 16:01:27  peter
     * old logs removed and tabs fixed
 
 }

rtl/unix/linuxold.inc

@@ -591,7 +591,13 @@ Sys_EINVAL	= 22;	{ Invalid argument }
 Sys_ENFILE	= 23;	{ File table overflow }
 Sys_EMFILE	= 24;	{ Too many open files }
 Sys_ENOTTY	= 25;	{ Not a typewriter }
-Sys_ETXTBSY	= 26;	{ Text file busy }
+Sys_ETXTBSY	= 26;	{ Text file busy. The new process was
+                      a pure procedure (shared text) file which was
+                      open for writing by another process, or file
+                      which was open for writing by another process,
+                      or while the pure procedure file was being
+                      executed an open(2) call requested write access
+                      requested write access.}
 Sys_EFBIG	= 27;	{ File too large }
 Sys_ENOSPC	= 28;	{ No space left on device }
 Sys_ESPIPE	= 29;	{ Illegal seek }
@@ -1667,7 +1673,7 @@ asm
 end;
 {$ASMMODE DEFAULT}
 {$else}
-{$ifdef m68k}
+{$ifdef cpum68k}
 asm
 { load the registers... }
   move.l 12(a6),a0
@@ -2150,7 +2156,7 @@ begin
         movl    %eax,__RESULT
   end;
 {$endif cpui386}
-{$ifdef m68k}
+{$ifdef cpum68k}
   { No yet translated, my m68k assembler is too weak for such things PM }
 (*
   asm
@@ -2186,7 +2192,7 @@ begin
         movl    %eax,__RESULT
   end;
   *)
-{$endif m68k}
+{$endif cpum68k}
 end;
 
 
@@ -5908,7 +5914,11 @@ End.
 
 {
   $Log$
-  Revision 1.17  2004-02-19 21:30:50  daniel
+  Revision 1.18  2004-03-04 13:12:06  olle
+    + added comment to ETXTBSY
+    * changed i386 -> cpui386, m68k -> cpum68k
+
+  Revision 1.17  2004/02/19 21:30:50  daniel
     * do_syscall back to oldfpccall
 
   Revision 1.16  2004/02/19 21:06:51  daniel