diff -up cmucl-19e/src/lisp/x86-assem.S.gcc43 cmucl-19e/src/lisp/x86-assem.S
--- cmucl-19e/src/lisp/x86-assem.S.gcc43 2007-07-06 03:04:39.000000000 -0500
+++ cmucl-19e/src/lisp/x86-assem.S 2008-03-14 19:07:35.000000000 -0500
@@ -81,7 +81,7 @@ FUNCDEF(call_into_c)
/* Check for a return FP value */
fxam
- fnstsw %eax
+ fnstsw %ax
andl $0x4500,%eax
cmpl $0x4100,%eax
jne Lfp_rtn_value