From 4f45338a22a0206247251a73b7468b5c98c5aa28 Mon Sep 17 00:00:00 2001 From: Christophe Rhodes Date: Mon, 1 Mar 2004 15:08:21 +0000 Subject: [PATCH] 0.8.8.5: Implemented *-MOD32 on the PPC --- NEWS | 2 ++ src/compiler/ppc/arith.lisp | 1 + version.lisp-expr | 2 +- 3 files changed, 4 insertions(+), 1 deletion(-) diff --git a/NEWS b/NEWS index b82246e..c66aa88 100644 --- a/NEWS +++ b/NEWS @@ -2317,6 +2317,8 @@ changes in sbcl-0.8.9 relative to sbcl-0.8.8: * The runtime build system has been tweaked to support building (on SPARC/SunOS) using a C compiler which invokes Sun's own assembler and linker. (thanks to Nikodemus Siivola) + * optimization: implemented multiplication as a modular + (UNSIGNED-BYTE 32) operation on the PPC backend. planned incompatible changes in 0.8.x: * (not done yet, but planned:) When the profiling interface settles diff --git a/src/compiler/ppc/arith.lisp b/src/compiler/ppc/arith.lisp index fd098de..9004b6d 100644 --- a/src/compiler/ppc/arith.lisp +++ b/src/compiler/ppc/arith.lisp @@ -491,6 +491,7 @@ (:translate ,mfun-name)))))))) (define-modular-backend + t) (define-modular-backend - t) + (define-modular-backend * t) (define-modular-backend logxor t) (define-modular-backend logeqv) (define-modular-backend lognand) diff --git a/version.lisp-expr b/version.lisp-expr index 0ca4f36..1c9e321 100644 --- a/version.lisp-expr +++ b/version.lisp-expr @@ -17,4 +17,4 @@ ;;; checkins which aren't released. (And occasionally for internal ;;; versions, especially for internal versions off the main CVS ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".) -"0.8.8.4" +"0.8.8.5" -- 1.7.10.4