Moduleshakespeare-2.2.0Haskell2010

Text.Internal.Css

This module is only being exposed to work around a GHC bug, its API is not stable

Synopsis

type CssUrl
type DList
data Resolved
data Order
type HasLeadingSpace
family Str
data Block
data Mixin
data TopLevel
data Attr
data Css
data Content
type Contents
data CDData
value pack
value fromText
class ToCss
value cssUsedIdentifiers
value cssFileDebug
value runtimePrependSelector
value combineSelectors
value blockRuntime
value contentToBuilderRT
value cssRuntime
value vtToExp
value getVars
value lookupD
value compressTopLevel
value compressBlock
value blockToMixin
value blockToCss
value processAttrsAndDerefs
value selectorToBuilder
value contentsToBuilder
value contentToBuilder
type Scope
value topLevelsToCassius
value blocksToCassius
value renderCss
value renderBlock
value liftBuilder

Packageshakespeare-2.2.0
Exports41
LanguageHaskell2010
LicenceMIT
SourceCss.hs

typetype CssUrl url = (url -> [(Text, Text)] -> Text) -> Css

typetype DList a = [a] -> [a]

datadata Resolved

Resolved Unresolved

datadata Order

Ordered Unordered

Instances1Lift

Lift OrderDefined in shakespeare-2.2.0 · Text.Internal.Css

typetype HasLeadingSpace = Bool

familytype family Str (a :: Resolved)

Instances2Str

type Str 'Resolved = BuilderDefined in shakespeare-2.2.0 · Text.Internal.Css
type Str 'Unresolved = ContentsDefined in shakespeare-2.2.0 · Text.Internal.Css

datadata Block (a :: Resolved) where

Constructors

