Update of /project/climacs/cvsroot/climacs In directory common-lisp.net:/tmp/cvs-serv6292
Modified Files: base.lisp Log Message: Removed sb-impl::whitespacep, which is disappearing.
Date: Tue Aug 9 17:18:28 2005 Author: dmurray
Index: climacs/base.lisp diff -u climacs/base.lisp:1.41 climacs/base.lisp:1.42 --- climacs/base.lisp:1.41 Fri Aug 5 14:40:55 2005 +++ climacs/base.lisp Tue Aug 9 17:18:25 2005 @@ -185,8 +185,7 @@ (defun whitespacep (obj) "A predicate to ensure that an object is a whitespace character." (and (characterp obj) - #+sbcl (sb-impl::whitespacep obj) - #-sbcl (member obj '(#\Space #\Tab #\Newline #\Page)))) + (member obj '(#\Space #\Tab #\Newline #\Page #\Return))))
(defun forward-to-word-boundary (mark) "Move the mark forward to the beginning of the next word."