help.markup: separate examples using newlines.
parent
e0e58a62c5
commit
76fcbdc690
|
@ -121,7 +121,7 @@ M: f print-element drop ;
|
||||||
"Generic word contract" $heading print-element ;
|
"Generic word contract" $heading print-element ;
|
||||||
|
|
||||||
: $examples ( element -- )
|
: $examples ( element -- )
|
||||||
"Examples" $heading print-element ;
|
"Examples" $heading [ f $nl ] [ print-element ] interleave ;
|
||||||
|
|
||||||
: $example ( element -- )
|
: $example ( element -- )
|
||||||
unclip-last [ "\n" join ] dip over <input> [
|
unclip-last [ "\n" join ] dip over <input> [
|
||||||
|
|
Loading…
Reference in New Issue