module Text.Layout.Table.Spec.ColSpec
( ColSpec
, lenSpec
, position
, beginning
, alignSpec
, cutMark
, ellipsisCutMark
, column
, defColSpec
) where
import Data.Default.Class
import Text.Layout.Table.Primitives.Basic ()
import Text.Layout.Table.Spec.CutMark
import Text.Layout.Table.Spec.AlignSpec
import Text.Layout.Table.Spec.LenSpec
import Text.Layout.Table.Spec.Position
data ColSpec
= ColSpec
{ ColSpec -> LenSpec
lenSpec :: LenSpec
, ColSpec -> Position H
position :: Position H
, ColSpec -> AlignSpec
alignSpec :: AlignSpec
, ColSpec -> CutMark
cutMark :: CutMark
}
instance Default ColSpec where
def :: ColSpec
def = ColSpec
defColSpec
defColSpec :: ColSpec
defColSpec :: ColSpec
defColSpec = LenSpec -> Position H -> AlignSpec -> CutMark -> ColSpec
column LenSpec
expand Position H
forall orientation. Position orientation
beginning AlignSpec
noAlign CutMark
ellipsisCutMark
column :: LenSpec -> Position H -> AlignSpec -> CutMark -> ColSpec
column :: LenSpec -> Position H -> AlignSpec -> CutMark -> ColSpec
column = LenSpec -> Position H -> AlignSpec -> CutMark -> ColSpec
ColSpec