From: Gabor Melis <mega@hotpop.com>
Date: Tue, 21 Apr 2009 07:33:10 +0000 (+0000)
Subject: 1.0.27.10: fix call_into_lisp return value on x86-64
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=0c03532f057150d4fba7eae9dc6ff3a7709f1f6f;p=sbcl.git

1.0.27.10: fix call_into_lisp return value on x86-64
---

diff --git a/src/runtime/x86-64-assem.S b/src/runtime/x86-64-assem.S
index 1b4ac54..fb12a06 100644
--- a/src/runtime/x86-64-assem.S
+++ b/src/runtime/x86-64-assem.S
@@ -235,7 +235,7 @@ LsingleValue:
 
 /* FIXME Restore the NPX state. */
 
-	/* return value is already in rax where lisp expects it */
+	mov	%rdx,%rax	# c-val
 	leave
 	ret
 	SIZE(GNAME(call_into_lisp))
diff --git a/version.lisp-expr b/version.lisp-expr
index 3ae4382..19cf88c 100644
--- a/version.lisp-expr
+++ b/version.lisp-expr
@@ -17,4 +17,4 @@
 ;;; checkins which aren't released. (And occasionally for internal
 ;;; versions, especially for internal versions off the main CVS
 ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".)
-"1.0.27.9"
+"1.0.27.10"