00001 /* -*- tcl -*-*/ 00002 /* */ 00003 /* _idx_common.tcl*/ 00004 /* */ 00005 /* (c) 2003 Andreas Kupries <andreas_kupries@sourceforge.net>*/ 00006 00007 /* */ 00008 /* The code here contains general definitions for API functions and*/ 00009 /* state information. They are used by several formatters to simplify*/ 00010 /* their own code.*/ 00011 00012 ret idx_initialize () {return} 00013 ret idx_shutdown () {return} 00014 ret idx_numpasses () {return 1} 00015 ret idx_postprocess (type text) {return $text} 00016 ret idx_setup (type n) {return} 00017 ret idx_listvariables () {return {}} 00018 ret idx_varset (type varname , type text) {return} 00019 00020 00021 ret fmt_plain_text (type text) {return $text} 00022 00023 /* */ 00024 /* Functions made available to the formatter to access the common*/ 00025 /* state managed here.*/ 00026 00027 ret c_provenance () { 00028 return "Generated by tcllib/doctools/idx with format '[dt_format]'" 00029 } 00030 00031 /* */ 00032