Custom Query (1030 matches)

ns::wint-ns-affine-transform-struct presumably should be ns::with-ns-affine-transform-struct

I believe there is a typo in the (define-character-encoding :utf-32 ...) form in l1-unicode.lisp. Within it you find:

  :stream-encode-function
  #+ucs-4-stream-encode   <=== should be #' not #+
  :stream-decode-function
  #'ucs-4-stream-decode
  :vector-encode-function

I suspect there aren't many files in utf-32 format.

When entering an invalid symbol like "..." into the REPL, an internal error resulting from a typo is signalled.

Fix:

Index: l1-reader.lisp
===================================================================
--- l1-reader.lisp	(revision 8515)
+++ l1-reader.lisp	(working copy)
@@ -2407,7 +2407,7 @@
             (if (= len 1)
               (or dot-ok
                   (signal-reader-error stream "Dot context error in ~s." (%string-from-token tb)))
-              (signal-reader-error stream "Illegal symbol syntax in ~s. (%string-from-token tb)"))
+              (signal-reader-error stream "Illegal symbol syntax in ~s." (%string-from-token tb)))
             ;; Something other than a buffer full of dots.  Thank god.
             (let* ((num (if (null escapes)
                             (handler-case