X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=inline;f=src%2Fcode%2Fmips-vm.lisp;h=365fbb99a25110bd60979f9d6f4a8d540e761de0;hb=581e3d62de8cb37e13ad9db63e5537c0f962be28;hp=6b0664e4a4ea1a1e04ebe65d6df8b9142a02626b;hpb=c716f6ea5255afeb33a1181535b5c067aa9d6aaa;p=sbcl.git

diff --git a/src/code/mips-vm.lisp b/src/code/mips-vm.lisp
index 6b0664e..365fbb9 100644
--- a/src/code/mips-vm.lisp
+++ b/src/code/mips-vm.lisp
@@ -14,8 +14,8 @@
   #!-little-endian "big-endian")
 
 
-;;; FIXUP-CODE-OBJECT -- Interface
-;;;
+;;;; FIXUP-CODE-OBJECT
+
 (defun fixup-code-object (code offset value kind)
   (unless (zerop (rem offset n-word-bytes))
     (error "Unaligned instruction?  offset=#x~X." offset))