[climacs-cvs] CVS update: climacs/base-test.lisp

[Aleksandar Bakic]

Update of /project/climacs/cvsroot/climacs
In directory common-lisp.net:/tmp/cvs-serv14951

Modified Files:
	base-test.lisp 
Log Message:
Test changes due to a change in whitespacep.

Date: Sun Jul 17 19:20:27 2005
Author: abakic

Index: climacs/base-test.lisp
diff -u climacs/base-test.lisp:1.13 climacs/base-test.lisp:1.14
--- climacs/base-test.lisp:1.13	Sun Mar 13 21:51:48 2005
+++ climacs/base-test.lisp	Sun Jul 17 19:20:27 2005
@@ -467,7 +467,7 @@
    (not (null (whitespacep #\Tab)))
    (not (null (whitespacep " ")))
    (not (null (whitespacep #\Null))))
-  nil nil t t nil nil)
+  nil t t t nil nil)
 
 (defmultitest forward-to-word-boundary.test-1
   (let ((buffer (make-instance %%buffer)))
@@ -953,8 +953,7 @@
       (values
        (offset m)
        (buffer-sequence buffer 0 (size buffer)))))
-  1 "
-climacs   ")
+  0 "climacs   ")
 
 (defmultitest fill-line.test-1
   (let ((buffer (make-instance %%buffer)))