Changeset 14626


Ignore:
Timestamp:
Feb 2, 2011, 4:33:27 AM (9 years ago)
Author:
gb
Message:

Use the METHOD object's lambda-list (not the METHOD-FUNCTION's)
when determining lambda-list congruency.

This seems to fix ticket:600.

File:
1 edited

Legend:

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

    r14558 r14626  
    846846                                    error-p gbits mbits gkeys)
    847847  (unless gbits (setq gbits (inner-lfun-bits gf)))
    848   (unless mbits (setq mbits (lfun-bits (%method-function method))))
     848  (unless mbits (setq mbits (encode-lambda-list (%method-lambda-list method))))
    849849  (and (congruent-lfbits-p gbits mbits)
    850850       (or (and (or (logbitp $lfbits-rest-bit mbits)
Note: See TracChangeset for help on using the changeset viewer.