www

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

binarytree.hl.rkt (256B)

      1 #lang type-expander
      2 
      3 (provide BinaryTree)
      4 
      5 (require (for-syntax syntax/parse
      6                      phc-toolkit/aliases))
      7 
      8 (define-type-expander BinaryTree
      9   (syntax-parser
     10     [(_ leafⱼ …)
     11      ;; TODO: implement BinaryTree.
     12      #'(List leafⱼ …)]))