mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-05-01 04:10:18 +02:00
parent
498f3f9568
commit
a0028723da
1 changed files with 1 additions and 1 deletions
|
@ -361,7 +361,7 @@
|
||||||
#define BR_F64_ARITHMETIC(crel) \
|
#define BR_F64_ARITHMETIC(crel) \
|
||||||
{ \
|
{ \
|
||||||
scm_t_uint32 a, b; \
|
scm_t_uint32 a, b; \
|
||||||
scm_t_uint64 x, y; \
|
double x, y; \
|
||||||
UNPACK_24 (op, a); \
|
UNPACK_24 (op, a); \
|
||||||
UNPACK_24 (ip[1], b); \
|
UNPACK_24 (ip[1], b); \
|
||||||
x = SP_REF_F64 (a); \
|
x = SP_REF_F64 (a); \
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue