Changeset 905


Ignore:
Timestamp:
Feb 16, 2005, 6:41:58 PM (17 years ago)
Author:
bryan
Message:

allow #\+ in format directives.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/ccl/level-1/l1-format.lisp

    r6 r905  
    9696                    ((or (eq char #\V) (eq char #\v))
    9797                     (push (pop-format-arg) params))
    98                     ((or (eq char #\-) (digit-char-p char))
     98                    ((or (eq char #\-) (eq char #\+) (digit-char-p char))
    9999                     (let ((start (%i- i 1)) n)
    100100                       (loop
Note: See TracChangeset for help on using the changeset viewer.