     (* 인용 *)
     인용         := (<'>' 공백?> (빈줄 / 평문) LF)+
     빈줄         := 공백*
+
+    (* 원문 *)
+    원문         := (<공백 공백 공백 공백> ANY* '\\n')+
 
     (* 링크 *)
     <링크들>     := 일반링크 / 자동링크


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

            (str 텍스트 "\n"))))

(deftest 분석테스트
  (testing "원문"
    (are [시도 결과] (= 시도 결과)
      (분석 "    원문 텍스트는 줄넘김\n    문자도 유지")
      [:문서 [:원문 "원" "문" " " "텍" "스" "트" "는" " "
              "줄" "넘" "김" "\n" "문" "자" "도" " " "유" "지" "\n"]]

      (분석 "    원문 텍스트는 *강조*처리 제외")))

  (testing "인용"
    (are [시도 결과] (= 시도 결과)
      (분석 "> 짜라투스트라는 *이렇게* 말했다")
