| Copyright | (C) 2011-2015 Edward Kmett |
|---|---|
| License | BSD-style (see the file LICENSE) |
| Maintainer | Edward Kmett <ekmett@gmail.com> |
| Stability | experimental |
| Portability | non-portable |
| Safe Haskell | None |
| Language | Haskell2010 |
Text.Trifecta.Rendering
Description
The type for Lines will very likely change over time, to enable drawing
lit up multi-character versions of control characters for ^Z, ^[,
0xff, etc. This will make for much nicer diagnostics when
working with protocols.
Synopsis
- data Rendering = Rendering !Delta !Int64 !Int64 (Lines -> Lines) (Delta -> Lines -> Lines)
- class HasRendering c where
- nullRendering :: Rendering -> Bool
- emptyRendering :: Rendering
- class Source t where
- rendered :: Source s => Delta -> s -> Rendering
- class Renderable t where
- data Rendered a = a :@ Rendering
- data Caret = Caret !Delta !ByteString
- class HasCaret t where
- data Careted a = a :^ Caret
- drawCaret :: Delta -> Delta -> Lines -> Lines
- addCaret :: Delta -> Rendering -> Rendering
- caretEffects :: [SGR]
- renderingCaret :: Delta -> ByteString -> Rendering
- data Span = Span !Delta !Delta !ByteString
- class HasSpan t where
- data Spanned a = a :~ Span
- spanEffects :: [SGR]
- drawSpan :: Delta -> Delta -> Delta -> Lines -> Lines
- addSpan :: Delta -> Delta -> Rendering -> Rendering
- data Fixit = Fixit {}
- class HasFixit c where
- drawFixit :: Delta -> Delta -> String -> Delta -> Lines -> Lines
- addFixit :: Delta -> Delta -> String -> Rendering -> Rendering
- type Lines = Array (Int, Int64) ([SGR], Char)
- draw :: [SGR] -> Int -> Int64 -> String -> Lines -> Lines
- ifNear :: Delta -> (Lines -> Lines) -> Delta -> Lines -> Lines
- (.#) :: (Delta -> Lines -> Lines) -> Rendering -> Rendering
Documentation
A Rendering is a canvas of text that output can be written to.
Instances
| Show Rendering # | |
| Semigroup Rendering # | |
| Monoid Rendering # | |
| Pretty Rendering # | |
Defined in Text.Trifecta.Rendering | |
| HasDelta Rendering # | |
Defined in Text.Trifecta.Rendering | |
| Renderable Rendering # | |
Defined in Text.Trifecta.Rendering | |
| HasRendering Rendering # | |
Defined in Text.Trifecta.Rendering | |
| Reducer Fixit Rendering # | |
| Reducer Span Rendering # | |
| Reducer Caret Rendering # | |
| Reducer (Spanned a) Rendering # | |
| Reducer (Careted a) Rendering # | |
class HasRendering c where #
Minimal complete definition
Methods
rendering :: Lens' c Rendering #
renderingDelta :: Lens' c Delta #
renderingLine :: Lens' c (Lines -> Lines) #
renderingLineBytes :: Lens' c Int64 #
renderingLineLen :: Lens' c Int64 #
Instances
| HasRendering Rendering # | |
Defined in Text.Trifecta.Rendering | |
nullRendering :: Rendering -> Bool #
Is the Rendering empty?
>>>nullRendering emptyRenderingTrue
>>>nullRendering exampleRenderingFalse
The empty Rendering, which contains nothing at all.
>>>show (pretty emptyRendering)""
Minimal complete definition
class Renderable t where #
Minimal complete definition
Instances
| Renderable Rendering # | |
Defined in Text.Trifecta.Rendering | |
| Renderable Fixit # | |
Defined in Text.Trifecta.Rendering | |
| Renderable Span # | |
Defined in Text.Trifecta.Rendering | |
| Renderable Caret # | |
Defined in Text.Trifecta.Rendering | |
| Renderable (Spanned a) # | |
Defined in Text.Trifecta.Rendering | |
| Renderable (Careted a) # | |
Defined in Text.Trifecta.Rendering | |
| Renderable (Rendered a) # | |
Defined in Text.Trifecta.Rendering | |
Instances
| Functor Rendered # | |
| Foldable Rendered # | |
Defined in Text.Trifecta.Rendering Methods fold :: Monoid m => Rendered m -> m # foldMap :: Monoid m => (a -> m) -> Rendered a -> m # foldr :: (a -> b -> b) -> b -> Rendered a -> b # foldr' :: (a -> b -> b) -> b -> Rendered a -> b # foldl :: (b -> a -> b) -> b -> Rendered a -> b # foldl' :: (b -> a -> b) -> b -> Rendered a -> b # foldr1 :: (a -> a -> a) -> Rendered a -> a # foldl1 :: (a -> a -> a) -> Rendered a -> a # elem :: Eq a => a -> Rendered a -> Bool # maximum :: Ord a => Rendered a -> a # minimum :: Ord a => Rendered a -> a # | |
| Traversable Rendered # | |
| Comonad Rendered # | |
| ComonadApply Rendered # | |
| Show a => Show (Rendered a) # | |
| HasDelta (Rendered a) # | |
Defined in Text.Trifecta.Rendering | |
| HasBytes (Rendered a) # | |
Defined in Text.Trifecta.Rendering | |
| Renderable (Rendered a) # | |
Defined in Text.Trifecta.Rendering | |
Carets
A Caret marks a point in the input with a simple ^ character.
>>>plain (pretty (addCaret (Columns 35 35) exampleRendering))int main(int argc, char ** argv) { int; }<EOF> ^
Constructors
| Caret !Delta !ByteString |
Instances
| Eq Caret # | |
| Data Caret # | |
Defined in Text.Trifecta.Rendering Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> Caret -> c Caret # gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c Caret # dataTypeOf :: Caret -> DataType # dataCast1 :: Typeable t => (forall d. Data d => c (t d)) -> Maybe (c Caret) # dataCast2 :: Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c Caret) # gmapT :: (forall b. Data b => b -> b) -> Caret -> Caret # gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> Caret -> r # gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> Caret -> r # gmapQ :: (forall d. Data d => d -> u) -> Caret -> [u] # gmapQi :: Int -> (forall d. Data d => d -> u) -> Caret -> u # gmapM :: Monad m => (forall d. Data d => d -> m d) -> Caret -> m Caret # gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> Caret -> m Caret # gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> Caret -> m Caret # | |
| Ord Caret # | |
| Show Caret # | |
| Generic Caret # | |
| Semigroup Caret # | |
| Hashable Caret # | |
Defined in Text.Trifecta.Rendering | |
| HasDelta Caret # | |
Defined in Text.Trifecta.Rendering | |
| HasBytes Caret # | |
Defined in Text.Trifecta.Rendering | |
| HasCaret Caret # | |
| Renderable Caret # | |
Defined in Text.Trifecta.Rendering | |
| Reducer Caret Rendering # | |
| type Rep Caret # | |
Defined in Text.Trifecta.Rendering type Rep Caret = D1 (MetaData "Caret" "Text.Trifecta.Rendering" "trifecta-2-EopHS1729LQA1QYMOn2Dm4" False) (C1 (MetaCons "Caret" PrefixI False) (S1 (MetaSel (Nothing :: Maybe Symbol) NoSourceUnpackedness SourceStrict DecidedStrict) (Rec0 Delta) :*: S1 (MetaSel (Nothing :: Maybe Symbol) SourceUnpack SourceStrict DecidedStrict) (Rec0 ByteString))) | |
Minimal complete definition
Instances
| Functor Careted # | |
| Foldable Careted # | |
Defined in Text.Trifecta.Rendering Methods fold :: Monoid m => Careted m -> m # foldMap :: Monoid m => (a -> m) -> Careted a -> m # foldr :: (a -> b -> b) -> b -> Careted a -> b # foldr' :: (a -> b -> b) -> b -> Careted a -> b # foldl :: (b -> a -> b) -> b -> Careted a -> b # foldl' :: (b -> a -> b) -> b -> Careted a -> b # foldr1 :: (a -> a -> a) -> Careted a -> a # foldl1 :: (a -> a -> a) -> Careted a -> a # elem :: Eq a => a -> Careted a -> Bool # maximum :: Ord a => Careted a -> a # minimum :: Ord a => Careted a -> a # | |
| Traversable Careted # | |
| Comonad Careted # | |
| ComonadApply Careted # | |
| Eq a => Eq (Careted a) # | |
| Data a => Data (Careted a) # | |
Defined in Text.Trifecta.Rendering Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> Careted a -> c (Careted a) # gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c (Careted a) # toConstr :: Careted a -> Constr # dataTypeOf :: Careted a -> DataType # dataCast1 :: Typeable t => (forall d. Data d => c (t d)) -> Maybe (c (Careted a)) # dataCast2 :: Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c (Careted a)) # gmapT :: (forall b. Data b => b -> b) -> Careted a -> Careted a # gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> Careted a -> r # gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> Careted a -> r # gmapQ :: (forall d. Data d => d -> u) -> Careted a -> [u] # gmapQi :: Int -> (forall d. Data d => d -> u) -> Careted a -> u # gmapM :: Monad m => (forall d. Data d => d -> m d) -> Careted a -> m (Careted a) # gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> Careted a -> m (Careted a) # gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> Careted a -> m (Careted a) # | |
| Ord a => Ord (Careted a) # | |
| Show a => Show (Careted a) # | |
| Generic (Careted a) # | |
| Hashable a => Hashable (Careted a) # | |
Defined in Text.Trifecta.Rendering | |
| HasDelta (Careted a) # | |
Defined in Text.Trifecta.Rendering | |
| HasBytes (Careted a) # | |
Defined in Text.Trifecta.Rendering | |
| HasCaret (Careted a) # | |
| Renderable (Careted a) # | |
Defined in Text.Trifecta.Rendering | |
| Reducer (Careted a) Rendering # | |
| type Rep (Careted a) # | |
Defined in Text.Trifecta.Rendering type Rep (Careted a) = D1 (MetaData "Careted" "Text.Trifecta.Rendering" "trifecta-2-EopHS1729LQA1QYMOn2Dm4" False) (C1 (MetaCons ":^" (InfixI LeftAssociative 9) False) (S1 (MetaSel (Nothing :: Maybe Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 a) :*: S1 (MetaSel (Nothing :: Maybe Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Caret))) | |
caretEffects :: [SGR] #
ANSI terminal style for rendering the caret.
renderingCaret :: Delta -> ByteString -> Rendering #
Spans
A Span marks a range of input characters. If Caret is a point, then
Span is a line.
>>>plain (pretty (addSpan (Columns 35 35) (Columns 38 38) exampleRendering))int main(int argc, char ** argv) { int; }<EOF> ~~~
Constructors
| Span !Delta !Delta !ByteString |
Instances
| Eq Span # | |
| Data Span # | |
Defined in Text.Trifecta.Rendering Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> Span -> c Span # gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c Span # dataTypeOf :: Span -> DataType # dataCast1 :: Typeable t => (forall d. Data d => c (t d)) -> Maybe (c Span) # dataCast2 :: Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c Span) # gmapT :: (forall b. Data b => b -> b) -> Span -> Span # gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> Span -> r # gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> Span -> r # gmapQ :: (forall d. Data d => d -> u) -> Span -> [u] # gmapQi :: Int -> (forall d. Data d => d -> u) -> Span -> u # gmapM :: Monad m => (forall d. Data d => d -> m d) -> Span -> m Span # gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> Span -> m Span # gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> Span -> m Span # | |
| Ord Span # | |
| Show Span # | |
| Generic Span # | |
| Semigroup Span # | |
| Hashable Span # | |
Defined in Text.Trifecta.Rendering | |
| HasSpan Span # | |
| Renderable Span # | |
Defined in Text.Trifecta.Rendering | |
| Reducer Span Rendering # | |
| type Rep Span # | |
Defined in Text.Trifecta.Rendering type Rep Span = D1 (MetaData "Span" "Text.Trifecta.Rendering" "trifecta-2-EopHS1729LQA1QYMOn2Dm4" False) (C1 (MetaCons "Span" PrefixI False) (S1 (MetaSel (Nothing :: Maybe Symbol) NoSourceUnpackedness SourceStrict DecidedStrict) (Rec0 Delta) :*: (S1 (MetaSel (Nothing :: Maybe Symbol) NoSourceUnpackedness SourceStrict DecidedStrict) (Rec0 Delta) :*: S1 (MetaSel (Nothing :: Maybe Symbol) SourceUnpack SourceStrict DecidedStrict) (Rec0 ByteString)))) | |
Minimal complete definition
Annotate an arbitrary piece of data with a Span, typically its
corresponding input location.
Instances
| Functor Spanned # | |
| Foldable Spanned # | |
Defined in Text.Trifecta.Rendering Methods fold :: Monoid m => Spanned m -> m # foldMap :: Monoid m => (a -> m) -> Spanned a -> m # foldr :: (a -> b -> b) -> b -> Spanned a -> b # foldr' :: (a -> b -> b) -> b -> Spanned a -> b # foldl :: (b -> a -> b) -> b -> Spanned a -> b # foldl' :: (b -> a -> b) -> b -> Spanned a -> b # foldr1 :: (a -> a -> a) -> Spanned a -> a # foldl1 :: (a -> a -> a) -> Spanned a -> a # elem :: Eq a => a -> Spanned a -> Bool # maximum :: Ord a => Spanned a -> a # minimum :: Ord a => Spanned a -> a # | |
| Traversable Spanned # | |
| Comonad Spanned # | |
| ComonadApply Spanned # | |
| Eq a => Eq (Spanned a) # | |
| Data a => Data (Spanned a) # | |
Defined in Text.Trifecta.Rendering Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> Spanned a -> c (Spanned a) # gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c (Spanned a) # toConstr :: Spanned a -> Constr # dataTypeOf :: Spanned a -> DataType # dataCast1 :: Typeable t => (forall d. Data d => c (t d)) -> Maybe (c (Spanned a)) # dataCast2 :: Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c (Spanned a)) # gmapT :: (forall b. Data b => b -> b) -> Spanned a -> Spanned a # gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> Spanned a -> r # gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> Spanned a -> r # gmapQ :: (forall d. Data d => d -> u) -> Spanned a -> [u] # gmapQi :: Int -> (forall d. Data d => d -> u) -> Spanned a -> u # gmapM :: Monad m => (forall d. Data d => d -> m d) -> Spanned a -> m (Spanned a) # gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> Spanned a -> m (Spanned a) # gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> Spanned a -> m (Spanned a) # | |
| Ord a => Ord (Spanned a) # | |
| Show a => Show (Spanned a) # | |
| Generic (Spanned a) # | |
| Hashable a => Hashable (Spanned a) # | |
Defined in Text.Trifecta.Rendering | |
| HasSpan (Spanned a) # | |
| Renderable (Spanned a) # | |
Defined in Text.Trifecta.Rendering | |
| Reducer (Spanned a) Rendering # | |
| type Rep (Spanned a) # | |
Defined in Text.Trifecta.Rendering type Rep (Spanned a) = D1 (MetaData "Spanned" "Text.Trifecta.Rendering" "trifecta-2-EopHS1729LQA1QYMOn2Dm4" False) (C1 (MetaCons ":~" (InfixI LeftAssociative 9) False) (S1 (MetaSel (Nothing :: Maybe Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 a) :*: S1 (MetaSel (Nothing :: Maybe Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Span))) | |
spanEffects :: [SGR] #
ANSI terminal style to render spans with.
Fixits
A Fixit is a Span with a suggestion.
>>>plain (pretty (addFixit (Columns 35 35) (Columns 38 38) "Fix this!" exampleRendering))int main(int argc, char ** argv) { int; }<EOF> ~~~ Fix this!
Constructors
| Fixit | |
Fields
| |
Instances
| Eq Fixit # | |
| Data Fixit # | |
Defined in Text.Trifecta.Rendering Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> Fixit -> c Fixit # gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c Fixit # dataTypeOf :: Fixit -> DataType # dataCast1 :: Typeable t => (forall d. Data d => c (t d)) -> Maybe (c Fixit) # dataCast2 :: Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c Fixit) # gmapT :: (forall b. Data b => b -> b) -> Fixit -> Fixit # gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> Fixit -> r # gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> Fixit -> r # gmapQ :: (forall d. Data d => d -> u) -> Fixit -> [u] # gmapQi :: Int -> (forall d. Data d => d -> u) -> Fixit -> u # gmapM :: Monad m => (forall d. Data d => d -> m d) -> Fixit -> m Fixit # gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> Fixit -> m Fixit # gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> Fixit -> m Fixit # | |
| Ord Fixit # | |
| Show Fixit # | |
| Generic Fixit # | |
| Hashable Fixit # | |
Defined in Text.Trifecta.Rendering | |
| HasSpan Fixit # | |
| Renderable Fixit # | |
Defined in Text.Trifecta.Rendering | |
| HasFixit Fixit # | |
| Reducer Fixit Rendering # | |
| type Rep Fixit # | |
Defined in Text.Trifecta.Rendering type Rep Fixit = D1 (MetaData "Fixit" "Text.Trifecta.Rendering" "trifecta-2-EopHS1729LQA1QYMOn2Dm4" False) (C1 (MetaCons "Fixit" PrefixI True) (S1 (MetaSel (Just "_fixitSpan") SourceUnpack SourceStrict DecidedStrict) (Rec0 Span) :*: S1 (MetaSel (Just "_fixitReplacement") NoSourceUnpackedness SourceStrict DecidedStrict) (Rec0 ByteString))) | |
Minimal complete definition