~alcinnz/CatTrap

ref: c06fd5523fd9a30b1da5cb86bc6f862715b0b5d2 CatTrap/Graphics/Layout/CSS.hs -rw-r--r-- 498 bytes
c06fd552 — Adrian Cochrane Test & fix block layout. 1 year, 8 months ago
                                                                                
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
module Graphics.Layout.CSS where

import Graphics.Layout.Box
import Graphics.Layout

data CSSBox = CSSBox {
    boxSizing :: BoxSizing,
    cssBox :: PaddedBox Unitted Unitted -- Some units need to be resolved per font. calc()?
    -- Other layout-mode specific properties?
    -- Resolve font here so we can resolve those units?
}
data BoxSizing = BorderBox | ContentBox
type Unitted = (Double, String)

{-instance PropertyParser CSSBox where
    ...

finalizeCSS :: CSSBox -> LayoutItem Length-}