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-}