From 2478552240494247d25b923187534847ab78d583 Mon Sep 17 00:00:00 2001
From: marco <marco@freepascal.org>
Date: Tue, 21 Jan 2003 15:34:59 +0000
Subject: [PATCH]  * fix octal that broke 1.0.x

---
 rtl/bsd/bunxmacr.inc | 17 ++++++++++-------
 1 file changed, 10 insertions(+), 7 deletions(-)

diff --git a/rtl/bsd/bunxmacr.inc b/rtl/bsd/bunxmacr.inc
index 0557ff2e77..869b895cbe 100644
--- a/rtl/bsd/bunxmacr.inc
+++ b/rtl/bsd/bunxmacr.inc
@@ -51,35 +51,38 @@ end;
 
 function wifexited(status : cint): cint;
 begin
- wifexited:=cint((status AND &177) =0);
+ wifexited:=cint((status AND 127) =0);
 end;
 
 function wexitstatus(status : cint): cint;
 begin
- wexitstatus:=(status and &177) shr 8;
+ wexitstatus:=(status and 127) shr 8;
 end;
 
 function wstopsig(status : cint): cint;
 begin
- wstopsig:=(status and &177) shr 8;
+ wstopsig:=(status and 127) shr 8;
 end;
 
-const wstopped=&177;
+const wstopped=127;
 
 function wifsignaled(status : cint): cint;
 begin
- wifsignaled:=cint(((status and &177)<>wstopped) and ((status and &177)<>0));
+ wifsignaled:=cint(((status and 127)<>wstopped) and ((status and 127)<>0));
 end;
 
 function wtermsig(status : cint):cint;
 
 begin
- wtermsig:=cint(status and &177);
+ wtermsig:=cint(status and 127);
 end;
 
 {
   $Log$
-  Revision 1.1  2003-01-05 19:01:28  marco
+  Revision 1.2  2003-01-21 15:34:59  marco
+   * fix octal that broke 1.0.x
+
+  Revision 1.1  2003/01/05 19:01:28  marco
    * FreeBSD compiles now with baseunix mods.
 
   Revision 1.4  2002/11/12 14:19:46  marco