sak/doc/doc.tcl

2 # sak::doc - Documentation facilities
5 package require sak::doc::auto
7 namespace eval ::sak::doc {}
14 proc ::sak::doc::index {modules} {
80 proc ::sak::doc::imake {modules} {
86 proc ::sak::doc::ishow {modules} {
99 proc ::sak::doc::validate {modules} {Gen null  null $modules}
100 proc ::sak::doc::html     {modules} {Gen html  html $modules}
101 proc ::sak::doc::nroff    {modules} {Gen nroff n    $modules}
102 proc ::sak::doc::tmml     {modules} {Gen tmml  tmml $modules}
103 proc ::sak::doc::text     {modules} {Gen text  txt  $modules}
104 proc ::sak::doc::wiki     {modules} {Gen wiki  wiki $modules}
105 proc ::sak::doc::latex    {modules} {Gen latex tex  $modules}
107 proc ::sak::doc::dvi {modules} {
109     file mkdir [file join doc dvi]
110     cd         [file join doc dvi]
127 proc ::sak::doc::ps {modules} {
129     file mkdir [file join doc ps]
130     cd         [file join doc ps]
146 proc ::sak::doc::pdf {modules} {
148     file mkdir [file join doc pdf]
149     cd         [file join doc pdf]
165 proc ::sak::doc::list {modules} {
168     set FILES [glob -nocomplain doc/list/*.l]
169     set LIST  [open [file join doc list manpages.tcl] w]
185 proc ::sak::doc::Gen {fmt ext modules} {
195 	file mkdir [file join doc $fmt]
217                 set target [file join doc $fmt \
255 package provide sak::doc 1.0