diff --git a/lisp/interrupt.c b/lisp/interrupt.c index 0194308f55d975e722b2dc28e5255f1945763e64..2c484f08f89687623ea8e3447dcff5787a5a0f03 100644 --- a/lisp/interrupt.c +++ b/lisp/interrupt.c @@ -1,4 +1,4 @@ -/* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/interrupt.c,v 1.22 2000/04/12 17:31:19 pw Exp $ */ +/* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/interrupt.c,v 1.23 2000/10/21 12:42:46 dtc Exp $ */ /* Interrupt handing magic. */ @@ -271,7 +271,8 @@ interrupt_handle_now(HANDLER_ARGS) * Restore the FPU control word, setting the rounding mode to nearest. */ - setfpucw(contextstruct.fpstate->cw & ~0xc00); + if (contextstruct.fpstate) + setfpucw(contextstruct.fpstate->cw & ~0xc00); #endif handler = interrupt_handlers[signal]; diff --git a/lisp/x86-arch.c b/lisp/x86-arch.c index e19f4fbe0ec8fd9ea91faff37c7d57152aba7314..97258867ae452bdb881cdf767e0691bcfe21b10d 100644 --- a/lisp/x86-arch.c +++ b/lisp/x86-arch.c @@ -1,6 +1,6 @@ /* x86-arch.c -*- Mode: C; comment-column: 40 -*- * - * $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/x86-arch.c,v 1.12 2000/09/05 08:51:52 dtc Exp $ + * $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/x86-arch.c,v 1.13 2000/10/21 12:42:46 dtc Exp $ * */ @@ -215,7 +215,8 @@ void sigtrap_handler(HANDLER_ARGS) * Restore the FPU control word, setting the rounding mode to nearest. */ - setfpucw(contextstruct.fpstate->cw & ~0xc00); + if (contextstruct.fpstate) + setfpucw(contextstruct.fpstate->cw & ~0xc00); #endif /*