~jaro/balkon

ref: 1fe9721d7be50e19e68cd8a8ec85f0adbb1c68e4 balkon/src/Data/Text/ParagraphLayout/Internal/ResolvedBox.hs -rw-r--r-- 412 bytes
1fe9721d — Jaro Define ResolvedBox. 1 year, 9 days ago 
                                                                                
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
module Data.Text.ParagraphLayout.Internal.ResolvedBox (ResolvedBox (..))
where

import Data.Text.ParagraphLayout.Internal.BoxOptions

-- | Internal structure describing an inline box.
-- May be shared by multiple fragments.
data ResolvedBox d = ResolvedBox
    { boxUserData :: d
    , boxIndex :: Int
    , boxOptions :: BoxOptions
    }

instance Eq (ResolvedBox d) where
    a == b = boxIndex a == boxIndex b