Changeset 11855 for trunk/source/library


Ignore:
Timestamp:
Mar 28, 2009, 4:44:12 AM (11 years ago)
Author:
rme
Message:

Merge r11810 (fixes to various format/warn/etc. calls).

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/library/loop.lisp

    r11805 r11855  
    19451945  (cond ((or (cdr prep-phrases) (not (member (caar prep-phrases) '(:in :of))))
    19461946         (loop-error "Too many prepositions!"))
    1947         ((null prep-phrases) (loop-error "Missing OF or IN in ~S iteration path.")))
     1947        ((null prep-phrases) (loop-error "Missing OF or IN in iteration path." )))
    19481948  (let ((ht-var (loop-gentemp 'loop-hashtab-))
    19491949        (next-fn (loop-gentemp 'loop-hashtab-next-))
Note: See TracChangeset for help on using the changeset viewer.