~alcinnz/haskell-stylist

ref: 8492d01f58f80e2a4b251e9dc38cec99128e8e0d haskell-stylist/src/Stylish/Element.hs -rw-r--r-- 308 bytes
8492d01f — Adrian Cochrane Implement CSS selector interpretor. 5 years ago 
                                                                                
1
2
3
4
5
6
7
8
9
10
11
12
13
module Stylish.Element(
        Element(..), Attribute(..)
    ) where

import Data.Text.Internal (Text(..))

data Element = ElementNode {
    parent :: Maybe Element,
    previous :: Maybe Element,
    name :: Text,
    attributes :: [Attribute] -- in sorted order.
}
data Attribute = Attribute Text String