From 479f13fd8b6b1a5ab3e18bebd75b517c2402075c Mon Sep 17 00:00:00 2001
From: taku0 <mxxouy6x3m_github@tatapa.org>
Date: Sat, 28 Dec 2019 15:15:01 +0900
Subject: [PATCH] Add pathological test for commonmark/cmark#178.

https://github.com/commonmark/commonmark.js/commit/903f35e87eb39b71b50f5a44b5a3e73e42ea95f4
Author: John MacFarlane <jgm@berkeley.edu>
Date:   Fri Aug 30 16:24:48 2019 -0700

Fix pathological case commonmark/cmark#178.

https://github.com/commonmark/commonmark.js/commit/34b8f654ac53d4481815ad448d70ea7f97955282
Author: John MacFarlane <jgm@berkeley.edu>
Date:   Fri Aug 30 16:28:09 2019 -0700
---
 test/cmark-test.el | 12 ++++++++++++
 1 file changed, 12 insertions(+)

diff --git a/test/cmark-test.el b/test/cmark-test.el
index 3c44f5d..9810856 100644
--- a/test/cmark-test.el
+++ b/test/cmark-test.el
@@ -361,6 +361,18 @@ Otherwise, MESSAGE is appended to the ERROR-BUFFER."
            cases)
           (setq x (* 10 x))))
 
+      (let ((x 1000))
+        (while (<= x 10000)
+          (push
+           (make-cmark--pathologicalTest
+            :name (concat
+                   (number-to-string x)
+                   " openers and closers multiple of 3")
+            :input (concat "a**b" (cmark--repeat "c* " x))
+            :expected (concat "<p>a**b" (cmark--repeat "c* " (1- x)) "c*</p>\n"))
+           cases)
+          (setq x (* 10 x))))
+
       (let ((x 1000))
         (while (<= x 10000)
           (push