Changeset 14970

Timestamp:

Sep 2, 2011, 1:56:22 AM (13 years ago)

Author:

Gary Byers

Message:

In ARM2-ELIDE-PUSHES: we only have 8 non-volatile DOUBLE-FLOAT registers.

File:

• trunk/source/compiler/ARM/arm2.lisp (modified) (1 diff)

trunk/source/compiler/ARM/arm2.lisp

@@ -2901 +2901 @@
                    (regs-set-in-vinsn-sequence push-vinsn pop-vinsn)
                  (declare (ignore used-gprs))
-                 (let* ((nfprs 16)
+                 ;; We have 16 non-volatile single-floats or 8
+                 ;; non-volatile double-floats
+                 (let* ((nfprs 8)
                         (free-fpr
                          (dotimes (r nfprs nil)