Contents

# -*- coding: utf-8 -*- #

module Rouge
  module Lexers
    class LiterateHaskell < RegexLexer
      desc 'Literate haskell'
      tag 'literate_haskell'
      aliases 'lithaskell', 'lhaskell', 'lhs'
      filenames '*.lhs'
      mimetypes 'text/x-literate-haskell'

      def haskell
        @haskell ||= Haskell.new(options)
      end

      start { haskell.reset! }

      # TODO: support TeX versions as well.
      # TODO: enforce a blank line before and after code
      state :root do
        rule /\s*?\n(?=>)/, Text, :code
        rule /.*?\n/, Text
        rule /.+\z/, Text
      end

      state :code do
        rule /(>)( .*?\n)/ do |m|
          token Name::Label, m[1]
          delegate haskell, m[2]
        end

        rule /\s*\n(?=\s*[^>])/, Text, :pop!
      end
    end
  end
end

Version data entries

9 entries across 9 versions & 1 rubygems

Version	Path
rouge-1.7.7	lib/rouge/lexers/literate_haskell.rb
rouge-1.7.4	lib/rouge/lexers/literate_haskell.rb
rouge-1.7.3	lib/rouge/lexers/literate_haskell.rb
rouge-1.7.2	lib/rouge/lexers/literate_haskell.rb
rouge-1.7.1	lib/rouge/lexers/literate_haskell.rb
rouge-1.7.0	lib/rouge/lexers/literate_haskell.rb
rouge-1.6.2	lib/rouge/lexers/literate_haskell.rb
rouge-1.6.1	lib/rouge/lexers/literate_haskell.rb
rouge-1.5.1	lib/rouge/lexers/literate_haskell.rb