module Graphics.Layout.CSS where
import Graphics.Layout.Box
import Graphics.Layout
data CSSBox = CSSBox {
boxSizing :: BoxSizing,
cssBox :: PaddedBox (Double, String), -- 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
instance PropertyParser CSSBox where
...
finalizeCSS :: CSSBox -> LayoutItem Length