 
       (분석 "<http://자동.com/> 테스트>")
       [:문서 [:문단 [:자동링크 [:자동주소 "h" "t" "t" "p" "://" "자" "동" "." "c" "o" "m" "/"]]
-              " " "테" "스" "트" ">"]]
-      ))
+              " " "테" "스" "트" ">"]]))
 
   (testing "문단"
     (are [시도 결과] (= 시도 결과)
       (분석 "")
-      [:문서]
+      [:문서 [:문단]]
 
       (분석 "문장 하나\n문장 둘.\n\n")
       [:문서

    <ANY>        := #'.'
    공백         := ' '
    <LF>         := <'\\n'>
   "))

(deftest 분석테스트
  (testing "제목"
    (are [시도 결과] (= 시도 결과)
      (분석 "# 큰제목")

  (:require [instaparse.core :as insta]
            [clojure.test :refer :all]))

(def 파서
  (insta/parser
   "문서         := (제목 / 목록 / 문단)+
    문단         := 평문? LF
    <제목>       := (작은제목 / 큰제목) LF
    <평문>       := (링크들 / 강조 / ANY)+

    (* 제목 *)
    큰제목       := <'#' 공백> 평문 <공백? '#'>?
    작은제목     := <'##' 공백> 평문 <공백? '##'>?

    (* 목록 *)
    <목록>       := 일반목록 | 숫자목록
    일반목록     := (<'*' 공백> 항목 LF)+
    숫자목록     := (<숫자+ '.' 공백?> 항목 LF)+
    항목         := 평문

    (* 링크 *)
    <링크들>     := 일반링크 / 자동링크
