dprint: dont print (undocumented) on arms

style reasons
This commit is contained in:
drbeefsupreme 2022-11-29 15:22:34 -05:00
parent 0fbdd6808a
commit ec74127a43

View File

@ -544,12 +544,18 @@
;: weld ;: weld
(print-header (weld "+" name.item) adoc.item) (print-header (weld "+" name.item) adoc.item)
[%txt ""]~ [%txt ""]~
(styled [[`%br ~ `%b] 'product:']~) ?~ pdoc.item
*(list sole-effect)
%- zing :~ (styled [[`%br ~ `%b] 'product:']~)
(print-header "" pdoc.item) (print-header "" pdoc.item)
[%txt ""]~ [%txt ""]~
(styled [[`%br ~ `%b] 'default arm in core:']~) ==
?~ cdoc.item
*(list sole-effect)
%- zing :~ (styled [[`%br ~ `%b] 'default arm in core:']~)
(print-header "" cdoc.item) (print-header "" cdoc.item)
== ==
==
:: ::
:: +print-face: renders documentation for a face :: +print-face: renders documentation for a face
++ print-face ++ print-face
@ -572,8 +578,8 @@
~? >> debug %print-header ~? >> debug %print-header
;: weld ;: weld
(styled [[`%br ~ `%g] (crip name)]~) (styled [[`%br ~ `%g] (crip name)]~)
?~ doc ?~ doc *(list sole-effect)
(styled [[`%br ~ `%r] '(undocumented)']~) :: (styled [[`%br ~ `%r] '(undocumented)']~)
:~ :- %tan :~ :- %tan
%- flop %- flop
;: weld ;: weld