schizm 0.0.1 → 0.0.2

data/lib/schizm/parse.rb

@@ -1,3 +1,30 @@
+# Copyright (c) 2017 M. Grady Saunders
+# 
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions
+# are met:
+# 
+#   1. Redistributions of source code must retain the above
+#      copyright notice, this list of conditions and the following
+#      disclaimer.
+# 
+#   2. Redistributions in binary form must reproduce the above
+#      copyright notice, this list of conditions and the following
+#      disclaimer in the documentation and/or other materials
+#      provided with the distribution.
+# 
+# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
+# "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
+# TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
+# PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR
+# CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
+# EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
+# PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
+# PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY
+# OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
+# NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+# SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+
 require_relative 'chunk'
 require_relative 'match'
 require_relative 'markup'
@@ -7,392 +34,371 @@ require 'uri'
 
 module Schizm
 
-  module Parse
+module Parse
 
-    CPP_HIGHLIGHT = [
-      ["hi-comment", /\/\/.*$/u],
-      ["hi-comment", /\/\*.*?\*\//um],
-      ["hi-preproc", /\#(?:ifn?def|endif|if|else|elif|define|pragma|include)\b.*?(?<=[^\\])(?:\n|\z)/um],
-      ["hi-type", /(?:auto|bool|char|short|long|int|(?:un)?signed|float|double|void)\b/u],
-      ["hi-type", /(?:size|ptrdiff|char(?:16|32)|wchar|u?int(?:_least|_fast)?(?:8|16|32|64))_t\b/u],
-      ["hi-type-spec", /(?:constexpr|const|volatile|static|mutable|thread_local|register|extern|inline|noexcept)\b/u],
-      ["hi-flow", /(?:new|delete|do|while|for|if|else|try|throw|catch|switch|case|default|break|continue|goto|return)\b/u],
-      ["hi-op", /(?:(?:and|or|xor|not)(?:_eq)?|bitand|bitor|compl|(?:(?:const|dynamic|static|reinterpret)_cast))\b/u],
-      ["hi-value", /(?:true|false|this|nullptr|NULL)\b/u],
-      ["hi-value", /'[^'\\]*(?:\\.[^'\\]*)*'/u], # Single quote
-      ["hi-value", /"[^"\\]*(?:\\.[^"\\]*)*"/u], # Double quote
-      ["hi-other", /(?:alignas|alignof|sizeof|decltype|template|typename|typedef|using|concept|requires|operator)\b/u],
-      ["hi-other", /(?:namespace|class|struct|enum|public|protected|private|friend|final|virtual|override)\b/u],
-      ["hi-ident", /\p{Word}+/u],
-      [nil, /[^\p{Word}\p{Space}]+/um]
-    ]
+  # Markup hash.
+  @@hash =
+    Hash.new do |hash, where|
+    hash[where] = Markup.new
+    end
 
-    # Markup hash.
-    @@hash =
-      Hash.new do |hash, where|
-      hash[where] = Markup.new
-      end
+  # Markup hash accessor.
+  def self.hash
+    return @@hash
+  end
 
-    # Markup hash accessor.
-    def self.hash
-      return @@hash
+  # Link hash.
+  @@links =
+    Hash.new do |hash, where|
+    hash[where] =
+      Hash.new do |hash, entry|
+      hash[entry] = Hash.new
+      end
     end
 
-    # Link hash.
-    @@links =
-      Hash.new do |hash, where|
-      hash[where] =
-        Hash.new do |hash, entry|
-        hash[entry] = Hash.new
-        end
-      end
+  # Link hash accessor.
+  def self.links
+    return @@links
+  end
 
-    # Link hash accessor.
-    def self.links
-      return @@links
+  # Hash attribute reference.
+  class HashAttr
+    def initialize hash, attr
+      @hash = hash
+      @attr = attr
     end
-
-    # Hash attribute reference.
-    class HashAttr
-      def initialize hash, attr
-        @hash = hash
-        @attr = attr
-      end
-      def to_s
-        return @hash[@attr].to_s
-      end
+    def to_s
+      return @hash[@attr].to_s
     end
+  end
 
-    class ChunkRef
-      def initialize where, label
-        @where = where
-        @label = label
-      end
-      def to_s
-        Chunk.each do |chunk|
-          if chunk.label == @label and
-            (chunk.where == @where or chunk.share?)
-            return Env.path_href(@where) + '#' + chunk.id(1)
-          end
+  class ChunkRef
+    def initialize where, label
+      @where = where
+      @label = label
+    end
+    def to_s
+      Chunk.each do |chunk|
+        if chunk.label == @label and
+          (chunk.where == @where or chunk.share?)
+          return Env.path_href(@where) + '#' + chunk.id(1)
         end
-        return ""
       end
+      return ""
     end
+  end
 
-    class BlockRef
-      def initialize chunk, index
-        @chunk = chunk
-        @index = index
-      end
-      def to_s
-        return "" if @index < 1
-        return "" if @index > @chunk.blocks.size
-        Env.path_href(@chunk.where) + '#' + @chunk.id(@index)
-      end
+  class BlockRef
+    def initialize chunk, index
+      @chunk = chunk
+      @index = index
+    end
+    def to_s
+      return "" if @index < 1
+      return "" if @index > @chunk.blocks.size
+      Env.path_href(@chunk.where) + '#' + @chunk.id(@index)
     end
+  end
 
-    def self.line_elems where, input
-      elems = Markup.new
-      sscan = StringScanner.new input.strip
-      until sscan.eos?
-        elems.add_elems(
+  def self.line_elems where, input
+    elems = Markup.new
+    sscan = StringScanner.new input.strip
+    until sscan.eos?
+      elems.add_elems(
+      case
+      when (sscan.skip SPACE) then " "
+      when (sscan.skip HTML_ENTITY) then sscan[0]
+      when (sscan.skip HTML_ESCAPE) then sscan[0].codepoints[0]
+      when (sscan.skip CHAR_ESCAPE) then sscan[0].codepoints[0]
+      when (sscan.skip LINK_REF)
+        shown = String.new(sscan[1]).unescape(']')
+        param = String.new(sscan[2]).unescape(')')
+        param = LINK_PARAMS.match(param)
+        if (param[2] =~ URI::regexp)
+          attrs = {"href" => param[2],
+                  "title" => param[1]}
+        else
+          entry = param[2]
+          attrs = {"href" => HashAttr.new(@@links[where][entry], "href"),
+                  "title" => HashAttr.new(@@links[where][entry], "title")}
+        end
+        attrs["target"] = "_blank"
+        Markup.new("a")
+        .add_attrs(attrs)
+        .add_elems(line_elems(where, shown))
+      when (sscan.skip CENTER_MATH)
+        Markup.new("script")
+        .add_attrs(CENTER_MATH_ATTRS)
+        .add_elems(String.new(sscan[1]).slim)
+      when (sscan.skip INLINE_MATH)
+        Markup.new("script")
+        .add_attrs(INLINE_MATH_ATTRS)
+        .add_elems(String.new(sscan[1]).slim)
+      when (sscan.skip INLINE_EMPH)
+        depth = sscan[1].size
+        inner = line_elems(where, sscan[2])
         case
-        when (sscan.skip SPACE) then " "
-        when (sscan.skip HTML_ENTITY) then sscan[0]
-        when (sscan.skip HTML_ESCAPE) then sscan[0].codepoints[0]
-        when (sscan.skip CHAR_ESCAPE) then sscan[0].codepoints[0]
-        when (sscan.skip LINK_REF)
-          shown = String.new(sscan[1]).unescape(']')
-          param = String.new(sscan[2]).unescape(')')
-          param = LINK_PARAMS.match(param)
-          if (param[2] =~ URI::regexp)
-            attrs = {"href" => param[2],
-                    "title" => param[1]}
-          else
-            entry = param[2]
-            attrs = {"href" => HashAttr.new(@@links[where][entry], "href"),
-                    "title" => HashAttr.new(@@links[where][entry], "title")}
-          end
-          attrs["target"] = "_blank"
-          Markup.new("a")
-          .add_attrs(attrs)
-          .add_elems(line_elems(where, shown))
-        when (sscan.skip CENTER_MATH)
-          Markup.new("script")
-          .add_attrs(CENTER_MATH_ATTRS)
-          .add_elems(String.new(sscan[1]).slim)
-        when (sscan.skip INLINE_MATH)
-          Markup.new("script")
-          .add_attrs(INLINE_MATH_ATTRS)
-          .add_elems(String.new(sscan[1]).slim)
-        when (sscan.skip INLINE_EMPH)
-          depth = sscan[1].size
-          inner = line_elems(where, sscan[2])
-          case
-          when depth <= 1
-            Markup.new("em").add_elems(inner)
-          when depth == 2
-            Markup.new("strong").add_elems(inner)
-          when depth >= 3
-            Markup.new("strong").add_elems(Markup.new("em").add_elems(inner))
-          end
-        when sscan.skip(INLINE_CODE)
-          Markup.new("code")
-          .add_elems(String.new(sscan[1]).unescape("`").html)
-        when sscan.skip(INLINE_SUP)
-          Markup.new("sup").add_elems(line_elems(where, sscan[1]))
-        when sscan.skip(INLINE_SUB)
-          Markup.new("sub").add_elems(line_elems(where, sscan[1]))
-        when (sscan.skip INLINE_INS)
-          Markup.new("ins").add_elems(line_elems(where, sscan[1]))
-        when (sscan.skip INLINE_DEL)
-          Markup.new("del").add_elems(line_elems(where, sscan[1]))
-        when sscan.skip(/\w+|\S/)
-          sscan[0]
-        end)
-      end
-      return elems
+        when depth <= 1
+          Markup.new("em").add_elems(inner)
+        when depth == 2
+          Markup.new("strong").add_elems(inner)
+        when depth >= 3
+          Markup.new("strong").add_elems(Markup.new("em").add_elems(inner))
+        end
+      when sscan.skip(INLINE_CODE)
+        Markup.new("code")
+        .add_elems(String.new(sscan[1]).unescape("`").html)
+      when sscan.skip(INLINE_SUP)
+        Markup.new("sup").add_elems(line_elems(where, sscan[1]))
+      when sscan.skip(INLINE_SUB)
+        Markup.new("sub").add_elems(line_elems(where, sscan[1]))
+      when (sscan.skip INLINE_INS)
+        Markup.new("ins").add_elems(line_elems(where, sscan[1]))
+      when (sscan.skip INLINE_DEL)
+        Markup.new("del").add_elems(line_elems(where, sscan[1]))
+      when sscan.skip(/\w+|\S/)
+        sscan[0]
+      end)
     end
+    return elems
+  end
 
-    def self.page_elems where, input
-      elems = Markup.new
-      sscan = StringScanner.new(
-              String.new(input)
-                    .expand_tab(4).trim_blank
-                    .concat("\n"))
-      until sscan.eos?
-        elems.add_elems(
+  def self.page_elems where, input
+    elems = Markup.new
+    sscan = StringScanner.new(
+            String.new(input)
+                  .expand_tab(4).trim_blank
+                  .concat("\n"))
+    until sscan.eos?
+      elems.add_elems(
+      case
+      when (sscan.skip EMPTY_LINE) then nil
+      when (sscan.skip EOB_MARKER) then nil
+      when (sscan.skip HRULE)
+        Markup.new "hr"
+      when (sscan.skip HEADING_ATX)
+        type = String.new sscan[1]
+        text = String.new sscan[2]
+        slug = text.slugify
+        Markup.new(
+          case type.size
+          when 1 then "h1"
+          when 2 then "h2"
+          when 3 then "h3"
+          when 4 then "h4"
+          when 5 then "h5"
+          when 6 then "h6"
+          end).add_elems(line_elems(where, text))
+      when (sscan.skip HEADING_SETEXT)
+        type = String.new sscan[2]
+        text = String.new sscan[1]
+        slug = text.slugify
+        Markup.new(
+          case type[0]
+          when "=" then "h1"
+          when "-" then "h2"
+          end).add_attrs("id" => slug)
+              .add_attrs("class" => "title")
+              .add_elems(line_elems(where, text))
+      when (sscan.skip LINK_DEF)
+        entry = String.new(sscan[1]).unescape(")")
+        param = String.new(sscan[2])#.unescape("]")
+        param_match = LINK_PARAMS.match param
+        @@links[where][entry]["href"] = param_match[2]
+        @@links[where][entry]["title"] = param_match[1]
+        nil
+      when (sscan.skip /^#{CHUNK_LABEL}/u)
+        div = nil
+        chunk = Chunk.hash[where][String.new(sscan[1]).unescape("]")]
         case
-        when (sscan.skip EMPTY_LINE) then nil
-        when (sscan.skip EOB_MARKER) then nil
-        when (sscan.skip HRULE)
-          Markup.new "hr"
-        when (sscan.skip HEADING_ATX)
-          type = String.new sscan[1]
-          text = String.new sscan[2]
-          slug = text.slugify
-          Markup.new(
-            case type.size
-            when 1 then "h1"
-            when 2 then "h2"
-            when 3 then "h3"
-            when 4 then "h4"
-            when 5 then "h5"
-            when 6 then "h6"
-            end).add_attrs("id" => slug)
-                .add_elems(line_elems(where, text))
-        when (sscan.skip HEADING_SETEXT)
-          type = String.new sscan[2]
-          text = String.new sscan[1]
-          slug = text.slugify
-          Markup.new(
-            case type[0]
-            when "=" then "h1"
-            when "-" then "h2"
-            end).add_attrs("id" => slug)
-                .add_attrs("class" => "title")
-                .add_elems(line_elems(where, text))
-        when (sscan.skip LINK_DEF)
-          entry = String.new(sscan[1]).unescape(")")
-          param = String.new(sscan[2])#.unescape("]")
-          match = LINK_PARAMS.match param
-          @@links[where][entry]["href"] = match[2]
-          @@links[where][entry]["title"] = match[1]
-          nil
-        when (sscan.skip /^#{CHUNK_LABEL}/u)
-          div = nil
-          chunk = Chunk.hash[where][String.new(sscan[1]).unescape("]")]
-          case
-          when (sscan.skip /[ ]*->[ ]*(.*?)\n/u)
-            chunk.target = sscan[1].strip
-          when (sscan.skip /[ ]*::[ ]*(.*?)\n/u)
-            case sscan[1].strip
-            when "Share" then chunk.share = true
-            when "Local" then chunk.share = false
-            else raise "Unknown attribute."
-            end
-          when (sscan.skip /[ ]*\#=[ ]*(.*?)\n/u)
-            sscan[1].split(' ').each_with_index do |param, index|
-              chunk.params[param][:index] = index
-            end
-          when (sscan.skip /[ ]*\+=[ ]*(?:#{CHUNK_BLOCK})?\n/u)
-            label = sscan[1]
-            block = sscan.scan_until(END_INDENT)
-            block = String.new(block).erase(INDENT).trim
-            label = String.new(label).unescape(")") if label
-            chunk.push block, label
-            div =
+        when (sscan.skip /[ ]*->[ ]*(.*?)\n/u)
+          chunk.target = sscan[1].strip
+        when (sscan.skip /[ ]*::[ ]*(.*?)\n/u)
+          case sscan[1].strip
+          when "Share" then chunk.share = true
+          when "Local" then chunk.share = false
+          else raise "Unknown attribute."
+          end
+        when (sscan.skip /[ ]*\#=[ ]*(.*?)\n/u)
+          sscan[1].split(' ').each_with_index do |param, index|
+            chunk.params[param][:index] = index
+          end
+        when (sscan.skip /[ ]*\+=[ ]*(?:#{CHUNK_BLOCK})?\n/u)
+          label = sscan[1]
+          block = sscan.scan_until(END_INDENT)
+          block = String.new(block).erase(INDENT).trim
+          label = String.new(label).unescape(")") if label
+          chunk.push block, label
+          div =
+          Markup.new("div")
+          .add_attrs("id" => chunk.id)
+          .add_attrs("class" => "panel")
+          .add_elems([
             Markup.new("div")
-            .add_attrs("id" => chunk.id)
-            .add_attrs("class" => "panel")
+            .add_attrs("class" => "panel-head")
             .add_elems([
               Markup.new("div")
-              .add_attrs("class" => "panel-head")
+              .add_attrs("style" => "float: left; width: 75%;")
               .add_elems([
                 Markup.new("div")
-                .add_attrs("style" => "float: left; width: 75%;")
-                .add_elems([
+                .add_attrs("class" => "the-chunk")
+                .add_elems(line_elems(where, chunk.label)),
+                case
+                when label
                   Markup.new("div")
-                  .add_attrs("class" => "the-chunk")
-                  .add_elems(line_elems(where, chunk.label)),
-                  case
-                  when label
-                    Markup.new("div")
-                    .add_attrs("class" => "the-block")
-                    .add_elems(line_elems(where, label))
-                  else nil
-                  end
-                ]),
-                Markup.new("div")
-                .add_attrs("style" => "float: right;")
-                .add_elems([
-                  Markup.new("a").add_attrs("class" => "panel-link", "href" => BlockRef.new(chunk, chunk.blocks.size - 1)).add_elems(Markup.new("span").add_attrs("class" => "genericons-neue genericons-neue-previous")),
-                  Markup.new("a").add_attrs("class" => "panel-link", "href" => BlockRef.new(chunk, chunk.blocks.size + 1)).add_elems(Markup.new("span").add_attrs("class" => "genericons-neue genericons-neue-next")),
-                ]),
-                Markup.new("div").add_attrs("style" => "clear: both;")
+                  .add_attrs("class" => "the-block")
+                  .add_elems(line_elems(where, label))
+                else nil
+                end
               ]),
               Markup.new("div")
-              .add_attrs("class" => "panel-body")
-              .add_elems(Markup.new("pre").add_elems(highlight(where, block, CPP_HIGHLIGHT)))
-            ])
-          end
-          div
-        when (sscan.skip ENTER_ASIDE)
-          text = sscan.scan_until END_INDENT
-          text = String.new(text).erase INDENT
-          Markup.new("div")
-          .add_attrs("class" => "aside")
-          .add_elems([
+              .add_attrs("style" => "float: right;")
+              .add_elems([
+                Markup.new("a").add_attrs("class" => "panel-link", "href" => BlockRef.new(chunk, chunk.blocks.size - 1)).add_elems(Markup.new("span").add_attrs("class" => "genericons-neue genericons-neue-previous")),
+                Markup.new("a").add_attrs("class" => "panel-link", "href" => BlockRef.new(chunk, chunk.blocks.size + 1)).add_elems(Markup.new("span").add_attrs("class" => "genericons-neue genericons-neue-next")),
+              ]),
+              Markup.new("div").add_attrs("style" => "clear: both;")
+            ]),
             Markup.new("div")
-            .add_attrs("class" => "icon-holder")
-            .add_elems(
-              Markup.new("span")
-              .add_attrs("class" => "genericons-neue genericons-neue-info")),
-            page_elems(where, text)
+            .add_attrs("class" => "panel-body")
+            .add_elems(Markup.new("pre").add_elems(highlight(where, block, CPP_HIGHLIGHT)))
           ])
-        when (sscan.skip ENTER_ALERT)
-          text = sscan.scan_until END_INDENT
-          text = String.new(text).erase INDENT
+        end
+        div
+      when (sscan.skip ENTER_ASIDE)
+        text = sscan.scan_until END_INDENT
+        text = String.new(text).erase INDENT
+        Markup.new("div")
+        .add_attrs("class" => "aside")
+        .add_elems([
           Markup.new("div")
-          .add_attrs("class" => "alert")
-          .add_elems([
-            Markup.new("div")
-            .add_attrs("class" => "icon-holder")
-            .add_elems(
-              Markup.new("span")
-              .add_attrs("class" => "genericons-neue genericons-neue-notice")),
-            page_elems(where, text)
-          ])
-        when (sscan.skip ENTER_BUG)
+          .add_attrs("class" => "icon-holder")
+          .add_elems(
+            Markup.new("span")
+            .add_attrs("class" => "genericons-neue genericons-neue-info")),
+          page_elems(where, text)
+        ])
+      when (sscan.skip ENTER_ALERT)
+        text = sscan.scan_until END_INDENT
+        text = String.new(text).erase INDENT
+        Markup.new("div")
+        .add_attrs("class" => "alert")
+        .add_elems([
+          Markup.new("div")
+          .add_attrs("class" => "icon-holder")
+          .add_elems(
+            Markup.new("span")
+            .add_attrs("class" => "genericons-neue genericons-neue-notice")),
+          page_elems(where, text)
+        ])
+      when (sscan.skip ENTER_BUG)
+        text = sscan.scan_until END_INDENT
+        text = String.new(text).erase INDENT
+        Markup.new("div")
+        .add_attrs("class" => "alert")
+        .add_elems([
+          Markup.new("div")
+          .add_attrs("class" => "icon-holder")
+          .add_elems(
+            Markup.new("span")
+            .add_attrs("class" => "genericons-neue genericons-neue-bug")),
+          page_elems(where, text)
+        ])
+      when (sscan.skip ENTER_QUOTE)
+        text = sscan.scan_until END_INDENT
+        text = String.new(text).erase INDENT
+        Markup.new("blockquote")
+              .add_elems(page_elems(where, text))
+      when (sscan.match? ENTER_OLIST)
+        list = Markup.new "ol"
+        while sscan.skip ENTER_OLIST
           text = sscan.scan_until END_INDENT
           text = String.new(text).erase INDENT
-          Markup.new("div")
-          .add_attrs("class" => "alert")
-          .add_elems([
-            Markup.new("div")
-            .add_attrs("class" => "icon-holder")
-            .add_elems(
-              Markup.new("span")
-              .add_attrs("class" => "genericons-neue genericons-neue-bug")),
-            page_elems(where, text)
-          ])
-        when (sscan.skip ENTER_QUOTE)
+          item = Markup.new "li"
+          item.add_elems page_elems(where, text)
+          list.add_elems item
+          sscan.skip EMPTY_LINES
+        end
+        list
+      when (sscan.match? ENTER_ULIST)
+        list = Markup.new "ul"
+        while sscan.skip ENTER_ULIST
           text = sscan.scan_until END_INDENT
           text = String.new(text).erase INDENT
-          Markup.new("blockquote")
-                .add_elems(page_elems(where, text))
-        when (sscan.match? ENTER_OLIST)
-          list = Markup.new "ol"
-          while sscan.skip ENTER_OLIST
-            text = sscan.scan_until END_INDENT
-            text = String.new(text).erase INDENT
-            item = Markup.new "li"
-            item.add_elems page_elems(where, text)
-            list.add_elems item
-            sscan.skip EMPTY_LINES
-          end
-          list
-        when (sscan.match? ENTER_ULIST)
-          list = Markup.new "ul"
-          while sscan.skip ENTER_ULIST
-            text = sscan.scan_until END_INDENT
-            text = String.new(text).erase INDENT
-            item = Markup.new "li"
-            item.add_elems page_elems(where, text)
-            list.add_elems item
-            sscan.skip EMPTY_LINES
-          end
-          list
-        when (sscan.match? ENTER_TLIST)
-          list = Markup.new "ul"
-          list.add_attrs("class" => "tl")
-          while sscan.skip ENTER_TLIST
-            type = sscan[1]
-            text = sscan.scan_until END_INDENT
-            text = String.new(text).erase INDENT
-            item = Markup.new "li"
-            item.add_attrs("class" =>
-                case
-                when (type[0] == " ") then "li-todo"
-                when (type[0] != " ") then "li-done"
-                end)
-            item.add_elems page_elems(where, text)
-            list.add_elems item
-            sscan.skip EMPTY_LINES
-          end
-          list
-        when sscan.match?(ENTER_CODE)
+          item = Markup.new "li"
+          item.add_elems page_elems(where, text)
+          list.add_elems item
+          sscan.skip EMPTY_LINES
+        end
+        list
+      when (sscan.match? ENTER_TLIST)
+        list = Markup.new "ul"
+        list.add_attrs("class" => "tl")
+        while sscan.skip ENTER_TLIST
+          type = sscan[1]
           text = sscan.scan_until END_INDENT
           text = String.new(text).erase INDENT
-          Markup.new("pre")
-          .add_elems(
-            Markup.new("code")
-            .add_elems(String.new(text).trim.html))
-        when sscan.match?(ENTER_TEXT)
-          text = sscan.scan_until END_SIMPLE
-          text = String.new(text).erase EOB_MARKER
-          Markup.new("p").add_elems(line_elems(where, text))
-        end)
-      end
-      return elems
+          item = Markup.new "li"
+          item.add_attrs("class" =>
+              case
+              when (type[0] == " ") then "li-todo"
+              when (type[0] != " ") then "li-done"
+              end)
+          item.add_elems page_elems(where, text)
+          list.add_elems item
+          sscan.skip EMPTY_LINES
+        end
+        list
+      when sscan.match?(ENTER_CODE)
+        text = sscan.scan_until END_INDENT
+        text = String.new(text).erase INDENT
+        Markup.new("pre")
+        .add_elems(
+          Markup.new("code")
+          .add_elems(String.new(text).trim.html))
+      when sscan.match?(ENTER_TEXT)
+        text = sscan.scan_until END_SIMPLE
+        text = String.new(text).erase EOB_MARKER
+        Markup.new("p").add_elems(line_elems(where, text))
+      end)
     end
+    return elems
+  end
 
-    def self.highlight where, input, table
-      elems = Markup.new
-      sscan = StringScanner.new input
-      until sscan.eos?
-        if sscan.skip /\p{Space}+/um
-          elems.add_elems(String.new(sscan[0]).html)
-          next
-        end
-        if sscan.skip CHUNK_LABEL
-          label = String.new(sscan[1]).unescape("]")
-          elems.add_elems(
-            Markup.new("a")
-            .add_attrs("class" => "chunk")
-            .add_attrs("href" => ChunkRef.new(where, label))
-            .add_elems(line_elems(where, label)))
-          next
-        end
-        table.each do |entry|
-          if sscan.skip entry[1]
-            if entry[0] == nil
-              elems.add_elems(String.new(sscan[0]).html)
-            else
-              elems.add_elems(
-                Markup.new("span")
-                .add_attrs("class" => entry[0])
-                .add_elems(String.new(sscan[0]).html))
-            end
-            break
+  def self.highlight where, input, table
+    elems = Markup.new
+    sscan = StringScanner.new input
+    until sscan.eos?
+      if sscan.skip /\p{Space}+/um
+        elems.add_elems(String.new(sscan[0]).html)
+        next
+      end
+      if sscan.skip CHUNK_LABEL
+        label = String.new(sscan[1]).unescape("]")
+        elems.add_elems(
+          Markup.new("a")
+          .add_attrs("class" => "chunk")
+          .add_attrs("href" => ChunkRef.new(where, label))
+          .add_elems(line_elems(where, label)))
+        next
+      end
+      table.each do |entry|
+        if sscan.skip entry[1]
+          if entry[0] == nil
+            elems.add_elems(String.new(sscan[0]).html)
+          else
+            elems.add_elems(
+              Markup.new("span")
+              .add_attrs("class" => entry[0])
+              .add_elems(String.new(sscan[0]).html))
           end
+          break
         end
       end
-      return elems
     end
+    return elems
+  end
 
-  end # module Parse
+end # module Parse
 
 end # module Schizm
-
-# puts Schizm::Parse.page_elems('File.zrc', $stdin.read).to_s