Language.Css.Build

Combinators to build AST

Example :

import Language.Css.Syntax
import Language.Css.Build
import Language.Css.Pretty
import Language.Css.Build.Idents
import Language.Css.Build.Tags hiding (center)

res = ruleSets [
         body [
             margin <:> int 0,
             border <:> int 0 ],
            
         h1 [ textAlign <:> center],

         p [ 
            backgroundColor <:> black, 
            color <:> white,
            padding <:> spaces [pct 5, pct 5, pct 10, pct 10]  ],

         (star /. "warning") [ color <:> red ] 
       ]
 
main = print $ pretty res

Classes

class Idents a where

Methods

ident :: String -> a

Instances

Idents String

Idents Value

Idents Expr

Idents PseudoVal

Idents Attr

Idents Ident

Idents Sel'

class ToExpr a where

Methods

expr :: a -> Expr

Instances

ToExpr Double

ToExpr Int

ToExpr Uri

ToExpr S

ToExpr Ms

ToExpr Percentage

ToExpr Pt

ToExpr Pc

ToExpr Mm

ToExpr Cm

ToExpr In

ToExpr Px

ToExpr Ex

ToExpr Em

ToExpr KHz

ToExpr Hz

ToExpr Color

ToExpr Grad

ToExpr Rad

ToExpr Deg

ToExpr Func

ToExpr Value

ToExpr Expr

ToExpr Ident

ToExpr a => ToExpr [a]

StyleSheet

styleSheet :: Maybe AtCharSet -> [AtImport] -> [StyleBody] -> StyleSheet

rules :: [StyleBody] -> StyleSheet

construct StyleSheet from list of AtRule 's or RuleSet 's

ruleSets :: [RuleSet] -> StyleSheet

construct StyleSheet from list of RuleSet 's

addImports :: [AtImport] -> StyleSheet -> StyleSheet

append imports

addRules :: [StyleBody] -> StyleSheet -> StyleSheet

append rules

charset :: String -> StyleSheet -> StyleSheet

set @charset

AtRules

media :: [String] -> [RuleSet] -> StyleBody

@media

page :: Maybe String -> Maybe PseudoPage -> [Decl] -> StyleBody

@page

fontFace :: [Decl] -> StyleBody

@font-face

RuleSets

Selectors

type Sel' = [Decl] -> RuleSet

RuleSet constructor

star :: Sel'

* selector

sels :: [Sel'] -> Sel'

groups selectors

(/>) :: Sel' -> Sel' -> Sel'

Child

> in css

(/-) :: Sel' -> Sel' -> Sel'

Descendant

space in css

(/#) :: Sel' -> String -> Sel'

set id

(/.) :: Sel' -> String -> Sel'

set class

(/:) :: Sel' -> PseudoVal -> Sel'

set pseudo classes/elements

class Attrs a where

attribute selector

Methods

attr :: String -> a

Instances

Attrs AttrIdent

Attrs Attr

(!) :: Sel' -> Attr -> Sel'

set attributes

(.=) :: AttrIdent -> AttrVal -> Attr

element's attribute is

(~=) :: AttrIdent -> AttrVal -> Attr

element's attribute includes

(|=) :: AttrIdent -> AttrVal -> Attr

element's attribute begins with

Declarations

(<:>) :: String -> Expr -> Decl

declaration constructor

important :: Decl -> Decl

set !important

space :: Expr -> Expr -> Expr

space separated values

slash :: Expr -> Expr -> Expr

slash separated values

comma :: Expr -> Expr -> Expr

comma separated values

spaces :: [Expr] -> Expr

space on list of values

slashes :: [Expr] -> Expr

slash on list of values

commas :: [Expr] -> Expr

comma on lists of values

Primitive values

fun :: ToExpr a => Ident -> a -> Func

Func constructor

str :: String -> Expr

int :: Int -> Expr

num :: Double -> Expr

deg :: Double -> Expr

<angle>

rad :: Double -> Expr

<angle>

grad :: Double -> Expr

<angle>

cword :: String -> Expr

<color>

rgb :: Int -> Int -> Int -> Expr

<color>

hz :: Double -> Expr

<frequency>

khz :: Double -> Expr

<frequency>

em :: Double -> Expr

<length>

ex :: Double -> Expr

<length>

px :: Int -> Expr

<length>

in' :: Double -> Expr

<length>

cm :: Double -> Expr

<length>

mm :: Double -> Expr

<length>

pc :: Double -> Expr

<length>

pt :: Int -> Expr

<length>

pct :: Double -> Expr

<percentage>

ms :: Double -> Expr

<time>

s :: Double -> Expr

<time>

url :: String -> Expr

<uri>

Colors

aqua :: Expr

black :: Expr

blue :: Expr

fuchsia :: Expr

gray :: Expr

green :: Expr

lime :: Expr

maroon :: Expr

navy :: Expr

olive :: Expr

orange :: Expr

purple :: Expr

red :: Expr

silver :: Expr

teal :: Expr

white :: Expr

yellow :: Expr