From: Thiemo Seufer <ths@networkno.de>
Date: Mon, 12 Sep 2005 14:00:30 +0000 (+0000)
Subject: 0.9.4.65:
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=32d12f1e914e0a2e16f099e2267101c12192b2a7;p=sbcl.git

0.9.4.65:
	Add missing definitions for object-not-list-trap,
	object-not-instance-trap, peudo-atomic-trap.
---

diff --git a/src/compiler/mips/insts.lisp b/src/compiler/mips/insts.lisp
index caefd16..2f53b2e 100644
--- a/src/compiler/mips/insts.lisp
+++ b/src/compiler/mips/insts.lisp
@@ -1069,6 +1069,8 @@
       (#.cerror-trap
        (nt "Cerror trap")
        (sb!disassem:handle-break-args #'snarf-error-junk stream dstate))
+      (#.object-not-list-trap
+       (nt "Object not list trap"))
       (#.breakpoint-trap
        (nt "Breakpoint trap"))
       (#.pending-interrupt-trap
@@ -1077,6 +1079,8 @@
        (nt "Halt trap"))
       (#.fun-end-breakpoint-trap
        (nt "Function end breakpoint trap"))
+      (#.object-not-instance-trap
+       (nt "Object not instance trap"))
     )))
 
 (define-instruction break (segment code &optional (subcode 0))
diff --git a/src/compiler/mips/parms.lisp b/src/compiler/mips/parms.lisp
index f6fe72e..5e0af59 100644
--- a/src/compiler/mips/parms.lisp
+++ b/src/compiler/mips/parms.lisp
@@ -107,7 +107,11 @@
   cerror
   breakpoint
   fun-end-breakpoint
-  after-breakpoint)
+  after-breakpoint
+  unused
+  pseudo-atomic
+  object-not-list
+  object-not-instance)
 
 (defenum (:prefix trace-table-)
   normal
diff --git a/version.lisp-expr b/version.lisp-expr
index dd499f0..aa3c684 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.64"
+"0.9.4.65"