1.0.47.4: Fix slot-documentation for SB-POSIX:TERMIOS slot CC.

  * Unlike every other documentation string for a DEFINE-PROTOCOL-CLASS
slot, this one documentation string did not end in a period (#\.).
Fixed.

  * While we're at it, alter the DEFINE-PROTOCOL-CLASS macro to not
ignore DEFCLASS slot options after an :ARRAY-LENGTH option (reported
by mon_key in #lisp).

diff --git a/contrib/sb-posix/interface.lisp b/contrib/sb-posix/interface.lisp
index 3121397..7e10319 100644 (file)
--- a/contrib/sb-posix/interface.lisp
+++ b/contrib/sb-posix/interface.lisp
@@ -8,7 +8,11 @@
       (export ',name :sb-posix)
       (defclass ,name ,superclasses
         ,(loop for slotd in slots
-               collect (ldiff slotd (member :array-length slotd)))
+               ;; KLUDGE: Splice out :ARRAY-LENGTH options (they're
+               ;; for the conversion functions, not for DEFCLASS).
+               for array-length-option = (member :array-length slotd)
+               collect (append (ldiff slotd array-length-option)
+                               (cddr array-length-option)))
         ,@options)
       (declaim (inline ,to-alien ,to-protocol))
       (declaim (inline ,to-protocol ,to-alien))
@@ -601,7 +605,7 @@ not supported."
    (lflag :initarg :lflag :accessor sb-posix:termios-lflag
           :documentation "Local modes.")
    (cc :initarg :cc :accessor sb-posix:termios-cc :array-length nccs
-       :documentation "Control characters"))
+       :documentation "Control characters."))
   (:documentation "Instances of this class represent I/O
                    characteristics of the terminal."))
 

diff --git a/version.lisp-expr b/version.lisp-expr
index 7464b07..e046cda 100644 (file)
--- a/version.lisp-expr
+++ b/version.lisp-expr
@@ -20,4 +20,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".)
-"1.0.47.3"
+"1.0.47.4"