Ignore:
Timestamp:
Jul 18, 2011, 11:33:04 PM (8 years ago)
Author:
gz
Message:

missing ~

File:
1 edited

Legend:

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

    r13067 r14888  
    427427(defun nthcdr-no-overflow (count list)
    428428  (if (or (> count (list-length list)) (< count 0))
    429     (format-error "non-existent target for ~*")
     429    (format-error "non-existent target for ~~*")
    430430    (nthcdr count list)))
    431431
Note: See TracChangeset for help on using the changeset viewer.