1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-05 03:30:24 +02:00

Attempt to pop x87 stack

This commit is contained in:
Andy Wingo 2019-04-29 17:15:46 +02:00
parent 57b31f1111
commit d6eea0b499

View file

@ -441,7 +441,7 @@ fldsm(jit_state_t *_jit, int32_t md, int32_t rb, int32_t ri, int32_t ms)
static void
fstsm(jit_state_t *_jit, int32_t md, int32_t rb, int32_t ri, int32_t ms)
{
return x87rx(_jit, 012, md, rb, ri, ms);
return x87rx(_jit, 013, md, rb, ri, ms);
}
static void
@ -453,7 +453,7 @@ fldlm(jit_state_t *_jit, int32_t md, int32_t rb, int32_t ri, int32_t ms)
static void
fstlm(jit_state_t *_jit, int32_t md, int32_t rb, int32_t ri, int32_t ms)
{
return x87rx(_jit, 052, md, rb, ri, ms);
return x87rx(_jit, 053, md, rb, ri, ms);
}
#endif