Index: /trunk/ccl/level-1/x86-trap-support.lisp
===================================================================
--- /trunk/ccl/level-1/x86-trap-support.lisp	(revision 5526)
+++ /trunk/ccl/level-1/x86-trap-support.lisp	(revision 5527)
@@ -83,10 +83,13 @@
                  (:fs :x86_float_state64_t)))
     (def-foreign-type nil
+        (:struct :portable_uc_stack
+                 (:ss_sp (:* :void))
+                 (:ss_size (:unsigned 64))
+                 (:ss_flags  (:signed 32))))
+    (def-foreign-type nil
         (:struct :portable_ucontext64
                  (:onstack (:signed 32))
                  (:sigmask (:unsigned 32))
-                 (:ss_sp :address)
-                 (:ss_size (:unsigned 64))
-                 (:ss_flags  (:signed 32))
+                 (:stack (:struct :portable_uc_stack))
                  (:link :address)
                  (:uc_mcsize (:unsigned 64))