www

Unnamed repository; edit this file 'description' to name the repository.
Log | Files | Refs | README

nop.rkt (206B)

      1 #lang racket
      2 (require syntax/parse
      3          (for-syntax syntax/parse
      4                      phc-toolkit/untyped))
      5 
      6 (provide ~nop)
      7 
      8 (define-syntax ~nop
      9   (pattern-expander
     10    (λ/syntax-case (_) () #'(~do))))