(define boolean
  (lambda (_)
   (fprintf (current-error-port) "HELLO\n")
   (pp (parse fail _) (current-error-port))
   (fprintf (current-error-port) "HELLO\n")
    (s11n4j-abort "boolean not implemented!")))