Literate programming/Bird conversion via sed
From HaskellWiki
# bird2code.sed
^> !p
^> {
i\
\\begin{code}
:loop
N
/\n>[^\n]*$/{
b loop
}
s/^> //
s/\(\n\)> /\1/g
s/\n$//
a\
\\end{code}\
p
}
# bird2code.sed
^> !p
^> {
i\
\\begin{code}
:loop
N
/\n>[^\n]*$/{
b loop
}
s/^> //
s/\(\n\)> /\1/g
s/\n$//
a\
\\end{code}\
p
}