Custom Query (1030 matches)

GET-DISPATCH-MACRO-CHARACTER complains about a character not being a dispatch macro character even after that character was just made one by MAKE-DISPATCH-MACRO-CHARACTER.

Test case:

  (flet ((dispatch-macro-char-p (char &optional (rt *readtable*))
           (handler-case
               (prog1 t
                 (get-dispatch-macro-character char #\x rt))
             (error () nil))))
    (let ((*readtable* (copy-readtable nil)))
      (values (dispatch-macro-char-p #\$)
              (make-dispatch-macro-character #\$ nil)
              (dispatch-macro-char-p #\$))))

  Expected: NIL, T, T
  Actual:   NIL, T, NIL

Fix attached.

-T.

There's a Trac contrib script that can be used as an svn post-commit-hook which will look through the commit log for references to tickets and update the tickets automagically. This would be a handy feature.

The file scripts/makedmg starts with a blank line, moving the #! declaration to line two.

This is presumably unintentional.