Changeset 5689

Timestamp:

Jan 5, 2007, 3:16:35 PM (18 years ago)

Author:

Gary Byers

Message:

Fix typo (ppc32::, not ppc2::).

File:

• trunk/ccl/level-0/l0-numbers.lisp (modified) (1 diff)

trunk/ccl/level-0/l0-numbers.lisp

@@ -467 +467 @@
   (if (and (eq int 0)(= sfloat 0.0s0))
     0
-    (#+32-bit-target ppc2::with-stack-short-floats #+32-bit-target ((s1 int))
+    (#+32-bit-target ppc32::with-stack-short-floats #+32-bit-target ((s1 int))
      #-32-bit-target let* #-32-bit-target ((s1 (%int-to-sfloat int)))
      (declare (short-float s1))