From bb144c9d0f653d19d32bb1a703b445a651cb131f Mon Sep 17 00:00:00 2001 From: Raymond Toy <toy.raymond@gmail.com> Date: Tue, 1 Jan 2013 10:34:38 -0800 Subject: [PATCH] Micro-optimization for move-from-signed, eliminating one inst. --- src/compiler/sparc/move.lisp | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/src/compiler/sparc/move.lisp b/src/compiler/sparc/move.lisp index 6ad7391f9..7b683b5c0 100644 --- a/src/compiler/sparc/move.lisp +++ b/src/compiler/sparc/move.lisp @@ -260,8 +260,7 @@ ;; Frode Vatvedt Fjeld: (zerop (logand #b110 (1+ temp))) (inst srln temp x positive-fixnum-bits) (inst add temp 1) - (inst and temp #b110) - (inst cmp temp) + (inst andcc temp #b110) (inst b :eq done) (inst slln y x fixnum-tag-bits) -- GitLab