1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-29 14:30:34 +02:00

VM: ASM_ADD and ASM_SUB for x86: clobber _CX not "rcx".

* libguile/vm-i-scheme.c (ASM_ADD, ASM_SUB): Clobber _CX not "rcx".
This commit is contained in:
Mark H Weaver 2013-08-04 19:39:43 -04:00
parent afa3c37ddc
commit 48b6f151c7

View file

@ -262,7 +262,7 @@ VM_DEFINE_FUNCTION (149, ge, "ge?", 2)
: /* no outputs */ \
: "r" (x), "r" (y), \
[vsp] "r" (sp), [tag] "i" (scm_tc2_int) \
: "rcx", "memory", "cc" \
: _CX, "memory", "cc" \
: slow_add); \
NEXT; \
} \
@ -280,7 +280,7 @@ VM_DEFINE_FUNCTION (149, ge, "ge?", 2)
: /* no outputs */ \
: "r" (x), "r" (y), \
[vsp] "r" (sp), [tag] "i" (scm_tc2_int) \
: "rcx", "memory", "cc" \
: _CX, "memory", "cc" \
: slow_sub); \
NEXT; \
} \