1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30
|
# -*- tcl -*-
#
# -- Null format
#
# Copyright (c) 2001-2002 Andreas Kupries <andreas_kupries@sourceforge.net>
# Copyright (c) 2003 Andreas Kupries <andreas_kupries@sourceforge.net>
# This is a null format which does return no output at all.
################################################################
proc fmt_initialize {} {return}
proc fmt_shutdown {} {return}
proc fmt_numpasses {} {return 1}
proc fmt_postprocess {text} {return ""}
proc fmt_plain_text {text} {return ""}
proc fmt_setup {n} {return}
foreach p {
manpage_begin moddesc titledesc manpage_end require description
section para list_begin list_end lst_item call usage bullet enum
arg_def cmd_def opt_def tkoption_def see_also keywords example
example_begin example_end nl arg cmd opt emph comment image mdash
sectref syscmd method option widget fun type package class var
file uri term const copyright namespace subsection category ndash
} {
proc fmt_$p {args} {return ""}
}
################################################################
|