naturalEven.clj

 {:c
  ({:c ({:c (" "), :t :whitespace-chunk}), :t :whsp}
   {:c
    ({:c
      ({:c
        ({:c
          ({:c
            ({:c
              ({:c
                ({:c
                  ({:c
                    ({:c
                      ({:c
                        ({:c
                          ({:c
                            ({:c
                              ({:c
                                ({:c
                                  ({:c
                                    ({:c
                                      ({:c
                                        ({:c
                                          ({:c
                                            ({:c
                                              ({:c
                                                ({:c ({:c ("N"), :t :ALPHA}),
                                                  :t :simple-label-first-char}
                                                 {:c ({:c ("a"), :t :ALPHA}),
                                                  :t :simple-label-next-char}
                                                 {:c ({:c ("t"), :t :ALPHA}),
                                                  :t :simple-label-next-char}
                                                 {:c ({:c ("u"), :t :ALPHA}),
                                                  :t :simple-label-next-char}
                                                 {:c ({:c ("r"), :t :ALPHA}),
                                                  :t :simple-label-next-char}
                                                 {:c ({:c ("a"), :t :ALPHA}),
                                                  :t :simple-label-next-char}
                                                 {:c ({:c ("l"), :t :ALPHA}),
                                                  :t :simple-label-next-char}
                                                 {:c ("/"), :t :simple-label-next-char}
                                                 {:c ({:c ("e"), :t :ALPHA}),
                                                  :t :simple-label-next-char}
                                                 {:c ({:c ("v"), :t :ALPHA}),
                                                  :t :simple-label-next-char}
                                                 {:c ({:c ("e"), :t :ALPHA}),
                                                  :t :simple-label-next-char}
                                                 {:c ({:c ("n"), :t :ALPHA}),
                                                  :t :simple-label-next-char}),
                                                :t :simple-label}),
                                              :t :label}),
                                            :t :any-label}),
                                          :t :identifier}),
                                        :t :primitive-expression}),
                                      :t :selector-expression}),
                                    :t :import-expression}),
                                  :t :application-expression}),
                                :t :not-equal-expression}),
                              :t :equal-expression}),
                            :t :times-expression}),
                          :t :combine-types-expression}),
                        :t :prefer-expression}),
                      :t :combine-expression}),
                    :t :and-expression}),
                  :t :list-append-expression}),
                :t :text-append-expression}),
              :t :plus-expression}),
            :t :or-expression}),
          :t :import-alt-expression}),
        :t :operator-expression}),
      :t :annotated-expression}),
    :t :expression}
   {:c
    ({:c (" "), :t :whitespace-chunk}
     {:c
      ({:c
        ("{-"
         {:c
          ({:c (" "), :t :block-comment-chunk}
           {:c
            ({:c (" "), :t :block-comment-chunk}
             {:c
              ({:c ("-"), :t :block-comment-chunk}
               {:c
                ({:c ("}"), :t :block-comment-chunk}
                 {:c
                  ({:c (" "), :t :block-comment-chunk}
                   {:c
                    ({:c ("2"), :t :block-comment-chunk}
                     {:c
                      ({:c (" "), :t :block-comment-chunk}
                       {:c
                        ({:c ("{"), :t :block-comment-chunk}
                         {:c
                          ({:c ("-"), :t :block-comment-chunk}
                           {:c
                            ({:c (" "), :t :block-comment-chunk}
                             {:c ("-}"), :t :block-comment-continue}),
                            :t :block-comment-continue}),
                          :t :block-comment-continue}),
                        :t :block-comment-continue}),
                      :t :block-comment-continue}),
                    :t :block-comment-continue}),
                  :t :block-comment-continue}),
                :t :block-comment-continue}),
              :t :block-comment-continue}),
            :t :block-comment-continue}),
          :t :block-comment-continue}),
        :t :block-comment}),
      :t :whitespace-chunk}),
    :t :whsp}),
  :t :complete-expression}

naturalEven2.clj

{:c
  ({:c ({:c (" "), :t :whitespace-chunk}), :t :whsp}
   {:c
    ({:c
      ({:c
        ({:c
          ({:c
            ({:c
              ({:c
                ({:c
                  ({:c
                    ({:c
                      ({:c
                        ({:c
                          ({:c
                            ({:c
                              ({:c
                                ({:c
                                  ({:c
                                    ({:c
                                      ({:c
                                        ({:c
                                          ({:c
                                            ({:c
                                              ({:c
                                                ({:c ({:c ("N"), :t :ALPHA}),
                                                  :t :simple-label-first-char}
                                                 {:c ({:c ("a"), :t :ALPHA}),
                                                  :t :simple-label-next-char}
                                                 {:c ({:c ("t"), :t :ALPHA}),
                                                  :t :simple-label-next-char}
                                                 {:c ({:c ("u"), :t :ALPHA}),
                                                  :t :simple-label-next-char}
                                                 {:c ({:c ("r"), :t :ALPHA}),
                                                  :t :simple-label-next-char}
                                                 {:c ({:c ("a"), :t :ALPHA}),
                                                  :t :simple-label-next-char}
                                                 {:c ({:c ("l"), :t :ALPHA}),
                                                  :t :simple-label-next-char}
                                                 {:c ("/"), :t :simple-label-next-char}
                                                 {:c ({:c ("e"), :t :ALPHA}),
                                                  :t :simple-label-next-char}
                                                 {:c ({:c ("v"), :t :ALPHA}),
                                                  :t :simple-label-next-char}
                                                 {:c ({:c ("e"), :t :ALPHA}),
                                                  :t :simple-label-next-char}
                                                 {:c ({:c ("n"), :t :ALPHA}),
                                                  :t :simple-label-next-char}),
                                                :t :simple-label}),
                                              :t :label}),
                                            :t :any-label}),
                                          :t :identifier}),
                                        :t :primitive-expression}),
                                      :t :selector-expression}),
                                    :t :import-expression}
                                   {:c
                                    ({:c (" "), :t :whitespace-chunk}
                                     {:c
                                      ({:c
                                        ("{-"
                                         {:c
                                          ({:c (" "), :t :block-comment-chunk}
                                           {:c
                                            ({:c (" "), :t :block-comment-chunk}
                                             {:c ("-}"), :t :block-comment-continue}),
                                            :t :block-comment-continue}),
                                          :t :block-comment-continue}),
                                        :t :block-comment}),
                                      :t :whitespace-chunk}
                                     {:c (" "), :t :whitespace-chunk}),
                                    :t :whsp1}
                                   {:c
                                    ({:c
                                      ({:c
                                        ({:c ({:c ("2"), :t :DIGIT}), :t :natural-literal}),
                                        :t :primitive-expression}),
                                      :t :selector-expression}),
                                    :t :import-expression}),
                                  :t :application-expression}),
                                :t :not-equal-expression}),
                              :t :equal-expression}),
                            :t :times-expression}),
                          :t :combine-types-expression}),
                        :t :prefer-expression}),
                      :t :combine-expression}),
                    :t :and-expression}),
                  :t :list-append-expression}),
                :t :text-append-expression}),
              :t :plus-expression}),
            :t :or-expression}),
          :t :import-alt-expression}),
        :t :operator-expression}),
      :t :annotated-expression}),
    :t :expression}
   {:c
    ({:c (" "), :t :whitespace-chunk}
     {:c
      ({:c
        ("{-"
         {:c ({:c (" "), :t :block-comment-chunk} {:c ("-}"), :t :block-comment-continue}),
          :t :block-comment-continue}),
        :t :block-comment}),
      :t :whitespace-chunk}),
    :t :whsp}),
  :t :complete-expression}