(global-extend 'core 'syntax-case (lambda (e r w ae) (define clause (lambda (y) (syntax-case y () [(pattern template) #'(pattern #t template)] [(pattern fender ...
Some results have been hidden because they may be inaccessible to you
Show inaccessible results