Changeset 5913

Timestamp:

Feb 13, 2007, 5:09:50 PM (18 years ago)

Author:

Gary Byers

Message:

Fixup the x86-64 error-return callback trampiline code (was missing a byte
of machine code.)

File:

• trunk/ccl/examples/objc-support.lisp (modified) (1 diff)

trunk/ccl/examples/objc-support.lisp

@@ -211 +211 @@
 (defloadvar *x8664-objc-callback-error-return-trampoline*
     (let* ((code-bytes '(#x48 #x89 #xc7      ; movq %rax %rdi
-                         #x66 #x48 #x0f #x7e ; movd %xmm0,%rax
+                         #x66 #x48 #x0f #x7e #xc0 ; movd %xmm0,%rax
                          #x52                ; pushq %rdx
                          #xff #xe0))         ; jmp *rax