Changeset 40134 in project


Ignore:
Timestamp:
05/24/21 22:41:43 (3 weeks ago)
Author:
Idiomdrottning
Message:
 
File:
1 edited

Legend:

Unmodified
Added
Removed
  • wiki/eggref/5/match-generics

    r40131 r40134  
    6363Each generic is defined using a clause from [[http://wiki.call-cc.org/eggref/5/matchable|matchable]]!
    6464
    65 The implementation using some miscellaneous [[https://idiomdrottning.org/brev-separate|brev-separate]] stuff is just
 '''six lines!'''
     65The implementation using some miscellaneous [[https://idiomdrottning.org/brev-separate|brev-separate]] stuff is just
 '''five lines!'''
    6666
    6767 (define-for-syntax gentable (call-table*))
    6868 (define-ir-syntax*
    69    define-generic
    70    ((define-generic (name . pattern) . body)
    71     (cons 'match-define
    72           (gentable (strip-syntax name) (cons (cons name pattern) body)))))
     69   (define-generic (name . pattern) . body)
     70   (cons 'match-define
     71         (gentable (strip-syntax name) (cons (cons name pattern) body)))))
    7372
    7473For source code,
Note: See TracChangeset for help on using the changeset viewer.