libguile20/libguile-2.0.11-arm-asm.patch

12 lines
484 B
Diff

--- guile-2.0.11/libguile/vm-i-scheme.c.orig 2016-05-16 11:11:30.490598931 +0200
+++ guile-2.0.11/libguile/vm-i-scheme.c 2016-05-16 11:12:00.738677032 +0200
@@ -363,7 +363,7 @@
{ \
scm_t_signed_bits rlo, rhi; \
asm ("smull %0, %1, %2, %3\n" \
- : "=r" (rlo), "=r" (rhi) \
+ : "=&r" (rlo), "=&r" (rhi) \
: "r" (SCM_UNPACK (x) - scm_tc2_int), \
"r" (SCM_I_INUM (y))); \
if (SCM_LIKELY (SCM_SRS (rlo, 31) == rhi)) \