TextSweep

Artifact Content
Login

Artifact 63eec6d46b63e05b0ca1ef6754c5cfae9b53132b:


# -*- 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
    sectref syscmd method option widget fun type package class var
    file uri term const copyright namespace subsection category
} {
    proc fmt_$p {args} {return ""}
}

################################################################