show cram renderings of commonmark examples

This commit is contained in:
Anton Dyudin 2017-08-03 17:47:25 -07:00
parent e5640e503e
commit c11275a0be

View File

@ -19,9 +19,11 @@
=/ try (mule |.(~(shut ap (ream (nule '---' a)))))
?- -.try
$& p.try
$| ;= ;h3: ERROR
;pre: {(wush 120 p.try)}
== ==
$| ;= ;div
;h3: ERROR
;pre: {(wush 120 p.try)}
== == ==
::
++ split-on
=| hed/wain
|= {mid/@t all/wain} ^+ [hed all]
@ -58,8 +60,10 @@
|-
=+ [inp out]=(split-on '.' q.a)
;li
;pre:"{(trip (role inp))}"
;pre: {(trip (role inp))}
;p: =>
;pre:"{(trip (role out))}"
;pre: {(trip (role out))}
;p: vs
;pre: {(many:poxo c:(snag 0 (mads inp)) "")}
== ==
== ==