From 50f15995a86506f1ae666722f2af541a824eef1d Mon Sep 17 00:00:00 2001 From: Thiemo Seufer Date: Thu, 8 Sep 2005 07:23:06 +0000 Subject: [PATCH] Small mips-vm.lisp improvement, lifted from the ppc version. --- src/code/mips-vm.lisp | 3 +++ version.lisp-expr | 2 +- 2 files changed, 4 insertions(+), 1 deletion(-) diff --git a/src/code/mips-vm.lisp b/src/code/mips-vm.lisp index a378b89..ec9f919 100644 --- a/src/code/mips-vm.lisp +++ b/src/code/mips-vm.lisp @@ -1,3 +1,5 @@ +;;; This file contains the MIPS specific runtime stuff. +;;; (in-package "SB!VM") @@ -19,6 +21,7 @@ ;;;; FIXUP-CODE-OBJECT (defun fixup-code-object (code offset value kind) + (declare (type index offset)) (unless (zerop (rem offset n-word-bytes)) (error "Unaligned instruction? offset=#x~X." offset)) (sb!sys:without-gcing diff --git a/version.lisp-expr b/version.lisp-expr index 210cfe6..384871d 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.44" +"0.9.4.45" -- 1.7.10.4