Changeset 14653 in project for chicken


Ignore:
Timestamp:
05/15/09 14:48:26 (11 years ago)
Author:
felix winkelmann
Message:

case-lambda uses eq? instead of =; started convenience module chicken-base

Location:
chicken/trunk
Files:
1 added
1 edited

Legend:

Unmodified
Added
Removed
  • chicken/trunk/chicken-syntax.scm

    r14133 r14653  
    771771                                                 #t
    772772                                                 `(,(r '>=) ,lvar ,a2) )
    773                                              `(,(r '=) ,lvar ,a2) ) )
     773                                             `(,(r 'eq) ,lvar ,a2) ) )
    774774                                      ,(receive (vars1 vars2)
    775775                                           (split-at! (take vars argc) mincount)
Note: See TracChangeset for help on using the changeset viewer.