X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Froom.lisp;h=0faffaed3d2fc71ab31f7bcd2d1a81e24be713ba;hb=f9aaac53a4a43ebae198f53079857acb2d628eb0;hp=8c7e450e0d4f98be179d9de61691e24b1a678fe7;hpb=902e93736a0888aa6b04dc328b1eb328423bf426;p=sbcl.git

diff --git a/src/code/room.lisp b/src/code/room.lisp
index 8c7e450..0faffae 100644
--- a/src/code/room.lisp
+++ b/src/code/room.lisp
@@ -69,11 +69,15 @@
 		 (simple-vector-widetag . 2)
 		 (simple-array-unsigned-byte-2-widetag . -2)
 		 (simple-array-unsigned-byte-4-widetag . -1)
+		 (simple-array-unsigned-byte-7-widetag . 0)
 		 (simple-array-unsigned-byte-8-widetag . 0)
+		 (simple-array-unsigned-byte-15-widetag . 1)
 		 (simple-array-unsigned-byte-16-widetag . 1)
+		 (simple-array-unsigned-byte-31-widetag . 2)
 		 (simple-array-unsigned-byte-32-widetag . 2)
 		 (simple-array-signed-byte-8-widetag . 0)
 		 (simple-array-signed-byte-16-widetag . 1)
+		 (simple-array-unsigned-byte-29-widetag . 2)
 		 (simple-array-signed-byte-30-widetag . 2)
 		 (simple-array-signed-byte-32-widetag . 2)
 		 (simple-array-single-float-widetag . 2)