Permalink
Browse files

fixup lifetime issues for x86 vops from evidence, not cargo-culting

  • Loading branch information...
1 parent c76ace9 commit ba533f82d0efcfac60353b9054641f1d9f948308 @froydnj committed Mar 23, 2012
Showing with 4 additions and 6 deletions.
  1. +4 −6 sbcl-opt/x86-vm.lisp
View
@@ -59,11 +59,9 @@
`(,result-type)))
,@(when (or setterp big-endian-p)
`((:temporary (:sc unsigned-reg :offset eax-offset
- :from (:argument ,(if setterp
- (if big-endian-p
- '(:load 0)
- '(:argument 0))
- '(:argument 2)))
+ :from ,(if setterp
+ '(:load 0)
+ '(:argument 2))
:to (:result 0)) eax)))
(:results (result :scs (,result-sc)))
(:result-types ,result-type)
@@ -128,7 +126,7 @@
`(,result-type)))
,@(when (and setterp big-endian-p)
`((:temporary (:sc unsigned-reg
- :from (:argument ,(if setterp 0 2))
+ :from (:load 0)
:to (:result 0)) temp)))
(:results (result :scs (,result-sc)))
(:result-types ,result-type)

0 comments on commit ba533f8

Please sign in to comment.