(define header-tags
  (sequence* ((tags (one-or-more tag))
              (_ tag-delim)
              (_ (zero-or-more whitespace))
              (_ (any-of nl end-of-input)))
    (result tags)))