Explorar o código

test suite: cosmetic changes

Anton Vodonosov %!s(int64=13) %!d(string=hai) anos
pai
achega
6fd8448b55
Modificáronse 1 ficheiros con 7 adicións e 7 borrados
  1. 7 7
      test/test.lisp

+ 7 - 7
test/test.lisp

@@ -42,21 +42,21 @@ hasn't been invoked, signals an ERROR."
   are invoked when we call functions from common-lisp package
   on that stream.
 
-  Some for the gray generic functions are only invoked by default
+  Some of the gray generic functions are only invoked by default
   methods of other generic functions:
 
-  cl:format ~t or cl:pprint -> stream-advance-to-column -> stream-line-column
-                                                           stream-write-char
-  cl:fresh-line -> stream-fresh-line -> stream-start-line-p -> stream-line-column
-                                        stream-terpri
+      cl:format ~t or cl:pprint -> stream-advance-to-column -> stream-line-column
+                                                               stream-write-char
+      cl:fresh-line -> stream-fresh-line -> stream-start-line-p -> stream-line-column
+                                            stream-terpri
 
 
   If we define our methods for stream-advance-to-column and stream-fresh-line,
   then stream-start-line-p, stream-terpri, stram-line-column are not invoked.
 
   Therefore we define another gray stream class. The first class is used
-  for all lower level functions (stream-terpri) and the second class
-  defines higher level functions (stream-fresh-line)
+  for all lower level functions (stream-terpri). The second class
+  is used to test methods for higher level functions (stream-fresh-line).
 |#
 
 (defclass test-stream (fundamental-binary-input-stream