(define-syntax match-node
  (syntax-rules ()
    ((