diff --git a/extra/easy-help/easy-help.factor b/extra/easy-help/easy-help.factor index 6f299d6c37..ddb8f210e4 100644 --- a/extra/easy-help/easy-help.factor +++ b/extra/easy-help/easy-help.factor @@ -31,8 +31,20 @@ IN: easy-help : Contract: { $contract } parse-text-block append parsed ; parsing : Checked-Example: { $example } parse-text-block append parsed ; parsing +: Class-Description: + { $class-description } parse-text-block append parsed ; parsing + ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! +: Code: + + { $code } + parse-text-block [ dup array? [ drop "" ] [ ] if ] map + append + parsed + + ; parsing + : Example: { $heading "Example" } { $code }