Changeset 11159


Ignore:
Timestamp:
Oct 18, 2008, 6:19:44 PM (11 years ago)
Author:
gz
Message:

Fix order of args in error message

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/lib/encapsulate.lisp

    r11135 r11159  
    222222     (if (or (null spec) (special-operator-p spec) (macro-function spec))
    223223       (if error-p
    224          (error "Cannot trace or advise ~a~S" spec
     224         (error "Cannot trace or advise ~a~S"
    225225                (cond ((null spec) "")
    226226                      ((special-operator-p spec) "special operator ")
    227                       (t "macro ")))
     227                      (t "macro "))
     228                spec)
    228229         nil)
    229230       (if (or (fboundp spec)
Note: See TracChangeset for help on using the changeset viewer.