Changeset 508

Timestamp:

Feb 8, 2004, 6:11:26 PM (21 years ago)

Author:

Gary Byers

Message:

%%SCALE-DFLOAT reserved 16 bytes on tsp, but used 24.

File:

• trunk/ccl/level-0/PPC/ppc-float.lisp (modified) (1 diff)

trunk/ccl/level-0/PPC/ppc-float.lisp

@@ -404 +404 @@
     (lwz imm0 ppc32::double-float.value float)
     (lwz imm1 ppc32::double-float.val-low float)
-    (stwu tsp -16 tsp)
+    (stwu tsp -24 tsp)
     (stw tsp 4 tsp)
     (stw imm0 fl.h tsp)