0.7.7.13:

[sbcl.git] / src / code / debug.lisp

diff --git a/src/code/debug.lisp b/src/code/debug.lisp
index 7ac9469..19f3896 100644 (file)
--- a/src/code/debug.lisp
+++ b/src/code/debug.lisp
@@ -291,7 +291,7 @@ Other commands:
   (code-location-selector (missing-arg) :type (or symbol integer) :read-only t)
   ;; the number used when listing the active breakpoints, and when
   ;; deleting breakpoints
-  (breakpoint-number (missing-arg) :type integer) :read-only t)
+  (breakpoint-number (missing-arg) :type integer :read-only t))
 
 (defun create-breakpoint-info (place breakpoint code-location-selector
                                     &key (break #'identity)