| author | Camm Maguire <camm@transcendence.maguirefamily.org> | 2025年05月01日 23:24:14 -0400 |
|---|---|---|
| committer | Camm Maguire <camm@transcendence.maguirefamily.org> | 2025年05月01日 23:24:14 -0400 |
| commit | 7a16ec8f8506b87fc23207a0218d7c786f3af7df (patch) | |
| tree | 6053f1d723cf6512cab2dd8950f90e12bdb9fe67 | |
| parent | dabc2226e6995862086b2e110dd631156c9f69d7 (diff) | |
| download | gcl-7a16ec8f8506b87fc23207a0218d7c786f3af7df.tar.gz | |
| -rw-r--r-- | gcl/h/386-macosx.h | 2 |
diff --git a/gcl/h/386-macosx.h b/gcl/h/386-macosx.h index d724430ed..f00069f9a 100644 --- a/gcl/h/386-macosx.h +++ b/gcl/h/386-macosx.h @@ -132,7 +132,7 @@ if (realpath (buf, fub) == 0) { \ #define UC(a_) ((ucontext_t *)a_) #define SF(a_) ((siginfo_t *)a_) -#define FPE_CODE(i_,v_) make_fixnum(FFN(fSfpe_code)(*(fixnum *)&UC(v_)->uc_mcontext->__fs.__fpu_fsw,UC(v_)->uc_mcontext->__fs.__fpu_mxcsr)) +#define FPE_CODE(i_,v_) make_fixnum((fixnum)FFN(fSfpe_code)(*(fixnum *)&UC(v_)->uc_mcontext->__fs.__fpu_fsw,UC(v_)->uc_mcontext->__fs.__fpu_mxcsr)) #define FPE_ADDR(i_,v_) make_fixnum(UC(v_)->uc_mcontext->__fs.__fpu_fop ? UC(v_)->uc_mcontext->__fs.__fpu_ip : (fixnum)SF(i_)->si_addr) #define FPE_CTXT(v_) list(3,make_fixnum((fixnum)&UC(v_)->uc_mcontext->__ss), \ make_fixnum((fixnum)&UC(v_)->uc_mcontext->__fs.__fpu_stmm0), \ |