Loading disk.lisp +2 −3 Original line number Diff line number Diff line Loading @@ -68,8 +68,7 @@ (deftype ascii-string () '(or #+sb-unicode simple-base-string ; on #-sb-unicode the limit is 255 (and simple-string (satisfies ascii-string-p)))) (satisfies ascii-string-p))) (defun ascii-string-p (string) (declare (simple-string string)) Loading Loading
disk.lisp +2 −3 Original line number Diff line number Diff line Loading @@ -68,8 +68,7 @@ (deftype ascii-string () '(or #+sb-unicode simple-base-string ; on #-sb-unicode the limit is 255 (and simple-string (satisfies ascii-string-p)))) (satisfies ascii-string-p))) (defun ascii-string-p (string) (declare (simple-string string)) Loading