From bc8a91ee21e65bb4d82cb3d19c670b25597606d7 Mon Sep 17 00:00:00 2001
From: cshapiro <cshapiro>
Date: Sun, 22 Jul 2007 05:39:39 +0000
Subject: [PATCH] Remove the first member of the FreeBSD sigcontext structure
 so that it matches the layout of an mcontext.  Also, remove an older FreeBSD
 sigcontext definition.

---
 code/x86-vm.lisp | 27 ++-------------------------
 1 file changed, 2 insertions(+), 25 deletions(-)

diff --git a/code/x86-vm.lisp b/code/x86-vm.lisp
index 371f797b7..34f2e36c2 100644
--- a/code/x86-vm.lisp
+++ b/code/x86-vm.lisp
@@ -7,7 +7,7 @@
 ;;; Scott Fahlman or slisp-group@cs.cmu.edu.
 ;;;
 (ext:file-comment
-  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/x86-vm.lisp,v 1.25 2007/07/12 06:38:28 cshapiro Exp $")
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/x86-vm.lisp,v 1.26 2007/07/22 05:39:39 cshapiro Exp $")
 ;;;
 ;;; **********************************************************************
 ;;;
@@ -83,32 +83,9 @@
     (fpstate (array char 512))))
 
 ;;; for FreeBSD
-#+(and freebsd (not freebsd4))
+#+freebsd
 (def-alien-type sigcontext
     (struct nil
-	(sc-onstack unsigned-int)
-	(sc-mask    unsigned-int)
-	(sc-sp      unsigned-int)
-	(sc-fp	    unsigned-int)
-	(sc-isp	    unsigned-int)
-	(sc-pc	    unsigned-int)
-	(sc-efl     unsigned-int)		; sc_ps
-	(sc-es	    unsigned-int)
-	(sc-ds	    unsigned-int)
-	(sc-cs	    unsigned-int)
-	(sc-ss	    unsigned-int)
-	(sc-edi	    unsigned-int)
-	(sc-esi	    unsigned-int)
-	(sc-ebx	    unsigned-int)
-	(sc-edx	    unsigned-int)
-	(sc-ecx	    unsigned-int)
-	(sc-eax	    unsigned-int)))
-
-;;; FreeBSD 4.0 has a sigcontext that looks more like Linux.
-#+freebsd4
-(def-alien-type sigcontext
-    (struct nil
-	(sc-mask    (array unsigned-int 4))
 	(sc-onstack unsigned-int)
 	(sc-gs      unsigned-int)
 	(sc-fs      unsigned-int)
-- 
GitLab