master: arm64, callbacks: return float results in the right register
stassats via Sbcl-commits <[email protected]>
| Newsgroups | gmane.lisp.steel-bank.cvs |
|---|---|
| Message-ID | <[email protected]> |
The branch "master" has been updated in SBCL:
via f1109de3da81a64f388e09eb221f62329afae03d (commit)
from 3d222e98b20cc840dacd6624329eceb69f320e20 (commit)
- Log -----------------------------------------------------------------
commit f1109de3da81a64f388e09eb221f62329afae03d
Author: Stas Boukarev <[email protected]>
Date: Thu Apr 23 13:28:19 2026 +0300
arm64, callbacks: return float results in the right register
---
src/compiler/arm64/c-call.lisp | 8 ++++----
1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/src/compiler/arm64/c-call.lisp b/src/compiler/arm64/c-call.lisp
index 129c87fe0..e48022704 100644
--- a/src/compiler/arm64/c-call.lisp
+++ b/src/compiler/arm64/c-call.lisp
@@ -869,10 +869,10 @@
result-type))
(loadw r0-tn nsp-tn))
((alien-float-type-p result-type)
- (loadw (make-tn fp-registers
- (if (alien-single-float-type-p result-type)
- 'single-reg
- 'double-reg))
+ (loadw (make-tn 0
+ (if (alien-single-float-type-p result-type)
+ 'single-reg
+ 'double-reg))
nsp-tn))
((alien-void-type-p result-type))
;; Struct return types
-----------------------------------------------------------------------
hooks/post-receive
--
SBCL