Skip to content
Snippets Groups Projects
Commit bc8a91ee authored by cshapiro's avatar cshapiro
Browse files

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.
parent c2200240
No related branches found
No related tags found
No related merge requests found
......@@ -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)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment