renderSimplyDecorated :: Monoid out=> (Text -> out)Render plain Text
-> (ann -> out)How to render an annotation
-> (ann -> out)How to render the removed annotation
-> SimpleDocStream ann-> out
Simplest possible stack-based renderer.
For example, here is a document annotated with (), and the behaviour is to
write »>>>« at the beginning, and »<<<« at the end of the annotated region:
let doc = "hello" <+> annotate () "world" <> "!"let sdoc = layoutPretty defaultLayoutOptions docT.putStrLn (renderSimplyDecorated id (\() -> ">>>") (\() -> "<<<") sdoc)hello >>>world<<<!
The monoid will be concatenated in a right associative fashion.