From 694cb972692fe87315603a39209fca4f5adfd597 Mon Sep 17 00:00:00 2001 From: Thiemo Seufer Date: Wed, 7 Sep 2005 23:04:46 +0000 Subject: [PATCH] Don't use signalling adds, we don't handle them. --- src/compiler/mips/debug.lisp | 4 ++-- version.lisp-expr | 2 +- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/src/compiler/mips/debug.lisp b/src/compiler/mips/debug.lisp index 8d0861d..58421c9 100644 --- a/src/compiler/mips/debug.lisp +++ b/src/compiler/mips/debug.lisp @@ -27,7 +27,7 @@ (:results (result :scs (descriptor-reg))) (:result-types *) (:generator 5 - (inst add sap object offset) + (inst addu sap object offset) (inst lw result sap 0) (inst nop))) @@ -54,7 +54,7 @@ (:result-types *) (:temporary (:scs (sap-reg) :from (:argument 1)) sap) (:generator 2 - (inst add sap object offset) + (inst addu sap object offset) (inst sw value sap 0) (move result value))) diff --git a/version.lisp-expr b/version.lisp-expr index ebccb0b..2c0821c 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.9.4.39" +"0.9.4.40" -- 1.7.10.4