BlockResolved :: !Builder -> ![Attr 'Resolved] -> Block 'Resolved
- brSelectors :: !Builder
- brAttrs :: ![Attr 'Resolved]
BlockUnresolved :: ![Contents] -> ![Either (Attr 'Unresolved) Deref] -> ![(HasLeadingSpace, Block 'Unresolved)] -> Block 'Unresolved
- buSelectors :: ![Contents]
- buAttrsAndMixins :: ![Either (Attr 'Unresolved) Deref]
- buBlocks :: ![(HasLeadingSpace, Block 'Unresolved)]

Instances1Lift

Lift (Block a)Defined in shakespeare-2.2.0 · Text.Internal.Css

datadata Mixin

Constructors

Mixin
- mixinAttrs :: ![Attr 'Resolved]
- mixinBlocks :: ![(HasLeadingSpace, Block 'Resolved)]

Instances3Semigroup, Monoid, Lift

Semigroup MixinDefined in shakespeare-2.2.0 · Text.Internal.Css
Monoid MixinDefined in shakespeare-2.2.0 · Text.Internal.Css
Lift MixinDefined in shakespeare-2.2.0 · Text.Internal.Css

datadata TopLevel (a :: Resolved) where

Constructors

TopBlock :: !Block a -> TopLevel a
TopAtBlock :: !String -> !Str a -> ![Block a] -> TopLevel a
TopAtDecl :: !String -> !Str a -> TopLevel a
TopVar :: !String -> !String -> TopLevel 'Unresolved

datadata Attr (a :: Resolved) where

Constructors

AttrResolved :: !Builder -> !Builder -> Attr 'Resolved
- attrResKey :: !Builder
- attrResVal :: !Builder
AttrUnresolved :: !Contents -> !Contents -> Attr 'Unresolved
- attrUnresKey :: !Contents
- attrUnresVal :: !Contents

Instances1Lift

Lift (Attr a)Defined in shakespeare-2.2.0 · Text.Internal.Css

datadata Css

Constructors

CssWhitespace ![TopLevel 'Resolved]
CssNoWhitespace ![TopLevel 'Resolved]

datadata Content

Constructors

ContentRaw String
ContentVar Deref
ContentUrl Deref
ContentUrlParam Deref
ContentMixin Deref

Instances3Eq, Show, Lift

Eq ContentDefined in shakespeare-2.2.0 · Text.Internal.Css
Show ContentDefined in shakespeare-2.2.0 · Text.Internal.Css
Lift ContentDefined in shakespeare-2.2.0 · Text.Internal.Css

typetype Contents = [Content]

datadata CDData url

Constructors

CDPlain Builder
CDUrl url
CDUrlParam (url, [(Text, Text)])
CDMixin Mixin

valuepack :: String -> Text

valuefromText :: Text -> Builder

classclass ToCss a where

Methods

toCss :: a -> Builder

Instances9ToCss, …

ToCss AbsoluteSizeDefined in shakespeare-2.2.0 · Text.Internal.CssCommon
ToCss ColorDefined in shakespeare-2.2.0 · Text.Internal.CssCommon
ToCss EmSizeDefined in shakespeare-2.2.0 · Text.Internal.CssCommon
ToCss ExSizeDefined in shakespeare-2.2.0 · Text.Internal.CssCommon
ToCss PercentageSizeDefined in shakespeare-2.2.0 · Text.Internal.CssCommon
ToCss PixelSizeDefined in shakespeare-2.2.0 · Text.Internal.CssCommon
ToCss TextDefined in shakespeare-2.2.0 · Text.Internal.Css
ToCss TextDefined in shakespeare-2.2.0 · Text.Internal.Css
ToCss [Char]Defined in shakespeare-2.2.0 · Text.Internal.Css

valuecssUsedIdentifiers

:: Bool
perform the indent-to-brace conversion
-> Parser [TopLevel 'Unresolved]
-> String
-> [(Deref, VarType)]

Source#

Determine which identifiers are used by the given template, useful for creating systems like yesod devel.

valuecssFileDebug

:: Bool
perform the indent-to-brace conversion
-> Q Exp
-> Parser [TopLevel 'Unresolved]
-> FilePath
-> Q Exp

valueruntimePrependSelector

:: Builder
-> (HasLeadingSpace, Block 'Resolved)
-> Block 'Resolved

valuecombineSelectors

:: HasLeadingSpace
-> [Contents]
-> [Contents]
-> [Contents]

valueblockRuntime

:: [(Deref, CDData url)]
-> url -> [(Text, Text)] -> Text
-> Block 'Unresolved
-> Either String (DList (Block 'Resolved))

valuecontentToBuilderRT

:: [(Deref, CDData url)]
-> url -> [(Text, Text)] -> Text
-> Content
-> Either String Builder

valuecssRuntime

:: Bool
i2b?
-> Parser [TopLevel 'Unresolved]
-> FilePath
-> [(Deref, CDData url)]
-> (url -> [(Text, Text)] -> Text)
-> Css

valuevtToExp :: (Deref, VarType) -> Q Exp

valuegetVars :: [(String, String)] -> Content -> Either String [(Deref, VarType)]

valuelookupD :: Deref -> [(String, b)] -> Maybe String

valuecompressTopLevel :: TopLevel 'Unresolved -> TopLevel 'Unresolved

valuecompressBlock :: Block 'Unresolved -> Block 'Unresolved

valueblockToMixin :: Name -> Scope -> Block 'Unresolved -> Q Exp

valueblockToCss :: Name -> Scope -> Block 'Unresolved -> ExpQ

valueprocessAttrsAndDerefs

:: Name
-> Scope
-> [Either (Attr 'Unresolved) Deref]
-> Q Exp
Either (Attr 'Resolved) Mixin

valueselectorToBuilder :: Name -> Scope -> [Contents] -> Q Exp

valuecontentsToBuilder :: Name -> Scope -> [Content] -> Q Exp

valuecontentToBuilder :: Name -> Scope -> Content -> Q Exp

typetype Scope = [(String, String)]

valuetopLevelsToCassius :: [TopLevel 'Unresolved] -> Q Exp

valueblocksToCassius :: Name -> Scope -> [Block 'Unresolved] -> Q Exp

valuerenderCss :: Css -> Text

valuerenderBlock

:: Bool
have whitespace?
-> Builder
indentation
-> Block 'Resolved
-> Builder

valueliftBuilder :: Quote m => Builder -> m Exp