checkpoint
[sbp.git] / tests / tibdoc.g
index f012231..80c8cef 100644 (file)
@@ -59,7 +59,7 @@ s                   = Doc
 Doc                 = head:Header body:Body  /ws
 Header              = H:: { "header" { KeyVal */ ws } /ws }
 Body                = B:: {Section}*/ws
 Doc                 = head:Header body:Body  /ws
 Header              = H:: { "header" { KeyVal */ ws } /ws }
 Body                = B:: {Section}*/ws
-Section             = SectionHeader Paragraph* /ws
+Section             = SectionHeader ws! (Paragraph Paragraph)
 SectionHeader       = "==" SectionHeaderBody "=="
 SectionHeaderBody   =  "=" SectionHeaderBody "="
                     >      ws! alphanum++ ws!
 SectionHeader       = "==" SectionHeaderBody "=="
 SectionHeaderBody   =  "=" SectionHeaderBody "="
                     >      ws! alphanum++ ws!
@@ -82,8 +82,6 @@ uli          =  "* "         (ws! text &~ any (oli|uli)!)
 oli          = ("# "|onums)! (ws! text &~ any (oli|uli)!)
 
 text         = Item
 oli          = ("# "|onums)! (ws! text &~ any (oli|uli)!)
 
 text         = Item
-Itemx        = ws! Item
-             | ()
 
 Item*/ws     =
                blockquote
 
 Item*/ws     =
                blockquote
@@ -96,7 +94,7 @@ Item*/ws     =
              > (Chars:: alphanum++)       
              > "\"" text "\""             
              > (Symbol:: sym++)           
              > (Chars:: alphanum++)       
              > "\"" text "\""             
              > (Symbol:: sym++)           
-             > { Block:: text }           
+//             > { Block:: text }           
 
 blockquote = "adsfafewag"
 //blockquote   = Blockquote:: "\"\"" (block | text "\"\"")
 
 blockquote = "adsfafewag"
 //blockquote   = Blockquote:: "\"\"" (block | text "\"\"")