[Openmcl-cvs-notifications] r14954 - /trunk/source/compiler/ARM/arm-vinsns.lisp

[rme at clozure.com]

Author: rme
Date: Fri Aug 26 12:25:09 2011
New Revision: 14954

Log:
temp-push-single-float: :tsp attribute =3D> :csp (no tsp on ARM).

Modified:
    trunk/source/compiler/ARM/arm-vinsns.lisp

Modified: trunk/source/compiler/ARM/arm-vinsns.lisp
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D
--- trunk/source/compiler/ARM/arm-vinsns.lisp (original)
+++ trunk/source/compiler/ARM/arm-vinsns.lisp Fri Aug 26 12:25:09 2011
@@ -3155,7 +3155,7 @@
   (add sp sp (:$ (* 2 arm::dnode-size))))
 =

 =

-(define-arm-vinsn (temp-push-single-float :push :word :tsp :predicatable)
+(define-arm-vinsn (temp-push-single-float :push :word :csp :predicatable)
     =

     (()
      ((s :single-float))