Lines Matching defs:puts
97 puts "tcltk-man-html $Version"
102 puts "usage: tcltk-man-html \[OPTION\] ...\n"
103 puts " --help print this help, then exit"
104 puts " --version print version number, then exit"
105 puts " --srcdir=DIR find tcl and tk source below DIR"
106 puts " --htmldir=DIR put generated HTML in DIR"
107 puts " --tcl build tcl help"
108 puts " --tk build tk help"
109 puts " --useversion version of tcl/tk to search for"
137 puts stderr "tcltk-man-html: unrecognized option -- `$option'"
150 puts stderr "tcltk-man-html: couldn't find Tcl below $tcltkdir"
153 puts "using Tcl source directory $tcldir"
161 puts stderr "tcltk-man-html: couldn't find Tk below $tcltkdir"
164 puts "using Tk source directory $tkdir"
193 puts stderr "$name: $manual(section): $msg"
195 puts stderr "$name: $msg"
378 proc man-puts {text} {
434 man-puts <DL>
463 man-puts "$para<DT>Command-Line Name: $oswitch[option-toc $name $class $switch]$cswitch"
464 man-puts "<DT>Database Name: $oname$name$cname"
465 man-puts "<DT>Database Class: $oclass$class$cclass"
466 man-puts <DD>[next-text]
469 man-puts </DL>
481 man-puts <P>$rest
485 man-puts <P>$rest
492 man-puts <DL><DD>
511 man-puts $line
514 man-puts </DL>
525 man-puts <DL><DD>
531 man-puts "<P>"
541 man-puts $line
544 man-puts </DL>
551 man-puts <P>
553 man-puts <DL>
570 man-puts "$para<DT>$rest<DD>"
572 man-puts "$para<DT><DD>$rest "
574 man-puts "$para<DT>[long-toc $rest]<DD>"
579 man-puts <DT>[long-toc $rest]<DD>
609 man-puts "$para<DT>[long-toc $rest1]"
610 man-puts "<DT>[long-toc $rest2]<DD>"
615 man-puts "</DL><P>$rest<DL>"
620 man-puts "<P>$rest"
643 man-puts $line
647 man-puts "$para</DL>"
665 man-puts $line
738 puts stderr "multiple cross reference to $ref in $manual(name-$lref) from $manual(wing-file)/$manual(tail)"
809 puts stderr "$manual(tail): $msg: {$text}"
970 # man-puts <HR>
980 man-puts "<H3>[long-toc $manual(section)]</H3>"
982 man-puts "<H4>[long-toc $manual(section)]</H4>"
1023 #man-puts <P>
1033 man-puts $more<BR>
1066 man-puts [join $nmore {, }]
1089 man-puts [join $keys {, }]
1112 man-puts <DL>
1115 man-puts "<DT><B>[std-option-toc $option]</B>"
1117 man-puts </DL>
1132 man-puts <P>
1143 man-puts <BR>
1155 man-puts <PRE>$stuff</PRE>
1157 man-puts "<PRE>[lindex $ul1 1][lindex $ul2 1]\n$stuff</PRE>"
1168 man-puts <PRE>$stuff</PRE>
1179 man-puts <P>
1204 man-puts $more<BR>
1207 man-puts <DL><DD>
1209 man-puts $more<BR>
1211 man-puts </DL>
1213 man-puts <DL><DD>
1215 man-puts $more<BR>
1217 man-puts <DL><DD>
1219 man-puts $more2<BR>
1221 man-puts </DL></DL>
1223 man-puts <DL><DD>
1225 man-puts $more<BR>
1227 man-puts <DL><DD>
1229 man-puts $more2<BR>
1231 man-puts </DL><DD>
1233 man-puts $more3<BR>
1235 man-puts </DL>
1237 man-puts <P><DL><DD>
1239 man-puts $more<BR>
1241 man-puts <DL><DD>
1243 man-puts $more2<BR>
1245 man-puts </DL></DL><P>
1247 man-puts <P><DL><DD>
1249 man-puts $more<BR>
1251 man-puts </DL><P>
1289 puts "oops: $copyright"
1319 puts $manual(short-toc-fp) "<HTML><HEAD><TITLE>$overall_title</TITLE></HEAD>"
1320 puts $manual(short-toc-fp) "<BODY><HR><H3>$overall_title</H3><HR><DL>"
1332 puts stderr "scanning section $manual(wing-name)"
1334 puts $manual(short-toc-fp) "<DT><A HREF=\"$manual(wing-file)/contents.htm\">$manual(wing-name)</A><DD>$manual(wing-description)"
1336 puts $manual(wing-toc-fp) "<HTML><HEAD><TITLE>$manual(wing-name) Manual</TITLE></HEAD>"
1337 puts $manual(wing-toc-fp) "<BODY><HR><H3>$manual(wing-name)</H3><HR>"
1353 puts stderr "scanning page $manual(page)"
1505 puts "unbalanced .RS .RE"
1509 puts "unbalanced .DS .DE"
1512 puts "unbalanced .CS .CE"
1515 puts "unbalanced .SO .SE"
1527 man-puts $line
1530 man-puts <HR><PRE>
1532 man-puts "<A HREF=\"../copyright.htm\">Copyright</A> © [lrange $copyright 2 end]"
1534 man-puts "<A HREF=\"../copyright.htm\">Copyright</A> © 1995-1997 Roger E. Critchlow Jr.</PRE>"
1543 man-puts $line
1546 man-puts <HR><PRE>
1548 man-puts "<A HREF=\"../copyright.htm\">Copyright</A> © [lrange $copyright 2 end]"
1550 man-puts "<A HREF=\"../copyright.htm\">Copyright</A> © 1995-1997 Roger E. Critchlow Jr.</PRE>"
1585 puts $manual(wing-toc-fp) <table>
1587 puts $manual(wing-toc-fp) <tr>$rows($row)</tr>
1589 puts $manual(wing-toc-fp) </table>
1594 puts $manual(wing-toc-fp) "<HR><PRE>"
1596 puts $manual(wing-toc-fp) "<A HREF=\"../copyright.htm\">Copyright</A> © [lrange $copyright 2 end]"
1598 puts $manual(wing-toc-fp) "<A HREF=\"../copyright.htm\">Copyright</A> © 1995-1997 Roger E. Critchlow Jr."
1599 puts $manual(wing-toc-fp) "</PRE></BODY></HTML>"
1611 puts $manual(short-toc-fp) "<DT><A HREF=\"Keywords/contents.htm\">Keywords</A><DD>The keywords from the $tcltkdesc man pages."
1613 puts $keyfp "<HTML><HEAD><TITLE>$tcltkdesc Keywords</TITLE></HEAD>"
1614 puts $keyfp "<BODY><HR><H3>$tcltkdesc Keywords</H3><HR><H2>"
1616 puts $keyfp "<A HREF=\"$a.htm\">$a</A>"
1618 puts $afp "<HTML><HEAD><TITLE>$tcltkdesc Keywords - $a</TITLE></HEAD>"
1619 puts $afp "<BODY><HR><H3>$tcltkdesc Keywords - $a</H3><HR><H2>"
1621 puts $afp "<A HREF=\"$b.htm\">$b</A>"
1623 puts $afp "</H2><HR><DL>"
1627 puts $afp "<DT><A NAME=\"$k\">$k</A><DD>"
1634 puts $afp [join $refs {, }]
1637 puts $afp "</DL><HR><PRE>"
1640 puts $afp "<A HREF=\"copyright.htm\">Copyright</A> © [lrange $copyright 2 end]"
1642 puts $afp "<A HREF=\"copyright.htm\">Copyright</A> © 1995-1997 Roger E. Critchlow Jr."
1643 puts $afp "</PRE></BODY></HTML>"
1646 puts $keyfp "</H2><HR><PRE>"
1650 puts $keyfp "<A HREF=\"copyright.htm\">Copyright</A> © [lrange $copyright 2 end]"
1652 puts $keyfp "<A HREF=\"copyright.htm\">Copyright</A> © 1995-1997 Roger E. Critchlow Jr."
1653 puts $keyfp </PRE><HR></BODY></HTML>
1659 puts $manual(short-toc-fp) {<DT><A HREF="http://www.elf.org">Source</A><DD>More information about these man pages.}
1660 puts $manual(short-toc-fp) "</DL><HR><PRE>"
1663 puts $manual(short-toc-fp) "<A HREF=\"copyright.htm\">Copyright</A> © [lrange $copyright 2 end]"
1665 puts $manual(short-toc-fp) "<A HREF=\"copyright.htm\">Copyright</A> © 1995-1997 Roger E. Critchlow Jr."
1666 puts $manual(short-toc-fp) "</PRE></BODY></HTML>"
1689 puts stderr "rescanning page $manual(name) $ntoc/$ntext"
1691 puts $manual(outfp) "<HTML><HEAD><TITLE>$manual($manual(name)-title)</TITLE></HEAD><BODY>"
1698 puts $manual(outfp) $item
1702 puts $manual(outfp) [insert-cross-references $item]
1704 puts $manual(outfp) </BODY></HTML>
1732 puts $error\n$errorInfo