/[cmucl]/src/code/x86-vm.lisp
ViewVC logotype

Diff of /src/code/x86-vm.lisp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.17 by pmai, Thu Dec 6 19:15:41 2001 UTC revision 1.18 by pmai, Mon Jan 28 20:17:09 2002 UTC
# Line 103  Line 103 
103          (sc-sp      unsigned-int)          (sc-sp      unsigned-int)
104          (sc-ss      unsigned-int)))          (sc-ss      unsigned-int)))
105    
106  ;;; OpenBSD also has a sigcontext that looks more like Linux.  ;;; OpenBSD/NetBSD also have sigcontext structs that look more like Linux.
107  #+openbsd  #+openbsd
108  (def-alien-type sigcontext  (def-alien-type sigcontext
109      (struct nil      (struct nil
# Line 129  Line 129 
129          (sc-err     unsigned-int)          (sc-err     unsigned-int)
130          ))          ))
131    
132    #+netbsd
133    (def-alien-type sigcontext
134        (struct nil
135            (sc-gs      unsigned-int)
136            (sc-fs      unsigned-int)
137            (sc-es      unsigned-int)
138            (sc-ds      unsigned-int)
139            (sc-edi     unsigned-int)
140            (sc-esi     unsigned-int)
141            (sc-fp      unsigned-int) ;; ebp
142            (sc-ebx     unsigned-int)
143            (sc-edx     unsigned-int)
144            (sc-ecx     unsigned-int)
145            (sc-eax     unsigned-int)
146            (sc-pc      unsigned-int)
147            (sc-cs      unsigned-int)
148            (sc-efl     unsigned-int)               ; sc_ps
149            (sc-sp      unsigned-int)
150            (sc-ss      unsigned-int)
151            (sc-onstack unsigned-int)
152            ;; Old NetBSD 1.3 signal mask
153            (sc-oldmask unsigned-int)
154            (sc-trapno  unsigned-int)
155            (sc-err     unsigned-int)
156            ;; New signal mask (post NetBSD 1.3)
157            (sc-mask    (array unsigned-int 4))
158            ))
159    
160  ;; For Linux...  ;; For Linux...
161  #+linux  #+linux
162  (def-alien-type sigcontext  (def-alien-type sigcontext

Legend:
Removed from v.1.17  
changed lines
  Added in v.1.18

  ViewVC Help
Powered by ViewVC 1.1.5