module Rakka.Wiki
( WikiPage
- , WikiElement(..)
, BlockElement(..)
, InlineElement(..)
)
import Rakka.Page
-type WikiPage = [WikiElement]
-
-
-data WikiElement
- = Block !BlockElement
- | Inline !InlineElement
- deriving (Eq, Show)
+type WikiPage = [BlockElement]
data BlockElement
headingLevel :: !Int
, headingText :: !String
}
- | EmptyLine
+ | Paragraph ![InlineElement]
deriving (Eq, Show)