Data.Text.Prettyprint.Doc: exported symbols usage examples

Symbols

  • Semigroup No usage example found for this symbol :( Collapse [-]
    <+> No usage example found for this symbol :( Collapse [-]
    align See 18 Occurences [+] Collapse [-]
    Found in Data.Extensible.Dictionary from the package extensible
      showsPrec d xs = showParen (d > 0)
        $ henumerateFor (Proxy :: Proxy (Instance1 Show h)) xs
        (\i r -> showsPrec 0 (hlookup i xs) . showString " <: " . r)
        (showString "nil")
    
    #if !MIN_VERSION_prettyprinter(1,2,1)
    instance Pretty a => Pretty (Identity a) where
      pretty = pretty . runIdentity
    
    instance Pretty a => Pretty (Const a b) where
      pretty = pretty . getConst
    #endif
    
    instance WrapForall Pretty h xs => Pretty (h :* xs) where
      pretty xs = align
        $ encloseSep (flatAlt "" "{ ") (flatAlt "" " }") (flatAlt "" "; ")
        $ henumerateFor (Proxy :: Proxy (Instance1 Pretty h)) xs
        (\i r -> pretty (hlookup i xs) : r)
        []
    

    Found in LLVM.Pretty from the package llvm-hs-pretty
                ("define" <+> pretty linkage <+> pretty callingConvention
                  <+> ppReturnAttributes returnAttributes <+> pretty returnType <+> global (pretty name)
                  <> ppParams pretty parameters <+> ppFunctionAttributes functionAttributes <+> align <+> gcName <+> pre)
                `wrapbraces` (indent 2 $ ppSingleBlock b)
    
            bs ->
              ("define" <+> pretty linkage <+> pretty callingConvention
                <+> ppReturnAttributes returnAttributes <+> pretty returnType <+> global (pretty name)
                <> ppParams pretty parameters <+> ppFunctionAttributes functionAttributes <+> align <+> gcName <+> pre)
              `wrapbraces` (vcat $ fmap pretty bs)
        where
          pre = case prefix of
                  Nothing  -> mempty
                  Just con -> "prefix" <+> ppTyped con
          align | alignment == 0    = mempty
                | otherwise = "align" <+> pretty alignment
          gcName = maybe mempty (\n -> "gc" <+> dquotes (pretty $ pack n)) (fmap unShort garbageCollectorName)
    
      pretty GlobalVariable {..} = global (pretty name) <+> "=" <+> ppLinkage hasInitializer linkage <+> ppMaybe unnamedAddr
                                 <+> addrSpace' <+> kind <+> pretty type' <+> ppMaybe initializer <> ppAlign alignment
    

    Found in LLVM.Pretty from the package llvm-hs-pretty
              ("declare" <+> pretty linkage <+> pretty callingConvention
                <+> ppReturnAttributes returnAttributes <+> pretty returnType <+> global (pretty name)
                <> ppParams (pretty . typeOf) parameters <+> ppFunctionAttributes functionAttributes <+> align <+> gcName <+> pre)
    
            -- single unnamed block is special cased, and won't parse otherwise... yeah good times
            [b@(BasicBlock (UnName _) _ _)] ->
                ("define" <+> pretty linkage <+> pretty callingConvention
                  <+> ppReturnAttributes returnAttributes <+> pretty returnType <+> global (pretty name)
                  <> ppParams pretty parameters <+> ppFunctionAttributes functionAttributes <+> align <+> gcName <+> pre)
                `wrapbraces` (indent 2 $ ppSingleBlock b)
    
            bs ->
              ("define" <+> pretty linkage <+> pretty callingConvention
                <+> ppReturnAttributes returnAttributes <+> pretty returnType <+> global (pretty name)
                <> ppParams pretty parameters <+> ppFunctionAttributes functionAttributes <+> align <+> gcName <+> pre)
              `wrapbraces` (vcat $ fmap pretty bs)
        where
          pre = case prefix of
                  Nothing  -> mempty
                  Just con -> "prefix" <+> ppTyped con
    

    Found in LLVM.Pretty from the package llvm-hs-pretty
      pretty LabelType = "label"
    
    instance Pretty Global where
      pretty Function {..} =
          case basicBlocks of
            [] ->
              ("declare" <+> pretty linkage <+> pretty callingConvention
                <+> ppReturnAttributes returnAttributes <+> pretty returnType <+> global (pretty name)
                <> ppParams (pretty . typeOf) parameters <+> ppFunctionAttributes functionAttributes <+> align <+> gcName <+> pre)
    
            -- single unnamed block is special cased, and won't parse otherwise... yeah good times
            [b@(BasicBlock (UnName _) _ _)] ->
                ("define" <+> pretty linkage <+> pretty callingConvention
                  <+> ppReturnAttributes returnAttributes <+> pretty returnType <+> global (pretty name)
                  <> ppParams pretty parameters <+> ppFunctionAttributes functionAttributes <+> align <+> gcName <+> pre)
                `wrapbraces` (indent 2 $ ppSingleBlock b)
    
            bs ->
              ("define" <+> pretty linkage <+> pretty callingConvention
                <+> ppReturnAttributes returnAttributes <+> pretty returnType <+> global (pretty name)
    

    Found in LLVM.Pretty from the package llvm-hs-pretty
                                   then "<{" <> (commas $ fmap pretty elementTypes ) <> "}>"
                                   else  "{" <> (commas $ fmap pretty elementTypes ) <> "}"
      pretty (ArrayType {..}) = brackets $ pretty nArrayElements <+> "x" <+> pretty elementType
      pretty (NamedTypeReference name) = "%" <> pretty name
      pretty MetadataType = "metadata"
      pretty TokenType = "token"
      pretty LabelType = "label"
    
    instance Pretty Global where
      pretty Function {..} =
          case basicBlocks of
            [] ->
              ("declare" <+> pretty linkage <+> pretty callingConvention
                <+> ppReturnAttributes returnAttributes <+> pretty returnType <+> global (pretty name)
                <> ppParams (pretty . typeOf) parameters <+> ppFunctionAttributes functionAttributes <+> align <+> gcName <+> pre)
    
            -- single unnamed block is special cased, and won't parse otherwise... yeah good times
            [b@(BasicBlock (UnName _) _ _)] ->
                ("define" <+> pretty linkage <+> pretty callingConvention
                  <+> ppReturnAttributes returnAttributes <+> pretty returnType <+> global (pretty name)
    

    Found in Control.Monad.Log from the package logging-effect
                    }
      deriving (Eq,Ord,Read,Show,Functor,Traversable,Foldable)
    
    -- | Given a way to render the underlying message @a@ and a way to format
    -- 'UTCTime', render a message with its timestamp.
    --
    -- >>> renderWithTimestamp (formatTime defaultTimeLocale rfc822DateFormat) id timestamppedLogMessage
    -- [Tue, 19 Jan 2016 11:29:42 UTC] Setting target speed to plaid
    renderWithTimestamp :: (UTCTime -> String)
                           -- ^ How to format the timestamp.
                        -> (a -> PP.Doc ann)
                           -- ^ How to render the rest of the message.
                        -> (WithTimestamp a -> PP.Doc ann)
    renderWithTimestamp formatter k (WithTimestamp a t) =
      PP.brackets (PP.pretty (LT.pack (formatter t))) PP.<+> PP.align (k a)
    
    -- | Add the current time as a timestamp to a message.
    timestamp :: (MonadIO m) => a -> m (WithTimestamp a)
    timestamp msg = do
           now <- liftIO getCurrentTime
    

    Found in Control.Monad.Log from the package logging-effect
     | Debug -- ^ Information useful to developers for debugging the application.
      deriving (Eq,Enum,Bounded,Read,Show,Ord)
    
    instance PP.Pretty Severity where
      pretty = PP.pretty . LT.pack . show
    
    -- | Given a way to render the underlying message @a@, render a message with its
    -- severity.
    --
    -- >>> renderWithSeverity id (WithSeverity Informational "Flux capacitor is functional")
    -- [Informational] Flux capacitor is functional
    renderWithSeverity
      :: (a -> PP.Doc ann) -> (WithSeverity a -> PP.Doc ann)
    renderWithSeverity k (WithSeverity u a) =
      PP.brackets (PP.pretty u) PP.<+> PP.align (k a)
    
    -- | @
    -- 'logDebug' = 'logMessage' . 'WithSeverity' 'Debug'
    -- @
    logDebug :: MonadLog (WithSeverity a) m => a -> m ()
    

    Found in Text.PrettyPrint.Annotated.Leijen from the package prettyprinter-compat-annotated-wl-pprint
    {-# LANGUAGE CPP #-}
    
    #include "version-compatibility-macros.h"
    
    module Text.PrettyPrint.Annotated.Leijen {-# DEPRECATED "Compatibility module for users of annotated-wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, SimpleDoc, SpanList, putDoc, hPutDoc, empty, char, text, (<>), nest,
        line, linebreak, group, softline, softbreak, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, pipe, string,
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    softbreak = New.group linebreak
    
    hardline :: Doc
    hardline = New.hardline
    
    flatAlt :: Doc -> Doc -> Doc
    flatAlt = New.flatAlt
    
    renderSmart :: Float -> Int -> Doc -> SimpleDoc
    renderSmart ribbonFraction pageWidth
        = New.layoutSmart New.LayoutOptions
            { New.layoutPageWidth = New.AvailablePerLine pageWidth (realToFrac ribbonFraction) }
    
    align :: Doc -> Doc
    align = New.align
    
    hang :: Int -> Doc -> Doc
    hang = New.hang
    
    indent :: Int -> Doc -> Doc
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    softbreak = New.group linebreak
    
    hardline :: Doc
    hardline = New.hardline
    
    flatAlt :: Doc -> Doc -> Doc
    flatAlt = New.flatAlt
    
    renderSmart :: Float -> Int -> Doc -> SimpleDoc
    renderSmart ribbonFraction pageWidth
        = New.layoutSmart New.LayoutOptions
            { New.layoutPageWidth = New.AvailablePerLine pageWidth (realToFrac ribbonFraction) }
    
    align :: Doc -> Doc
    align = New.align
    
    hang :: Int -> Doc -> Doc
    hang = New.hang
    
    indent :: Int -> Doc -> Doc
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    softbreak :: Doc
    softbreak = New.group linebreak
    
    hardline :: Doc
    hardline = New.hardline
    
    flatAlt :: Doc -> Doc -> Doc
    flatAlt = New.flatAlt
    
    renderSmart :: Float -> Int -> Doc -> SimpleDoc
    renderSmart ribbonFraction pageWidth
        = New.layoutSmart New.LayoutOptions
            { New.layoutPageWidth = New.AvailablePerLine pageWidth (realToFrac ribbonFraction) }
    
    align :: Doc -> Doc
    align = New.align
    
    hang :: Int -> Doc -> Doc
    hang = New.hang
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    module Text.PrettyPrint.ANSI.Leijen {-# DEPRECATED "Compatibility module for users of ansi-wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, putDoc, hPutDoc, empty, char, text, (<>), nest, line, linebreak, group,
        softline, softbreak, hardline, flatAlt, renderSmart, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, black, red,
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    linebreak :: Doc
    linebreak = New.flatAlt New.line mempty
    
    group :: Doc -> Doc
    group = New.group
    
    softline :: Doc
    softline = New.softline
    
    softbreak :: Doc
    softbreak = New.group linebreak
    
    align :: Doc -> Doc
    align = New.align
    
    hang :: Int -> Doc -> Doc
    hang = New.hang
    
    indent :: Int -> Doc -> Doc
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    linebreak :: Doc
    linebreak = New.flatAlt New.line mempty
    
    group :: Doc -> Doc
    group = New.group
    
    softline :: Doc
    softline = New.softline
    
    softbreak :: Doc
    softbreak = New.group linebreak
    
    align :: Doc -> Doc
    align = New.align
    
    hang :: Int -> Doc -> Doc
    hang = New.hang
    
    indent :: Int -> Doc -> Doc
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    line = New.line
    
    linebreak :: Doc
    linebreak = New.flatAlt New.line mempty
    
    group :: Doc -> Doc
    group = New.group
    
    softline :: Doc
    softline = New.softline
    
    softbreak :: Doc
    softbreak = New.group linebreak
    
    align :: Doc -> Doc
    align = New.align
    
    hang :: Int -> Doc -> Doc
    hang = New.hang
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    module Text.PrettyPrint.Leijen {-# DEPRECATED "Compatibility module for users of wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, putDoc, hPutDoc, empty, char, text, (<>), nest, line, linebreak, group,
        softline, softbreak, align, hang, indent, encloseSep, list, tupled,
        semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>), hsep, vsep, fillSep, sep,
        hcat, vcat, fillCat, cat, punctuate, fill, fillBreak, enclose, squotes,
        dquotes, parens, angles, braces, brackets, lparen, rparen, langle, rangle,
        lbrace, rbrace, lbracket, rbracket, squote, dquote, semi, colon, comma,
        space, dot, backslash, equals, string, int, integer, float, double,
    

    Found in Text.Show.Prettyprint.Internal from the package show-prettyprint
    shownP :: Parser (Doc ann)
    shownP = valueP <* eof
    
    -- | Prettyparser for a constructor, which is roughly a word applied to
    -- arguments.
    --
    -- >>> testParse valueP "Just ('c', Left ())"
    -- Just ('c',Left ())
    valueP :: Parser (Doc ann)
    valueP = do
        thing <- choice [identifierP, numberP, stringLitP, charLitP]
        args <- many argP
        pure (if null args
            then thing
            else thing <+> align (sep args) )
    
    -- | An identifier is a liberal version of a "variable or constructor", which
    -- roughly means that it's a printable word without parentheses.
    --
    -- >>> testParse identifierP "_foo'bar"
    

    Found in Control.Teardown.Internal.Types from the package teardown
              Just err ->
                Pretty.hang 2
                  (Pretty.vsep ["✘"
                                <+> pretty resultDescription
                                <+> Pretty.parens (pretty $ show resultElapsedTime)
                               , "|" <+> pretty (show err) ])
          BranchResult {resultDidFail, resultDescription, resultElapsedTime, resultListing} ->
            let
              symbolDoc = if resultDidFail then "✘" else "✓"
            in
              symbolDoc
              <+> pretty resultDescription
              <+> Pretty.parens (pretty $ show resultElapsedTime)
              <> Pretty.hardline
              <> Pretty.indent 2 (Pretty.align (Pretty.vsep (map pretty resultListing)))
    
    instance Display TeardownResult where
      display = displayShow . pretty
    
    getElapsedTime :: TeardownResult -> NominalDiffTime
    

    alterAnnotations No usage example found for this symbol :( Collapse [-]
    alterAnnotationsS No usage example found for this symbol :( Collapse [-]
    annotate See 45 Occurences [+] Collapse [-]
    Found in Data.Text.Prettyprint.Doc.Render.Tutorials.StackMachineTutorial from the package prettyprinter
    -- $standalone-text
    --
    -- == Conveinence definitions
    
    bold, italics, paragraph, headline :: Doc SimpleHtml -> Doc SimpleHtml
    bold = annotate Bold
    italics = annotate Italics
    paragraph = annotate Paragraph
    headline = annotate Headline
    
    color :: Color -> Doc SimpleHtml -> Doc SimpleHtml
    color c = annotate (Color c)
    
    
    
    -- $standalone-text
    --
    

    Found in Data.Text.Prettyprint.Doc.Render.Tutorials.StackMachineTutorial from the package prettyprinter
    data SimpleHtml = Bold | Italics | Color Color | Paragraph | Headline
    data Color = Red | Green | Blue
    
    
    
    -- $standalone-text
    --
    -- == Conveinence definitions
    
    bold, italics, paragraph, headline :: Doc SimpleHtml -> Doc SimpleHtml
    bold = annotate Bold
    italics = annotate Italics
    paragraph = annotate Paragraph
    headline = annotate Headline
    
    color :: Color -> Doc SimpleHtml -> Doc SimpleHtml
    color c = annotate (Color c)
    

    Found in Data.Text.Prettyprint.Doc.Render.Tutorials.StackMachineTutorial from the package prettyprinter
    -- the output format ('TL.Text').
    
    data SimpleHtml = Bold | Italics | Color Color | Paragraph | Headline
    data Color = Red | Green | Blue
    
    
    
    -- $standalone-text
    --
    -- == Conveinence definitions
    
    bold, italics, paragraph, headline :: Doc SimpleHtml -> Doc SimpleHtml
    bold = annotate Bold
    italics = annotate Italics
    paragraph = annotate Paragraph
    headline = annotate Headline
    
    color :: Color -> Doc SimpleHtml -> Doc SimpleHtml
    color c = annotate (Color c)
    

    Found in Data.Text.Prettyprint.Doc.Render.Tutorials.StackMachineTutorial from the package prettyprinter
    -- defining a @'Doc' 'SimpleHtml'@. We will later define how to convert this to
    -- the output format ('TL.Text').
    
    data SimpleHtml = Bold | Italics | Color Color | Paragraph | Headline
    data Color = Red | Green | Blue
    
    
    
    -- $standalone-text
    --
    -- == Conveinence definitions
    
    bold, italics, paragraph, headline :: Doc SimpleHtml -> Doc SimpleHtml
    bold = annotate Bold
    italics = annotate Italics
    paragraph = annotate Paragraph
    headline = annotate Headline
    
    color :: Color -> Doc SimpleHtml -> Doc SimpleHtml
    color c = annotate (Color c)
    

    Found in Data.Text.Prettyprint.Doc.Render.Tutorials.StackMachineTutorial from the package prettyprinter
    -- First, we define a set of valid annotations must be defined, with the goal of
    -- defining a @'Doc' 'SimpleHtml'@. We will later define how to convert this to
    -- the output format ('TL.Text').
    
    data SimpleHtml = Bold | Italics | Color Color | Paragraph | Headline
    data Color = Red | Green | Blue
    
    
    
    -- $standalone-text
    --
    -- == Conveinence definitions
    
    bold, italics, paragraph, headline :: Doc SimpleHtml -> Doc SimpleHtml
    bold = annotate Bold
    italics = annotate Italics
    paragraph = annotate Paragraph
    headline = annotate Headline
    
    color :: Color -> Doc SimpleHtml -> Doc SimpleHtml
    

    Found in Data.Text.Prettyprint.Doc.Render.Tutorials.TreeRenderingTutorial from the package prettyprinter
    -- $standalone-text
    --
    -- == Conveinence definitions
    
    bold, italics, paragraph, headline :: Doc SimpleHtml -> Doc SimpleHtml
    bold = annotate Bold
    italics = annotate Italics
    paragraph = annotate Paragraph
    headline = annotate Headline
    
    color :: Color -> Doc SimpleHtml -> Doc SimpleHtml
    color c = annotate (Color c)
    
    
    -- = The rendering algorithm
    --
    -- With the annotation definitions out of the way, we can now define a
    

    Found in Data.Text.Prettyprint.Doc.Render.Tutorials.TreeRenderingTutorial from the package prettyprinter
    data SimpleHtml = Bold | Italics | Color Color | Paragraph | Headline
    data Color = Red | Green | Blue
    
    
    
    -- $standalone-text
    --
    -- == Conveinence definitions
    
    bold, italics, paragraph, headline :: Doc SimpleHtml -> Doc SimpleHtml
    bold = annotate Bold
    italics = annotate Italics
    paragraph = annotate Paragraph
    headline = annotate Headline
    
    color :: Color -> Doc SimpleHtml -> Doc SimpleHtml
    color c = annotate (Color c)
    

    Found in Data.Text.Prettyprint.Doc.Render.Tutorials.TreeRenderingTutorial from the package prettyprinter
    -- the output format ('TL.Text').
    
    data SimpleHtml = Bold | Italics | Color Color | Paragraph | Headline
    data Color = Red | Green | Blue
    
    
    
    -- $standalone-text
    --
    -- == Conveinence definitions
    
    bold, italics, paragraph, headline :: Doc SimpleHtml -> Doc SimpleHtml
    bold = annotate Bold
    italics = annotate Italics
    paragraph = annotate Paragraph
    headline = annotate Headline
    
    color :: Color -> Doc SimpleHtml -> Doc SimpleHtml
    color c = annotate (Color c)
    

    Found in Data.Text.Prettyprint.Doc.Render.Tutorials.TreeRenderingTutorial from the package prettyprinter
    -- defining a @'Doc' 'SimpleHtml'@. We will later define how to convert this to
    -- the output format ('TL.Text').
    
    data SimpleHtml = Bold | Italics | Color Color | Paragraph | Headline
    data Color = Red | Green | Blue
    
    
    
    -- $standalone-text
    --
    -- == Conveinence definitions
    
    bold, italics, paragraph, headline :: Doc SimpleHtml -> Doc SimpleHtml
    bold = annotate Bold
    italics = annotate Italics
    paragraph = annotate Paragraph
    headline = annotate Headline
    
    color :: Color -> Doc SimpleHtml -> Doc SimpleHtml
    color c = annotate (Color c)
    

    Found in Data.Text.Prettyprint.Doc.Render.Tutorials.TreeRenderingTutorial from the package prettyprinter
    -- First, we define a set of valid annotations must be defined, with the goal of
    -- defining a @'Doc' 'SimpleHtml'@. We will later define how to convert this to
    -- the output format ('TL.Text').
    
    data SimpleHtml = Bold | Italics | Color Color | Paragraph | Headline
    data Color = Red | Green | Blue
    
    
    
    -- $standalone-text
    --
    -- == Conveinence definitions
    
    bold, italics, paragraph, headline :: Doc SimpleHtml -> Doc SimpleHtml
    bold = annotate Bold
    italics = annotate Italics
    paragraph = annotate Paragraph
    headline = annotate Headline
    
    color :: Color -> Doc SimpleHtml -> Doc SimpleHtml
    

    Found in Text.PrettyPrint.Annotated.Leijen from the package prettyprinter-compat-annotated-wl-pprint
    {-# LANGUAGE CPP #-}
    
    #include "version-compatibility-macros.h"
    
    module Text.PrettyPrint.Annotated.Leijen {-# DEPRECATED "Compatibility module for users of annotated-wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, SimpleDoc, SpanList, putDoc, hPutDoc, empty, char, text, (<>), nest,
        line, linebreak, group, softline, softbreak, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, pipe, string,
        int, integer, float, double, rational, bool, annotate, noAnnotate,
        renderPretty, renderCompact, displayDecorated, displayDecoratedA, display,
        displayS, displayIO, displaySpans, column, nesting, width
    
    ) where
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    onmagenta     = New.annotate (NewT.bgColor     NewT.Magenta)
    oncyan        = New.annotate (NewT.bgColor     NewT.Cyan)
    onwhite       = New.annotate (NewT.bgColor     NewT.White)
    ondullblack   = New.annotate (NewT.bgColorDull NewT.Black)
    ondullred     = New.annotate (NewT.bgColorDull NewT.Red)
    ondullgreen   = New.annotate (NewT.bgColorDull NewT.Green)
    ondullyellow  = New.annotate (NewT.bgColorDull NewT.Yellow)
    ondullblue    = New.annotate (NewT.bgColorDull NewT.Blue)
    ondullmagenta = New.annotate (NewT.bgColorDull NewT.Magenta)
    ondullcyan    = New.annotate (NewT.bgColorDull NewT.Cyan)
    ondullwhite   = New.annotate (NewT.bgColorDull NewT.White)
    bold = New.annotate NewT.bold
    debold = id
    {-# WARNING debold "Debold does not do anything" #-}
    underline = New.annotate NewT.underlined
    deunderline = id
    {-# WARNING deunderline "Debold does not do anything" #-}
    
    plain :: Doc -> Doc
    plain = New.unAnnotate
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    ongreen       = New.annotate (NewT.bgColor     NewT.Green)
    onyellow      = New.annotate (NewT.bgColor     NewT.Yellow)
    onblue        = New.annotate (NewT.bgColor     NewT.Blue)
    onmagenta     = New.annotate (NewT.bgColor     NewT.Magenta)
    oncyan        = New.annotate (NewT.bgColor     NewT.Cyan)
    onwhite       = New.annotate (NewT.bgColor     NewT.White)
    ondullblack   = New.annotate (NewT.bgColorDull NewT.Black)
    ondullred     = New.annotate (NewT.bgColorDull NewT.Red)
    ondullgreen   = New.annotate (NewT.bgColorDull NewT.Green)
    ondullyellow  = New.annotate (NewT.bgColorDull NewT.Yellow)
    ondullblue    = New.annotate (NewT.bgColorDull NewT.Blue)
    ondullmagenta = New.annotate (NewT.bgColorDull NewT.Magenta)
    ondullcyan    = New.annotate (NewT.bgColorDull NewT.Cyan)
    ondullwhite   = New.annotate (NewT.bgColorDull NewT.White)
    bold = New.annotate NewT.bold
    debold = id
    {-# WARNING debold "Debold does not do anything" #-}
    underline = New.annotate NewT.underlined
    deunderline = id
    {-# WARNING deunderline "Debold does not do anything" #-}
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    onred         = New.annotate (NewT.bgColor     NewT.Red)
    ongreen       = New.annotate (NewT.bgColor     NewT.Green)
    onyellow      = New.annotate (NewT.bgColor     NewT.Yellow)
    onblue        = New.annotate (NewT.bgColor     NewT.Blue)
    onmagenta     = New.annotate (NewT.bgColor     NewT.Magenta)
    oncyan        = New.annotate (NewT.bgColor     NewT.Cyan)
    onwhite       = New.annotate (NewT.bgColor     NewT.White)
    ondullblack   = New.annotate (NewT.bgColorDull NewT.Black)
    ondullred     = New.annotate (NewT.bgColorDull NewT.Red)
    ondullgreen   = New.annotate (NewT.bgColorDull NewT.Green)
    ondullyellow  = New.annotate (NewT.bgColorDull NewT.Yellow)
    ondullblue    = New.annotate (NewT.bgColorDull NewT.Blue)
    ondullmagenta = New.annotate (NewT.bgColorDull NewT.Magenta)
    ondullcyan    = New.annotate (NewT.bgColorDull NewT.Cyan)
    ondullwhite   = New.annotate (NewT.bgColorDull NewT.White)
    bold = New.annotate NewT.bold
    debold = id
    {-# WARNING debold "Debold does not do anything" #-}
    underline = New.annotate NewT.underlined
    deunderline = id
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    onblack       = New.annotate (NewT.bgColor     NewT.Black)
    onred         = New.annotate (NewT.bgColor     NewT.Red)
    ongreen       = New.annotate (NewT.bgColor     NewT.Green)
    onyellow      = New.annotate (NewT.bgColor     NewT.Yellow)
    onblue        = New.annotate (NewT.bgColor     NewT.Blue)
    onmagenta     = New.annotate (NewT.bgColor     NewT.Magenta)
    oncyan        = New.annotate (NewT.bgColor     NewT.Cyan)
    onwhite       = New.annotate (NewT.bgColor     NewT.White)
    ondullblack   = New.annotate (NewT.bgColorDull NewT.Black)
    ondullred     = New.annotate (NewT.bgColorDull NewT.Red)
    ondullgreen   = New.annotate (NewT.bgColorDull NewT.Green)
    ondullyellow  = New.annotate (NewT.bgColorDull NewT.Yellow)
    ondullblue    = New.annotate (NewT.bgColorDull NewT.Blue)
    ondullmagenta = New.annotate (NewT.bgColorDull NewT.Magenta)
    ondullcyan    = New.annotate (NewT.bgColorDull NewT.Cyan)
    ondullwhite   = New.annotate (NewT.bgColorDull NewT.White)
    bold = New.annotate NewT.bold
    debold = id
    {-# WARNING debold "Debold does not do anything" #-}
    underline = New.annotate NewT.underlined
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    dullwhite     = New.annotate (NewT.colorDull   NewT.White)
    onblack       = New.annotate (NewT.bgColor     NewT.Black)
    onred         = New.annotate (NewT.bgColor     NewT.Red)
    ongreen       = New.annotate (NewT.bgColor     NewT.Green)
    onyellow      = New.annotate (NewT.bgColor     NewT.Yellow)
    onblue        = New.annotate (NewT.bgColor     NewT.Blue)
    onmagenta     = New.annotate (NewT.bgColor     NewT.Magenta)
    oncyan        = New.annotate (NewT.bgColor     NewT.Cyan)
    onwhite       = New.annotate (NewT.bgColor     NewT.White)
    ondullblack   = New.annotate (NewT.bgColorDull NewT.Black)
    ondullred     = New.annotate (NewT.bgColorDull NewT.Red)
    ondullgreen   = New.annotate (NewT.bgColorDull NewT.Green)
    ondullyellow  = New.annotate (NewT.bgColorDull NewT.Yellow)
    ondullblue    = New.annotate (NewT.bgColorDull NewT.Blue)
    ondullmagenta = New.annotate (NewT.bgColorDull NewT.Magenta)
    ondullcyan    = New.annotate (NewT.bgColorDull NewT.Cyan)
    ondullwhite   = New.annotate (NewT.bgColorDull NewT.White)
    bold = New.annotate NewT.bold
    debold = id
    {-# WARNING debold "Debold does not do anything" #-}
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    dullcyan      = New.annotate (NewT.colorDull   NewT.Cyan)
    dullwhite     = New.annotate (NewT.colorDull   NewT.White)
    onblack       = New.annotate (NewT.bgColor     NewT.Black)
    onred         = New.annotate (NewT.bgColor     NewT.Red)
    ongreen       = New.annotate (NewT.bgColor     NewT.Green)
    onyellow      = New.annotate (NewT.bgColor     NewT.Yellow)
    onblue        = New.annotate (NewT.bgColor     NewT.Blue)
    onmagenta     = New.annotate (NewT.bgColor     NewT.Magenta)
    oncyan        = New.annotate (NewT.bgColor     NewT.Cyan)
    onwhite       = New.annotate (NewT.bgColor     NewT.White)
    ondullblack   = New.annotate (NewT.bgColorDull NewT.Black)
    ondullred     = New.annotate (NewT.bgColorDull NewT.Red)
    ondullgreen   = New.annotate (NewT.bgColorDull NewT.Green)
    ondullyellow  = New.annotate (NewT.bgColorDull NewT.Yellow)
    ondullblue    = New.annotate (NewT.bgColorDull NewT.Blue)
    ondullmagenta = New.annotate (NewT.bgColorDull NewT.Magenta)
    ondullcyan    = New.annotate (NewT.bgColorDull NewT.Cyan)
    ondullwhite   = New.annotate (NewT.bgColorDull NewT.White)
    bold = New.annotate NewT.bold
    debold = id
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    dullmagenta   = New.annotate (NewT.colorDull   NewT.Magenta)
    dullcyan      = New.annotate (NewT.colorDull   NewT.Cyan)
    dullwhite     = New.annotate (NewT.colorDull   NewT.White)
    onblack       = New.annotate (NewT.bgColor     NewT.Black)
    onred         = New.annotate (NewT.bgColor     NewT.Red)
    ongreen       = New.annotate (NewT.bgColor     NewT.Green)
    onyellow      = New.annotate (NewT.bgColor     NewT.Yellow)
    onblue        = New.annotate (NewT.bgColor     NewT.Blue)
    onmagenta     = New.annotate (NewT.bgColor     NewT.Magenta)
    oncyan        = New.annotate (NewT.bgColor     NewT.Cyan)
    onwhite       = New.annotate (NewT.bgColor     NewT.White)
    ondullblack   = New.annotate (NewT.bgColorDull NewT.Black)
    ondullred     = New.annotate (NewT.bgColorDull NewT.Red)
    ondullgreen   = New.annotate (NewT.bgColorDull NewT.Green)
    ondullyellow  = New.annotate (NewT.bgColorDull NewT.Yellow)
    ondullblue    = New.annotate (NewT.bgColorDull NewT.Blue)
    ondullmagenta = New.annotate (NewT.bgColorDull NewT.Magenta)
    ondullcyan    = New.annotate (NewT.bgColorDull NewT.Cyan)
    ondullwhite   = New.annotate (NewT.bgColorDull NewT.White)
    bold = New.annotate NewT.bold
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    dullblue      = New.annotate (NewT.colorDull   NewT.Blue)
    dullmagenta   = New.annotate (NewT.colorDull   NewT.Magenta)
    dullcyan      = New.annotate (NewT.colorDull   NewT.Cyan)
    dullwhite     = New.annotate (NewT.colorDull   NewT.White)
    onblack       = New.annotate (NewT.bgColor     NewT.Black)
    onred         = New.annotate (NewT.bgColor     NewT.Red)
    ongreen       = New.annotate (NewT.bgColor     NewT.Green)
    onyellow      = New.annotate (NewT.bgColor     NewT.Yellow)
    onblue        = New.annotate (NewT.bgColor     NewT.Blue)
    onmagenta     = New.annotate (NewT.bgColor     NewT.Magenta)
    oncyan        = New.annotate (NewT.bgColor     NewT.Cyan)
    onwhite       = New.annotate (NewT.bgColor     NewT.White)
    ondullblack   = New.annotate (NewT.bgColorDull NewT.Black)
    ondullred     = New.annotate (NewT.bgColorDull NewT.Red)
    ondullgreen   = New.annotate (NewT.bgColorDull NewT.Green)
    ondullyellow  = New.annotate (NewT.bgColorDull NewT.Yellow)
    ondullblue    = New.annotate (NewT.bgColorDull NewT.Blue)
    ondullmagenta = New.annotate (NewT.bgColorDull NewT.Magenta)
    ondullcyan    = New.annotate (NewT.bgColorDull NewT.Cyan)
    ondullwhite   = New.annotate (NewT.bgColorDull NewT.White)
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    dullyellow    = New.annotate (NewT.colorDull   NewT.Yellow)
    dullblue      = New.annotate (NewT.colorDull   NewT.Blue)
    dullmagenta   = New.annotate (NewT.colorDull   NewT.Magenta)
    dullcyan      = New.annotate (NewT.colorDull   NewT.Cyan)
    dullwhite     = New.annotate (NewT.colorDull   NewT.White)
    onblack       = New.annotate (NewT.bgColor     NewT.Black)
    onred         = New.annotate (NewT.bgColor     NewT.Red)
    ongreen       = New.annotate (NewT.bgColor     NewT.Green)
    onyellow      = New.annotate (NewT.bgColor     NewT.Yellow)
    onblue        = New.annotate (NewT.bgColor     NewT.Blue)
    onmagenta     = New.annotate (NewT.bgColor     NewT.Magenta)
    oncyan        = New.annotate (NewT.bgColor     NewT.Cyan)
    onwhite       = New.annotate (NewT.bgColor     NewT.White)
    ondullblack   = New.annotate (NewT.bgColorDull NewT.Black)
    ondullred     = New.annotate (NewT.bgColorDull NewT.Red)
    ondullgreen   = New.annotate (NewT.bgColorDull NewT.Green)
    ondullyellow  = New.annotate (NewT.bgColorDull NewT.Yellow)
    ondullblue    = New.annotate (NewT.bgColorDull NewT.Blue)
    ondullmagenta = New.annotate (NewT.bgColorDull NewT.Magenta)
    ondullcyan    = New.annotate (NewT.bgColorDull NewT.Cyan)
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    dullgreen     = New.annotate (NewT.colorDull   NewT.Green)
    dullyellow    = New.annotate (NewT.colorDull   NewT.Yellow)
    dullblue      = New.annotate (NewT.colorDull   NewT.Blue)
    dullmagenta   = New.annotate (NewT.colorDull   NewT.Magenta)
    dullcyan      = New.annotate (NewT.colorDull   NewT.Cyan)
    dullwhite     = New.annotate (NewT.colorDull   NewT.White)
    onblack       = New.annotate (NewT.bgColor     NewT.Black)
    onred         = New.annotate (NewT.bgColor     NewT.Red)
    ongreen       = New.annotate (NewT.bgColor     NewT.Green)
    onyellow      = New.annotate (NewT.bgColor     NewT.Yellow)
    onblue        = New.annotate (NewT.bgColor     NewT.Blue)
    onmagenta     = New.annotate (NewT.bgColor     NewT.Magenta)
    oncyan        = New.annotate (NewT.bgColor     NewT.Cyan)
    onwhite       = New.annotate (NewT.bgColor     NewT.White)
    ondullblack   = New.annotate (NewT.bgColorDull NewT.Black)
    ondullred     = New.annotate (NewT.bgColorDull NewT.Red)
    ondullgreen   = New.annotate (NewT.bgColorDull NewT.Green)
    ondullyellow  = New.annotate (NewT.bgColorDull NewT.Yellow)
    ondullblue    = New.annotate (NewT.bgColorDull NewT.Blue)
    ondullmagenta = New.annotate (NewT.bgColorDull NewT.Magenta)
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    dullred       = New.annotate (NewT.colorDull   NewT.Red)
    dullgreen     = New.annotate (NewT.colorDull   NewT.Green)
    dullyellow    = New.annotate (NewT.colorDull   NewT.Yellow)
    dullblue      = New.annotate (NewT.colorDull   NewT.Blue)
    dullmagenta   = New.annotate (NewT.colorDull   NewT.Magenta)
    dullcyan      = New.annotate (NewT.colorDull   NewT.Cyan)
    dullwhite     = New.annotate (NewT.colorDull   NewT.White)
    onblack       = New.annotate (NewT.bgColor     NewT.Black)
    onred         = New.annotate (NewT.bgColor     NewT.Red)
    ongreen       = New.annotate (NewT.bgColor     NewT.Green)
    onyellow      = New.annotate (NewT.bgColor     NewT.Yellow)
    onblue        = New.annotate (NewT.bgColor     NewT.Blue)
    onmagenta     = New.annotate (NewT.bgColor     NewT.Magenta)
    oncyan        = New.annotate (NewT.bgColor     NewT.Cyan)
    onwhite       = New.annotate (NewT.bgColor     NewT.White)
    ondullblack   = New.annotate (NewT.bgColorDull NewT.Black)
    ondullred     = New.annotate (NewT.bgColorDull NewT.Red)
    ondullgreen   = New.annotate (NewT.bgColorDull NewT.Green)
    ondullyellow  = New.annotate (NewT.bgColorDull NewT.Yellow)
    ondullblue    = New.annotate (NewT.bgColorDull NewT.Blue)
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    dullblack     = New.annotate (NewT.colorDull   NewT.Black)
    dullred       = New.annotate (NewT.colorDull   NewT.Red)
    dullgreen     = New.annotate (NewT.colorDull   NewT.Green)
    dullyellow    = New.annotate (NewT.colorDull   NewT.Yellow)
    dullblue      = New.annotate (NewT.colorDull   NewT.Blue)
    dullmagenta   = New.annotate (NewT.colorDull   NewT.Magenta)
    dullcyan      = New.annotate (NewT.colorDull   NewT.Cyan)
    dullwhite     = New.annotate (NewT.colorDull   NewT.White)
    onblack       = New.annotate (NewT.bgColor     NewT.Black)
    onred         = New.annotate (NewT.bgColor     NewT.Red)
    ongreen       = New.annotate (NewT.bgColor     NewT.Green)
    onyellow      = New.annotate (NewT.bgColor     NewT.Yellow)
    onblue        = New.annotate (NewT.bgColor     NewT.Blue)
    onmagenta     = New.annotate (NewT.bgColor     NewT.Magenta)
    oncyan        = New.annotate (NewT.bgColor     NewT.Cyan)
    onwhite       = New.annotate (NewT.bgColor     NewT.White)
    ondullblack   = New.annotate (NewT.bgColorDull NewT.Black)
    ondullred     = New.annotate (NewT.bgColorDull NewT.Red)
    ondullgreen   = New.annotate (NewT.bgColorDull NewT.Green)
    ondullyellow  = New.annotate (NewT.bgColorDull NewT.Yellow)
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    white         = New.annotate (NewT.color       NewT.White)
    dullblack     = New.annotate (NewT.colorDull   NewT.Black)
    dullred       = New.annotate (NewT.colorDull   NewT.Red)
    dullgreen     = New.annotate (NewT.colorDull   NewT.Green)
    dullyellow    = New.annotate (NewT.colorDull   NewT.Yellow)
    dullblue      = New.annotate (NewT.colorDull   NewT.Blue)
    dullmagenta   = New.annotate (NewT.colorDull   NewT.Magenta)
    dullcyan      = New.annotate (NewT.colorDull   NewT.Cyan)
    dullwhite     = New.annotate (NewT.colorDull   NewT.White)
    onblack       = New.annotate (NewT.bgColor     NewT.Black)
    onred         = New.annotate (NewT.bgColor     NewT.Red)
    ongreen       = New.annotate (NewT.bgColor     NewT.Green)
    onyellow      = New.annotate (NewT.bgColor     NewT.Yellow)
    onblue        = New.annotate (NewT.bgColor     NewT.Blue)
    onmagenta     = New.annotate (NewT.bgColor     NewT.Magenta)
    oncyan        = New.annotate (NewT.bgColor     NewT.Cyan)
    onwhite       = New.annotate (NewT.bgColor     NewT.White)
    ondullblack   = New.annotate (NewT.bgColorDull NewT.Black)
    ondullred     = New.annotate (NewT.bgColorDull NewT.Red)
    ondullgreen   = New.annotate (NewT.bgColorDull NewT.Green)
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    cyan          = New.annotate (NewT.color       NewT.Cyan)
    white         = New.annotate (NewT.color       NewT.White)
    dullblack     = New.annotate (NewT.colorDull   NewT.Black)
    dullred       = New.annotate (NewT.colorDull   NewT.Red)
    dullgreen     = New.annotate (NewT.colorDull   NewT.Green)
    dullyellow    = New.annotate (NewT.colorDull   NewT.Yellow)
    dullblue      = New.annotate (NewT.colorDull   NewT.Blue)
    dullmagenta   = New.annotate (NewT.colorDull   NewT.Magenta)
    dullcyan      = New.annotate (NewT.colorDull   NewT.Cyan)
    dullwhite     = New.annotate (NewT.colorDull   NewT.White)
    onblack       = New.annotate (NewT.bgColor     NewT.Black)
    onred         = New.annotate (NewT.bgColor     NewT.Red)
    ongreen       = New.annotate (NewT.bgColor     NewT.Green)
    onyellow      = New.annotate (NewT.bgColor     NewT.Yellow)
    onblue        = New.annotate (NewT.bgColor     NewT.Blue)
    onmagenta     = New.annotate (NewT.bgColor     NewT.Magenta)
    oncyan        = New.annotate (NewT.bgColor     NewT.Cyan)
    onwhite       = New.annotate (NewT.bgColor     NewT.White)
    ondullblack   = New.annotate (NewT.bgColorDull NewT.Black)
    ondullred     = New.annotate (NewT.bgColorDull NewT.Red)
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    magenta       = New.annotate (NewT.color       NewT.Magenta)
    cyan          = New.annotate (NewT.color       NewT.Cyan)
    white         = New.annotate (NewT.color       NewT.White)
    dullblack     = New.annotate (NewT.colorDull   NewT.Black)
    dullred       = New.annotate (NewT.colorDull   NewT.Red)
    dullgreen     = New.annotate (NewT.colorDull   NewT.Green)
    dullyellow    = New.annotate (NewT.colorDull   NewT.Yellow)
    dullblue      = New.annotate (NewT.colorDull   NewT.Blue)
    dullmagenta   = New.annotate (NewT.colorDull   NewT.Magenta)
    dullcyan      = New.annotate (NewT.colorDull   NewT.Cyan)
    dullwhite     = New.annotate (NewT.colorDull   NewT.White)
    onblack       = New.annotate (NewT.bgColor     NewT.Black)
    onred         = New.annotate (NewT.bgColor     NewT.Red)
    ongreen       = New.annotate (NewT.bgColor     NewT.Green)
    onyellow      = New.annotate (NewT.bgColor     NewT.Yellow)
    onblue        = New.annotate (NewT.bgColor     NewT.Blue)
    onmagenta     = New.annotate (NewT.bgColor     NewT.Magenta)
    oncyan        = New.annotate (NewT.bgColor     NewT.Cyan)
    onwhite       = New.annotate (NewT.bgColor     NewT.White)
    ondullblack   = New.annotate (NewT.bgColorDull NewT.Black)
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    blue          = New.annotate (NewT.color       NewT.Blue)
    magenta       = New.annotate (NewT.color       NewT.Magenta)
    cyan          = New.annotate (NewT.color       NewT.Cyan)
    white         = New.annotate (NewT.color       NewT.White)
    dullblack     = New.annotate (NewT.colorDull   NewT.Black)
    dullred       = New.annotate (NewT.colorDull   NewT.Red)
    dullgreen     = New.annotate (NewT.colorDull   NewT.Green)
    dullyellow    = New.annotate (NewT.colorDull   NewT.Yellow)
    dullblue      = New.annotate (NewT.colorDull   NewT.Blue)
    dullmagenta   = New.annotate (NewT.colorDull   NewT.Magenta)
    dullcyan      = New.annotate (NewT.colorDull   NewT.Cyan)
    dullwhite     = New.annotate (NewT.colorDull   NewT.White)
    onblack       = New.annotate (NewT.bgColor     NewT.Black)
    onred         = New.annotate (NewT.bgColor     NewT.Red)
    ongreen       = New.annotate (NewT.bgColor     NewT.Green)
    onyellow      = New.annotate (NewT.bgColor     NewT.Yellow)
    onblue        = New.annotate (NewT.bgColor     NewT.Blue)
    onmagenta     = New.annotate (NewT.bgColor     NewT.Magenta)
    oncyan        = New.annotate (NewT.bgColor     NewT.Cyan)
    onwhite       = New.annotate (NewT.bgColor     NewT.White)
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    yellow        = New.annotate (NewT.color       NewT.Yellow)
    blue          = New.annotate (NewT.color       NewT.Blue)
    magenta       = New.annotate (NewT.color       NewT.Magenta)
    cyan          = New.annotate (NewT.color       NewT.Cyan)
    white         = New.annotate (NewT.color       NewT.White)
    dullblack     = New.annotate (NewT.colorDull   NewT.Black)
    dullred       = New.annotate (NewT.colorDull   NewT.Red)
    dullgreen     = New.annotate (NewT.colorDull   NewT.Green)
    dullyellow    = New.annotate (NewT.colorDull   NewT.Yellow)
    dullblue      = New.annotate (NewT.colorDull   NewT.Blue)
    dullmagenta   = New.annotate (NewT.colorDull   NewT.Magenta)
    dullcyan      = New.annotate (NewT.colorDull   NewT.Cyan)
    dullwhite     = New.annotate (NewT.colorDull   NewT.White)
    onblack       = New.annotate (NewT.bgColor     NewT.Black)
    onred         = New.annotate (NewT.bgColor     NewT.Red)
    ongreen       = New.annotate (NewT.bgColor     NewT.Green)
    onyellow      = New.annotate (NewT.bgColor     NewT.Yellow)
    onblue        = New.annotate (NewT.bgColor     NewT.Blue)
    onmagenta     = New.annotate (NewT.bgColor     NewT.Magenta)
    oncyan        = New.annotate (NewT.bgColor     NewT.Cyan)
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    green         = New.annotate (NewT.color       NewT.Green)
    yellow        = New.annotate (NewT.color       NewT.Yellow)
    blue          = New.annotate (NewT.color       NewT.Blue)
    magenta       = New.annotate (NewT.color       NewT.Magenta)
    cyan          = New.annotate (NewT.color       NewT.Cyan)
    white         = New.annotate (NewT.color       NewT.White)
    dullblack     = New.annotate (NewT.colorDull   NewT.Black)
    dullred       = New.annotate (NewT.colorDull   NewT.Red)
    dullgreen     = New.annotate (NewT.colorDull   NewT.Green)
    dullyellow    = New.annotate (NewT.colorDull   NewT.Yellow)
    dullblue      = New.annotate (NewT.colorDull   NewT.Blue)
    dullmagenta   = New.annotate (NewT.colorDull   NewT.Magenta)
    dullcyan      = New.annotate (NewT.colorDull   NewT.Cyan)
    dullwhite     = New.annotate (NewT.colorDull   NewT.White)
    onblack       = New.annotate (NewT.bgColor     NewT.Black)
    onred         = New.annotate (NewT.bgColor     NewT.Red)
    ongreen       = New.annotate (NewT.bgColor     NewT.Green)
    onyellow      = New.annotate (NewT.bgColor     NewT.Yellow)
    onblue        = New.annotate (NewT.bgColor     NewT.Blue)
    onmagenta     = New.annotate (NewT.bgColor     NewT.Magenta)
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    red           = New.annotate (NewT.color       NewT.Red)
    green         = New.annotate (NewT.color       NewT.Green)
    yellow        = New.annotate (NewT.color       NewT.Yellow)
    blue          = New.annotate (NewT.color       NewT.Blue)
    magenta       = New.annotate (NewT.color       NewT.Magenta)
    cyan          = New.annotate (NewT.color       NewT.Cyan)
    white         = New.annotate (NewT.color       NewT.White)
    dullblack     = New.annotate (NewT.colorDull   NewT.Black)
    dullred       = New.annotate (NewT.colorDull   NewT.Red)
    dullgreen     = New.annotate (NewT.colorDull   NewT.Green)
    dullyellow    = New.annotate (NewT.colorDull   NewT.Yellow)
    dullblue      = New.annotate (NewT.colorDull   NewT.Blue)
    dullmagenta   = New.annotate (NewT.colorDull   NewT.Magenta)
    dullcyan      = New.annotate (NewT.colorDull   NewT.Cyan)
    dullwhite     = New.annotate (NewT.colorDull   NewT.White)
    onblack       = New.annotate (NewT.bgColor     NewT.Black)
    onred         = New.annotate (NewT.bgColor     NewT.Red)
    ongreen       = New.annotate (NewT.bgColor     NewT.Green)
    onyellow      = New.annotate (NewT.bgColor     NewT.Yellow)
    onblue        = New.annotate (NewT.bgColor     NewT.Blue)
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    black         = New.annotate (NewT.color       NewT.Black)
    red           = New.annotate (NewT.color       NewT.Red)
    green         = New.annotate (NewT.color       NewT.Green)
    yellow        = New.annotate (NewT.color       NewT.Yellow)
    blue          = New.annotate (NewT.color       NewT.Blue)
    magenta       = New.annotate (NewT.color       NewT.Magenta)
    cyan          = New.annotate (NewT.color       NewT.Cyan)
    white         = New.annotate (NewT.color       NewT.White)
    dullblack     = New.annotate (NewT.colorDull   NewT.Black)
    dullred       = New.annotate (NewT.colorDull   NewT.Red)
    dullgreen     = New.annotate (NewT.colorDull   NewT.Green)
    dullyellow    = New.annotate (NewT.colorDull   NewT.Yellow)
    dullblue      = New.annotate (NewT.colorDull   NewT.Blue)
    dullmagenta   = New.annotate (NewT.colorDull   NewT.Magenta)
    dullcyan      = New.annotate (NewT.colorDull   NewT.Cyan)
    dullwhite     = New.annotate (NewT.colorDull   NewT.White)
    onblack       = New.annotate (NewT.bgColor     NewT.Black)
    onred         = New.annotate (NewT.bgColor     NewT.Red)
    ongreen       = New.annotate (NewT.bgColor     NewT.Green)
    onyellow      = New.annotate (NewT.bgColor     NewT.Yellow)
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
        ondullwhite, bold, debold, underline, deunderline :: Doc -> Doc
    black         = New.annotate (NewT.color       NewT.Black)
    red           = New.annotate (NewT.color       NewT.Red)
    green         = New.annotate (NewT.color       NewT.Green)
    yellow        = New.annotate (NewT.color       NewT.Yellow)
    blue          = New.annotate (NewT.color       NewT.Blue)
    magenta       = New.annotate (NewT.color       NewT.Magenta)
    cyan          = New.annotate (NewT.color       NewT.Cyan)
    white         = New.annotate (NewT.color       NewT.White)
    dullblack     = New.annotate (NewT.colorDull   NewT.Black)
    dullred       = New.annotate (NewT.colorDull   NewT.Red)
    dullgreen     = New.annotate (NewT.colorDull   NewT.Green)
    dullyellow    = New.annotate (NewT.colorDull   NewT.Yellow)
    dullblue      = New.annotate (NewT.colorDull   NewT.Blue)
    dullmagenta   = New.annotate (NewT.colorDull   NewT.Magenta)
    dullcyan      = New.annotate (NewT.colorDull   NewT.Cyan)
    dullwhite     = New.annotate (NewT.colorDull   NewT.White)
    onblack       = New.annotate (NewT.bgColor     NewT.Black)
    onred         = New.annotate (NewT.bgColor     NewT.Red)
    ongreen       = New.annotate (NewT.bgColor     NewT.Green)
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
        ondullred, ondullgreen, ondullyellow, ondullblue, ondullmagenta, ondullcyan,
        ondullwhite, bold, debold, underline, deunderline :: Doc -> Doc
    black         = New.annotate (NewT.color       NewT.Black)
    red           = New.annotate (NewT.color       NewT.Red)
    green         = New.annotate (NewT.color       NewT.Green)
    yellow        = New.annotate (NewT.color       NewT.Yellow)
    blue          = New.annotate (NewT.color       NewT.Blue)
    magenta       = New.annotate (NewT.color       NewT.Magenta)
    cyan          = New.annotate (NewT.color       NewT.Cyan)
    white         = New.annotate (NewT.color       NewT.White)
    dullblack     = New.annotate (NewT.colorDull   NewT.Black)
    dullred       = New.annotate (NewT.colorDull   NewT.Red)
    dullgreen     = New.annotate (NewT.colorDull   NewT.Green)
    dullyellow    = New.annotate (NewT.colorDull   NewT.Yellow)
    dullblue      = New.annotate (NewT.colorDull   NewT.Blue)
    dullmagenta   = New.annotate (NewT.colorDull   NewT.Magenta)
    dullcyan      = New.annotate (NewT.colorDull   NewT.Cyan)
    dullwhite     = New.annotate (NewT.colorDull   NewT.White)
    onblack       = New.annotate (NewT.bgColor     NewT.Black)
    onred         = New.annotate (NewT.bgColor     NewT.Red)
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
        onred, ongreen, onyellow, onblue, onmagenta, oncyan, onwhite, ondullblack,
        ondullred, ondullgreen, ondullyellow, ondullblue, ondullmagenta, ondullcyan,
        ondullwhite, bold, debold, underline, deunderline :: Doc -> Doc
    black         = New.annotate (NewT.color       NewT.Black)
    red           = New.annotate (NewT.color       NewT.Red)
    green         = New.annotate (NewT.color       NewT.Green)
    yellow        = New.annotate (NewT.color       NewT.Yellow)
    blue          = New.annotate (NewT.color       NewT.Blue)
    magenta       = New.annotate (NewT.color       NewT.Magenta)
    cyan          = New.annotate (NewT.color       NewT.Cyan)
    white         = New.annotate (NewT.color       NewT.White)
    dullblack     = New.annotate (NewT.colorDull   NewT.Black)
    dullred       = New.annotate (NewT.colorDull   NewT.Red)
    dullgreen     = New.annotate (NewT.colorDull   NewT.Green)
    dullyellow    = New.annotate (NewT.colorDull   NewT.Yellow)
    dullblue      = New.annotate (NewT.colorDull   NewT.Blue)
    dullmagenta   = New.annotate (NewT.colorDull   NewT.Magenta)
    dullcyan      = New.annotate (NewT.colorDull   NewT.Cyan)
    dullwhite     = New.annotate (NewT.colorDull   NewT.White)
    onblack       = New.annotate (NewT.bgColor     NewT.Black)
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
        dullgreen, dullyellow, dullblue, dullmagenta, dullcyan, dullwhite, onblack,
        onred, ongreen, onyellow, onblue, onmagenta, oncyan, onwhite, ondullblack,
        ondullred, ondullgreen, ondullyellow, ondullblue, ondullmagenta, ondullcyan,
        ondullwhite, bold, debold, underline, deunderline :: Doc -> Doc
    black         = New.annotate (NewT.color       NewT.Black)
    red           = New.annotate (NewT.color       NewT.Red)
    green         = New.annotate (NewT.color       NewT.Green)
    yellow        = New.annotate (NewT.color       NewT.Yellow)
    blue          = New.annotate (NewT.color       NewT.Blue)
    magenta       = New.annotate (NewT.color       NewT.Magenta)
    cyan          = New.annotate (NewT.color       NewT.Cyan)
    white         = New.annotate (NewT.color       NewT.White)
    dullblack     = New.annotate (NewT.colorDull   NewT.Black)
    dullred       = New.annotate (NewT.colorDull   NewT.Red)
    dullgreen     = New.annotate (NewT.colorDull   NewT.Green)
    dullyellow    = New.annotate (NewT.colorDull   NewT.Yellow)
    dullblue      = New.annotate (NewT.colorDull   NewT.Blue)
    dullmagenta   = New.annotate (NewT.colorDull   NewT.Magenta)
    dullcyan      = New.annotate (NewT.colorDull   NewT.Cyan)
    dullwhite     = New.annotate (NewT.colorDull   NewT.White)
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    black, red, green, yellow, blue, magenta, cyan, white, dullblack, dullred,
        dullgreen, dullyellow, dullblue, dullmagenta, dullcyan, dullwhite, onblack,
        onred, ongreen, onyellow, onblue, onmagenta, oncyan, onwhite, ondullblack,
        ondullred, ondullgreen, ondullyellow, ondullblue, ondullmagenta, ondullcyan,
        ondullwhite, bold, debold, underline, deunderline :: Doc -> Doc
    black         = New.annotate (NewT.color       NewT.Black)
    red           = New.annotate (NewT.color       NewT.Red)
    green         = New.annotate (NewT.color       NewT.Green)
    yellow        = New.annotate (NewT.color       NewT.Yellow)
    blue          = New.annotate (NewT.color       NewT.Blue)
    magenta       = New.annotate (NewT.color       NewT.Magenta)
    cyan          = New.annotate (NewT.color       NewT.Cyan)
    white         = New.annotate (NewT.color       NewT.White)
    dullblack     = New.annotate (NewT.colorDull   NewT.Black)
    dullred       = New.annotate (NewT.colorDull   NewT.Red)
    dullgreen     = New.annotate (NewT.colorDull   NewT.Green)
    dullyellow    = New.annotate (NewT.colorDull   NewT.Yellow)
    dullblue      = New.annotate (NewT.colorDull   NewT.Blue)
    dullmagenta   = New.annotate (NewT.colorDull   NewT.Magenta)
    dullcyan      = New.annotate (NewT.colorDull   NewT.Cyan)
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    black, red, green, yellow, blue, magenta, cyan, white, dullblack, dullred,
        dullgreen, dullyellow, dullblue, dullmagenta, dullcyan, dullwhite, onblack,
        onred, ongreen, onyellow, onblue, onmagenta, oncyan, onwhite, ondullblack,
        ondullred, ondullgreen, ondullyellow, ondullblue, ondullmagenta, ondullcyan,
        ondullwhite, bold, debold, underline, deunderline :: Doc -> Doc
    black         = New.annotate (NewT.color       NewT.Black)
    red           = New.annotate (NewT.color       NewT.Red)
    green         = New.annotate (NewT.color       NewT.Green)
    yellow        = New.annotate (NewT.color       NewT.Yellow)
    blue          = New.annotate (NewT.color       NewT.Blue)
    magenta       = New.annotate (NewT.color       NewT.Magenta)
    cyan          = New.annotate (NewT.color       NewT.Cyan)
    white         = New.annotate (NewT.color       NewT.White)
    dullblack     = New.annotate (NewT.colorDull   NewT.Black)
    dullred       = New.annotate (NewT.colorDull   NewT.Red)
    dullgreen     = New.annotate (NewT.colorDull   NewT.Green)
    dullyellow    = New.annotate (NewT.colorDull   NewT.Yellow)
    dullblue      = New.annotate (NewT.colorDull   NewT.Blue)
    dullmagenta   = New.annotate (NewT.colorDull   NewT.Magenta)
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    equals = New.equals
    
    black, red, green, yellow, blue, magenta, cyan, white, dullblack, dullred,
        dullgreen, dullyellow, dullblue, dullmagenta, dullcyan, dullwhite, onblack,
        onred, ongreen, onyellow, onblue, onmagenta, oncyan, onwhite, ondullblack,
        ondullred, ondullgreen, ondullyellow, ondullblue, ondullmagenta, ondullcyan,
        ondullwhite, bold, debold, underline, deunderline :: Doc -> Doc
    black         = New.annotate (NewT.color       NewT.Black)
    red           = New.annotate (NewT.color       NewT.Red)
    green         = New.annotate (NewT.color       NewT.Green)
    yellow        = New.annotate (NewT.color       NewT.Yellow)
    blue          = New.annotate (NewT.color       NewT.Blue)
    magenta       = New.annotate (NewT.color       NewT.Magenta)
    cyan          = New.annotate (NewT.color       NewT.Cyan)
    white         = New.annotate (NewT.color       NewT.White)
    dullblack     = New.annotate (NewT.colorDull   NewT.Black)
    dullred       = New.annotate (NewT.colorDull   NewT.Red)
    dullgreen     = New.annotate (NewT.colorDull   NewT.Green)
    dullyellow    = New.annotate (NewT.colorDull   NewT.Yellow)
    dullblue      = New.annotate (NewT.colorDull   NewT.Blue)
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    backslash = New.backslash
    equals = New.equals
    
    black, red, green, yellow, blue, magenta, cyan, white, dullblack, dullred,
        dullgreen, dullyellow, dullblue, dullmagenta, dullcyan, dullwhite, onblack,
        onred, ongreen, onyellow, onblue, onmagenta, oncyan, onwhite, ondullblack,
        ondullred, ondullgreen, ondullyellow, ondullblue, ondullmagenta, ondullcyan,
        ondullwhite, bold, debold, underline, deunderline :: Doc -> Doc
    black         = New.annotate (NewT.color       NewT.Black)
    red           = New.annotate (NewT.color       NewT.Red)
    green         = New.annotate (NewT.color       NewT.Green)
    yellow        = New.annotate (NewT.color       NewT.Yellow)
    blue          = New.annotate (NewT.color       NewT.Blue)
    magenta       = New.annotate (NewT.color       NewT.Magenta)
    cyan          = New.annotate (NewT.color       NewT.Cyan)
    white         = New.annotate (NewT.color       NewT.White)
    dullblack     = New.annotate (NewT.colorDull   NewT.Black)
    dullred       = New.annotate (NewT.colorDull   NewT.Red)
    dullgreen     = New.annotate (NewT.colorDull   NewT.Green)
    dullyellow    = New.annotate (NewT.colorDull   NewT.Yellow)
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    dot = New.dot
    backslash = New.backslash
    equals = New.equals
    
    black, red, green, yellow, blue, magenta, cyan, white, dullblack, dullred,
        dullgreen, dullyellow, dullblue, dullmagenta, dullcyan, dullwhite, onblack,
        onred, ongreen, onyellow, onblue, onmagenta, oncyan, onwhite, ondullblack,
        ondullred, ondullgreen, ondullyellow, ondullblue, ondullmagenta, ondullcyan,
        ondullwhite, bold, debold, underline, deunderline :: Doc -> Doc
    black         = New.annotate (NewT.color       NewT.Black)
    red           = New.annotate (NewT.color       NewT.Red)
    green         = New.annotate (NewT.color       NewT.Green)
    yellow        = New.annotate (NewT.color       NewT.Yellow)
    blue          = New.annotate (NewT.color       NewT.Blue)
    magenta       = New.annotate (NewT.color       NewT.Magenta)
    cyan          = New.annotate (NewT.color       NewT.Cyan)
    white         = New.annotate (NewT.color       NewT.White)
    dullblack     = New.annotate (NewT.colorDull   NewT.Black)
    dullred       = New.annotate (NewT.colorDull   NewT.Red)
    dullgreen     = New.annotate (NewT.colorDull   NewT.Green)
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    space = New.space
    dot = New.dot
    backslash = New.backslash
    equals = New.equals
    
    black, red, green, yellow, blue, magenta, cyan, white, dullblack, dullred,
        dullgreen, dullyellow, dullblue, dullmagenta, dullcyan, dullwhite, onblack,
        onred, ongreen, onyellow, onblue, onmagenta, oncyan, onwhite, ondullblack,
        ondullred, ondullgreen, ondullyellow, ondullblue, ondullmagenta, ondullcyan,
        ondullwhite, bold, debold, underline, deunderline :: Doc -> Doc
    black         = New.annotate (NewT.color       NewT.Black)
    red           = New.annotate (NewT.color       NewT.Red)
    green         = New.annotate (NewT.color       NewT.Green)
    yellow        = New.annotate (NewT.color       NewT.Yellow)
    blue          = New.annotate (NewT.color       NewT.Blue)
    magenta       = New.annotate (NewT.color       NewT.Magenta)
    cyan          = New.annotate (NewT.color       NewT.Cyan)
    white         = New.annotate (NewT.color       NewT.White)
    dullblack     = New.annotate (NewT.colorDull   NewT.Black)
    dullred       = New.annotate (NewT.colorDull   NewT.Red)
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    comma = New.comma
    space = New.space
    dot = New.dot
    backslash = New.backslash
    equals = New.equals
    
    black, red, green, yellow, blue, magenta, cyan, white, dullblack, dullred,
        dullgreen, dullyellow, dullblue, dullmagenta, dullcyan, dullwhite, onblack,
        onred, ongreen, onyellow, onblue, onmagenta, oncyan, onwhite, ondullblack,
        ondullred, ondullgreen, ondullyellow, ondullblue, ondullmagenta, ondullcyan,
        ondullwhite, bold, debold, underline, deunderline :: Doc -> Doc
    black         = New.annotate (NewT.color       NewT.Black)
    red           = New.annotate (NewT.color       NewT.Red)
    green         = New.annotate (NewT.color       NewT.Green)
    yellow        = New.annotate (NewT.color       NewT.Yellow)
    blue          = New.annotate (NewT.color       NewT.Blue)
    magenta       = New.annotate (NewT.color       NewT.Magenta)
    cyan          = New.annotate (NewT.color       NewT.Cyan)
    white         = New.annotate (NewT.color       NewT.White)
    dullblack     = New.annotate (NewT.colorDull   NewT.Black)
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    colon = New.colon
    comma = New.comma
    space = New.space
    dot = New.dot
    backslash = New.backslash
    equals = New.equals
    
    black, red, green, yellow, blue, magenta, cyan, white, dullblack, dullred,
        dullgreen, dullyellow, dullblue, dullmagenta, dullcyan, dullwhite, onblack,
        onred, ongreen, onyellow, onblue, onmagenta, oncyan, onwhite, ondullblack,
        ondullred, ondullgreen, ondullyellow, ondullblue, ondullmagenta, ondullcyan,
        ondullwhite, bold, debold, underline, deunderline :: Doc -> Doc
    black         = New.annotate (NewT.color       NewT.Black)
    red           = New.annotate (NewT.color       NewT.Red)
    green         = New.annotate (NewT.color       NewT.Green)
    yellow        = New.annotate (NewT.color       NewT.Yellow)
    blue          = New.annotate (NewT.color       NewT.Blue)
    magenta       = New.annotate (NewT.color       NewT.Magenta)
    cyan          = New.annotate (NewT.color       NewT.Cyan)
    white         = New.annotate (NewT.color       NewT.White)
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    semi = New.semi
    colon = New.colon
    comma = New.comma
    space = New.space
    dot = New.dot
    backslash = New.backslash
    equals = New.equals
    
    black, red, green, yellow, blue, magenta, cyan, white, dullblack, dullred,
        dullgreen, dullyellow, dullblue, dullmagenta, dullcyan, dullwhite, onblack,
        onred, ongreen, onyellow, onblue, onmagenta, oncyan, onwhite, ondullblack,
        ondullred, ondullgreen, ondullyellow, ondullblue, ondullmagenta, ondullcyan,
        ondullwhite, bold, debold, underline, deunderline :: Doc -> Doc
    black         = New.annotate (NewT.color       NewT.Black)
    red           = New.annotate (NewT.color       NewT.Red)
    green         = New.annotate (NewT.color       NewT.Green)
    yellow        = New.annotate (NewT.color       NewT.Yellow)
    blue          = New.annotate (NewT.color       NewT.Blue)
    magenta       = New.annotate (NewT.color       NewT.Magenta)
    cyan          = New.annotate (NewT.color       NewT.Cyan)
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    dquote = New.dquote
    semi = New.semi
    colon = New.colon
    comma = New.comma
    space = New.space
    dot = New.dot
    backslash = New.backslash
    equals = New.equals
    
    black, red, green, yellow, blue, magenta, cyan, white, dullblack, dullred,
        dullgreen, dullyellow, dullblue, dullmagenta, dullcyan, dullwhite, onblack,
        onred, ongreen, onyellow, onblue, onmagenta, oncyan, onwhite, ondullblack,
        ondullred, ondullgreen, ondullyellow, ondullblue, ondullmagenta, ondullcyan,
        ondullwhite, bold, debold, underline, deunderline :: Doc -> Doc
    black         = New.annotate (NewT.color       NewT.Black)
    red           = New.annotate (NewT.color       NewT.Red)
    green         = New.annotate (NewT.color       NewT.Green)
    yellow        = New.annotate (NewT.color       NewT.Yellow)
    blue          = New.annotate (NewT.color       NewT.Blue)
    magenta       = New.annotate (NewT.color       NewT.Magenta)
    

    cat See 11 Occurences [+] Collapse [-]
    Found in Math.ExpPairs.LinearForm from the package exp-pairs
    import Math.ExpPairs.RatioInf
    
    -- |Define an affine linear form of three variables: a*k + b*l + c*m.
    -- First argument of 'LinearForm' stands for a, second for b
    -- and third for c. Linear forms form a monoid by addition.
    data LinearForm t = LinearForm !t !t !t
      deriving (Eq, Show, Functor, Foldable, Generic)
    
    instance NFData t => NFData (LinearForm t) where
      rnf = rnf . toList
    
    instance (Num t, Eq t, Pretty t) => Pretty (LinearForm t) where
      pretty (LinearForm 0 0 0) = pretty "0"
      pretty (LinearForm a b c) = cat $ punctuate plus $ mapMaybe f [(a, 'k'), (b, 'l'), (c, 'm')] where
        plus = space <> pretty "+" <> space
        f (0, _) = Nothing
        f (1, t) = Just (pretty t)
        f (r, t) = Just (pretty r <+> pretty "*" <+> pretty t)
    

    Found in Math.ExpPairs.Pair from the package exp-pairs
      -- 'Mix' a b = a * 'Corput16' + b * 'HuxW87b1' + (1-a-b) * 'Hux05'
      | Mix !t !t
      deriving (Eq, Ord, Show, Generic)
    
    -- |Exponent pair built from rational fractions of
    -- 'Corput16', 'HuxW87b1' and 'Hux05'
    type InitPair = InitPair' Rational
    
    instance (Integral a, Show a) => Pretty (Ratio a) where
      pretty = pretty . show
    
    instance (Pretty t, Num t, Eq t) => Pretty (InitPair' t) where
      pretty Corput01 = parens (pretty (0%1) <> comma <+> pretty (1%1))
      pretty Corput12 = parens (pretty (1%2) <> comma <+> pretty (1%2))
      pretty (Mix r1 r2) = cat $ punctuate plus $ mapMaybe f [(r1, Corput16), (r2, HuxW87b1), (1 - r1 - r2, Hux05)] where
        plus = space <> pretty "+" <> space
        f (0, _) = Nothing
        f (1, t) = Just (pretty t)
        f (r, t) = Just (pretty r <+> pretty "*" <+> pretty t)
    

    Found in Text.PrettyPrint.Annotated.Leijen from the package prettyprinter-compat-annotated-wl-pprint
    {-# LANGUAGE CPP #-}
    
    #include "version-compatibility-macros.h"
    
    module Text.PrettyPrint.Annotated.Leijen {-# DEPRECATED "Compatibility module for users of annotated-wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, SimpleDoc, SpanList, putDoc, hPutDoc, empty, char, text, (<>), nest,
        line, linebreak, group, softline, softbreak, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, pipe, string,
        int, integer, float, double, rational, bool, annotate, noAnnotate,
        renderPretty, renderCompact, displayDecorated, displayDecoratedA, display,
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    punctuate = New.punctuate
    
    fill :: Int -> Doc -> Doc
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    punctuate = New.punctuate
    
    fill :: Int -> Doc -> Doc
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    tupled :: [Doc] -> Doc
    tupled = New.tupled
    
    semiBraces :: [Doc] -> Doc
    semiBraces = New.encloseSep New.lbrace New.rbrace New.semi
    
    (<+>), (<$>), (</>), (<$$>), (<//>) :: Doc -> Doc -> Doc
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    module Text.PrettyPrint.ANSI.Leijen {-# DEPRECATED "Compatibility module for users of ansi-wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, putDoc, hPutDoc, empty, char, text, (<>), nest, line, linebreak, group,
        softline, softbreak, hardline, flatAlt, renderSmart, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, black, red,
        green, yellow, blue, magenta, cyan, white, dullblack, dullred, dullgreen,
        dullyellow, dullblue, dullmagenta, dullcyan, dullwhite, onblack, onred,
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    punctuate = New.punctuate
    
    fill :: Int -> Doc -> Doc
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    punctuate = New.punctuate
    
    fill :: Int -> Doc -> Doc
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    tupled :: [Doc] -> Doc
    tupled = New.tupled
    
    semiBraces :: [Doc] -> Doc
    semiBraces = New.encloseSep New.lbrace New.rbrace New.semi
    
    (<+>), (<$>), (</>), (<$$>), (<//>) :: Doc -> Doc -> Doc
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    module Text.PrettyPrint.Leijen {-# DEPRECATED "Compatibility module for users of wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, putDoc, hPutDoc, empty, char, text, (<>), nest, line, linebreak, group,
        softline, softbreak, align, hang, indent, encloseSep, list, tupled,
        semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>), hsep, vsep, fillSep, sep,
        hcat, vcat, fillCat, cat, punctuate, fill, fillBreak, enclose, squotes,
        dquotes, parens, angles, braces, brackets, lparen, rparen, langle, rangle,
        lbrace, rbrace, lbracket, rbracket, squote, dquote, semi, colon, comma,
        space, dot, backslash, equals, string, int, integer, float, double,
        rational, Pretty(..), SimpleDoc, renderPretty, renderCompact, displayS,
        displayIO , bool , column, nesting, width
    

    column See 10 Occurences [+] Collapse [-]
    Found in LLVM.Pretty from the package llvm-hs-pretty
        , ("exportSymbols", Just (ppBoolean exportSymbols))
        ]
    
    instance Pretty DIType where
      pretty (DIBasicType t) = pretty t
      pretty (DICompositeType t) = pretty t
      pretty (DIDerivedType t) = pretty t
      pretty (DISubroutineType t) = pretty t
    
    instance Pretty DILexicalBlockBase where
      pretty DILexicalBlock {..} = ppDINode "DILexicalBlock"
        [ ("scope", Just (pretty scope))
        , ("file", fmap pretty file)
        , ("line", Just (pretty line))
        , ("column", Just (pretty column))
        ]
      pretty DILexicalBlockFile {..} = ppDINode "DILexicalBlockFile"
        [ ("scope", Just (pretty scope)), ("file", fmap pretty file), ("discriminator", Just (pretty discriminator)) ]
    
    ppSbs :: BS.ShortByteString -> Maybe (Doc ann)
    

    Found in Text.PrettyPrint.Annotated.Leijen from the package prettyprinter-compat-annotated-wl-pprint
    #include "version-compatibility-macros.h"
    
    module Text.PrettyPrint.Annotated.Leijen {-# DEPRECATED "Compatibility module for users of annotated-wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, SimpleDoc, SpanList, putDoc, hPutDoc, empty, char, text, (<>), nest,
        line, linebreak, group, softline, softbreak, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, pipe, string,
        int, integer, float, double, rational, bool, annotate, noAnnotate,
        renderPretty, renderCompact, displayDecorated, displayDecoratedA, display,
        displayS, displayIO, displaySpans, column, nesting, width
    
    ) where
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    renderCompact = New.layoutCompact
    
    displayS :: SimpleDoc -> ShowS
    displayS sdoc =
        let rendered = NewT.renderLazy sdoc
        in (TL.unpack rendered ++)
    
    displayIO :: Handle -> SimpleDoc -> IO ()
    displayIO = NewT.renderIO
    
    bool :: Bool -> Doc
    bool = New.pretty
    
    column :: (Int -> Doc) -> Doc
    column = New.column
    
    columns :: (Maybe Int -> Doc) -> Doc
    columns f = New.pageWidth (f . toMaybeInt)
      where
        toMaybeInt :: New.PageWidth -> Maybe Int
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    renderCompact = New.layoutCompact
    
    displayS :: SimpleDoc -> ShowS
    displayS sdoc =
        let rendered = NewT.renderLazy sdoc
        in (TL.unpack rendered ++)
    
    displayIO :: Handle -> SimpleDoc -> IO ()
    displayIO = NewT.renderIO
    
    bool :: Bool -> Doc
    bool = New.pretty
    
    column :: (Int -> Doc) -> Doc
    column = New.column
    
    columns :: (Maybe Int -> Doc) -> Doc
    columns f = New.pageWidth (f . toMaybeInt)
      where
        toMaybeInt :: New.PageWidth -> Maybe Int
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    renderCompact :: Doc -> SimpleDoc
    renderCompact = New.layoutCompact
    
    displayS :: SimpleDoc -> ShowS
    displayS sdoc =
        let rendered = NewT.renderLazy sdoc
        in (TL.unpack rendered ++)
    
    displayIO :: Handle -> SimpleDoc -> IO ()
    displayIO = NewT.renderIO
    
    bool :: Bool -> Doc
    bool = New.pretty
    
    column :: (Int -> Doc) -> Doc
    column = New.column
    
    columns :: (Maybe Int -> Doc) -> Doc
    columns f = New.pageWidth (f . toMaybeInt)
      where
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
        Doc, putDoc, hPutDoc, empty, char, text, (<>), nest, line, linebreak, group,
        softline, softbreak, hardline, flatAlt, renderSmart, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, black, red,
        green, yellow, blue, magenta, cyan, white, dullblack, dullred, dullgreen,
        dullyellow, dullblue, dullmagenta, dullcyan, dullwhite, onblack, onred,
        ongreen, onyellow, onblue, onmagenta, oncyan, onwhite, ondullblack,
        ondullred, ondullgreen, ondullyellow, ondullblue, ondullmagenta, ondullcyan,
        ondullwhite, bold, debold, underline, deunderline, plain, string, int,
        integer, float, double, rational, Pretty(..), SimpleDoc, renderPretty,
        renderCompact, displayS, displayIO, bool, column, columns, nesting, width
    
    ) where
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    renderCompact = New.layoutCompact
    
    displayS :: SimpleDoc -> ShowS
    displayS sdoc =
        let rendered = NewT.renderLazy sdoc
        in (TL.unpack rendered ++)
    
    displayIO :: Handle -> SimpleDoc -> IO ()
    displayIO = NewT.renderIO
    
    bool :: Bool -> Doc
    bool = New.pretty
    
    column :: (Int -> Doc) -> Doc
    column = New.column
    
    nesting :: (Int -> Doc) -> Doc
    nesting = New.nesting
    
    width :: Doc -> (Int -> Doc) -> Doc
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    renderCompact = New.layoutCompact
    
    displayS :: SimpleDoc -> ShowS
    displayS sdoc =
        let rendered = NewT.renderLazy sdoc
        in (TL.unpack rendered ++)
    
    displayIO :: Handle -> SimpleDoc -> IO ()
    displayIO = NewT.renderIO
    
    bool :: Bool -> Doc
    bool = New.pretty
    
    column :: (Int -> Doc) -> Doc
    column = New.column
    
    nesting :: (Int -> Doc) -> Doc
    nesting = New.nesting
    
    width :: Doc -> (Int -> Doc) -> Doc
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    renderCompact :: Doc -> SimpleDoc
    renderCompact = New.layoutCompact
    
    displayS :: SimpleDoc -> ShowS
    displayS sdoc =
        let rendered = NewT.renderLazy sdoc
        in (TL.unpack rendered ++)
    
    displayIO :: Handle -> SimpleDoc -> IO ()
    displayIO = NewT.renderIO
    
    bool :: Bool -> Doc
    bool = New.pretty
    
    column :: (Int -> Doc) -> Doc
    column = New.column
    
    nesting :: (Int -> Doc) -> Doc
    nesting = New.nesting
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    module Text.PrettyPrint.Leijen {-# DEPRECATED "Compatibility module for users of wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, putDoc, hPutDoc, empty, char, text, (<>), nest, line, linebreak, group,
        softline, softbreak, align, hang, indent, encloseSep, list, tupled,
        semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>), hsep, vsep, fillSep, sep,
        hcat, vcat, fillCat, cat, punctuate, fill, fillBreak, enclose, squotes,
        dquotes, parens, angles, braces, brackets, lparen, rparen, langle, rangle,
        lbrace, rbrace, lbracket, rbracket, squote, dquote, semi, colon, comma,
        space, dot, backslash, equals, string, int, integer, float, double,
        rational, Pretty(..), SimpleDoc, renderPretty, renderCompact, displayS,
        displayIO , bool , column, nesting, width
    
    ) where
    

    concatWith No usage example found for this symbol :( Collapse [-]
    defaultLayoutOptions See 2 Occurences [+] Collapse [-]
    Found in Data.Text.Prettyprint.Doc.Render.Text from the package prettyprinter
    -- | Like 'putDoc', but instead of using 'stdout', print to a user-provided
    -- handle, e.g. a file or a socket. Uses the 'defaultLayoutOptions'.
    --
    -- @
    -- main = 'withFile' filename (\h -> 'hPutDoc' h doc)
    --   where
    --     doc = 'vcat' ["vertical", "text"]
    --     filename = "someFile.txt"
    -- @
    --
    -- @
    -- 'hPutDoc' h doc = 'renderIO' h ('layoutPretty' 'defaultLayoutOptions' doc)
    -- @
    hPutDoc :: Handle -> Doc ann -> IO ()
    hPutDoc h doc = renderIO h (layoutPretty defaultLayoutOptions doc)
    

    Found in Data.Text.Prettyprint.Doc.Render.Terminal.Internal from the package prettyprinter-ansi-terminal
    -- 'putDoc' = 'hPutDoc' 'stdout'
    -- @
    putDoc :: Doc AnsiStyle -> IO ()
    putDoc = hPutDoc stdout
    
    -- | Like 'putDoc', but instead of using 'stdout', print to a user-provided
    -- handle, e.g. a file or a socket using 'defaultLayoutOptions'.
    --
    -- > main = withFile "someFile.txt" (\h -> hPutDoc h (vcat ["vertical", "text"]))
    --
    -- @
    -- 'hPutDoc' h doc = 'renderIO' h ('layoutPretty' 'defaultLayoutOptions' doc)
    -- @
    hPutDoc :: Handle -> Doc AnsiStyle -> IO ()
    hPutDoc h doc = renderIO h (layoutPretty defaultLayoutOptions doc)
    

    emptyDoc See 3 Occurences [+] Collapse [-]
    Found in Text.PrettyPrint.Annotated.Leijen from the package prettyprinter-compat-annotated-wl-pprint
    softbreak :: Doc ann
    softbreak = softline'
    
    semiBraces :: [Doc ann] -> Doc ann
    semiBraces = encloseSep lbrace rbrace semi
    
    (<$>), (</>), (<$$>), (<//>) :: Doc ann -> Doc ann -> Doc ann
    (<$>) = \x y -> x <> line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> line' <> y
    (<//>) = \x y -> x <> softline' <> y
    
    empty :: Doc ann
    empty = emptyDoc
    
    char :: Char -> Doc ann
    char = pretty
    
    bool :: Bool -> Doc ann
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    type Doc = New.Doc NewT.AnsiStyle
    type SimpleDoc = New.SimpleDocStream NewT.AnsiStyle
    
    
    
    putDoc :: Doc -> IO ()
    putDoc = NewT.putDoc
    
    hPutDoc :: Handle -> Doc -> IO ()
    hPutDoc = NewT.hPutDoc
    
    empty :: Doc
    empty = New.emptyDoc
    
    char :: Char -> Doc
    char = New.pretty
    
    text :: String -> Doc
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    type Doc = New.Doc ()
    type SimpleDoc = New.SimpleDocStream ()
    
    
    
    putDoc :: Doc -> IO ()
    putDoc = NewT.putDoc
    
    hPutDoc :: Handle -> Doc -> IO ()
    hPutDoc = NewT.hPutDoc
    
    empty :: Doc
    empty = New.emptyDoc
    
    char :: Char -> Doc
    char = New.pretty
    
    text :: String -> Doc
    

    enclose See 17 Occurences [+] Collapse [-]
    Found in Data.Text.Prettyprint.Doc.Symbols.Unicode from the package prettyprinter
    dGuillemetsIn = enclose rdGuillemet ldGuillemet
    
    -- | Single ‹guillemets›, pointing outwards (without adding any spacing).
    --
    -- >>> putDoc (sGuillemetsOut "·")
    -- ‹·›
    sGuillemetsOut :: Doc ann -> Doc ann
    sGuillemetsOut = enclose lsGuillemet rsGuillemet
    
    -- | Single ›guillemets‹, pointing inwards (without adding any spacing).
    --
    -- >>> putDoc (sGuillemetsIn "·")
    -- ›·‹
    sGuillemetsIn :: Doc ann -> Doc ann
    sGuillemetsIn = enclose rsGuillemet lsGuillemet
    
    -- | Bottom „99“ style double quotes.
    --
    -- >>> putDoc b99dquote
    -- „
    

    Found in Data.Text.Prettyprint.Doc.Symbols.Unicode from the package prettyprinter
    dGuillemetsOut = enclose ldGuillemet rdGuillemet
    
    -- | Double »guillemets«, pointing inwards (without adding any spacing).
    --
    -- >>> putDoc (dGuillemetsIn "·")
    -- »·«
    dGuillemetsIn :: Doc ann -> Doc ann
    dGuillemetsIn = enclose rdGuillemet ldGuillemet
    
    -- | Single ‹guillemets›, pointing outwards (without adding any spacing).
    --
    -- >>> putDoc (sGuillemetsOut "·")
    -- ‹·›
    sGuillemetsOut :: Doc ann -> Doc ann
    sGuillemetsOut = enclose lsGuillemet rsGuillemet
    
    -- | Single ›guillemets‹, pointing inwards (without adding any spacing).
    --
    -- >>> putDoc (sGuillemetsIn "·")
    -- ›·‹
    

    Found in Data.Text.Prettyprint.Doc.Symbols.Unicode from the package prettyprinter
    s69quotes = enclose t6quote t9quote
    
    -- | Double «guillemets», pointing outwards (without adding any spacing).
    --
    -- >>> putDoc (dGuillemetsOut "·")
    -- «·»
    dGuillemetsOut :: Doc ann -> Doc ann
    dGuillemetsOut = enclose ldGuillemet rdGuillemet
    
    -- | Double »guillemets«, pointing inwards (without adding any spacing).
    --
    -- >>> putDoc (dGuillemetsIn "·")
    -- »·«
    dGuillemetsIn :: Doc ann -> Doc ann
    dGuillemetsIn = enclose rdGuillemet ldGuillemet
    
    -- | Single ‹guillemets›, pointing outwards (without adding any spacing).
    --
    -- >>> putDoc (sGuillemetsOut "·")
    -- ‹·›
    

    Found in Data.Text.Prettyprint.Doc.Symbols.Unicode from the package prettyprinter
    s96quotes = enclose b9quote t6quote
    
    -- | Single ‘6-9’ quotes, as used in English typography.
    --
    -- >>> putDoc (s69quotes "·")
    -- ‘·’
    s69quotes :: Doc ann -> Doc ann
    s69quotes = enclose t6quote t9quote
    
    -- | Double «guillemets», pointing outwards (without adding any spacing).
    --
    -- >>> putDoc (dGuillemetsOut "·")
    -- «·»
    dGuillemetsOut :: Doc ann -> Doc ann
    dGuillemetsOut = enclose ldGuillemet rdGuillemet
    
    -- | Double »guillemets«, pointing inwards (without adding any spacing).
    --
    -- >>> putDoc (dGuillemetsIn "·")
    -- »·«
    

    Found in Data.Text.Prettyprint.Doc.Symbols.Unicode from the package prettyprinter
    d6699quotes = enclose t66dquote t99dquote
    
    -- | Single ‚9-6‘ quotes, as used in German typography.
    --
    -- >>> putDoc (s96quotes "·")
    -- ‚·‘
    s96quotes :: Doc ann -> Doc ann
    s96quotes = enclose b9quote t6quote
    
    -- | Single ‘6-9’ quotes, as used in English typography.
    --
    -- >>> putDoc (s69quotes "·")
    -- ‘·’
    s69quotes :: Doc ann -> Doc ann
    s69quotes = enclose t6quote t9quote
    
    -- | Double «guillemets», pointing outwards (without adding any spacing).
    --
    -- >>> putDoc (dGuillemetsOut "·")
    -- «·»
    

    Found in Data.Text.Prettyprint.Doc.Symbols.Unicode from the package prettyprinter
    d9966quotes = enclose b99dquote t66dquote
    
    -- | Double “66-99” quotes, as used in English typography.
    --
    -- >>> putDoc (d6699quotes "·")
    -- “·”
    d6699quotes :: Doc ann -> Doc ann
    d6699quotes = enclose t66dquote t99dquote
    
    -- | Single ‚9-6‘ quotes, as used in German typography.
    --
    -- >>> putDoc (s96quotes "·")
    -- ‚·‘
    s96quotes :: Doc ann -> Doc ann
    s96quotes = enclose b9quote t6quote
    
    -- | Single ‘6-9’ quotes, as used in English typography.
    --
    -- >>> putDoc (s69quotes "·")
    -- ‘·’
    

    Found in Data.Text.Prettyprint.Doc.Symbols.Unicode from the package prettyprinter
    -- | Double „99-66“ quotes, as used in German typography.
    --
    -- >>> putDoc (d9966quotes "·")
    -- „·“
    d9966quotes :: Doc ann -> Doc ann
    d9966quotes = enclose b99dquote t66dquote
    
    -- | Double “66-99” quotes, as used in English typography.
    --
    -- >>> putDoc (d6699quotes "·")
    -- “·”
    d6699quotes :: Doc ann -> Doc ann
    d6699quotes = enclose t66dquote t99dquote
    
    -- | Single ‚9-6‘ quotes, as used in German typography.
    --
    -- >>> putDoc (s96quotes "·")
    -- ‚·‘
    

    Found in Data.Text.Prettyprint.Doc.Symbols.Unicode from the package prettyprinter
        pound,
    ) where
    
    
    
    import Data.Text.Prettyprint.Doc
    
    
    
    -- | Double „99-66“ quotes, as used in German typography.
    --
    -- >>> putDoc (d9966quotes "·")
    -- „·“
    d9966quotes :: Doc ann -> Doc ann
    d9966quotes = enclose b99dquote t66dquote
    
    -- | Double “66-99” quotes, as used in English typography.
    --
    -- >>> putDoc (d6699quotes "·")
    -- “·”
    

    Found in Text.PrettyPrint.Annotated.Leijen from the package prettyprinter-compat-annotated-wl-pprint
    {-# LANGUAGE CPP #-}
    
    #include "version-compatibility-macros.h"
    
    module Text.PrettyPrint.Annotated.Leijen {-# DEPRECATED "Compatibility module for users of annotated-wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, SimpleDoc, SpanList, putDoc, hPutDoc, empty, char, text, (<>), nest,
        line, linebreak, group, softline, softbreak, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, pipe, string,
        int, integer, float, double, rational, bool, annotate, noAnnotate,
        renderPretty, renderCompact, displayDecorated, displayDecoratedA, display,
        displayS, displayIO, displaySpans, column, nesting, width
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    punctuate = New.punctuate
    
    fill :: Int -> Doc -> Doc
    fill = New.fill
    
    fillBreak :: Int -> Doc -> Doc
    fillBreak = New.fillBreak
    
    enclose :: Doc -> Doc -> Doc -> Doc
    enclose = New.enclose
    
    squotes, dquotes, parens, angles, braces, brackets :: Doc -> Doc
    squotes = New.squotes
    dquotes = New.dquotes
    parens = New.parens
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    punctuate = New.punctuate
    
    fill :: Int -> Doc -> Doc
    fill = New.fill
    
    fillBreak :: Int -> Doc -> Doc
    fillBreak = New.fillBreak
    
    enclose :: Doc -> Doc -> Doc -> Doc
    enclose = New.enclose
    
    squotes, dquotes, parens, angles, braces, brackets :: Doc -> Doc
    squotes = New.squotes
    dquotes = New.dquotes
    parens = New.parens
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    punctuate = New.punctuate
    
    fill :: Int -> Doc -> Doc
    fill = New.fill
    
    fillBreak :: Int -> Doc -> Doc
    fillBreak = New.fillBreak
    
    enclose :: Doc -> Doc -> Doc -> Doc
    enclose = New.enclose
    
    squotes, dquotes, parens, angles, braces, brackets :: Doc -> Doc
    squotes = New.squotes
    dquotes = New.dquotes
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    module Text.PrettyPrint.ANSI.Leijen {-# DEPRECATED "Compatibility module for users of ansi-wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, putDoc, hPutDoc, empty, char, text, (<>), nest, line, linebreak, group,
        softline, softbreak, hardline, flatAlt, renderSmart, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, black, red,
        green, yellow, blue, magenta, cyan, white, dullblack, dullred, dullgreen,
        dullyellow, dullblue, dullmagenta, dullcyan, dullwhite, onblack, onred,
        ongreen, onyellow, onblue, onmagenta, oncyan, onwhite, ondullblack,
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    punctuate = New.punctuate
    
    fill :: Int -> Doc -> Doc
    fill = New.fill
    
    fillBreak :: Int -> Doc -> Doc
    fillBreak = New.fillBreak
    
    enclose :: Doc -> Doc -> Doc -> Doc
    enclose = New.enclose
    
    squotes, dquotes, parens, angles, braces, brackets :: Doc -> Doc
    squotes = New.squotes
    dquotes = New.dquotes
    parens = New.parens
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    punctuate = New.punctuate
    
    fill :: Int -> Doc -> Doc
    fill = New.fill
    
    fillBreak :: Int -> Doc -> Doc
    fillBreak = New.fillBreak
    
    enclose :: Doc -> Doc -> Doc -> Doc
    enclose = New.enclose
    
    squotes, dquotes, parens, angles, braces, brackets :: Doc -> Doc
    squotes = New.squotes
    dquotes = New.dquotes
    parens = New.parens
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    punctuate = New.punctuate
    
    fill :: Int -> Doc -> Doc
    fill = New.fill
    
    fillBreak :: Int -> Doc -> Doc
    fillBreak = New.fillBreak
    
    enclose :: Doc -> Doc -> Doc -> Doc
    enclose = New.enclose
    
    squotes, dquotes, parens, angles, braces, brackets :: Doc -> Doc
    squotes = New.squotes
    dquotes = New.dquotes
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    module Text.PrettyPrint.Leijen {-# DEPRECATED "Compatibility module for users of wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, putDoc, hPutDoc, empty, char, text, (<>), nest, line, linebreak, group,
        softline, softbreak, align, hang, indent, encloseSep, list, tupled,
        semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>), hsep, vsep, fillSep, sep,
        hcat, vcat, fillCat, cat, punctuate, fill, fillBreak, enclose, squotes,
        dquotes, parens, angles, braces, brackets, lparen, rparen, langle, rangle,
        lbrace, rbrace, lbracket, rbracket, squote, dquote, semi, colon, comma,
        space, dot, backslash, equals, string, int, integer, float, double,
        rational, Pretty(..), SimpleDoc, renderPretty, renderCompact, displayS,
        displayIO , bool , column, nesting, width
    

    encloseSep See 16 Occurences [+] Collapse [-]
    Found in Data.Extensible.Dictionary from the package extensible
        $ henumerateFor (Proxy :: Proxy (Instance1 Show h)) xs
        (\i r -> showsPrec 0 (hlookup i xs) . showString " <: " . r)
        (showString "nil")
    
    #if !MIN_VERSION_prettyprinter(1,2,1)
    instance Pretty a => Pretty (Identity a) where
      pretty = pretty . runIdentity
    
    instance Pretty a => Pretty (Const a b) where
      pretty = pretty . getConst
    #endif
    
    instance WrapForall Pretty h xs => Pretty (h :* xs) where
      pretty xs = align
        $ encloseSep (flatAlt "" "{ ") (flatAlt "" " }") (flatAlt "" "; ")
        $ henumerateFor (Proxy :: Proxy (Instance1 Pretty h)) xs
        (\i r -> pretty (hlookup i xs) : r)
        []
    
    instance WrapForall Eq h xs => Eq (h :* xs) where
    

    Found in Text.PrettyPrint.Annotated.Leijen from the package prettyprinter-compat-annotated-wl-pprint
    display :: SimpleDoc ann -> String
    display = flip displayS ""
    
    noAnnotate :: Doc ann -> Doc xxx
    noAnnotate = unAnnotate
    
    linebreak :: Doc ann
    linebreak = line'
    
    softbreak :: Doc ann
    softbreak = softline'
    
    semiBraces :: [Doc ann] -> Doc ann
    semiBraces = encloseSep lbrace rbrace semi
    
    (<$>), (</>), (<$$>), (<//>) :: Doc ann -> Doc ann -> Doc ann
    (<$>) = \x y -> x <> line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> line' <> y
    

    Found in Text.PrettyPrint.Annotated.Leijen from the package prettyprinter-compat-annotated-wl-pprint
    {-# LANGUAGE CPP #-}
    
    #include "version-compatibility-macros.h"
    
    module Text.PrettyPrint.Annotated.Leijen {-# DEPRECATED "Compatibility module for users of annotated-wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, SimpleDoc, SpanList, putDoc, hPutDoc, empty, char, text, (<>), nest,
        line, linebreak, group, softline, softbreak, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, pipe, string,
        int, integer, float, double, rational, bool, annotate, noAnnotate,
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    indent :: Int -> Doc -> Doc
    indent = New.indent
    
    encloseSep :: Doc -> Doc -> Doc -> [Doc] -> Doc
    encloseSep = New.encloseSep
    
    list :: [Doc] -> Doc
    list = New.list
    
    tupled :: [Doc] -> Doc
    tupled = New.tupled
    
    semiBraces :: [Doc] -> Doc
    semiBraces = New.encloseSep New.lbrace New.rbrace New.semi
    
    (<+>), (<$>), (</>), (<$$>), (<//>) :: Doc -> Doc -> Doc
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    renderSmart ribbonFraction pageWidth
        = New.layoutSmart New.LayoutOptions
            { New.layoutPageWidth = New.AvailablePerLine pageWidth (realToFrac ribbonFraction) }
    
    align :: Doc -> Doc
    align = New.align
    
    hang :: Int -> Doc -> Doc
    hang = New.hang
    
    indent :: Int -> Doc -> Doc
    indent = New.indent
    
    encloseSep :: Doc -> Doc -> Doc -> [Doc] -> Doc
    encloseSep = New.encloseSep
    
    list :: [Doc] -> Doc
    list = New.list
    
    tupled :: [Doc] -> Doc
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    renderSmart ribbonFraction pageWidth
        = New.layoutSmart New.LayoutOptions
            { New.layoutPageWidth = New.AvailablePerLine pageWidth (realToFrac ribbonFraction) }
    
    align :: Doc -> Doc
    align = New.align
    
    hang :: Int -> Doc -> Doc
    hang = New.hang
    
    indent :: Int -> Doc -> Doc
    indent = New.indent
    
    encloseSep :: Doc -> Doc -> Doc -> [Doc] -> Doc
    encloseSep = New.encloseSep
    
    list :: [Doc] -> Doc
    list = New.list
    
    tupled :: [Doc] -> Doc
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    renderSmart :: Float -> Int -> Doc -> SimpleDoc
    renderSmart ribbonFraction pageWidth
        = New.layoutSmart New.LayoutOptions
            { New.layoutPageWidth = New.AvailablePerLine pageWidth (realToFrac ribbonFraction) }
    
    align :: Doc -> Doc
    align = New.align
    
    hang :: Int -> Doc -> Doc
    hang = New.hang
    
    indent :: Int -> Doc -> Doc
    indent = New.indent
    
    encloseSep :: Doc -> Doc -> Doc -> [Doc] -> Doc
    encloseSep = New.encloseSep
    
    list :: [Doc] -> Doc
    list = New.list
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    module Text.PrettyPrint.ANSI.Leijen {-# DEPRECATED "Compatibility module for users of ansi-wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, putDoc, hPutDoc, empty, char, text, (<>), nest, line, linebreak, group,
        softline, softbreak, hardline, flatAlt, renderSmart, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, black, red,
        green, yellow, blue, magenta, cyan, white, dullblack, dullred, dullgreen,
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    indent :: Int -> Doc -> Doc
    indent = New.indent
    
    encloseSep :: Doc -> Doc -> Doc -> [Doc] -> Doc
    encloseSep = New.encloseSep
    
    list :: [Doc] -> Doc
    list = New.list
    
    tupled :: [Doc] -> Doc
    tupled = New.tupled
    
    semiBraces :: [Doc] -> Doc
    semiBraces = New.encloseSep New.lbrace New.rbrace New.semi
    
    (<+>), (<$>), (</>), (<$$>), (<//>) :: Doc -> Doc -> Doc
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    softbreak :: Doc
    softbreak = New.group linebreak
    
    align :: Doc -> Doc
    align = New.align
    
    hang :: Int -> Doc -> Doc
    hang = New.hang
    
    indent :: Int -> Doc -> Doc
    indent = New.indent
    
    encloseSep :: Doc -> Doc -> Doc -> [Doc] -> Doc
    encloseSep = New.encloseSep
    
    list :: [Doc] -> Doc
    list = New.list
    
    tupled :: [Doc] -> Doc
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    softbreak :: Doc
    softbreak = New.group linebreak
    
    align :: Doc -> Doc
    align = New.align
    
    hang :: Int -> Doc -> Doc
    hang = New.hang
    
    indent :: Int -> Doc -> Doc
    indent = New.indent
    
    encloseSep :: Doc -> Doc -> Doc -> [Doc] -> Doc
    encloseSep = New.encloseSep
    
    list :: [Doc] -> Doc
    list = New.list
    
    tupled :: [Doc] -> Doc
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    softline = New.softline
    
    softbreak :: Doc
    softbreak = New.group linebreak
    
    align :: Doc -> Doc
    align = New.align
    
    hang :: Int -> Doc -> Doc
    hang = New.hang
    
    indent :: Int -> Doc -> Doc
    indent = New.indent
    
    encloseSep :: Doc -> Doc -> Doc -> [Doc] -> Doc
    encloseSep = New.encloseSep
    
    list :: [Doc] -> Doc
    list = New.list
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    module Text.PrettyPrint.Leijen {-# DEPRECATED "Compatibility module for users of wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, putDoc, hPutDoc, empty, char, text, (<>), nest, line, linebreak, group,
        softline, softbreak, align, hang, indent, encloseSep, list, tupled,
        semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>), hsep, vsep, fillSep, sep,
        hcat, vcat, fillCat, cat, punctuate, fill, fillBreak, enclose, squotes,
        dquotes, parens, angles, braces, brackets, lparen, rparen, langle, rangle,
        lbrace, rbrace, lbracket, rbracket, squote, dquote, semi, colon, comma,
        space, dot, backslash, equals, string, int, integer, float, double,
    

    Found in Text.Show.Prettyprint.Internal from the package show-prettyprint
    -- >>> testParse listP "[\"Hello\", World]"
    -- ["Hello",World]
    listP :: Parser (Doc ann)
    listP = p <?> "list"
      where
        p = fmap (encloseSep lbracket rbracket Ppr.comma)
                 (Tri.brackets (sepBy argP Tri.comma))
    
    -- |
    -- >>> testParse recordP "{ r1 = (), r2 = Just True }"
    -- {r1 = (),r2 = Just True}
    recordP :: Parser (Doc ann)
    recordP = p <?> "record"
      where
        p = fmap (encloseSep lbrace rbrace Ppr.comma) (Tri.braces (sepBy recordEntryP Tri.comma))
        recordEntryP = do
            lhs <- token identifierP
            _ <- token (Tri.char '=')
            rhs <- argP
            pure (lhs <+> pretty "=" <+> rhs)
    

    Found in Text.Show.Prettyprint.Internal from the package show-prettyprint
      where
        p = fmap (encloseSep lparen rparen Ppr.comma) (Tri.parens (do
            x <- argP
            xs <- many (Tri.comma *> argP)
            pure (x:xs) ))
    
    -- | List prettyparser. Lists can be heterogeneous, which is realistic if we
    -- consider ill-defined Show instances.
    --
    -- >>> testParse listP "[\"Hello\", World]"
    -- ["Hello",World]
    listP :: Parser (Doc ann)
    listP = p <?> "list"
      where
        p = fmap (encloseSep lbracket rbracket Ppr.comma)
                 (Tri.brackets (sepBy argP Tri.comma))
    
    -- |
    -- >>> testParse recordP "{ r1 = (), r2 = Just True }"
    -- {r1 = (),r2 = Just True}
    

    Found in Text.Show.Prettyprint.Internal from the package show-prettyprint
    -- ()
    unitP :: Parser (Doc ann)
    unitP = p <?> "unit"
      where
        p = fmap pretty (Tri.string "()")
    
    -- | Prettyparser for tuples from size 1. Since 1-tuples are just parenthesized
    -- expressions to first order approximation, this parser handles those as well.
    --
    -- >>> testParse tupleP "((), True, 'c')"
    -- ((),True,'c')
    tupleP :: Parser (Doc ann)
    tupleP = p <?> "tuple"
      where
        p = fmap (encloseSep lparen rparen Ppr.comma) (Tri.parens (do
            x <- argP
            xs <- many (Tri.comma *> argP)
            pure (x:xs) ))
    
    -- | List prettyparser. Lists can be heterogeneous, which is realistic if we
    

    fill See 10 Occurences [+] Collapse [-]
    Found in Math.ExpPairs.Matrix3 from the package exp-pairs
      a33 = a33
      }
    fromList _ = error "The list must contain exactly 9 elements"
    
    -- |Divide all elements of the matrix by their greatest common
    -- divisor. This is useful for matrices of projective
    -- transformations to reduce the magnitude of computations.
    normalize :: Integral t => Matrix3 t -> Matrix3 t
    normalize a = case foldl1 gcd a of
      0 -> a
      d -> fmap (`div` d) a
    
    instance Pretty t => Pretty (Matrix3 t) where
      pretty = vsep . map hsep . pad . fmap pretty where
        pad (Matrix3 {..}) = map (zipWith fill ls) table where
          table = [[a11, a12, a13], [a21, a22, a23], [a31, a32, a33]]
          ls = map (maximum . map (length . show)) (transpose table)
    
    -- |Multiplicate a matrix by a vector (considered as a column).
    multCol :: Num t => Matrix3 t -> (t, t, t) -> (t, t, t)
    

    Found in Text.PrettyPrint.Annotated.Leijen from the package prettyprinter-compat-annotated-wl-pprint
    {-# LANGUAGE CPP #-}
    
    #include "version-compatibility-macros.h"
    
    module Text.PrettyPrint.Annotated.Leijen {-# DEPRECATED "Compatibility module for users of annotated-wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, SimpleDoc, SpanList, putDoc, hPutDoc, empty, char, text, (<>), nest,
        line, linebreak, group, softline, softbreak, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, pipe, string,
        int, integer, float, double, rational, bool, annotate, noAnnotate,
        renderPretty, renderCompact, displayDecorated, displayDecoratedA, display,
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    punctuate = New.punctuate
    
    fill :: Int -> Doc -> Doc
    fill = New.fill
    
    fillBreak :: Int -> Doc -> Doc
    fillBreak = New.fillBreak
    
    enclose :: Doc -> Doc -> Doc -> Doc
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    punctuate = New.punctuate
    
    fill :: Int -> Doc -> Doc
    fill = New.fill
    
    fillBreak :: Int -> Doc -> Doc
    fillBreak = New.fillBreak
    
    enclose :: Doc -> Doc -> Doc -> Doc
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    punctuate = New.punctuate
    
    fill :: Int -> Doc -> Doc
    fill = New.fill
    
    fillBreak :: Int -> Doc -> Doc
    fillBreak = New.fillBreak
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    module Text.PrettyPrint.ANSI.Leijen {-# DEPRECATED "Compatibility module for users of ansi-wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, putDoc, hPutDoc, empty, char, text, (<>), nest, line, linebreak, group,
        softline, softbreak, hardline, flatAlt, renderSmart, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, black, red,
        green, yellow, blue, magenta, cyan, white, dullblack, dullred, dullgreen,
        dullyellow, dullblue, dullmagenta, dullcyan, dullwhite, onblack, onred,
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    punctuate = New.punctuate
    
    fill :: Int -> Doc -> Doc
    fill = New.fill
    
    fillBreak :: Int -> Doc -> Doc
    fillBreak = New.fillBreak
    
    enclose :: Doc -> Doc -> Doc -> Doc
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    punctuate = New.punctuate
    
    fill :: Int -> Doc -> Doc
    fill = New.fill
    
    fillBreak :: Int -> Doc -> Doc
    fillBreak = New.fillBreak
    
    enclose :: Doc -> Doc -> Doc -> Doc
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    punctuate = New.punctuate
    
    fill :: Int -> Doc -> Doc
    fill = New.fill
    
    fillBreak :: Int -> Doc -> Doc
    fillBreak = New.fillBreak
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    module Text.PrettyPrint.Leijen {-# DEPRECATED "Compatibility module for users of wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, putDoc, hPutDoc, empty, char, text, (<>), nest, line, linebreak, group,
        softline, softbreak, align, hang, indent, encloseSep, list, tupled,
        semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>), hsep, vsep, fillSep, sep,
        hcat, vcat, fillCat, cat, punctuate, fill, fillBreak, enclose, squotes,
        dquotes, parens, angles, braces, brackets, lparen, rparen, langle, rangle,
        lbrace, rbrace, lbracket, rbracket, squote, dquote, semi, colon, comma,
        space, dot, backslash, equals, string, int, integer, float, double,
        rational, Pretty(..), SimpleDoc, renderPretty, renderCompact, displayS,
        displayIO , bool , column, nesting, width
    

    fillBreak See 9 Occurences [+] Collapse [-]
    Found in Text.PrettyPrint.Annotated.Leijen from the package prettyprinter-compat-annotated-wl-pprint
    {-# LANGUAGE CPP #-}
    
    #include "version-compatibility-macros.h"
    
    module Text.PrettyPrint.Annotated.Leijen {-# DEPRECATED "Compatibility module for users of annotated-wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, SimpleDoc, SpanList, putDoc, hPutDoc, empty, char, text, (<>), nest,
        line, linebreak, group, softline, softbreak, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, pipe, string,
        int, integer, float, double, rational, bool, annotate, noAnnotate,
        renderPretty, renderCompact, displayDecorated, displayDecoratedA, display,
        displayS, displayIO, displaySpans, column, nesting, width
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    punctuate = New.punctuate
    
    fill :: Int -> Doc -> Doc
    fill = New.fill
    
    fillBreak :: Int -> Doc -> Doc
    fillBreak = New.fillBreak
    
    enclose :: Doc -> Doc -> Doc -> Doc
    enclose = New.enclose
    
    squotes, dquotes, parens, angles, braces, brackets :: Doc -> Doc
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    punctuate = New.punctuate
    
    fill :: Int -> Doc -> Doc
    fill = New.fill
    
    fillBreak :: Int -> Doc -> Doc
    fillBreak = New.fillBreak
    
    enclose :: Doc -> Doc -> Doc -> Doc
    enclose = New.enclose
    
    squotes, dquotes, parens, angles, braces, brackets :: Doc -> Doc
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    punctuate = New.punctuate
    
    fill :: Int -> Doc -> Doc
    fill = New.fill
    
    fillBreak :: Int -> Doc -> Doc
    fillBreak = New.fillBreak
    
    enclose :: Doc -> Doc -> Doc -> Doc
    enclose = New.enclose
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    module Text.PrettyPrint.ANSI.Leijen {-# DEPRECATED "Compatibility module for users of ansi-wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, putDoc, hPutDoc, empty, char, text, (<>), nest, line, linebreak, group,
        softline, softbreak, hardline, flatAlt, renderSmart, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, black, red,
        green, yellow, blue, magenta, cyan, white, dullblack, dullred, dullgreen,
        dullyellow, dullblue, dullmagenta, dullcyan, dullwhite, onblack, onred,
        ongreen, onyellow, onblue, onmagenta, oncyan, onwhite, ondullblack,
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    punctuate = New.punctuate
    
    fill :: Int -> Doc -> Doc
    fill = New.fill
    
    fillBreak :: Int -> Doc -> Doc
    fillBreak = New.fillBreak
    
    enclose :: Doc -> Doc -> Doc -> Doc
    enclose = New.enclose
    
    squotes, dquotes, parens, angles, braces, brackets :: Doc -> Doc
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    punctuate = New.punctuate
    
    fill :: Int -> Doc -> Doc
    fill = New.fill
    
    fillBreak :: Int -> Doc -> Doc
    fillBreak = New.fillBreak
    
    enclose :: Doc -> Doc -> Doc -> Doc
    enclose = New.enclose
    
    squotes, dquotes, parens, angles, braces, brackets :: Doc -> Doc
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    punctuate = New.punctuate
    
    fill :: Int -> Doc -> Doc
    fill = New.fill
    
    fillBreak :: Int -> Doc -> Doc
    fillBreak = New.fillBreak
    
    enclose :: Doc -> Doc -> Doc -> Doc
    enclose = New.enclose
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    module Text.PrettyPrint.Leijen {-# DEPRECATED "Compatibility module for users of wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, putDoc, hPutDoc, empty, char, text, (<>), nest, line, linebreak, group,
        softline, softbreak, align, hang, indent, encloseSep, list, tupled,
        semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>), hsep, vsep, fillSep, sep,
        hcat, vcat, fillCat, cat, punctuate, fill, fillBreak, enclose, squotes,
        dquotes, parens, angles, braces, brackets, lparen, rparen, langle, rangle,
        lbrace, rbrace, lbracket, rbracket, squote, dquote, semi, colon, comma,
        space, dot, backslash, equals, string, int, integer, float, double,
        rational, Pretty(..), SimpleDoc, renderPretty, renderCompact, displayS,
        displayIO , bool , column, nesting, width
    

    fillCat See 9 Occurences [+] Collapse [-]
    Found in Text.PrettyPrint.Annotated.Leijen from the package prettyprinter-compat-annotated-wl-pprint
    {-# LANGUAGE CPP #-}
    
    #include "version-compatibility-macros.h"
    
    module Text.PrettyPrint.Annotated.Leijen {-# DEPRECATED "Compatibility module for users of annotated-wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, SimpleDoc, SpanList, putDoc, hPutDoc, empty, char, text, (<>), nest,
        line, linebreak, group, softline, softbreak, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, pipe, string,
        int, integer, float, double, rational, bool, annotate, noAnnotate,
        renderPretty, renderCompact, displayDecorated, displayDecoratedA, display,
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    (<+>), (<$>), (</>), (<$$>), (<//>) :: Doc -> Doc -> Doc
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    punctuate = New.punctuate
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    (<+>), (<$>), (</>), (<$$>), (<//>) :: Doc -> Doc -> Doc
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    punctuate = New.punctuate
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    tupled :: [Doc] -> Doc
    tupled = New.tupled
    
    semiBraces :: [Doc] -> Doc
    semiBraces = New.encloseSep New.lbrace New.rbrace New.semi
    
    (<+>), (<$>), (</>), (<$$>), (<//>) :: Doc -> Doc -> Doc
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    module Text.PrettyPrint.ANSI.Leijen {-# DEPRECATED "Compatibility module for users of ansi-wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, putDoc, hPutDoc, empty, char, text, (<>), nest, line, linebreak, group,
        softline, softbreak, hardline, flatAlt, renderSmart, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, black, red,
        green, yellow, blue, magenta, cyan, white, dullblack, dullred, dullgreen,
        dullyellow, dullblue, dullmagenta, dullcyan, dullwhite, onblack, onred,
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    (<+>), (<$>), (</>), (<$$>), (<//>) :: Doc -> Doc -> Doc
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    punctuate = New.punctuate
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    (<+>), (<$>), (</>), (<$$>), (<//>) :: Doc -> Doc -> Doc
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    punctuate = New.punctuate
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    tupled :: [Doc] -> Doc
    tupled = New.tupled
    
    semiBraces :: [Doc] -> Doc
    semiBraces = New.encloseSep New.lbrace New.rbrace New.semi
    
    (<+>), (<$>), (</>), (<$$>), (<//>) :: Doc -> Doc -> Doc
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    module Text.PrettyPrint.Leijen {-# DEPRECATED "Compatibility module for users of wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, putDoc, hPutDoc, empty, char, text, (<>), nest, line, linebreak, group,
        softline, softbreak, align, hang, indent, encloseSep, list, tupled,
        semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>), hsep, vsep, fillSep, sep,
        hcat, vcat, fillCat, cat, punctuate, fill, fillBreak, enclose, squotes,
        dquotes, parens, angles, braces, brackets, lparen, rparen, langle, rangle,
        lbrace, rbrace, lbracket, rbracket, squote, dquote, semi, colon, comma,
        space, dot, backslash, equals, string, int, integer, float, double,
        rational, Pretty(..), SimpleDoc, renderPretty, renderCompact, displayS,
        displayIO , bool , column, nesting, width
    

    fillSep See 13 Occurences [+] Collapse [-]
    Found in Data.InvertibleGrammar.Monad from the package invertible-grammar
      } deriving (Eq, Ord, Generic)
    
    instance (Pretty p) => Pretty (ErrorMessage p) where
      pretty = ppError pretty
    
    ppMismatch :: Set Text -> Maybe Text -> Doc ann
    ppMismatch (S.toList -> []) Nothing =
      "Unknown mismatch occurred"
    ppMismatch (S.toList -> []) unexpected =
      "Unexpected:" <+> pretty unexpected
    ppMismatch (S.toList -> expected) Nothing =
      "Expected:" <+> fillSep (punctuate comma $ map pretty expected)
    ppMismatch (S.toList -> expected) (Just got) =
      vsep
      [ "Expected:" <+> fillSep (punctuate comma $ map pretty expected)
      , "But got: " <+> pretty got
      ]
    
    ppError :: (p -> Doc ann) -> ErrorMessage p -> Doc ann
    ppError ppPosition (ErrorMessage pos annotations expected got) =
    

    Found in Data.InvertibleGrammar.Monad from the package invertible-grammar
      , emAnnotations :: [Text]
      , emExpected :: Set Text
      , emGot :: Maybe Text
      } deriving (Eq, Ord, Generic)
    
    instance (Pretty p) => Pretty (ErrorMessage p) where
      pretty = ppError pretty
    
    ppMismatch :: Set Text -> Maybe Text -> Doc ann
    ppMismatch (S.toList -> []) Nothing =
      "Unknown mismatch occurred"
    ppMismatch (S.toList -> []) unexpected =
      "Unexpected:" <+> pretty unexpected
    ppMismatch (S.toList -> expected) Nothing =
      "Expected:" <+> fillSep (punctuate comma $ map pretty expected)
    ppMismatch (S.toList -> expected) (Just got) =
      vsep
      [ "Expected:" <+> fillSep (punctuate comma $ map pretty expected)
      , "But got: " <+> pretty got
      ]
    

    Found in Data.InvertibleGrammar.Monad from the package invertible-grammar
      ) where
    
    import Control.Arrow (left)
    import Control.Applicative
    import Control.Monad.ContextError
    
    import Data.Maybe
    import Data.Semigroup as Semi
    import Data.Set (Set)
    import qualified Data.Set as S
    import Data.Text (Text)
    import GHC.Generics
    
    import Data.Text.Prettyprint.Doc
      ( Doc, Pretty, pretty, vsep, hsep, line, indent, fillSep, punctuate
      , comma, colon, (<+>), layoutSmart, PageWidth(..), LayoutOptions(..)
      )
    
    #if MIN_VERSION_prettyprinter(1,2,0)
    import Data.Text.Prettyprint.Doc.Render.String
    

    Found in Data.Text.Prettyprint.Doc.Util from the package prettyprinter
    -- | Insert soft linebreaks between words, so that text is broken into multiple
    -- lines when it exceeds the available width.
    --
    -- >>> putDocW 32 (reflow "Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do eiusmod tempor incididunt ut labore et dolore magna aliqua.")
    -- Lorem ipsum dolor sit amet,
    -- consectetur adipisicing elit,
    -- sed do eiusmod tempor incididunt
    -- ut labore et dolore magna
    -- aliqua.
    --
    -- @
    -- 'reflow' = 'fillSep' . 'words'
    -- @
    reflow :: Text -> Doc ann
    reflow = fillSep . words
    
    -- | Render a document with a certain width. Useful for quick-and-dirty testing
    -- of layout behaviour. Used heavily in the doctests of this package, for
    -- example.
    --
    

    Found in Text.PrettyPrint.Annotated.Leijen from the package prettyprinter-compat-annotated-wl-pprint
    {-# LANGUAGE CPP #-}
    
    #include "version-compatibility-macros.h"
    
    module Text.PrettyPrint.Annotated.Leijen {-# DEPRECATED "Compatibility module for users of annotated-wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, SimpleDoc, SpanList, putDoc, hPutDoc, empty, char, text, (<>), nest,
        line, linebreak, group, softline, softbreak, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, pipe, string,
        int, integer, float, double, rational, bool, annotate, noAnnotate,
        renderPretty, renderCompact, displayDecorated, displayDecoratedA, display,
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    semiBraces :: [Doc] -> Doc
    semiBraces = New.encloseSep New.lbrace New.rbrace New.semi
    
    (<+>), (<$>), (</>), (<$$>), (<//>) :: Doc -> Doc -> Doc
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    semiBraces :: [Doc] -> Doc
    semiBraces = New.encloseSep New.lbrace New.rbrace New.semi
    
    (<+>), (<$>), (</>), (<$$>), (<//>) :: Doc -> Doc -> Doc
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    tupled :: [Doc] -> Doc
    tupled = New.tupled
    
    semiBraces :: [Doc] -> Doc
    semiBraces = New.encloseSep New.lbrace New.rbrace New.semi
    
    (<+>), (<$>), (</>), (<$$>), (<//>) :: Doc -> Doc -> Doc
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    module Text.PrettyPrint.ANSI.Leijen {-# DEPRECATED "Compatibility module for users of ansi-wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, putDoc, hPutDoc, empty, char, text, (<>), nest, line, linebreak, group,
        softline, softbreak, hardline, flatAlt, renderSmart, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, black, red,
        green, yellow, blue, magenta, cyan, white, dullblack, dullred, dullgreen,
        dullyellow, dullblue, dullmagenta, dullcyan, dullwhite, onblack, onred,
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    semiBraces :: [Doc] -> Doc
    semiBraces = New.encloseSep New.lbrace New.rbrace New.semi
    
    (<+>), (<$>), (</>), (<$$>), (<//>) :: Doc -> Doc -> Doc
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    semiBraces :: [Doc] -> Doc
    semiBraces = New.encloseSep New.lbrace New.rbrace New.semi
    
    (<+>), (<$>), (</>), (<$$>), (<//>) :: Doc -> Doc -> Doc
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    tupled :: [Doc] -> Doc
    tupled = New.tupled
    
    semiBraces :: [Doc] -> Doc
    semiBraces = New.encloseSep New.lbrace New.rbrace New.semi
    
    (<+>), (<$>), (</>), (<$$>), (<//>) :: Doc -> Doc -> Doc
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    module Text.PrettyPrint.Leijen {-# DEPRECATED "Compatibility module for users of wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, putDoc, hPutDoc, empty, char, text, (<>), nest, line, linebreak, group,
        softline, softbreak, align, hang, indent, encloseSep, list, tupled,
        semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>), hsep, vsep, fillSep, sep,
        hcat, vcat, fillCat, cat, punctuate, fill, fillBreak, enclose, squotes,
        dquotes, parens, angles, braces, brackets, lparen, rparen, langle, rangle,
        lbrace, rbrace, lbracket, rbracket, squote, dquote, semi, colon, comma,
        space, dot, backslash, equals, string, int, integer, float, double,
        rational, Pretty(..), SimpleDoc, renderPretty, renderCompact, displayS,
    

    flatAlt See 9 Occurences [+] Collapse [-]
    Found in Data.Extensible.Dictionary from the package extensible
        $ henumerateFor (Proxy :: Proxy (Instance1 Show h)) xs
        (\i r -> showsPrec 0 (hlookup i xs) . showString " <: " . r)
        (showString "nil")
    
    #if !MIN_VERSION_prettyprinter(1,2,1)
    instance Pretty a => Pretty (Identity a) where
      pretty = pretty . runIdentity
    
    instance Pretty a => Pretty (Const a b) where
      pretty = pretty . getConst
    #endif
    
    instance WrapForall Pretty h xs => Pretty (h :* xs) where
      pretty xs = align
        $ encloseSep (flatAlt "" "{ ") (flatAlt "" " }") (flatAlt "" "; ")
        $ henumerateFor (Proxy :: Proxy (Instance1 Pretty h)) xs
        (\i r -> pretty (hlookup i xs) : r)
        []
    
    instance WrapForall Eq h xs => Eq (h :* xs) where
    

    Found in Data.Extensible.Dictionary from the package extensible
        $ henumerateFor (Proxy :: Proxy (Instance1 Show h)) xs
        (\i r -> showsPrec 0 (hlookup i xs) . showString " <: " . r)
        (showString "nil")
    
    #if !MIN_VERSION_prettyprinter(1,2,1)
    instance Pretty a => Pretty (Identity a) where
      pretty = pretty . runIdentity
    
    instance Pretty a => Pretty (Const a b) where
      pretty = pretty . getConst
    #endif
    
    instance WrapForall Pretty h xs => Pretty (h :* xs) where
      pretty xs = align
        $ encloseSep (flatAlt "" "{ ") (flatAlt "" " }") (flatAlt "" "; ")
        $ henumerateFor (Proxy :: Proxy (Instance1 Pretty h)) xs
        (\i r -> pretty (hlookup i xs) : r)
        []
    
    instance WrapForall Eq h xs => Eq (h :* xs) where
    

    Found in Data.Extensible.Dictionary from the package extensible
        $ henumerateFor (Proxy :: Proxy (Instance1 Show h)) xs
        (\i r -> showsPrec 0 (hlookup i xs) . showString " <: " . r)
        (showString "nil")
    
    #if !MIN_VERSION_prettyprinter(1,2,1)
    instance Pretty a => Pretty (Identity a) where
      pretty = pretty . runIdentity
    
    instance Pretty a => Pretty (Const a b) where
      pretty = pretty . getConst
    #endif
    
    instance WrapForall Pretty h xs => Pretty (h :* xs) where
      pretty xs = align
        $ encloseSep (flatAlt "" "{ ") (flatAlt "" " }") (flatAlt "" "; ")
        $ henumerateFor (Proxy :: Proxy (Instance1 Pretty h)) xs
        (\i r -> pretty (hlookup i xs) : r)
        []
    
    instance WrapForall Eq h xs => Eq (h :* xs) where
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    group :: Doc -> Doc
    group = New.group
    
    softline :: Doc
    softline = New.softline
    
    softbreak :: Doc
    softbreak = New.group linebreak
    
    hardline :: Doc
    hardline = New.hardline
    
    flatAlt :: Doc -> Doc -> Doc
    flatAlt = New.flatAlt
    
    renderSmart :: Float -> Int -> Doc -> SimpleDoc
    renderSmart ribbonFraction pageWidth
        = New.layoutSmart New.LayoutOptions
            { New.layoutPageWidth = New.AvailablePerLine pageWidth (realToFrac ribbonFraction) }
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    group :: Doc -> Doc
    group = New.group
    
    softline :: Doc
    softline = New.softline
    
    softbreak :: Doc
    softbreak = New.group linebreak
    
    hardline :: Doc
    hardline = New.hardline
    
    flatAlt :: Doc -> Doc -> Doc
    flatAlt = New.flatAlt
    
    renderSmart :: Float -> Int -> Doc -> SimpleDoc
    renderSmart ribbonFraction pageWidth
        = New.layoutSmart New.LayoutOptions
            { New.layoutPageWidth = New.AvailablePerLine pageWidth (realToFrac ribbonFraction) }
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    linebreak = New.flatAlt New.line mempty
    
    group :: Doc -> Doc
    group = New.group
    
    softline :: Doc
    softline = New.softline
    
    softbreak :: Doc
    softbreak = New.group linebreak
    
    hardline :: Doc
    hardline = New.hardline
    
    flatAlt :: Doc -> Doc -> Doc
    flatAlt = New.flatAlt
    
    renderSmart :: Float -> Int -> Doc -> SimpleDoc
    renderSmart ribbonFraction pageWidth
        = New.layoutSmart New.LayoutOptions
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    char :: Char -> Doc
    char = New.pretty
    
    text :: String -> Doc
    text = New.pretty
    
    nest :: Int -> Doc -> Doc
    nest  = New.nest
    
    line :: Doc
    line = New.line
    
    linebreak :: Doc
    linebreak = New.flatAlt New.line mempty
    
    group :: Doc -> Doc
    group = New.group
    
    softline :: Doc
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    module Text.PrettyPrint.ANSI.Leijen {-# DEPRECATED "Compatibility module for users of ansi-wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, putDoc, hPutDoc, empty, char, text, (<>), nest, line, linebreak, group,
        softline, softbreak, hardline, flatAlt, renderSmart, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, black, red,
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    char :: Char -> Doc
    char = New.pretty
    
    text :: String -> Doc
    text = New.pretty
    
    nest :: Int -> Doc -> Doc
    nest  = New.nest
    
    line :: Doc
    line = New.line
    
    linebreak :: Doc
    linebreak = New.flatAlt New.line mempty
    
    group :: Doc -> Doc
    group = New.group
    
    softline :: Doc
    

    fuse No usage example found for this symbol :( Collapse [-]
    group See 1 Occurences [+] Collapse [-]
    Found in Text.PrettyPrint.Annotated.Leijen from the package prettyprinter-compat-annotated-wl-pprint
    {-# LANGUAGE CPP #-}
    
    #include "version-compatibility-macros.h"
    
    module Text.PrettyPrint.Annotated.Leijen {-# DEPRECATED "Compatibility module for users of annotated-wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, SimpleDoc, SpanList, putDoc, hPutDoc, empty, char, text, (<>), nest,
        line, linebreak, group, softline, softbreak, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, pipe, string,
    

    hang See 10 Occurences [+] Collapse [-]
    Found in Text.PrettyPrint.Annotated.Leijen from the package prettyprinter-compat-annotated-wl-pprint
    {-# LANGUAGE CPP #-}
    
    #include "version-compatibility-macros.h"
    
    module Text.PrettyPrint.Annotated.Leijen {-# DEPRECATED "Compatibility module for users of annotated-wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, SimpleDoc, SpanList, putDoc, hPutDoc, empty, char, text, (<>), nest,
        line, linebreak, group, softline, softbreak, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, pipe, string,
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    hardline = New.hardline
    
    flatAlt :: Doc -> Doc -> Doc
    flatAlt = New.flatAlt
    
    renderSmart :: Float -> Int -> Doc -> SimpleDoc
    renderSmart ribbonFraction pageWidth
        = New.layoutSmart New.LayoutOptions
            { New.layoutPageWidth = New.AvailablePerLine pageWidth (realToFrac ribbonFraction) }
    
    align :: Doc -> Doc
    align = New.align
    
    hang :: Int -> Doc -> Doc
    hang = New.hang
    
    indent :: Int -> Doc -> Doc
    indent = New.indent
    
    encloseSep :: Doc -> Doc -> Doc -> [Doc] -> Doc
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    hardline = New.hardline
    
    flatAlt :: Doc -> Doc -> Doc
    flatAlt = New.flatAlt
    
    renderSmart :: Float -> Int -> Doc -> SimpleDoc
    renderSmart ribbonFraction pageWidth
        = New.layoutSmart New.LayoutOptions
            { New.layoutPageWidth = New.AvailablePerLine pageWidth (realToFrac ribbonFraction) }
    
    align :: Doc -> Doc
    align = New.align
    
    hang :: Int -> Doc -> Doc
    hang = New.hang
    
    indent :: Int -> Doc -> Doc
    indent = New.indent
    
    encloseSep :: Doc -> Doc -> Doc -> [Doc] -> Doc
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    hardline :: Doc
    hardline = New.hardline
    
    flatAlt :: Doc -> Doc -> Doc
    flatAlt = New.flatAlt
    
    renderSmart :: Float -> Int -> Doc -> SimpleDoc
    renderSmart ribbonFraction pageWidth
        = New.layoutSmart New.LayoutOptions
            { New.layoutPageWidth = New.AvailablePerLine pageWidth (realToFrac ribbonFraction) }
    
    align :: Doc -> Doc
    align = New.align
    
    hang :: Int -> Doc -> Doc
    hang = New.hang
    
    indent :: Int -> Doc -> Doc
    indent = New.indent
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    module Text.PrettyPrint.ANSI.Leijen {-# DEPRECATED "Compatibility module for users of ansi-wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, putDoc, hPutDoc, empty, char, text, (<>), nest, line, linebreak, group,
        softline, softbreak, hardline, flatAlt, renderSmart, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, black, red,
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    group :: Doc -> Doc
    group = New.group
    
    softline :: Doc
    softline = New.softline
    
    softbreak :: Doc
    softbreak = New.group linebreak
    
    align :: Doc -> Doc
    align = New.align
    
    hang :: Int -> Doc -> Doc
    hang = New.hang
    
    indent :: Int -> Doc -> Doc
    indent = New.indent
    
    encloseSep :: Doc -> Doc -> Doc -> [Doc] -> Doc
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    group :: Doc -> Doc
    group = New.group
    
    softline :: Doc
    softline = New.softline
    
    softbreak :: Doc
    softbreak = New.group linebreak
    
    align :: Doc -> Doc
    align = New.align
    
    hang :: Int -> Doc -> Doc
    hang = New.hang
    
    indent :: Int -> Doc -> Doc
    indent = New.indent
    
    encloseSep :: Doc -> Doc -> Doc -> [Doc] -> Doc
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    linebreak = New.flatAlt New.line mempty
    
    group :: Doc -> Doc
    group = New.group
    
    softline :: Doc
    softline = New.softline
    
    softbreak :: Doc
    softbreak = New.group linebreak
    
    align :: Doc -> Doc
    align = New.align
    
    hang :: Int -> Doc -> Doc
    hang = New.hang
    
    indent :: Int -> Doc -> Doc
    indent = New.indent
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    module Text.PrettyPrint.Leijen {-# DEPRECATED "Compatibility module for users of wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, putDoc, hPutDoc, empty, char, text, (<>), nest, line, linebreak, group,
        softline, softbreak, align, hang, indent, encloseSep, list, tupled,
        semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>), hsep, vsep, fillSep, sep,
        hcat, vcat, fillCat, cat, punctuate, fill, fillBreak, enclose, squotes,
        dquotes, parens, angles, braces, brackets, lparen, rparen, langle, rangle,
        lbrace, rbrace, lbracket, rbracket, squote, dquote, semi, colon, comma,
        space, dot, backslash, equals, string, int, integer, float, double,
    

    Found in Control.Teardown.Internal.Types from the package teardown
          resultDescription :: !Description
        }
      deriving (Generic, Show)
    
    instance Pretty TeardownResult where
      pretty result =
        case result of
          EmptyResult {resultDescription} ->
            "✓" <+> pretty resultDescription <+> Pretty.parens "empty"
          LeafResult {resultDescription, resultElapsedTime, resultError} ->
            case resultError of
              Nothing ->
                "✓" <+> pretty resultDescription <+> Pretty.parens (pretty $ show resultElapsedTime)
              Just err ->
                Pretty.hang 2
                  (Pretty.vsep ["✘"
                                <+> pretty resultDescription
                                <+> Pretty.parens (pretty $ show resultElapsedTime)
                               , "|" <+> pretty (show err) ])
          BranchResult {resultDidFail, resultDescription, resultElapsedTime, resultListing} ->
    

    hardline See 9 Occurences [+] Collapse [-]
    Found in LLVM.Pretty from the package llvm-hs-pretty
    parensIf ::  Bool -> Doc ann -> Doc ann
    parensIf True = parens
    parensIf False = id
    
    commas :: [Doc ann] -> Doc ann
    commas  = hsep . punctuate (pretty ',')
    
    colons :: [Doc ann] -> Doc ann
    colons  = hcat . intersperse (pretty ':')
    
    hlinecat :: [Doc ann] -> Doc ann
    hlinecat = vcat . intersperse softbreak
      where
        softbreak = group hardline
    
    wrapbraces :: Doc ann -> Doc ann -> Doc ann
    wrapbraces leadIn x = (leadIn <> pretty '{') <> line' <> x <> line' <> pretty '}'
    
    angleBrackets :: Doc ann -> Doc ann
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    linebreak :: Doc
    linebreak = New.flatAlt New.line mempty
    
    group :: Doc -> Doc
    group = New.group
    
    softline :: Doc
    softline = New.softline
    
    softbreak :: Doc
    softbreak = New.group linebreak
    
    hardline :: Doc
    hardline = New.hardline
    
    flatAlt :: Doc -> Doc -> Doc
    flatAlt = New.flatAlt
    
    renderSmart :: Float -> Int -> Doc -> SimpleDoc
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    linebreak :: Doc
    linebreak = New.flatAlt New.line mempty
    
    group :: Doc -> Doc
    group = New.group
    
    softline :: Doc
    softline = New.softline
    
    softbreak :: Doc
    softbreak = New.group linebreak
    
    hardline :: Doc
    hardline = New.hardline
    
    flatAlt :: Doc -> Doc -> Doc
    flatAlt = New.flatAlt
    
    renderSmart :: Float -> Int -> Doc -> SimpleDoc
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    line = New.line
    
    linebreak :: Doc
    linebreak = New.flatAlt New.line mempty
    
    group :: Doc -> Doc
    group = New.group
    
    softline :: Doc
    softline = New.softline
    
    softbreak :: Doc
    softbreak = New.group linebreak
    
    hardline :: Doc
    hardline = New.hardline
    
    flatAlt :: Doc -> Doc -> Doc
    flatAlt = New.flatAlt
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    module Text.PrettyPrint.ANSI.Leijen {-# DEPRECATED "Compatibility module for users of ansi-wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, putDoc, hPutDoc, empty, char, text, (<>), nest, line, linebreak, group,
        softline, softbreak, hardline, flatAlt, renderSmart, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, black, red,
    

    Found in Control.Teardown.Internal.Types from the package teardown
                "✓" <+> pretty resultDescription <+> Pretty.parens (pretty $ show resultElapsedTime)
              Just err ->
                Pretty.hang 2
                  (Pretty.vsep ["✘"
                                <+> pretty resultDescription
                                <+> Pretty.parens (pretty $ show resultElapsedTime)
                               , "|" <+> pretty (show err) ])
          BranchResult {resultDidFail, resultDescription, resultElapsedTime, resultListing} ->
            let
              symbolDoc = if resultDidFail then "✘" else "✓"
            in
              symbolDoc
              <+> pretty resultDescription
              <+> Pretty.parens (pretty $ show resultElapsedTime)
              <> Pretty.hardline
              <> Pretty.indent 2 (Pretty.align (Pretty.vsep (map pretty resultListing)))
    
    instance Display TeardownResult where
      display = displayShow . pretty
    

    Found in Control.Teardown.Internal.Printer from the package teardown
      render start level disposeResult = case disposeResult of
        EmptyResult desc ->
          "`-" <+> "✓" <+> pretty (Text.unpack desc) <+> "(empty)"
    
        LeafResult desc elapsed Nothing ->
          "`-" <+> "✓" <+> pretty (Text.unpack desc) <+> pretty
            ("(" <> show elapsed <> ")")
    
        LeafResult desc elapsed (Just err) ->
          "`-"
            <+> "✘"
            <+> pretty (Text.unpack desc)
            <+> pretty ("(" <> show elapsed <> ")")
            <>  hardline
            <>  renderError start level err
    
        BranchResult desc elapsed didFail results -> vcat
          [ "`-"
          <+> (if didFail then "✘" else "✓")
    

    Found in Control.Teardown.Internal.Printer from the package teardown
                      2
                      (pretty $ Text.unpack l)
                    )
                    errLines
        in
          vcat errorReport
    
      renderTree start level disposeResults = case disposeResults of
        [] -> mempty
        [lastResult] ->
          treeTrunk start (level + 1) <> render (start + 1) (level + 1) lastResult
        (r : results) ->
          treeTrunk start (level + 1)
            <> render start (level + 1) r
            <> hardline
            <> renderTree start level results
    
      render start level disposeResult = case disposeResult of
        EmptyResult desc ->
          "`-" <+> "✓" <+> pretty (Text.unpack desc) <+> "(empty)"
    

    Found in Control.Teardown.Internal.Printer from the package teardown
    import           Data.Typeable (typeOf)
    import qualified RIO.Text      as Text
    
    import Data.Text.Prettyprint.Doc
    
    import Control.Teardown.Internal.Types
    
    treeTrunk :: Int -> Int -> Doc ann
    treeTrunk start level = hcat (map (\_ -> "    ") [1 .. start])
      <> hcat (map (\_ -> "   |") [start .. level - 1])
    
    -- | Renders an ASCII Tree with the "TeardownResult" of a "Teardown" sub-routine
    -- execution
    prettyTeardownResult :: TeardownResult -> Doc ann
    prettyTeardownResult result = render 0 0 result <> hardline
     where
      renderError start level (SomeException err) =
        let
          (fstErrLine, errLines) = case Text.lines (tshow err) of
            [] ->
    

    hcat See 14 Occurences [+] Collapse [-]
    Found in LLVM.Pretty from the package llvm-hs-pretty
             then angleBrackets struct
             else struct
    
      pretty (C.Null constantType) = ppNullInitializer constantType
    
    #if MIN_VERSION_llvm_hs_pure(5,1,3)
      pretty (C.AggregateZero constantType) = "zeroinitializer"
    #endif
    
      pretty (C.Undef {}) = "undef"
      pretty (C.TokenNone {}) = "none"
      pretty (C.BlockAddress fn blk) = "blockaddress" <> parens (commas (fmap pretty [fn, blk]))
    
      pretty C.Array {..}
        | memberType == (IntegerType 8) = "c" <> (dquotes $ hcat [ppIntAsChar val | C.Int _ val <- memberValues])
        | otherwise = brackets $ commas $ fmap ppTyped memberValues
    
      pretty C.GetElementPtr {..} = "getelementptr" <+> bounds inBounds <+> parens (commas (pretty argTy : fmap ppTyped (address:indices)))
        where
          PointerType argTy _ = typeOf address
    

    Found in LLVM.Pretty from the package llvm-hs-pretty
    --   pretty = text . pack
    
    -- instance Pretty Bool where
    --   pretty True = "true"
    --   pretty False = "false"
    
    ppBoolean :: Bool -> Doc ann
    ppBoolean True = "true"
    ppBoolean False = "false"
    
    instance Pretty Name where
      pretty (Name nm)
        | BS.null nm = dquotes mempty
        | isFirst first && all isRest name = pretty (pack name)
        | otherwise = dquotes . hcat . map escape $ name
        where
            name = unShort nm
            first = head name
            isFirst c = isLetter c || c == '-' || c == '_' || c == '$' || c == '.'
            isRest c = isDigit c || isFirst c
    

    Found in LLVM.Pretty from the package llvm-hs-pretty
    import Control.Monad.ST
    
    -------------------------------------------------------------------------------
    -- Utils
    -------------------------------------------------------------------------------
    
    parensIf ::  Bool -> Doc ann -> Doc ann
    parensIf True = parens
    parensIf False = id
    
    commas :: [Doc ann] -> Doc ann
    commas  = hsep . punctuate (pretty ',')
    
    colons :: [Doc ann] -> Doc ann
    colons  = hcat . intersperse (pretty ':')
    
    hlinecat :: [Doc ann] -> Doc ann
    hlinecat = vcat . intersperse softbreak
      where
        softbreak = group hardline
    

    Found in Text.PrettyPrint.Annotated.Leijen from the package prettyprinter-compat-annotated-wl-pprint
    {-# LANGUAGE CPP #-}
    
    #include "version-compatibility-macros.h"
    
    module Text.PrettyPrint.Annotated.Leijen {-# DEPRECATED "Compatibility module for users of annotated-wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, SimpleDoc, SpanList, putDoc, hPutDoc, empty, char, text, (<>), nest,
        line, linebreak, group, softline, softbreak, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, pipe, string,
        int, integer, float, double, rational, bool, annotate, noAnnotate,
        renderPretty, renderCompact, displayDecorated, displayDecoratedA, display,
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    semiBraces = New.encloseSep New.lbrace New.rbrace New.semi
    
    (<+>), (<$>), (</>), (<$$>), (<//>) :: Doc -> Doc -> Doc
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    semiBraces = New.encloseSep New.lbrace New.rbrace New.semi
    
    (<+>), (<$>), (</>), (<$$>), (<//>) :: Doc -> Doc -> Doc
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    tupled :: [Doc] -> Doc
    tupled = New.tupled
    
    semiBraces :: [Doc] -> Doc
    semiBraces = New.encloseSep New.lbrace New.rbrace New.semi
    
    (<+>), (<$>), (</>), (<$$>), (<//>) :: Doc -> Doc -> Doc
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    module Text.PrettyPrint.ANSI.Leijen {-# DEPRECATED "Compatibility module for users of ansi-wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, putDoc, hPutDoc, empty, char, text, (<>), nest, line, linebreak, group,
        softline, softbreak, hardline, flatAlt, renderSmart, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, black, red,
        green, yellow, blue, magenta, cyan, white, dullblack, dullred, dullgreen,
        dullyellow, dullblue, dullmagenta, dullcyan, dullwhite, onblack, onred,
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    semiBraces = New.encloseSep New.lbrace New.rbrace New.semi
    
    (<+>), (<$>), (</>), (<$$>), (<//>) :: Doc -> Doc -> Doc
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    semiBraces = New.encloseSep New.lbrace New.rbrace New.semi
    
    (<+>), (<$>), (</>), (<$$>), (<//>) :: Doc -> Doc -> Doc
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    fillCat = New.fillCat
    cat = New.cat
    
    punctuate :: Doc -> [Doc] -> [Doc]
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    tupled :: [Doc] -> Doc
    tupled = New.tupled
    
    semiBraces :: [Doc] -> Doc
    semiBraces = New.encloseSep New.lbrace New.rbrace New.semi
    
    (<+>), (<$>), (</>), (<$$>), (<//>) :: Doc -> Doc -> Doc
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    module Text.PrettyPrint.Leijen {-# DEPRECATED "Compatibility module for users of wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, putDoc, hPutDoc, empty, char, text, (<>), nest, line, linebreak, group,
        softline, softbreak, align, hang, indent, encloseSep, list, tupled,
        semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>), hsep, vsep, fillSep, sep,
        hcat, vcat, fillCat, cat, punctuate, fill, fillBreak, enclose, squotes,
        dquotes, parens, angles, braces, brackets, lparen, rparen, langle, rangle,
        lbrace, rbrace, lbracket, rbracket, squote, dquote, semi, colon, comma,
        space, dot, backslash, equals, string, int, integer, float, double,
        rational, Pretty(..), SimpleDoc, renderPretty, renderCompact, displayS,
        displayIO , bool , column, nesting, width
    

    Found in Control.Teardown.Internal.Printer from the package teardown
    {-# LANGUAGE OverloadedStrings #-}
    module Control.Teardown.Internal.Printer where
    
    import RIO hiding ((<>))
    
    import           Data.Typeable (typeOf)
    import qualified RIO.Text      as Text
    
    import Data.Text.Prettyprint.Doc
    
    import Control.Teardown.Internal.Types
    
    treeTrunk :: Int -> Int -> Doc ann
    treeTrunk start level = hcat (map (\_ -> "    ") [1 .. start])
      <> hcat (map (\_ -> "   |") [start .. level - 1])
    
    -- | Renders an ASCII Tree with the "TeardownResult" of a "Teardown" sub-routine
    -- execution
    prettyTeardownResult :: TeardownResult -> Doc ann
    prettyTeardownResult result = render 0 0 result <> hardline
    

    Found in Control.Teardown.Internal.Printer from the package teardown
    {-# LANGUAGE NoImplicitPrelude #-}
    {-# LANGUAGE OverloadedStrings #-}
    module Control.Teardown.Internal.Printer where
    
    import RIO hiding ((<>))
    
    import           Data.Typeable (typeOf)
    import qualified RIO.Text      as Text
    
    import Data.Text.Prettyprint.Doc
    
    import Control.Teardown.Internal.Types
    
    treeTrunk :: Int -> Int -> Doc ann
    treeTrunk start level = hcat (map (\_ -> "    ") [1 .. start])
      <> hcat (map (\_ -> "   |") [start .. level - 1])
    
    -- | Renders an ASCII Tree with the "TeardownResult" of a "Teardown" sub-routine
    -- execution
    prettyTeardownResult :: TeardownResult -> Doc ann
    

    hsep See 21 Occurences [+] Collapse [-]
    Found in Math.ExpPairs.Matrix3 from the package exp-pairs
      a32 = a32,
      a33 = a33
      }
    fromList _ = error "The list must contain exactly 9 elements"
    
    -- |Divide all elements of the matrix by their greatest common
    -- divisor. This is useful for matrices of projective
    -- transformations to reduce the magnitude of computations.
    normalize :: Integral t => Matrix3 t -> Matrix3 t
    normalize a = case foldl1 gcd a of
      0 -> a
      d -> fmap (`div` d) a
    
    instance Pretty t => Pretty (Matrix3 t) where
      pretty = vsep . map hsep . pad . fmap pretty where
        pad (Matrix3 {..}) = map (zipWith fill ls) table where
          table = [[a11, a12, a13], [a21, a22, a23], [a31, a32, a33]]
          ls = map (maximum . map (length . show)) (transpose table)
    
    -- |Multiplicate a matrix by a vector (considered as a column).
    

    Found in Math.ExpPairs.PrettyProcess from the package exp-pairs
    import Math.ExpPairs.ProcessMatrix
    
    -- | Compact representation of the sequence of 'Process'.
    data PrettyProcess
      = Simply [Process]
      | Repeat PrettyProcess Int
      | Sequence PrettyProcess PrettyProcess
      deriving (Show)
    
    data PrettyProcessWithWidth = PPWL { ppwlProcess :: PrettyProcess, ppwlWidth :: Int }
    
    instance Pretty PrettyProcess where
      pretty = \case
        Simply xs    -> hsep (map (pretty . show) xs)
        Repeat _  0  -> mempty
        Repeat xs 1  -> pretty xs
        Repeat (Simply [A]) n -> pretty (show A) <> pretty "^" <> pretty n
        Repeat xs n  -> parens (pretty xs) <> pretty "^" <> pretty n
        Sequence a b -> pretty a <+> pretty b
    

    Found in Data.InvertibleGrammar.Monad from the package invertible-grammar
    ppMismatch (S.toList -> expected) Nothing =
      "Expected:" <+> fillSep (punctuate comma $ map pretty expected)
    ppMismatch (S.toList -> expected) (Just got) =
      vsep
      [ "Expected:" <+> fillSep (punctuate comma $ map pretty expected)
      , "But got: " <+> pretty got
      ]
    
    ppError :: (p -> Doc ann) -> ErrorMessage p -> Doc ann
    ppError ppPosition (ErrorMessage pos annotations expected got) =
      vsep $ catMaybes
        [ Just $ ppPosition pos `mappend` ":" <+> "mismatch:"
        , if null annotations
          then Nothing
          else Just $ indent 2 $ "In" <+> hsep (punctuate (comma <> line <> "in") $ map pretty annotations) <> colon
        , Just $ indent 4 $ ppMismatch expected got
        ]
    
    data GrammarError p = GrammarError (Propagation p) Mismatch
      deriving (Show)
    

    Found in Data.InvertibleGrammar.Monad from the package invertible-grammar
      ) where
    
    import Control.Arrow (left)
    import Control.Applicative
    import Control.Monad.ContextError
    
    import Data.Maybe
    import Data.Semigroup as Semi
    import Data.Set (Set)
    import qualified Data.Set as S
    import Data.Text (Text)
    import GHC.Generics
    
    import Data.Text.Prettyprint.Doc
      ( Doc, Pretty, pretty, vsep, hsep, line, indent, fillSep, punctuate
      , comma, colon, (<+>), layoutSmart, PageWidth(..), LayoutOptions(..)
      )
    
    #if MIN_VERSION_prettyprinter(1,2,0)
    import Data.Text.Prettyprint.Doc.Render.String
    

    Found in LLVM.Pretty from the package llvm-hs-pretty
          tail = case tailCallKind of
            Just Tail -> "tail"
            Just MustTail -> "musttail"
            Just NoTail -> "notail"
            Nothing -> mempty
          -- If multiple keywords appear the ‘sideeffect‘ keyword must come first,
          -- the ‘alignstack‘ keyword second and the ‘inteldialect‘ keyword last.
          sideeffect' = if hasSideEffects then "sideeffect" else ""
          align' = if alignStack then "alignstack" else ""
          -- ATTDialect is assumed if not specified
          dialect' = case dialect of IA.ATTDialect -> ""; IA.IntelDialect -> "inteldialect"
    ppCall x = error "Non-callable argument. (Malformed AST)"
    
    ppReturnAttributes :: [ParameterAttribute] -> Doc ann
    ppReturnAttributes pas = hsep $ fmap pretty pas
    
    -- Differs from Call in record name conventions only so needs a seperate almost
    -- identical function. :(
    ppInvoke :: Terminator -> Doc ann
    ppInvoke Invoke { function' = Right f,..}
    

    Found in LLVM.Pretty from the package llvm-hs-pretty
      pretty UnspecifiedType = "DW_TAG_unspecified_type"
    
    instance Pretty Encoding where
      pretty e = case e of
        AddressEncoding -> "DW_ATE_address"
        BooleanEncoding -> "DW_ATE_boolean"
        FloatEncoding -> "DW_ATE_float"
        SignedEncoding -> "DW_ATE_signed"
        SignedCharEncoding -> "DW_ATE_signed_char"
        UnsignedEncoding -> "DW_ATE_unsigned"
        UnsignedCharEncoding -> "DW_ATE_unsigned_char"
    
    ppDIFlags :: [DIFlag] -> Maybe (Doc ann)
    ppDIFlags [] = Nothing
    ppDIFlags flags = Just (hsep (punctuate (pretty '|') (map pretty flags)))
    
    instance Pretty DIFlag where
      pretty flag = "DIFlag" <> fromString (flagName flag)
        where
          flagName (Accessibility f) = show f
    

    Found in LLVM.Pretty from the package llvm-hs-pretty
        CondBr cond tdest fdest meta ->
         "br" <+> ppTyped cond
         `cma` label (pretty tdest)
         `cma` label (pretty fdest)
         <+> ppInstrMeta meta
    
        Switch {..} -> "switch" <+> ppTyped operand0'
                     `cma` label (pretty defaultDest)
                     <+> brackets (hsep [ ppTyped v `cma` label (pretty l) | (v,l) <- dests ])
                     <+> ppInstrMeta metadata'
    
        Unreachable {..} -> "unreachable" <+> ppInstrMeta metadata'
    
        IndirectBr op dests meta -> "indirectbr" <+> ppTyped op `cma`
         brackets (hsep [ label (pretty l) | l <- dests ])
         <+> ppInstrMeta meta
    
        e @ Invoke {..} ->
         ppInvoke e
         <+> "to" <+> label (pretty returnDest)
    

    Found in LLVM.Pretty from the package llvm-hs-pretty
    instance Pretty Terminator where
      pretty = \case
        Br dest meta -> "br" <+> label (pretty dest) <+> ppInstrMeta meta
    
        Ret val meta -> "ret" <+> maybe "void" ppTyped val <+> ppInstrMeta meta
    
        CondBr cond tdest fdest meta ->
         "br" <+> ppTyped cond
         `cma` label (pretty tdest)
         `cma` label (pretty fdest)
         <+> ppInstrMeta meta
    
        Switch {..} -> "switch" <+> ppTyped operand0'
                     `cma` label (pretty defaultDest)
                     <+> brackets (hsep [ ppTyped v `cma` label (pretty l) | (v,l) <- dests ])
                     <+> ppInstrMeta metadata'
    
        Unreachable {..} -> "unreachable" <+> ppInstrMeta metadata'
    
        IndirectBr op dests meta -> "indirectbr" <+> ppTyped op `cma`
    

    Found in LLVM.Pretty from the package llvm-hs-pretty
    ppFunctionAttribute :: Either GroupID FunctionAttribute -> Doc ann
    ppFunctionAttribute (Left grpId) = pretty grpId
    ppFunctionAttribute (Right fA) = pretty fA
    
    ppFunctionAttributes :: [Either GroupID FunctionAttribute] -> Doc ann
    ppFunctionAttributes attribs = hsep $ fmap ppFunctionAttribute attribs
    
    ppMetadata :: Maybe Metadata -> Doc ann
    ppMetadata Nothing = "null"
    ppMetadata (Just m) = pretty m
    
    instance Pretty Definition where
      pretty (GlobalDefinition x) = pretty x
      pretty (TypeDefinition nm ty) = local' (pretty nm) <+> "=" <+> "type" <+> maybe "opaque" pretty ty
      pretty (FunctionAttributes gid attrs) = "attributes" <+> pretty gid <+> "=" <+> braces (hsep (fmap ppAttrInGroup attrs))
      pretty (NamedMetadataDefinition nm meta) = "!" <> short nm <+> "=" <+> "!" <> braces (commas (fmap pretty meta))
      pretty (MetadataNodeDefinition node meta) = pretty node <+> "=" <+> pretty meta
      pretty (ModuleInlineAssembly asm) = "module asm" <+> dquotes (pretty (pack (BL.unpack asm)))
      pretty (COMDAT name selKind) = "$" <> short name <+> "=" <+> "comdat" <+> pretty selKind
    

    Found in LLVM.Pretty from the package llvm-hs-pretty
                | addr == 0 -> mempty
                | otherwise -> "addrspace" <> parens (pretty addr)
          kind | isConstant = "constant"
               | otherwise  = "global"
    
      pretty GlobalAlias {..} = global (pretty name) <+> "=" <+> pretty linkage <+> ppMaybe unnamedAddr <+> "alias" <+> pretty typ `cma` ppTyped aliasee
        where
          typ = getElementType type'
    
    ppFunctionAttribute :: Either GroupID FunctionAttribute -> Doc ann
    ppFunctionAttribute (Left grpId) = pretty grpId
    ppFunctionAttribute (Right fA) = pretty fA
    
    ppFunctionAttributes :: [Either GroupID FunctionAttribute] -> Doc ann
    ppFunctionAttributes attribs = hsep $ fmap ppFunctionAttribute attribs
    
    ppMetadata :: Maybe Metadata -> Doc ann
    ppMetadata Nothing = "null"
    ppMetadata (Just m) = pretty m
    

    Found in LLVM.Pretty from the package llvm-hs-pretty
        | isFirst first && all isRest name = pretty (pack name)
        | otherwise = dquotes . hcat . map escape $ name
        where
            name = unShort nm
            first = head name
            isFirst c = isLetter c || c == '-' || c == '_' || c == '$' || c == '.'
            isRest c = isDigit c || isFirst c
      pretty (UnName x) = pretty ( (fromIntegral x) :: Int)
    
    instance Pretty Parameter where
      pretty (Parameter ty (UnName _) attrs) = pretty ty <+> ppParamAttributes attrs
      pretty (Parameter ty name attrs) = pretty ty <+> ppParamAttributes attrs <+> local' (pretty name)
    
    ppParamAttributes :: [ParameterAttribute] -> Doc ann
    ppParamAttributes pas = hsep $ fmap pretty pas
    
    -- TODO: Auto instance
    -- instance Pretty [ParameterAttribute] where
    --   pretty x = hsep $ fmap pretty x
    

    Found in LLVM.Pretty from the package llvm-hs-pretty
    import Data.Array.Unsafe
    import Data.Array.MArray
    import Data.Array.ST
    import Control.Monad.ST
    
    -------------------------------------------------------------------------------
    -- Utils
    -------------------------------------------------------------------------------
    
    parensIf ::  Bool -> Doc ann -> Doc ann
    parensIf True = parens
    parensIf False = id
    
    commas :: [Doc ann] -> Doc ann
    commas  = hsep . punctuate (pretty ',')
    
    colons :: [Doc ann] -> Doc ann
    colons  = hcat . intersperse (pretty ':')
    
    hlinecat :: [Doc ann] -> Doc ann
    

    Found in Text.PrettyPrint.Annotated.Leijen from the package prettyprinter-compat-annotated-wl-pprint
    {-# LANGUAGE CPP #-}
    
    #include "version-compatibility-macros.h"
    
    module Text.PrettyPrint.Annotated.Leijen {-# DEPRECATED "Compatibility module for users of annotated-wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, SimpleDoc, SpanList, putDoc, hPutDoc, empty, char, text, (<>), nest,
        line, linebreak, group, softline, softbreak, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, pipe, string,
        int, integer, float, double, rational, bool, annotate, noAnnotate,
        renderPretty, renderCompact, displayDecorated, displayDecoratedA, display,
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    tupled :: [Doc] -> Doc
    tupled = New.tupled
    
    semiBraces :: [Doc] -> Doc
    semiBraces = New.encloseSep New.lbrace New.rbrace New.semi
    
    (<+>), (<$>), (</>), (<$$>), (<//>) :: Doc -> Doc -> Doc
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    tupled :: [Doc] -> Doc
    tupled = New.tupled
    
    semiBraces :: [Doc] -> Doc
    semiBraces = New.encloseSep New.lbrace New.rbrace New.semi
    
    (<+>), (<$>), (</>), (<$$>), (<//>) :: Doc -> Doc -> Doc
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    tupled :: [Doc] -> Doc
    tupled = New.tupled
    
    semiBraces :: [Doc] -> Doc
    semiBraces = New.encloseSep New.lbrace New.rbrace New.semi
    
    (<+>), (<$>), (</>), (<$$>), (<//>) :: Doc -> Doc -> Doc
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    module Text.PrettyPrint.ANSI.Leijen {-# DEPRECATED "Compatibility module for users of ansi-wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, putDoc, hPutDoc, empty, char, text, (<>), nest, line, linebreak, group,
        softline, softbreak, hardline, flatAlt, renderSmart, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, black, red,
        green, yellow, blue, magenta, cyan, white, dullblack, dullred, dullgreen,
        dullyellow, dullblue, dullmagenta, dullcyan, dullwhite, onblack, onred,
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    tupled :: [Doc] -> Doc
    tupled = New.tupled
    
    semiBraces :: [Doc] -> Doc
    semiBraces = New.encloseSep New.lbrace New.rbrace New.semi
    
    (<+>), (<$>), (</>), (<$$>), (<//>) :: Doc -> Doc -> Doc
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    tupled :: [Doc] -> Doc
    tupled = New.tupled
    
    semiBraces :: [Doc] -> Doc
    semiBraces = New.encloseSep New.lbrace New.rbrace New.semi
    
    (<+>), (<$>), (</>), (<$$>), (<//>) :: Doc -> Doc -> Doc
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    vcat = New.vcat
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    tupled :: [Doc] -> Doc
    tupled = New.tupled
    
    semiBraces :: [Doc] -> Doc
    semiBraces = New.encloseSep New.lbrace New.rbrace New.semi
    
    (<+>), (<$>), (</>), (<$$>), (<//>) :: Doc -> Doc -> Doc
    (<+>) = (New.<+>)
    (<$>) = \x y -> x <> New.line <> y
    (</>) = \x y -> x <> softline <> y
    (<$$>) = \x y -> x <> linebreak <> y
    (<//>) = \x y -> x <> softbreak <> y
    
    hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat :: [Doc] -> Doc
    hsep = New.hsep
    vsep = New.vsep
    fillSep = New.fillSep
    sep = New.sep
    hcat = New.hcat
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    module Text.PrettyPrint.Leijen {-# DEPRECATED "Compatibility module for users of wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, putDoc, hPutDoc, empty, char, text, (<>), nest, line, linebreak, group,
        softline, softbreak, align, hang, indent, encloseSep, list, tupled,
        semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>), hsep, vsep, fillSep, sep,
        hcat, vcat, fillCat, cat, punctuate, fill, fillBreak, enclose, squotes,
        dquotes, parens, angles, braces, brackets, lparen, rparen, langle, rangle,
        lbrace, rbrace, lbracket, rbracket, squote, dquote, semi, colon, comma,
        space, dot, backslash, equals, string, int, integer, float, double,
        rational, Pretty(..), SimpleDoc, renderPretty, renderCompact, displayS,
    

    indent See 19 Occurences [+] Collapse [-]
    Found in Data.InvertibleGrammar.Monad from the package invertible-grammar
      "Expected:" <+> fillSep (punctuate comma $ map pretty expected)
    ppMismatch (S.toList -> expected) (Just got) =
      vsep
      [ "Expected:" <+> fillSep (punctuate comma $ map pretty expected)
      , "But got: " <+> pretty got
      ]
    
    ppError :: (p -> Doc ann) -> ErrorMessage p -> Doc ann
    ppError ppPosition (ErrorMessage pos annotations expected got) =
      vsep $ catMaybes
        [ Just $ ppPosition pos `mappend` ":" <+> "mismatch:"
        , if null annotations
          then Nothing
          else Just $ indent 2 $ "In" <+> hsep (punctuate (comma <> line <> "in") $ map pretty annotations) <> colon
        , Just $ indent 4 $ ppMismatch expected got
        ]
    
    data GrammarError p = GrammarError (Propagation p) Mismatch
      deriving (Show)
    

    Found in Data.InvertibleGrammar.Monad from the package invertible-grammar
    ppMismatch (S.toList -> expected) Nothing =
      "Expected:" <+> fillSep (punctuate comma $ map pretty expected)
    ppMismatch (S.toList -> expected) (Just got) =
      vsep
      [ "Expected:" <+> fillSep (punctuate comma $ map pretty expected)
      , "But got: " <+> pretty got
      ]
    
    ppError :: (p -> Doc ann) -> ErrorMessage p -> Doc ann
    ppError ppPosition (ErrorMessage pos annotations expected got) =
      vsep $ catMaybes
        [ Just $ ppPosition pos `mappend` ":" <+> "mismatch:"
        , if null annotations
          then Nothing
          else Just $ indent 2 $ "In" <+> hsep (punctuate (comma <> line <> "in") $ map pretty annotations) <> colon
        , Just $ indent 4 $ ppMismatch expected got
        ]
    
    data GrammarError p = GrammarError (Propagation p) Mismatch
      deriving (Show)
    

    Found in Data.InvertibleGrammar.Monad from the package invertible-grammar
      ) where
    
    import Control.Arrow (left)
    import Control.Applicative
    import Control.Monad.ContextError
    
    import Data.Maybe
    import Data.Semigroup as Semi
    import Data.Set (Set)
    import qualified Data.Set as S
    import Data.Text (Text)
    import GHC.Generics
    
    import Data.Text.Prettyprint.Doc
      ( Doc, Pretty, pretty, vsep, hsep, line, indent, fillSep, punctuate
      , comma, colon, (<+>), layoutSmart, PageWidth(..), LayoutOptions(..)
      )
    
    #if MIN_VERSION_prettyprinter(1,2,0)
    import Data.Text.Prettyprint.Doc.Render.String
    

    Found in LLVM.Pretty from the package llvm-hs-pretty
       L.LinkOnceODR             -> "linkonce_odr"
       L.WeakODR                 -> "weak_odr"
    
    ppInstructionMetadata :: InstructionMetadata -> Doc ann
    ppInstructionMetadata meta = commas ["!" <> short x <+> pretty y | (x,y) <- meta]
    
    instance Pretty MetadataNodeID where
      pretty (MetadataNodeID x) = "!" <> pretty ((fromIntegral x) :: Int)
    
    instance Pretty GroupID where
      pretty (GroupID x) = "#" <> pretty ((fromIntegral x) :: Int)
    
    instance Pretty BasicBlock where
      pretty (BasicBlock nm instrs term) =
        label <> P.line <> indent 2 (vcat $ (fmap pretty instrs) ++ [pretty term])
        where
          label = case nm of
            UnName _ -> "; <label>:" <> pretty nm <> ":"
            _ -> pretty nm <> ":"
    

    Found in LLVM.Pretty from the package llvm-hs-pretty
    instance Pretty Global where
      pretty Function {..} =
          case basicBlocks of
            [] ->
              ("declare" <+> pretty linkage <+> pretty callingConvention
                <+> ppReturnAttributes returnAttributes <+> pretty returnType <+> global (pretty name)
                <> ppParams (pretty . typeOf) parameters <+> ppFunctionAttributes functionAttributes <+> align <+> gcName <+> pre)
    
            -- single unnamed block is special cased, and won't parse otherwise... yeah good times
            [b@(BasicBlock (UnName _) _ _)] ->
                ("define" <+> pretty linkage <+> pretty callingConvention
                  <+> ppReturnAttributes returnAttributes <+> pretty returnType <+> global (pretty name)
                  <> ppParams pretty parameters <+> ppFunctionAttributes functionAttributes <+> align <+> gcName <+> pre)
                `wrapbraces` (indent 2 $ ppSingleBlock b)
    
            bs ->
              ("define" <+> pretty linkage <+> pretty callingConvention
                <+> ppReturnAttributes returnAttributes <+> pretty returnType <+> global (pretty name)
                <> ppParams pretty parameters <+> ppFunctionAttributes functionAttributes <+> align <+> gcName <+> pre)
    

    Found in Control.Monad.Log from the package logging-effect
    --
    -- The callstack will be pretty-printed underneath the log message itself.
    renderWithCallStack :: (a -> PP.Doc ann) -> WithCallStack a -> PP.Doc ann
    renderWithCallStack k (WithCallStack stack msg) =
      k msg <> PP.line <> PP.indent 2 (prettyCallStack (getCallStack stack))
    
    #if MIN_VERSION_base(4, 9, 0)
    showSrcLoc :: SrcLoc -> String
    showSrcLoc = prettySrcLoc
    #endif
    
    prettyCallStack :: [(String,SrcLoc)] -> PP.Doc ann
    prettyCallStack [] = "empty callstack"
    prettyCallStack (root:rest) =
      prettyCallSite root <> PP.line <> PP.indent 2 (PP.vsep (map prettyCallSite rest))
      where prettyCallSite (f,loc) =
              PP.pretty (LT.pack f) <> ", called at " <>
              PP.pretty (LT.pack (showSrcLoc loc))
    
    -- | Construct a 'WithCallStack' log message.
    

    Found in Control.Monad.Log from the package logging-effect
    -- | Add call stack information to log lines.
    --
    -- This functional requires that you pass around the call stack via implicit
    -- parameters. For more information, see the GHC manual (section 9.14.4.5).
    data WithCallStack a = WithCallStack { msgCallStack :: CallStack
                                         , discardCallStack :: a }
      deriving (Functor,Traversable,Foldable,Show)
    
    -- | Given a way to render the underlying message @a@ render a message with a
    -- callstack.
    --
    -- The callstack will be pretty-printed underneath the log message itself.
    renderWithCallStack :: (a -> PP.Doc ann) -> WithCallStack a -> PP.Doc ann
    renderWithCallStack k (WithCallStack stack msg) =
      k msg <> PP.line <> PP.indent 2 (prettyCallStack (getCallStack stack))
    
    #if MIN_VERSION_base(4, 9, 0)
    showSrcLoc :: SrcLoc -> String
    showSrcLoc = prettySrcLoc
    #endif
    

    Found in Text.PrettyPrint.Annotated.Leijen from the package prettyprinter-compat-annotated-wl-pprint
    {-# LANGUAGE CPP #-}
    
    #include "version-compatibility-macros.h"
    
    module Text.PrettyPrint.Annotated.Leijen {-# DEPRECATED "Compatibility module for users of annotated-wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, SimpleDoc, SpanList, putDoc, hPutDoc, empty, char, text, (<>), nest,
        line, linebreak, group, softline, softbreak, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, pipe, string,
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    flatAlt = New.flatAlt
    
    renderSmart :: Float -> Int -> Doc -> SimpleDoc
    renderSmart ribbonFraction pageWidth
        = New.layoutSmart New.LayoutOptions
            { New.layoutPageWidth = New.AvailablePerLine pageWidth (realToFrac ribbonFraction) }
    
    align :: Doc -> Doc
    align = New.align
    
    hang :: Int -> Doc -> Doc
    hang = New.hang
    
    indent :: Int -> Doc -> Doc
    indent = New.indent
    
    encloseSep :: Doc -> Doc -> Doc -> [Doc] -> Doc
    encloseSep = New.encloseSep
    
    list :: [Doc] -> Doc
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    flatAlt = New.flatAlt
    
    renderSmart :: Float -> Int -> Doc -> SimpleDoc
    renderSmart ribbonFraction pageWidth
        = New.layoutSmart New.LayoutOptions
            { New.layoutPageWidth = New.AvailablePerLine pageWidth (realToFrac ribbonFraction) }
    
    align :: Doc -> Doc
    align = New.align
    
    hang :: Int -> Doc -> Doc
    hang = New.hang
    
    indent :: Int -> Doc -> Doc
    indent = New.indent
    
    encloseSep :: Doc -> Doc -> Doc -> [Doc] -> Doc
    encloseSep = New.encloseSep
    
    list :: [Doc] -> Doc
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    flatAlt :: Doc -> Doc -> Doc
    flatAlt = New.flatAlt
    
    renderSmart :: Float -> Int -> Doc -> SimpleDoc
    renderSmart ribbonFraction pageWidth
        = New.layoutSmart New.LayoutOptions
            { New.layoutPageWidth = New.AvailablePerLine pageWidth (realToFrac ribbonFraction) }
    
    align :: Doc -> Doc
    align = New.align
    
    hang :: Int -> Doc -> Doc
    hang = New.hang
    
    indent :: Int -> Doc -> Doc
    indent = New.indent
    
    encloseSep :: Doc -> Doc -> Doc -> [Doc] -> Doc
    encloseSep = New.encloseSep
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    module Text.PrettyPrint.ANSI.Leijen {-# DEPRECATED "Compatibility module for users of ansi-wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, putDoc, hPutDoc, empty, char, text, (<>), nest, line, linebreak, group,
        softline, softbreak, hardline, flatAlt, renderSmart, align, hang, indent,
        encloseSep, list, tupled, semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>),
        hsep, vsep, fillSep, sep, hcat, vcat, fillCat, cat, punctuate, fill,
        fillBreak, enclose, squotes, dquotes, parens, angles, braces, brackets,
        lparen, rparen, langle, rangle, lbrace, rbrace, lbracket, rbracket, squote,
        dquote, semi, colon, comma, space, dot, backslash, equals, black, red,
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    softline :: Doc
    softline = New.softline
    
    softbreak :: Doc
    softbreak = New.group linebreak
    
    align :: Doc -> Doc
    align = New.align
    
    hang :: Int -> Doc -> Doc
    hang = New.hang
    
    indent :: Int -> Doc -> Doc
    indent = New.indent
    
    encloseSep :: Doc -> Doc -> Doc -> [Doc] -> Doc
    encloseSep = New.encloseSep
    
    list :: [Doc] -> Doc
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    softline :: Doc
    softline = New.softline
    
    softbreak :: Doc
    softbreak = New.group linebreak
    
    align :: Doc -> Doc
    align = New.align
    
    hang :: Int -> Doc -> Doc
    hang = New.hang
    
    indent :: Int -> Doc -> Doc
    indent = New.indent
    
    encloseSep :: Doc -> Doc -> Doc -> [Doc] -> Doc
    encloseSep = New.encloseSep
    
    list :: [Doc] -> Doc
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    group = New.group
    
    softline :: Doc
    softline = New.softline
    
    softbreak :: Doc
    softbreak = New.group linebreak
    
    align :: Doc -> Doc
    align = New.align
    
    hang :: Int -> Doc -> Doc
    hang = New.hang
    
    indent :: Int -> Doc -> Doc
    indent = New.indent
    
    encloseSep :: Doc -> Doc -> Doc -> [Doc] -> Doc
    encloseSep = New.encloseSep
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    module Text.PrettyPrint.Leijen {-# DEPRECATED "Compatibility module for users of wl-pprint - use Data.Text.Prettyprint.Doc instead" #-} (
    
        Doc, putDoc, hPutDoc, empty, char, text, (<>), nest, line, linebreak, group,
        softline, softbreak, align, hang, indent, encloseSep, list, tupled,
        semiBraces, (<+>), (<$>), (</>), (<$$>), (<//>), hsep, vsep, fillSep, sep,
        hcat, vcat, fillCat, cat, punctuate, fill, fillBreak, enclose, squotes,
        dquotes, parens, angles, braces, brackets, lparen, rparen, langle, rangle,
        lbrace, rbrace, lbracket, rbracket, squote, dquote, semi, colon, comma,
        space, dot, backslash, equals, string, int, integer, float, double,
    

    Found in Control.Teardown.Internal.Types from the package teardown
              Just err ->
                Pretty.hang 2
                  (Pretty.vsep ["✘"
                                <+> pretty resultDescription
                                <+> Pretty.parens (pretty $ show resultElapsedTime)
                               , "|" <+> pretty (show err) ])
          BranchResult {resultDidFail, resultDescription, resultElapsedTime, resultListing} ->
            let
              symbolDoc = if resultDidFail then "✘" else "✓"
            in
              symbolDoc
              <+> pretty resultDescription
              <+> Pretty.parens (pretty $ show resultElapsedTime)
              <> Pretty.hardline
              <> Pretty.indent 2 (Pretty.align (Pretty.vsep (map pretty resultListing)))
    
    instance Display TeardownResult where
      display = displayShow . pretty
    
    getElapsedTime :: TeardownResult -> NominalDiffTime
    

    Found in Control.Teardown.Internal.Printer from the package teardown
      renderError start level (SomeException err) =
        let
          (fstErrLine, errLines) = case Text.lines (tshow err) of
            [] ->
              error "Expecting reported error to have a line of content, got none"
    
            (fstErrLine' : errLines') -> (fstErrLine', errLines')
    
          errorReport =
            treeTrunk (start - 1) (level + 1)
              <>  ">"
              <>  indent 2 (pretty (show (typeOf err)) <> ":")
              <+> pretty (Text.unpack fstErrLine)
              :   map
                    (\l -> treeTrunk (start - 1) (level + 1) <> ">" <> indent
                      2
                      (pretty $ Text.unpack l)
                    )
                    errLines
        in
    

    Found in Control.Teardown.Internal.Printer from the package teardown
    prettyTeardownResult :: TeardownResult -> Doc ann
    prettyTeardownResult result = render 0 0 result <> hardline
     where
      renderError start level (SomeException err) =
        let
          (fstErrLine, errLines) = case Text.lines (tshow err) of
            [] ->
              error "Expecting reported error to have a line of content, got none"
    
            (fstErrLine' : errLines') -> (fstErrLine', errLines')
    
          errorReport =
            treeTrunk (start - 1) (level + 1)
              <>  ">"
              <>  indent 2 (pretty (show (typeOf err)) <> ":")
              <+> pretty (Text.unpack fstErrLine)
              :   map
                    (\l -> treeTrunk (start - 1) (level + 1) <> ">" <> indent
                      2
                      (pretty $ Text.unpack l)
    

    layoutCompact See 3 Occurences [+] Collapse [-]
    Found in Text.PrettyPrint.Annotated.Leijen from the package prettyprinter-compat-annotated-wl-pprint
    putDoc = New.putDoc
    
    hPutDoc :: Handle -> Doc () -> IO ()
    hPutDoc = New.hPutDoc
    
    displayS :: SimpleDoc ann -> ShowS
    displayS = New.renderShowS
    
    renderPretty :: Float -> Int -> Doc ann -> SimpleDoc ann
    renderPretty ribbonFraction pWidth
        = layoutPretty LayoutOptions
            { layoutPageWidth = AvailablePerLine pWidth (realToFrac ribbonFraction) }
    
    renderCompact :: Doc ann -> SimpleDoc ann
    renderCompact = layoutCompact
    
    display :: SimpleDoc ann -> String
    display = flip displayS ""
    
    noAnnotate :: Doc ann -> Doc xxx
    

    Found in Text.PrettyPrint.ANSI.Leijen from the package prettyprinter-compat-ansi-wl-pprint
    double :: Double -> Doc
    double = New.pretty
    
    rational :: Rational -> Doc
    rational = New.pretty . show
    
    renderPretty :: Float -> Int -> Doc -> SimpleDoc
    renderPretty ribbonFraction pageWidth
        = New.layoutSmart New.LayoutOptions
            { New.layoutPageWidth = New.AvailablePerLine pageWidth (realToFrac ribbonFraction) }
    
    
    renderCompact :: Doc -> SimpleDoc
    renderCompact = New.layoutCompact
    
    displayS :: SimpleDoc -> ShowS
    displayS sdoc =
        let rendered = NewT.renderLazy sdoc
        in (TL.unpack rendered ++)
    

    Found in Text.PrettyPrint.Leijen from the package prettyprinter-compat-wl-pprint
    float = New.pretty
    
    double :: Double -> Doc
    double = New.pretty
    
    rational :: Rational -> Doc
    rational = New.pretty . show
    
    renderPretty :: Float -> Int -> Doc -> SimpleDoc
    renderPretty ribbonFraction pageWidth
        = New.layoutPretty New.LayoutOptions
            { New.layoutPageWidth = New.AvailablePerLine pageWidth (realToFrac ribbonFraction) }
    
    renderCompact :: Doc -> SimpleDoc
    renderCompact = New.layoutCompact
    
    displayS :: SimpleDoc -> ShowS
    displayS sdoc =
        let rendered = NewT.renderLazy sdoc
        in (TL.unpack rendered ++)
    

    layoutPretty See 9 Occurences [+] Collapse [-]
    Found in LLVM.Pretty from the package llvm-hs-pretty
    ppLayoutOptions :: LayoutOptions
    ppLayoutOptions = LayoutOptions (AvailablePerLine 100 0.5)
    
    -- -------------------------------------------------------------------------------
    -- -- Toplevel
    -- -------------------------------------------------------------------------------
    
    -- | Pretty print a LLVM module
    ppllvm :: Module -> Text
    ppllvm = renderLazy . layoutPretty ppLayoutOptions . pretty 
    
    -- | Pretty print a printable LLVM expression
    ppll :: Pretty a => a -> Text
    ppll = renderLazy . layoutPretty ppLayoutOptions . pretty
    

    Found in LLVM.Pretty from the package llvm-hs-pretty
    ppInstrMeta :: InstructionMetadata -> Doc ann
    ppInstrMeta [] = mempty
    ppInstrMeta xs = "," <> ppInstructionMetadata xs
    
    ppLayoutOptions :: LayoutOptions
    ppLayoutOptions = LayoutOptions (AvailablePerLine 100 0.5)
    
    -- -------------------------------------------------------------------------------
    -- -- Toplevel
    -- -------------------------------------------------------------------------------
    
    -- | Pretty print a LLVM module
    ppllvm :: Module -> Text
    ppllvm = renderLazy . layoutPretty ppLayoutOptions . pretty 
    
    -- | Pretty print a printable LLVM expression
    ppll :: Pretty a => a -> Text
    ppll = renderLazy . layoutPretty ppLayoutOptions . pretty
    

    Found in Control.Monad.Log from the package logging-effect
    -- rather than blocking.
    withFDHandler
      :: (MonadIO io,MonadMask io)
      => BatchingOptions
      -> Handle -- ^ The 'Handle' to write log messages to.
      -> Double -- ^ The @ribbonFrac@ parameter to 'PP.renderPretty'
      -> Int -- ^ The amount of characters per line. Lines longer than this will be pretty-printed across multiple lines if possible.
      -> (Handler io (PP.Doc ann) -> io a)
      -> io a
    withFDHandler options fd ribbonFrac width = withBatchedHandler options flush
      where
        flush messages = do
          PP.renderIO
            fd
            (PP.layoutPretty
               (PP.LayoutOptions (PP.AvailablePerLine width ribbonFrac))
               (PP.vsep (NEL.toList messages) <> PP.line'))
          hFlush fd
    
    --------------------------------------------------------------------------------
    

    Found in Control.Monad.Log from the package logging-effect
             -- $tutorial-loggingt
    
             -- *** Adapting and composing logging
             -- $tutorial-composing
    
             -- * @MonadLog@
             logMessage, mapLogMessage, mapLogMessageM,
             MonadLog(..),
    
             -- * Convenience logging combinators
             -- $convenience
             logDebug, logInfo, logNotice, logWarning, logError, logCritical, logAlert, logEmergency,
    
             -- * Message transformers
             PP.layoutPretty,
             -- ** Timestamps
             WithTimestamp(..), timestamp, renderWithTimestamp,
             -- ** Severity
             WithSeverity(..), Severity(..), renderWithSeverity,
             -- ** Call stacks
    

    Found in Data.Text.Prettyprint.Doc.Render.Text from the package prettyprinter
    -- | Like 'putDoc', but instead of using 'stdout', print to a user-provided
    -- handle, e.g. a file or a socket. Uses the 'defaultLayoutOptions'.
    --
    -- @
    -- main = 'withFile' filename (\h -> 'hPutDoc' h doc)
    --   where
    --     doc = 'vcat' ["vertical", "text"]
    --     filename = "someFile.txt"
    -- @
    --
    -- @
    -- 'hPutDoc' h doc = 'renderIO' h ('layoutPretty' 'defaultLayoutOptions' doc)
    -- @
    hPutDoc :: Handle -> Doc ann -> IO ()
    hPutDoc h doc = renderIO h (layoutPretty defaultLayoutOptions doc)
    

    Found in Data.Text.Prettyprint.Doc.Util from the package prettyprinter
    -- | Render a document with a certain width. Useful for quick-and-dirty testing
    -- of layout behaviour. Used heavily in the doctests of this package, for
    -- example.
    --
    -- >>> let doc = reflow "Lorem ipsum dolor sit amet, consectetur adipisicing elit"
    -- >>> putDocW 20 doc
    -- Lorem ipsum dolor
    -- sit amet,
    -- consectetur
    -- adipisicing elit
    -- >>> putDocW 30 doc
    -- Lorem ipsum dolor sit amet,
    -- consectetur adipisicing elit
    putDocW :: Int -> Doc ann -> IO ()
    putDocW w doc = renderIO System.IO.stdout (layoutPretty layoutOptions (unAnnotate doc))
      where
        layoutOptions = LayoutOptions { layoutPageWidth = AvailablePerLine w 1 }
    

    Found in Data.Text.Prettyprint.Doc.Render.Terminal.Internal from the package prettyprinter-ansi-terminal
    -- 'putDoc' = 'hPutDoc' 'stdout'
    -- @
    putDoc :: Doc AnsiStyle -> IO ()
    putDoc = hPutDoc stdout
    
    -- | Like 'putDoc', but instead of using 'stdout', print to a user-provided
    -- handle, e.g. a file or a socket using 'defaultLayoutOptions'.
    --
    -- > main = withFile "someFile.txt" (\h -> hPutDoc h (vcat ["vertical", "text"]))
    --
    -- @
    -- 'hPutDoc' h doc = 'renderIO' h ('layoutPretty' 'defaultLayoutOptions' doc)
    -- @
    hPutDoc :: Handle -> Doc AnsiStyle -> IO ()
    hPutDoc h doc = renderIO h (layoutPretty defaultLayoutOptions doc)
    

    Found in Text.PrettyPrint.Annotated.Leijen from the package prettyprinter-compat-annotated-wl-pprint
    type SimpleDoc = SimpleDocStream
    
    putDoc :: Doc () -> IO ()
    putDoc = New.putDoc
    
    hPutDoc :: Handle -> Doc () -> IO ()
    hPutDoc = New.hPutDoc
    
    displayS :: SimpleDoc ann -> ShowS
    displayS = New.renderShowS
    
    renderPretty :: Float -> Int -> Doc ann -> SimpleDoc ann
    renderPretty ribbonFraction pWidth
        = layoutPretty LayoutOptions
            { layoutPageWidth = AvailablePerLine pWidth (realToFrac