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

Port r11810 (fixes to various format/warn/etc. calls) to 1.3 branch.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • release/1.3/source/library/loop.lisp

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