Changeset 14294


Ignore:
Timestamp:
Sep 21, 2010, 11:23:00 PM (9 years ago)
Author:
gb
Message:

In DEFCLASS: when complaining about an option keyword that's not
present in a vector of such keywords, coerce the vector to a list
for the error message.

File:
1 edited

Legend:

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

    r14258 r14294  
    21162116              (when illegal
    21172117                (signal-program-error "Class option~p~{ ~s~} is not one of ~s"
    2118                                       (length illegal) illegal keyvect))))
     2118                                      (length illegal) illegal (coerce keyvect 'list)))))
    21192119          `(progn
    21202120             (when (memq ',class-name *nx-known-declarations*)
Note: See TracChangeset for help on using the changeset viewer.