markdown-writer
Markdown streams

Next:

<markdown-writer> ( -- markdown-writer )

Vocabulary
io.streams.markdown

Class description
A formatted output stream which accumulates Markdown markup as string types. The data slot contains a sequence with all markup so far.

Definition

USING: destructors ;

IN: io.streams.markdown

TUPLE: markdown-writer < disposable data ;

Methods

USING: destructors io.streams.markdown kernel ;

M: markdown-writer dispose* drop ;


USING: io.streams.markdown io.streams.markdown.private io.styles
;

M: markdown-writer make-block-stream
    markdown-block-stream new-markdown-sub-stream ;


USING: io.streams.markdown io.streams.markdown.private io.styles
;

M: markdown-writer make-cell-stream
    markdown-sub-stream new-markdown-sub-stream ;


USING: io.streams.markdown io.streams.markdown.private io.styles
;

M: markdown-writer make-span-stream
    markdown-span-stream new-markdown-sub-stream ;


USING: io io.streams.markdown kernel ;

M: markdown-writer stream-flush drop ;


USING: io.streams.markdown io.streams.markdown.private io.styles
;

M: markdown-writer stream-format format-markdown-span ;


USING: io io.streams.markdown io.streams.markdown.private ;

M: markdown-writer stream-nl [ "\n\n" ] emit-markdown ;


USING: io io.streams.markdown io.streams.markdown.private ;

M: markdown-writer stream-write [ ] emit-markdown ;


USING: accessors assocs combinators io.streams.markdown
io.streams.markdown.private io.styles kernel math sequences ;

M: markdown-writer stream-write-table
    nip [
        {
            [
                first length 1 + "|" <repetition> " " join
                "\n" dup surround
            ]
            [
                first length "| - " <repetition>
                concat "|\n" append
            ]
            [
                [
                    [ data>> concat ~array~ substitute ] map
                    " | " join "| " " |" surround
                ] map "\n" join "\n" append
            ]
        } cleave 3append
    ] emit-markdown ;


USING: io io.streams.markdown io.streams.markdown.private
strings ;

M: markdown-writer stream-write1 [ 1string ] emit-markdown ;