~jaro/balkon

ref: efcef179a0e0ca9bf126b3b5a32a8094f55faaf5 balkon/src/Data/Text/ParagraphLayout/Internal/ResolvedBox.hs -rw-r--r-- 412 bytes
efcef179Jaro Add required textDirection to TextOptions. 1 year, 10 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