Rakka/Wiki/Interpreter/Base.hs

   1 module Rakka.Wiki.Interpreter.Base
   2     ( baseInterpreters
   3     )
   4     where
   5
   6 import           Rakka.Wiki.Interpreter
   7 import           Rakka.Wiki
   8
   9
  10 baseInterpreters :: [Interpreter]
  11 baseInterpreters = [ lineBreakInterp ]
  12
  13
  14 lineBreakInterp :: Interpreter
  15 lineBreakInterp = pureInlineInterp "br" interpret
  16     where
  17       interpret (InlineCommand _ attrs _) _ = LineBreak attrs