src/TextViewport/Buffer/Item.hs


1
2
3
4
5
6
7
8

module TextViewport.Buffer.Item where


data Item a seg = Item
  { itemText :: a
  , itemSegments :: seg
  }
  deriving (Eq, Show)