diff -aruN groff-1.16.1/ChangeLog groff-1.17/ChangeLog --- groff-1.16.1/ChangeLog Mon Jul 31 17:12:54 2000 +++ groff-1.17/ChangeLog Tue Apr 17 13:16:22 2001 @@ -1,3 +1,1755 @@ +Version 1.17 released +===================== + +2001-04-17 Werner LEMBERG + + * tmac/Makefile.sub (install-data): mdoc.local-s is in current + directory, not in $(srcdir). + +2001-04-16 Werner LEMBERG + + * doc/groff.texinfo: More info on conditionals. + +2001-04-15 Werner LEMBERG + + * doc/groff.texinfo: Added some info about groff internals. + + * src/roff/troff/node.cc (make_glyph_node): Emit warning message + about missing special character only if the name is non-null. + +2001-04-14 Werner LEMBERG + + Removing the grohtml-old device driver which is now obsolete. + + * src/devices/grohtml-old/*: Removed. + * font/devhtml-old/*: Removed. + * src/libgroff/htmlindicate.cc (graphic_start, graphic_end): Remove + comments. + * Makefile.in (CCPROGDIRS, DEVDIRS): Updated. + * test-groff (PATH): Updated. + * tmac/Makefile.sub (NORMALFILES): Updated. + * tmac/an-old.tmac: Remove special code for html-old device. + Replace `html-or-html-old' register with `an-html'. + * tmac/eqnrc: Updated. + * tmac/html-old.tmac: Removed. + * tmac/troffrc, tmac/troffrc-end: Updated. + * tmac/www.tmac: Remove special code for html-old device. + Replace `html-or-html-old' register with `www-html'. + + * src/libgroff/tmpfile.cc (remove_tmp_files), + src/libgroff/htmlindicate.cc (graphic_end), include/htmlindicate.h, + src/preproc/grn/*.cc, src/roff/groff/env.{cc,h}: Remove `void' + parameter if used as a single argument for consistency with rest of + source code. + + * aclocal.m4, tmac/an-old.tmac: Fix copyright. + +2001-04-13 Ruslan Ermilov + + * src/roff/troff/troff.man: Fixing typos. + +2001-04-13 Werner LEMBERG + + * doc/pic.ms: Fixing many font switches. + * doc/groff.texinfo: Fixes, additions. + * MORE.STUFF: Updated. + +2001-04-12 Gaius Mulley + + * src/devices/grohtml/grohtml.man: Updated manual page regarding + simple anchor. + * src/preproc/html/pre-html.cc (createImage): Fixed right hand + cropping of images. + (removeTempFiles): New function to tidy up temporary files. + * src/preproc/html/pre-html.cc (main): Calls `removeTempFiles()'. + Many fixes to do with the new inline suppress node and image regions + are much tighter. + * src/devices/grohtml/post-html.cc: New method `is_auto_img'. + (generate_img_src): New function. + (html_printer::do_auto_image): Utilizes it. + (do_heading, do_title): Include inline images within their contents. + (html_printer::begin_page): Tidied up comments that are issued to + the html output file. + (html_printer::do_fill): Fixed so that `.nf' works with fonts other + than courier. + (text_glob::is_br): New method used by do_heading. + * tmac/s.tmac: If -Thtml then emit $1 in .IP rather than its + equivalent diversion. + * src/include/html-strings.h: Altered image tags to reflect the + inline image node. + * src/include/htmlindicate.h (html_end_suppress): Added `is_inline' + parameter. + * src/preproc/eqn/main.cc: Will suppress generation of image tags if + it is already inside a pic image. Only emit tags if the argument + `-Tps:html' is present. + * src/preproc/tbl/main.cc: Changes to reflect additional + `html_end_suppress' parameter. + * src/roff/troff/env.cc: Only emit eol tag if a node has been + emitted since the last eol tag was written. + * src/roff/troff/env.h: New boolean `emitted_node'. + * src/roff/troff/input.cc (do_suppress): Handles extra suppress + nodes \O3, \O4, \O5. No longer use `output_low_mark_miny'. + * src/roff/troff/node.cc (check_charinfo): New method. + (troff_output_file::determine_line_limits): Alterations to limit + checking. + * tmac/www.tmac: Changes to reflect new suppress nodes. + +2001-04-12 Bruno Haible + + * src/devices/grohtml/post-html.cc (html_printer::add_to_sbuf): + Escape the html_glyph in the buffer. + (str_translate_to_html): Output the unescaped escaped_char. + * src/devices/grohtml/html-text.cc (issue_table_begin): Set + `frame=void', not `frame=none'. Add `border=0'. + +2001-04-12 Ruslan Ermilov + + * contrib/mm/groff_mm.man: Fixing some typos. + +2001-04-12 Werner LEMBERG + + * PROBLEMS: Add some words on how to avoid wrapper macros. + +2001-04-11 Blake McBride + + * src/include/nonposix.h (fileno) [_MSC_VER]: Removed. + +2001-04-11 Werner LEMBERG + + * font/devlbp/Makefile.sub (CLEANADD): Set it. + * tmac/Makefile.sub (CLEANADD): Add tmac.local-s. + * Makefile.in (dist): Don't remove src/xditview/Imakefile, but ... + * Makefile.sub (DISTCLEANFILES): Here. + + * libs/libgroff/new.cc: Include `nonposix.h'. + * win32-diffs: Updated. + +2001-04-10 Ruslan Ermilov + + Added skeleton macro for defunct macros. + + Updated documentation. + + When inside displays, an empty input line warning should be + suppressed. If another macro call is put inside a display, + all subsequent empty lines found in that display caused a + warning to be emitted. + + * tmac/doc.tmac (doc-defunct-macro): New macro. + (Db, Ds, Ex, Or, Sf): Reimplemented using this macro. + (doc-restore-global-vars): Fixed typo. + (doc-empty-line): Check the `doc-display-depth' register to + determine whether we are inside display or not. + + * tmac/doc-common: Removed `Or' and `Sf' registers. + Moved obsolete `Ds' macro to doc.tmac. + + * tmac/groff_mdoc.man: Bump document date. + Document `.Vt' under ``Variable Types''. + Removed documentation for obsolete `.Or' macro. + +2001-04-10 Werner LEMBERG + + * NEWS: Updated. + * doc/groff.texinfo: Many fixes, additions, clarifications, etc. + +2001-04-10 Bruno Haible + + * src/devices/grodvi/dvi.cc (main): Accept --help and --version. + (usage): Add stream argument. Don't exit. + * src/devices/grohtml/post-html.cc (main): Accept --help and --version. + Write --version output to stdout, not stderr. + (usage): Add stream argument. Don't exit. + * src/devices/grohtml-old/html.cc (main): Accept --help and --version. + (usage): Add stream argument. Don't exit. + * src/devices/grolbp/lbp.cc (long_options): Use symbolic getopt.h + constants. + (usage): Add stream argument. Don't exit. + (main): Write --help output to stdout, not stderr. + * src/devices/grolj4/lj4.cc (main): Accept --help and --version. + (usage): Add stream argument. Don't exit. + * src/devices/grops/ps.cc (main): Accept --help and --version. + (usage): Add stream argument. Don't exit. + * src/devices/grotty/tty.cc (main): Accept --help and --version. + (usage): Add stream argument. Don't exit. + * src/preproc/eqn/main.cc (usage): Add stream argument. Don't exit. + (main): Accept --help and --version. + * src/preproc/grn/main.cc (usage): Add stream argument. Don't exit. + (main): Accept --help and --version. + * src/preproc/html/pre-html.cc (usage): Add stream argument. + (scanArguments): Accept --help and --version. + * src/preproc/pic/main.cc (usage): Add stream argument. Don't exit. + (main): Accept --help and --version. + * src/preproc/refer/refer.cc (main): Accept --help and --version. + (usage): Add stream argument. Don't exit. + * src/preproc/soelim/soelim.cc (usage): Add stream argument. Don't + exit. + (main): Accept --help and --version. + * src/preproc/tbl/main.cc (usage): Add stream argument. Don't exit. + (main): Accept --help and --version. + * src/roff/groff/groff.cc (main): Accept --help and --version. + (synopsis): Add stream argument. + (help): Write --help output to stdout, not stderr. + (usage): Add stream argument. Don't exit. + * src/roff/grog/grog.pl: Accept --help and --version. + (help): New sub. + * src/roff/grog/grog.sh: Accept --help and --version. + * src/roff/nroff/nroff.sh: Accept --help and --version. + * src/roff/troff/input.cc (USAGE_EXIT_CODE): Remove macro. + (usage): Add stream argument. Don't exit. + (main): Accept --help and --version. + * src/utils/addftinfo/addftinfo.cc (main): Accept --help and --version. + (usage): New function with stream argument, doesn't exit. + * src/utils/hpftodit/hpftodit.cc (main): Accept --help and --version. + (usage): New function with stream argument, doesn't exit. + * src/utils/indxbib/indxbib.cc (main): Accept --help and --version. + (usage): Add stream argument. Don't exit. + * src/utils/lkbib/lkbib.cc (usage): Add stream argument. Don't exit. + (main): Accept --help and --version. + * src/utils/lookbib/lookbib.cc (usage): Add stream argument. Don't + exit. + (main): Accept --help and --version. + * src/utils/pfbtops/pfbtops.c (usage): Add stream argument. Don't exit. + (main): Accept --help and --version. + * src/utils/tfmtodit/tfmtodit.cc (main): Accept --help and --version. + (usage): Add stream argument. Don't exit. + +2001-04-10 Ruslan Ermilov + + Fix indentation in SYNOPSIS. + + Updated to include changes of latest BSD mdoc version (basically, + the only change is that `.Fn' and `.Fc' put a final semicolon after + a function declaration in the SYNOPSIS section). + + * tmac/doc.tmac (doc-in-synopsis-count): Replaced with ... + (doc-in-synopsis-section): New variable. Updated all related + functions. + (doc-indent-synopsis-active): New register. + (Nd, Fn, Fo): Use it. + (Cd): It requires manipulation of \n[doc-indent-synopsis] so that + `.Cd' with long argument line produces indented wrapped lines. + Also, the misplaced `.nop \*[doc-Nm-font]\c'' caused extra + undesirable line break to be output. + (doc-do-func-decl, Nm, Vt, Fn, Fo): Remove extraneous calls to + `.rs'. + (Fn, Fc): Add final `;' to output. + (doc-save-global-vars, doc-restore-global-vars): Updated. + * tmac/doc-common: Remove `Ex' register. + Updated. + * tmac/doc-ditroff, tmac/doc-nroff, tmac/doc-syms: Updated + copyright. + +2001-04-06 Ruslan Ermilov + + * tmac/doc.tmac (Cd): Simplify code. + * tmac/groff_mdoc.man: Document some behaviour of `Cd' request. + +2001-04-06 Werner Lemberg + + Implement continuous underlining for nroff mode. To do that, a new + request in the ditroff language has been added: `x u N' (N is 0 + or 1). + + \X and \Y are now transparent to end-of-sentence recognition. + + * src/include/printer.h (printer): Add `type' parameter to `special' + method. + * src/libs/libdriver/printer.cc (printer::special): Updated. + * src/libs/libdriver/input.cc (do_file): Handle `x u N'. + + * src/devices/dvi/dvi.cc (dvi_printer::special): Handle only + specials of type `p'. + * src/devices/grohtml/post-html.cc (html_printer::special): Ditto. + * src/devices/grohtml-old/html.cc (html_printer::special): Ditto. + * src/devices/grops/ps.cc (ps_printer::special): Ditto. + * src/devices/grotty/tty.cc: Add new enum CU_MODE. + (glyph::order): New method. + (tty_printer::add_char): Use it. + (tty_printer::special): New method. + (tty_printer::end_page): Implement it. + + * src/roff/troff/node.h (special_node): Add `no_init_string' member. + * src/roff/troff/node.cc (special_node::special_node): Add parameter + to set `no_init_string'. + (special_node::tprint_start): Use it. + (special_node::same, special_node::copy): Updated. + (special_node::ends_sentence): New method. + (troff_output_file::start_special): Add parameter to include + inititialization of special conditionally. + + * src/roff/troff/env.h (environment): New member `underline_spaces'. + * src/roff/troff/env.cc (do_underline_special): New function. + (environment::set_font): Use it. + (do_underline): Use it. This was `underline()'. + (underline): Call `do_underline()'. + (continuous_underline): New function which calls `do_underline()'. + (environment::newline): Use `do_underline_special()'. + (init_env_requests): Updated. + + * NEWS, man/troff_out.man: Updated. + +2001-04-06 Bruno Haible + + * font/devutf8/R.proto: Fix code of 'shc'. + +2001-04-06 Ruslan Ermilov + + Many fixes. Diag lists can now be nested also; additionally, + `-compact' and `-offset' are supported. + + * tmac/doc.tmac (doc-have-indent): Replaced with ... + (doc-list-have-indent-stackXXX): A new register stack. + (doc-have-diag-list): Removed. + (Bl): Use `doc-list-have-indent-stackXXX'. + (El): Updated. + (doc-diag-list): Use `doc-compact-list-stackXXX'. + (doc-tag-list): Use `doc-list-have-indent-stackXXX'. + (doc-set-vertical-and-indent): Ditto. + (doc-next-list-depth): Removed. + (doc-increment-list-stack): Updated. + (doc-decrement-list-stack): Use `doc-list-depth' instead of + `doc-next-list-depth'. + (doc-end-list, doc-end-column-list): Don't use + `doc-increment-list-stack'. + (doc-set-column-tab): Don't use `doc-list-offset-stackXXX'. + (doc-save-global-vars, doc-restore-global-vars): Updated. + * tmac/doc-common: Updated. + * tmac/groff_mdoc.man: Updated. + * NEWS: Fix typo. + +2001-04-02 Werner LEMBERG + + * src/devices/grotty/grotty.man: Fix grammatical error. + +2001-03-30 Ruslan Ermilov + + Remove .Ld from mdoc package; replace it with special handling of + `...'. + + * tmac/doc-common: Remove `Ld' register. + Uncomment `doc-volume-ds-*' strings. + Remove `doc-operating-system-default'. + (Os): Updated. + * tmac/doc-syms (Ld): Removed. + * tmac/doc.tmac (doc-parse-args, doc-parse-arg-vector): Handle + `...' specially. + * NEWS: Updated. + + * tmac/groff_mdoc.man: Many fixes and updates. + +2001-03-29 Werner LEMBERG + + * tmac/troffrc-end: Protect data with `.do'. Reported by T. Kurt + Bond . + * tmac/www.tmac: Save compatibility mode. + +2001-03-28 Ruslan Ermilov + + * tmac/groff_mdoc.man: Many fixes. + +2001-03-28 Werner LEMBERG + + * src/preproc/soelim/soelim.man: Document that `.so' + isn't recognized. + +2001-03-27 Werner LEMBERG + + * tmac/an-old.tmac (TP, an-do-tag): Reduce line length while in + diversion. This fixes overlong tags. + +2001-03-26 Werner LEMBERG + + * doc/groff.texinfo: Fixed and improved documentation of fonts. + * tmac/doc-syms: Fix error messages. + * tmac/an-old.tmac: Remove incorrect double backslashes. + +2001-03-24 Ruslan Ermilov + + * tmac/Makefile.sub: Strip mdoc.local also + * tmac/strip.sed: Fixed. + +2001-03-24 Werner LEMBERG + + * tmac/doc-nroff, tmac/doc-ditroff: Implement -rSxx switch for + selecting the font size. + * tmac/groff_mdoc.man, NEWS: Document it. + +2001-03-23 Werner LEMBERG + + * src/roff/troff/div.cc (save_vertical_space): Add default argument + to `sv' request. + * src/roff/troff/env.cc (family_change): Make `.fam' accept no + argument to restore previous font family. + * src/roff/troff/troff.man, man/groff.man, NEWS: Updated. + + * doc/groff.texinfo: More fixes and additions (mainly for font + manipulating commands). + + * tmac/groff_mdoc.reference.man: Small updates and renamed to ... + * tmac/groff_mdoc.man: This. The quick reference has been removed. + * tmac/Makefile.sub, NEWS: Updated. + +2001-03-23 Werner LEMBERG + + Replaced mdoc implementation. The new version is `state of the + art', using almost all new features of groff 1.17 -- it won't run + with older versions. + + * tmac/doc.tmac: Completely rewritten. + * tmac/doc-common: Ditto. + * tmac/doc-nroff: Ditto. + * tmac/doc-ditroff: Ditto. + * tmac/doc-syms: Ditto. + * tmac/mdoc.local: New file. + * tmac/groff_mdoc.samples.man: Replaced with ... + * tmac/groff_mdoc.reference.man: New file, covering mdoc completely. + * tmac/strip.sed: Updated. + * tmac/Makefile.sub: Updated. + * INSTALL: Updated. + + * tmac/groff_man.man: Add `man.local' to the FILES section. + +2001-03-22 Werner LEMBERG + + * doc/groff.texinfo: Added many @noindent. + Replaced @end_Example -> @endExample. + Added info whether registers are r/o. + Many other additions and fixes. + +2001-03-21 Werner LEMBERG + + * doc/groff.texinfo: Added macro @Var (and some hacks due to bugs + in makeinfo of texinfo 4.0) to be used in @Def* macros. + Improved @Def* macros: Now the exact syntax of request, register, + and escapes is shown. + Added macros for parentheses and brackets to be used in @Def*. + Many fixes and improvements of the documentation. + +2001-03-20 Werner LEMBERG + + * doc/groff.texinfo: Added new index: `st' (for strings). + Added macros @Defstr(x). + Added macro @Example (adding @group). + Other minor improvements. + +2001-03-19 Werner LEMBERG + + * doc/groff.texinfo: Added two new indices: `es' (for escapes) and + `rq' for requests. `fn' is no longer used. + Added macros @Defreq(x), @Defreg(x), and @Defesc(x). + Removed @Deffn(x). + + * tmac/an-old.tmac (an-p-footer): If `cR' is set, replace page + number with name of man page. + +2001-03-19 Larry Kollar + + * doc/groff.texinfo: Complete revision. Added many @Deffn to gain + consistency. + +2001-03-19 Werner LEMBERG + + * man/groff_font.man: Document `prepro', `postpro', and `print'. + * src/roff/groff/groff.man: Improve documentation of `-l' and `-L'. + * src/devices/grohtml/grohtml.man: Fixing typos. + +2001-03-19 Gaius Mulley + + * tmac/s.tmac (@IP): Pass `.ip' html tag. + * tmac/groff_mwww.man: Remove .LINE macro + * tmac/www.tmac (LINE): Add `.ti'. + + * src/devices/grohtml/post-html.cc (html_printer): New member + `indent'. + (html_printer::emit_raw): Use it. + (html_printer::do_linelength): Ditto. + (html_printer::do_pageoffset): Ditto. + (html_printer::do_indentation): Ditto. + (html_printer::do_tempindent): Ditto. + (html_printer::do_break): Ditto. + (html_printer::begin_page): Ditto. + (html_printer::do_indentedparagraph): New function. + (html_printer::troff_tag): Handle `.ip'. + * src/devices/grohtml/html-text.cc (html_text::issue_table_begin): + Add `' handling. + (html_text::do_table): Add parameter. + (html_text::do_indent): Updated. + * src/devices/groohtml/html-text.h: Updated. + +2001-03-16 Gaius Mulley + + Introduced simple html tables to implement indentation. + + * src/devices/grohtml/html.h (word, word_list): New structures. + (simple_output): Use it. + * src/devices/grohtml/post-html.cc: Add `INDENTATION'. + (html_printer): Improve indentation handling. + (html_printer::emit_raw): Set `in_table' element. Handle + indentation if set. + (html_printer::write_header): Move conditional downwards. + Don't allow whitespace in tags. + (html_printer::do_linelength): Handle line length and indentation + conditionally. + (html_printer::do_pageoffset): Handle indentation conditionally. + (html_printer::do_indentation): Ditto. + (html_printer::do_tempindent): New function member. + (html_printer::do_fill): Take care of indentation. + (html_printer::do_flush): Finish table. + (html_printer::do_links): Ditto. + (html_printer::do_break): New function for handling `.br' and `.ti'. + (html_printer::troff_tag): Use it. + Handle `.ti'. + (html_printer::flush_globs): Fix. + (html_printer::flush_page): Finish table. + (html_printer::html_printer): Fix error message. Set up + `linelength'. + (html_printer::add_to_sbuf): Remove special handling of character + code 255. + (to_unicode): Remove `stop()'. + (html_printer::write_title): Cleanup. + (html_printer::begin_page): Use `put_string()'. Handle indentation. + (html_printer::~html_printer): Flush text and end the line. + Use `put_string()'. + * src/devices/grohtml/html_text.h: Add more *_TAG enum values. + * src/devices/grohtml/html_text.cc (html_text::end_tag): Fix + emission of tags. + (html_text::start_tag): Disable newlines. + (html_text::table_is_void): New function. + (html_text::issue_table_begin): Ditto. + (html_text::issue_table_end): Ditto. + (html_text::push_para): Better table handling. + (html_text::do_indent): New function. + (html_text::do_table): Ditto. + (html_text::done_table): Ditto. + (html_text::do_tt): Handle PRE_TAG. + (html_text::is_in_table): New function. + (html_text::check_emit_text): Handle tables. + (html_text::do_emittext): Use `nl()'. + (html_text::do_para): Handle table. + (html_text::remove_def): New function. + * src/devices/grohtml/output.cc (word, word_list): Implement + methods. + (simple_output::end_line): Flush last word. + (simple_output::simple_comment): Ditto. + (simple_output::begin_comment): Recoded. + (simple_output::end_comment): Ditto. + (simple_output::comment_arg): Removed. + (simple_output::check_newline): Improve test and flush last word. + (simple_output::space_or_newline): Improved. + (simple_output::write_newline): Replaced with... + (simple_output::nl): This. + (simple_output::put_raw_char): Flush last word. + (simple_output::check_space): Removed. + (simple_output::put_translated_string): Ditto. + (simple_output::put_string): Simplified. + (simple_output::put_number): Updated. + (simple_output::put_float): Ditto. + (simple_output::put_symbol): Removed. + (simple_output::enable_newlines): Add `check_newline()'. + (simple_output::flush_last_word): New function. + + * src/roff/troff/enc.cc (no_fill): Remove call to add_html_tag(). + * src/roff/troff/div.cc (page_offset): Add call to add_html_tag(). + + * tmac/s.tmac (@PP, @IP): Add html conditional code. + * tmac/an-old.tmac (TP): Ditto. + +2001-03-09 Ruslan Ermilov + + * mdate.sh: Make it POSIX compliant. + +2001-03-09 Werner LEMBERG + + Added the `return' request to end a macro immediately. It simply + pops iterators from the input stack until a macro iterator is found. + + * src/roff/troff/input.cc (input_iterator::is_macro, + macro_iterator::is_macro): New member. + (input_return_boundary): New class to signal an immediate return + to while_request(). + (input_stack::add_return_boundary, input_stack::is_return_boundary): + New functions. + (input_stack::clear): Use it. + (input_stack::pop_macro): New function. + (while_request): Use `is_return_boundary()'. + (return_macro_request): New function. + (init_input_requests): Use it. + + * src/roff/troff/TODO: Updated. + * NEWS, src/roff/troff/troff.man, man/groff.man: Document it. + +2001-03-08 Werner LEMBERG + + * src/roff/troff/input.cc (input_iterator::is_boundary): Minor + cleanup. + +2001-03-07 Werner LEMBERG + + Make `\B' more rigid. + + * src/roff/troff/number.cc (parse_expr, parse_term): Add `rigid' + parameter. + (get_number_rigidly): New function. + * src/roff/troff/input.cc (do_expr_test): Use it. + * src/roff/troff/token.h: Updated. + + * src/roff/troff/request.h: Fix typo (init_html_request -> + init_markup_request). + +2001-03-04 Gaius Mulley + + Fixed grohtml handling of any named glyph for glyph indexes < 0x80. + Cosmetic changes to `.html-begin', `.html-end', `.html-image' which + are now `.begin', `.end', `.image'. + + * src/devices/grohtml/post-html.cc: Adding UNICODE_DESC_START. + (html_printer::add_to_sbuf): Changing type of `code' parameter. + Use add_char_to_sbuf(). + (to_unicode): New function. + (char_translate_to_html): Changing type of `ch' parameter. + Use `to_unicode()'. + (html_printer::~html_printer): Comment out doctype string. + * src/preproc/html/pre-html.cc (write_end_image): Use `.end' + instead of `.html-end'. + (write_start_image): Use `.begin' and `.image' instead of + `.html-begin' and `.html-image'. + * src/roff/troff/input.cc: Rename `html_level' to `begin_level'. + (html_begin): Renamed to ... + (begin): This. + (html_end): Renamed to ... + (end): This. + (html_image): Renamed to ... + (image): This. + (init_html_requests): Renamed to ... + (init_markup_requests): This. + * tmac/www.tmac: Updated. + +2001-02-28 Bram + + * src/libs/libgroff/font.cc (font_widths_cache): Fixing syntax of + constructor. + +2001-02-26 David Leonard + + * doc/meref.me: Fixing some typos. + +2001-02-16 Werner LEMBERG + + * src/roff/troff/node.cc (space_node::get_hyphenation_type): New + method. Return `HYPHEN_MIDDLE' if it was `\:'. + * src/roff/troff/node.h: Updated. + +2001-02-17 Ruslan Ermilov + + * tmac/groff_tmac.man: Fix typo. + +2001-02-16 Werner LEMBERG + + Fixing a bug which prevented proper end-of-sentence recognition + between an `unformatted' box and the following text. As a + consequence, vertical line distances are no longer preserved in + boxes after a call to `.unformat' -- because boxes aren't + line-oriented (contrary to diversions), this doesn't make sense + anyway. + + * src/roff/troff/node.cc (*node::set_unformat_flag): Add return + value. + (vertical_size_node::set_unformat_flag): New method. + * src/roff/troff/node.hh: Updated. + * src/roff/troff/input.cc (word_space_node::reread, + hmotion_node::reread): Reset `unformat' flag after usage. + (unformat_macro): Append only if `set_unformat_flag()' returns + non-zero. + * src/roff/troff/troff.man: Updated. + +2001-02-15 Werner LEMBERG + + * src/roff/troff/troff.man, NEWS, man/groff.man: Improved + documentation of `asciify' and `unformat' requests. + +2001-02-13 Werner LEMBERG + + Redesigned the `unformat' request. It is no longer connected with + `asciify' but rather uses new `reread()' methods if the `unformat' + flag is set. Additionally, the handling of space characters after + unformatting has been fixed so that they retain their width. + + * src/roff/troff/node.h (width_list): New structure to store + original widths of spaces. + (node): Added `unformat' member. + Replaced `num_spaces' variable with `orig_width' list. + * src/roff/troff/node.cc (*node::asciify, + asciify_reverse_node_list): Removed `unformat_only' flag and related + code. + (word_space_node::asciify, word_space_node::word_space_node): Use + `orig_width'. + (word_space_node::~word_space_node): New destructor. + (word_space_node::copy): Updated to handle `orig_width'. + (hmotion_node::copy, unbreakable_space_node::copy): Updated. + (*node::merge_space): Update `orig_width' list if necessary. + (*node::set_unformat_flag): New methods to set the `unformat' flag. + * src/roff/troff/enc.cc (environment::space_newline): Use + `width_list'. + (environment::space): Added method to handle space width and + sentence space width as parameters. Use `width_list'. + (environment::make_tab_node): Updated. + * src/roff/troff/env.h: Updated. + * src/roff/troff/input.cc (word_space_node::reread, + unbreakable_space_node::reread, hmotion_node::reread): New methods + to handle nodes specially if `unformat' flag is set. + (do_asciify_macro): Renamed back to ... + (asciify_macro): This. + (unformat_macro): New implementation to simply set the `unformat' + flag. + + * MORE.STUFF: Added more info about deroff. + +2001-02-08 Werner LEMBERG + + * src/roff/troff/node.h (unbreakable_space_node, hmotion_node, + space_char_hmotion_node, overstrike_node): Add `get_hyphen_list()' + and `add_self()' methods to avoid hyphenation. For example, the + hyphen list for `foo\0\0bar' was `foobar', causing insertion of a + soft hyphen after `foo'. Now the hyphen list is correctly + `foobar'. + +2001-02-05 Yoshiteru Kageyama + + * tmac/groff_tmac.man: Fix `BIR' macro. + +2001-02-04 Werner LEMBERG + + A new escape sequence `\:', inserting a zero-width break point. + + * src/roff/troff/input.h: Adding `ESCAPE_COLON'. + * src/roff/troff/input.cc (get_copy, token::next, asciify): + Implement it. + * src/roff/troff/node.h (node): Add `is_escape_colon()' virtual + method. + (space_node): Add `was_escape_colon' member. Add `is_escape_colon()' + and `asciify()' methods. + * src/roff/troff/node.cc (space_node::space_node): Updated. + (space_node::asciify): Handle `was_escape_colon'. + * NEWS, src/roff/troff/troff.man, man/groff.man: Document it. + + Handle `\~' similar to other comparable requests. + + * src/roff/troff/input.cc (process_input_stack): Remove now obsolete + label. + (token::next): Move creation of an unbreakable_space_node to... + (token::add_to_node_list): Here. + + Fix a bug which sometimes prevented hyphenation of words connected + with `\~' or `\ ' (and other escape sequences handled as + TOKEN_NODE). This also fixes a hyphenation problem with boxes + (after a call to the `unformat' request). + + * src/roff/troff/env.h (environment::possibly_break_line, + environment::hyphenate_line): Introducing `start_here' parameter. + * src/roff/troff/env.cc (environment::space_newline, + environment::space): Use it. + (environment::possibly_break_line, environment::hyphenate_line): + Implement it. + * src/roff/troff/input.cc (process_input_stack): Use it. + * src/roff/troff/node.h (unbreakable_space_node, hmotion_node, + space_char_hmotion_node, overstrike_node): Add + `get_hyphenation_type()' method. + * src/roff/troff/node.cc (break_char_node::asciify): Don't asciify + if `unformat_only' is active. + +2001-01-30 Werner LEMBERG + + Implemented new read-only number register `.linetabs' which + returns 1 if in line-tabs mode, 0 otherwise. + + * src/roff/troff/env.h (environment): Add get_line_tabs() member. + * src/roff/troff/env.cc (get_line_tabs): New function. + (init_env_requests): Use it. + * NEWS, src/roff/troff/troff.man, man/groff.man: Document it. + + * VERSION, REVISION: Changing to 1.17.0. + +2001-01-28 Werner LEMBERG + + Fixed a bug which prevented hyphenation of words which are finished + with `\)'. + + * src/roff/troff/token.h (token): Add enum type + `TOKEN_TRANSPARENT_DUMMY' and method `transparent_dummy()'. + * src/roff/troff/input.cc (token::next, token::description, + get_line_arg, token::add_to_node_list, token::process): Use it. + +2001-01-27 Werner LEMBERG + + * src/roff/troff/div.h (diversion): Add `saved_prev_line_interrupted'. + * src/roff/troff/div.cc (do_divert): Use it. + + * src/roff/troff/input.cc (asciify): Add ESCAPE_RIGHT_PARENTHESIS. + +2001-01-25 Werner LEMBERG + + Adding the `linetabs' request. If set, tab distances are not + computed relative to the input line but relative to the output line. + + * src/roff/troff/env.h (environment): New member `line_tabs'. + * src/roff/troff/env.cc (line_tabs_request): Implement request. + (environment::environment, environment::copy): Updated. + (environment::distance_to_next_tab): Use `line_tabs'. + (init_env_requests): Register request. + * src/roff/troff/troff.man, man/groff.man, NEWS: Document it. Other + fixes. + +2001-01-24 Werner LEMBERG + + Introducing a new read-only register `.int' which is set to a + positive value if the last output line is interrupted (i.e., if it + contains `\c'). + + * src/roff/troff/env.cc (init_env_requests): Add it. + * NEWS, src/roff/troff/troff.man, man/groff.man: Document it. + +2001-01-23 Gaius Mulley + + * tmac/mwww.tmac: Call `www.tmac', not `arkup.tmac'. + * src/preproc/html/pre-html.cc (findPrefix): New function which + generates the troff executable name via the system prefix. + * src/preproc/eqn/main.cc: Modified warning message. + +2001-01-23 Werner LEMBERG + + troff's `box' and `boxa' requests didn't preserve temporary + indentation. + + * src/roff/troff/div.h (diversion): Add `saved_saved_indent' and + `saved_target_text_length' members. + * src/roff/troff/div.cc (do_divert): Use them. + + Tabs (but not yet leaders and fields) are now handled correctly by + `asciify' request. + + * node.h (hmotion_node): Add field `was_tab'. + * env.cc (environment::make_tab_node): Set it. + * node.cc (hmotion_node::copy, hmotion_node::asciify): Use it. + + Added new request `unformat' which will, contrary to `asciify', + preserve font information after unformatting (i.e., only nodes + dealing with horizontal space are converted back to input + characters). + + * input.cc (asciify_macro): Renamed to ... + (do_asciify_macro): this, having a new parameter `unformat_only'. + (asciify_macro, unformat_macro): New; using do_asciify_macro. + (init_input_requests): Added `unformat'. + * node.cc (*_node::asciify), asciify_reverse_node_list: Added + parameter to control asciification process. + * node.h (*_node::asciify): Ditto. + * NEWS, src/roff/troff/troff.man, man/groff.man: Document it. + +2001-01-20 Werner LEMBERG + + * doc/groff.texinfo: Minor improvement of `.in' documentation. + +2001-01-18 Werner LEMBERG + + * tmac/ps.tmac: Remove call of psold.tmac. + * tmac/psold.tmac: Comment updated. + * tmac/psnew.tmac: Removed since no longer needed. + * tmac/Makefile.sub, NEWS, src/devices/grops/grops.man: Updated. + + * font/devutf8/R.proto: Adding `shc' glyph. + * font/devutf8/NOTES: Updated. + + * test-groff: Updated. + +2001-01-15 Gaius Mulley + + First cut of the new html device driver. Changes to pre-html and + the new grohtml are too numerous to be documented here. + + Stuff related to `html' has been renamed to `html-old' and `html2' + stuff has been renamed to `html' (including directories). The new + html device driver is therefore invoked as `-Thtml'. + + Added new `\O' escape to suppress output (needed by html driver). + + Added functions and code to pass info about input-level commands + (`.in', `.fl', etc.) to html driver. + + Three new functions (.html-begin, .html-end, and .html-image) for + better html handling: `html-begin' will execute the remaining line + if at the outermost nesting level, increasing an internal counter. + `html-end' does the same but decreases the internal counter. + `html_image' puts its arguments into a special node (suppress_node) + to define an image region. + + The `output' request has been removed. + + * tmac/html-tags.tmac: Removed. + * tmac/arkup.tmac: Updated and renamed to ... + * tmac/www.tmac: New file. + * tmac/markup.tmac Updated and renamed to ... + * tmac/mwww.tmac: New file. + * tmac/Makefile.sub: Updated. + * tmac/an-old.tmac: Updated. + * tmac/eqnrc: Updated. + * tmac/groff_man.man + * tmac/groff_markup.man: Updated and renamed to ... + * tmac/groff_mwww.man: New file. + * tmac/groff_tmac.man: Updated. + * tmac/html-old.tmac: Updated and Renamed from html.tmac. + * tmac/html.tmac: Updated and renamed from html2.tmac. + * tmac/pspic.tmac: Updated html support. + * tmac/s.tmac: Added html output support. + * tmac/troffrc, tmac/troffrc-end: Updated. + + * Makefile.in, doc/Makefile: Updated. + * doc/groff.texinfo: Added info about new `\O' escape. + * doc/homepage.ms: Use `MAILTO' macro. + + * font/devhtml/DESC.proto: Add `C' font. + * font/devhtml/Makefile.sub: Updated. + * font/devhtml/R.proto: Minor fixes. + * font/devhtml-old/Makefile.sub: Updated. + + * src/devices/grohtml-old/Makefile.sub: Updated. + + * src/libs/libdriver/printer.cc (printer::get_font_from_index): New + method. + * src/libs/libgroff/htmlindicate.cc (html_begin_suppress, + graphic_start): Add `inline' parameter. Update. + (html_end_suppress, graphic_end): Update. + + * src/include/html-strings.h: New file. + * src/include/htmlindicate.h: Comments updated. + * src/include/printer.h: Updated. + + * src/preproc/eqn/main.cc (do_file, main): Updated. + * src/preproc/pic/troff.cc (troff_output::start_picture, + troff_output::finish_picture): Updated. + * src/preproc/tbl/main.cc (process_input_file): Updated. + + * src/roff/groff/groff.cc (main): Updated. + Pass device arguments to predrivers also. + Use `ps' device for `eqn' preprocessor if `-Thtml' is given. + * src/roff/troff/env.h (environment): Updated. + New elements `need_eol' and `ignore_next_eol' (for html output). + * src/roff/troff/env.cc (environment::environment): Add initializers + for `need_eol' and `ignore_next_eol'. + (environment::add_html_tag_eol, environment::add_html_tag_tabs): New + functions. + (point_size, fill, no_fill, center, right_justify, line_length, + indent, temporary_indent, break_request, handle_tab): Use + `add_html_tag()'. + (set_tabs): Use `add_html_tag_tabs()'. + (environment::add_html_tag): Updated. + (environment::do_break): Updated. + * src/roff/troff/div.cc (space_request, flush_output): Use + `environment::add_html_tag()'. + * src/roff/troff/input.cc: Updated. + New variable `html_level' to indicate nested `html-begin' requests. + (file_iterator::fill): Use `environment::add_html_tag_eol()'. + (non_interpreted_char_node, token_node, non_interpreted_node): Add + `force_tprint()' method. + (token::next): Handle `\O'. + (do_suppress): Implement it. + (html_begin, html_end, html_image): New functions. + (init_output_requests): Renamed to ... + (init_html_requests): this. + (main): Use it. + (macro::append_str, macro::append_unsigned, macro::append_int): New + methods. + New variable `output_low_mark_miny' to limit minimal value of y. + (reset_output_registers): Use it. + (output_request): Removed. + (get_output_registers): New function. + * src/roff/troff/node.h (node): Make `force_tprint()' virtual. + (*_node): Added `force_tprint()' if necessary. + (special_node): New elements `tf' and `get_tfont()'. + (suppress_node): New class. + * src/roff/troff/node.cc: + New global variables `image_no' and `suppress_start_page'. + (real_output_file): New method `is_on()'. + (troff_output_file): New method `start_special(tfont)'. + (troff_output_file::really_print_line): Use `tprint' conditionally. + (real_output_file::print_line): Updated. + (real_output_file::on): Updated. + (*_node): Added `force_tprint()'. + (special_node::special_node): Initializer updated. + (special_node::same, special_node::copy, special_node::tprint_start): + Updated. + (get_reg_int, get_reg_str): New functions. + (suppress_node::*): New methods. + New global variables last_position, last_image_filename; + (min): New inline function. + * src/roff/troff/reg.h, src/roff/troff/request.h, + src/roff/troff/troff.h: Updated. + +2001-01-13 Werner LEMBERG + + * NEWS, src/roff/troff/troff.man, doc/groff.texinfo: Fix + documentation of `asciify' request. + +2001-01-12 Werner LEMBERG + + * src/roff/troff/input.cc: Move definition of special characters + like `ESCAPE_TILDE' to ... + * src/roff/troff/input.h: New file. + * src/roff/troff/Makefile.sub (HDRS): Add it. + + Extending the .asciify request to `unformat' space characters also. + + * src/roff/troff/node.h (word_space_node): Add `num_spaces' element + to count input space characters. + Update constructors to take care of it. + * src/roff/troff/node.cc (space_char_hmotion_node::asciify): Use + `ESCAPE_SPACE' instead of normal space. + (word_space_node::asciify): New method. + (unbreakable_space_node::asciify): New method. + (word_space_node::merge_space): New method. + * src/roff/troff/env.cc (environment::space_newline, + environment::space): Add code to initialize `num_spaces' (using the + constructor of `word_space_node'). + * NEWS, src/roff/troff/troff.man, man/groff.man, doc/groff.texinfo: + Document it. + +2001-01-09 Werner LEMBERG + + * man/groff_char.man: Use table header traps only conditionally. + +2001-01-09 Bjarni Ingi Gíslason + + * man/groff_char.man: Add `ý' and `Ý' to the `acute' group. + +2001-01-08 Werner LEMBERG + + Introducing the `box' and `boxa' requests which are similar to + `di' resp. `da' but omitting a partially filled line (which is + restored after ending the diversion). + + * src/roff/troff/div.h (diversion): Add elements to save partially + filled line. + * src/roff/troff/div.cc (do_divert): Add parameter `boxing' to save + partially filled line. + (divert, divert_append): Updated. + (box, box_append): New functions. + (init_div_requests): Use them. + * src/roff/troff/env.h (environment): do_divert() is now a friend. + * NEWS, src/roff/troff/troff.man, man/groff.man: Document it. + + * doc/groff.texinfo: Fix documentation of `lf' request. + +2000-12-25 Werner LEMBERG + + * src/roff/troff/troff.man, NEWS: Document `writem' request. + +2000-12-21 Werner LEMBERG + + Ignore `ss' request if in compatibility mode. + + * src/roff/troff/input.cc: Make `compatible_flag' non-static. + * src/roff/troff/env.h: Added extern `compatible_flag' declaration. + * src/roff/troff/env.cc (space_size): Use it. + + * doc/groff.texinfo, src/roff/troff/troff.man: Fix documentation of + `ss' request in nroff mode. + + * tmac/an-old.tmac: Fixed some serious bugs introduced with latest + changes. + +2000-12-15 Ruslan Ermilov + + * tmac/troffrc, tmac/troffrc-end: Convert tmac.* to *.tmac. + +2000-12-13 Werner LEMBERG + + * src/preproc/eqn/Makefile.sub (MAN1): Added neqn.man. + * src/preproc/eqn/neqn.man: Small fixes and additions. + +2000-12-13 Ruslan Ermilov + + * src/utils/addftinfo/addftinfo.man, src/devices/grops/grops.man: + Fixing typo. + + * src/preproc/eqn/neqn.man: New file. + + * src/preproc/tbl/table.cc (table::print): Fix `indent cannot be + negative' warning. + + * tmac/e.tmac: Add `T&' macro. + Fix `indent cannot be negative' warning. + * tmac/s.tmac: Fix `indent cannot be negative' warning. + +2000-12-07 Werner LEMBERG + + * src/include/lib.h: Replaced __ALPHA with __alpha symbol. + +2000-12-06 Werner LEMBERG + + * PROBLEMS: Added info about adding -lPW on HP-UX to satisfy the + `alloca' symbol . + + * MORE.STUFF: Added info about deroff for djgpp. + + * tmac/an-old.tmac, tmac/groff_man.man, doc/groff.texinfo, NEWS: Fix + documentation of -rcR switch. + +2000-12-03 Werner LEMBERG + + * tmac/an-old.tmac: Implementing the -rcR switch (similar to mdoc); + if -rcR=1 (which is now the default in nroff mode), a single, very + long page is created instead of multiple pages: All `ne' and `wh' + requests are put into conditionals; a new macro `an-end' is added to + be called with `em'. + + Some other minor cleanups. + + * NEWS, tmac/groff_man.man, doc/groff.texinfo: Updated. + +2000-12-02 Werner LEMBERG + + Fixing a bug which prevented hyphenation in words followed + immediately by a TOKEN_NODE (e.g. `\ ', `\~', etc.). + + * src/roff/troff/input.cc (process_input_stack ): + Adding possibly_break_line(). + * src/roff/troff/env.h (environment): Make possibly_break_line() + public. + + Make `\~' usable in .tr request. + + * src/roff/troff/token.h (token_type): Add TOKEN_STRETCHABLE_SPACE. + (token): Add stretchable_space(). + * src/roff/troff/input.cc (token::next, token::delimiter, + token::description, process_input_stack, do_translate, + add_to_node_list, token::process): Use it. + * src/roff/troff/node.h (node): Add fourth parameter to add_char() + for adjusting the space. + * src/roff/troff/node.cc (node::add_char): Implement it. Add code + for stretchable space. + * src/roff/troff/input.cc (token::add_to_node_list): Use it. + (make_node): Add code for stretchable space. + * src/roff/troff/env.cc (environment::add_char): Use it. + * src/roff/troff/input.cc: Add ESCAPE_TILDE special character. + (get_copy, token::next, transparent_translate, asciify): Use it. + + * NEWS, src/roff/troff/troff.man, src/roff/troff/TODO, + doc/groff.texinfo: Updated. + * man/groff.man: Small reorderings. + +2000-11-23 Werner LEMBERG + + * NEWS: Fixes. + * src/preproc/eqn/main.cc (main): Use `config_macro_path' for -M + option. + * src/roff/troff/input.cc (main): Add `config_macro_path' and + `safer_macro_path' to -M option. + * src/roff/troff/troff.man: Fixes. + +2000-11-22 Werner LEMBERG + + Use safer path (except for config files) if -U isn't specified. Add + a special macro path (without home and current directory) for config + files. Add home directory to unsafe path for consistency. Don't + include the home directory in the font path. + + * src/lib/libgroff/macropath.cc: Add `config_macro_path', change + `macro_path'. + * src/include/macropath.h: Add `config_macrp_path'. + * src/lib/libgroff/fontfile.cc: Fix font path. + * src/roff/troff/input.cc (process_startup_file): Use + `config_macro_path'. + (main): Select unsafe path if -U is given. + + * src/preproc/eqn/main.cc (main): Fixing search path for + configuration file. + * src/preproc/eqn/eqn.man: Updated. + + * src/roff/troff/troff.man, man/roff.man, tmac/groff_tmac.man: + Updated. + + * src/preproc/grn/grn.man, src/devices/grodvi/grodvi.man, + src/devices/grohtml/grohtml.man, src/devices/grolbp/grplbp.man, + src/devices/grolj4/grolj4.man, src/devices/grops/grops.man, + src/devices/grotty/grotty.man: Updated. + + * Makefile.in: Fix comments. + +2000-11-17 Werner LEMBERG + + * tmac/safer.tmac: Empty file added (again) for compatibility + reasons. + * tmac/Makefile.sub: Updated. + +2000-11-16 Werner LEMBERG + + * src/devices/grodvi/dvi.cc (main), + src/devices/grohtml2/post-html.cc (main), + src/devices/grolbp/lbp.cc (main), src/devices/grolj4/lj4.cc + (main), src/devices/grops/ps.cc (main), src/devices/grotty/tty.cc + (main), src/preproc/eqn/main.cc (main), src/preproc/grn/main.cc + (main), src/preproc/html2/pre-html.cc (main), + src/preproc/pic/main.cc (main), src/preproc/refer/refer.cc (main), + src/preproc/soelim/soelim.cc (main), src/preproc/tbl/main.cc + (main), src/roff/groff/groff.cc (main), src/roff/troff/input.cc + (main), src/utils/hpftodit/hpftodit.cc (main), + src/utils/indxbib/indxbib.cc (main), src/utils/lkbib/lkbib.cc + (main), src/utils/lookbib/lookbib.cc (main), + src/utils/pfbtops/pfbtops.c (main), src/utils/tfmtodit/tfmtodit.cc + (main): Use stdout for -v. + * src/roff/groff/groff.cc (run_commands), + src/roff/groff/pipeline.c (run_pipeline): New parameter `no_pipe' + to make direct printing to stdout possible. + * src/roff/groff/pipeline.h: Updated. + + * src/utils/afmtodit/afmtodit.pl: Add -v switch. + * src/utils/afmtodit/Makefile.sub (afmtodit): Use @VERSION@. + * src/utils/afmtodit/afmtodit.man: Updated. + + * src/utils/addftinfo/addftinfo.cc (main): Add -v switch. + (version): New function. + (usage): Updated. + * src/utils/addftinfo/addftinfo.man: Updated. + + * src/devices/*/*, src/preproc/*/*, src/roff/*/*, src/utils/*/*: + Fixing copyright dates. + + * src/preproc/eqn/neqn.sh: Adding GROFF_BIN_PATH to path instead of + replacing it. + + * src/devices/grolbp/lbp.cc (main): Use Version_string instead of + version_string. + + * src/roff/nroff/Makefile.sub (nroff): Fix use of @VERSION@. + +2000-11-15 Werner LEMBERG + + In all programs, make -v return immediately with exit status 0 to + be compliant with the GNU standard. + + * src/devices/grodvi/dvi.cc (main), + src/devices/grohtml2/post-html.cc (main), + src/devices/grolbp/lbp.cc (main), src/devices/grolj4/lj4.cc + (main), src/devices/grops/ps.cc (main), src/devices/grotty/tty.cc + (main) src/preproc/eqn/main.cc (main), src/preproc/grn/main.cc + (main), src/preproc/html2/pre-html.cc (main), + src/preproc/pic/main.cc (main), src/preproc/refer/refer.cc (main), + src/preproc/soelim/soelim.cc (main), src/preproc/tbl/main.cc + (main), src/roff/groff/groff.cc (main), src/roff/troff/input.cc + (main): Implement it. + * NEWS: Updated. + + * src/roff/groff/groff.cc (main): Add copyright notice. Add refer + and postprocessors to the -v option. + + * src/roff/grog/grog.pl: Implement -v. + * src/roff/grog/Makefile.sub (grog): Use @VERSION@. + * src/roff/grog/grog.man, doc/groff.texinfo: Updated. + + * src/roff/nroff/nroff.sh: Implement -v. + * src/roff/nroff/Makefile.sub (nroff): Use @VERSION@. + * src/roff/nroff/nroff.man: Updated. + + * src/preproc/eqn/main.cc (main): Fix comment typo. + + * MORE.STUFF: Added info about djgpp port of grap. + +2000-11-14 Werner LEMBERG + + * src/roff/grog/grog.{pl,sh}: Implemented -C switch for compatibility + mode (or rather, implemented non-compatibility mode). + * NEWS, src/roff/grog/grog.man, doc/groff.texinfo: Updated. + + * src/roff/groff/groff.cc (main): Add BIN_PATH to PATH instead of + replacing it -- we don't find gxditview otherwise. + * NEWS, src/roff/groff/groff.man, doc/groff.texinfo: Updated. + + * src/preproc/pic/depend: Removed. Unnecessary. + + Implemented dummy keyword `solid' in pic for compatibility with + AT&T pic. + + * lex.cc (lookup_keyword): Added `solid'. + * pic.y: Added SOLID with dummy rule. + * pic.cc, pic_tab.h: Regenerated. + * doc/pic.ms: Updated. + +2000-11-13 Werner LEMBERG + + For security reasons, don't use the current directory but the home + directory while searching and scanning troffrc and troffrc-end. + Similarly, replace the current directory with the home directory + in the font path. + + * Makefile.in (fontpath, tmacpath): Remove current directory. + + * src/libs/libgroff/searchpath.cc (search_path::search_path): Add + two parameters `add_home' and `add_current'. + (search_path::~search_path, search_path::command_line_dir, + search_path::open_file): Remove tests for `dirs' being zero. + * src/include/searchpath.h: Adjust. + * src/libs/libgroff/macropath.cc, src/include/macropath.h: Add + `safer_macro_path'. + * src/libs/libgroff/fontfile.cc: Adjust `font_path'. + + * src/roff/troff/troff.h: Add `searchpath.h' and `mac_path'. + * src/roff/troff/input.cc: Use `mac_path', initialized with + `macro_path'. + (process_startup_file): Set `mac_path' to `safer_macro_path'. + * src/roff/troff/env.cc: Use `mac_path'. + + * src/preproc/eqn/main.cc (main): Use `safer_macro_path'. + + * NEWS, man/roff.man, src/roff/troff/troff.man, + src/roff/groff/groff.man, tmac/groff_tmac.man, arch/djgpp/README: + Updated. + +2000-11-12 Werner LEMBERG + + * src/include/lib.h: Don't include groff-getopt.h for OSF/1. + + * aclocal.m4 (GROFF_SYS_ERRLIST): Do test in C, not in C++. + * configure.in: Fix typo in comment. + * configure: Regenerated. + + * src/libgroff/*, src/include/*, src/roff/troff/*: Fixing copyright + dates. + +2000-11-08 Werner LEMBERG + + Add system tmac directory (/usr/local/lib/groff/site-tmac). + + * Makefile.in: Add $(libdir), $(libprogramdir), and $(systemtmacdir). + (uninstall_dirs): Add $(libdir), $(libprogramdir), and + $(systemtmacdir). + Use @libdir@. + * Makefile.comm (.man.n): Add @SYSTEMMACRODIR@. + * tmac/Makefile.sub (install_data): Create + $(systemtmacdir) and $(localtmacdir). + (uninstall_sub): Use $(systemtmacdir) for wrapper macros. + * man/roff.man, src/roff/troff/troff.man, src/roff/groff/groff.man, + NEWS, doc/groff.texinfo: Updated and minor fixes. + + * Makefile.comm, Makefile.in: Added tmac_{s,an}_prefix stuff again. + * tmac/Makefile.sub: Added `wrap' stuff again, but installing into + $(systemtmacdir) since the wrapper files are platform-dependent. + +2000-11-01 Werner LEMBERG + + * doc/groff.texinfo: Fix typo. + +2000-10-26 Werner LEMBERG + + Convert macros `tmac.XXX' to `XXX.tmac'. Special cases: + tmac.doc.old -> doc-old.tmac + tmac.an.old -> an-old.tmac + + * tmac/tmac.*: Moved to ... + * tmac/*.tmac: this. + * tmac/man.local: Fix comment. + * tmac/groff_man.man, tmac/groff_markup.man, tmac/groff_mdoc.man, + tmac/groff_me.man, tmac/groff_ms.man, tmac/groff_tmac.man: Updated. + Added some `FILES' sections. More use of @...@ directives. Other + minor updates. + * arch/djgpp/README, font/devutf8/NOTES: Updated. + * doc/homepage.ms, doc/groff.texinfo: Updated. + * man/groff.man, man/roff.man: Updated. + * src/devices/grodvi/grodvi.man, src/devices/grolbp/grolbp.man, + src/devices/grolj4/grolj4.man, src/devices/grops/grops.man, + src/devices/grotty/grotty.man: Updated. + * src/preproc/pic/pic.man: Updated. + * src/roff/grog/grog.pl, src/roff/grog/grog.sh: Use -mdoc-old + instead of -mdoc.old. + * src/roff/grog/grog.man: Document -mdoc and -mdoc-old. + * src/roff/nroff/nroff.man: Updated. + * NEWS: Updated. + + * tmac/fixmacros.sed, tmac/strip.sed: Add explanatory comment. + + * tmac/mm.diff: Removed -- it has no use now since the mm package + is part of groff. + + * tmac/*: Removed trailing spaces. + + * arch/djgpp/t-groff.bat: Fix GROFF_TMAC_PATH (hyphen.us is now in + the tmac subdirectory also). + + * Makefile.comm, Makefile.in: Remove tmac_{s,an}_prefix stuff. + * tmac/Makefile.sub: Adapted to new macro names; removed `wrap' + stuff since it is no longer needed. + + * README, PROBLEMS: Updated. + +2000-10-25 Werner LEMBERG + + Invert current behaviour: Search first FOOBAR.tmac, then + tmac.FOOBAR. + + * src/roff/troff/input.cc: Introduce MACRO_POSTFIX. + (open_mac_file, macro_source): Implement it. + * src/roff/troff/troff.man, tmac/groff_tmac.man, man/roff.man, + doc/groff.texinfo, NEWS: Document it. + + * src/roff/nroff/nroff.man, src/roff/groff/groff.man, man/groff.man: + Small documentation improvements. + + * test-groff: Fix GROFF_TMAC_PATH (hyphen.us is now in the tmac + subdirectory also). + + * font/devps/Makefile.sub: Fix rules for dingbats.*map. + +2000-10-24 Werner LEMBERG + + Add local tmac directory (groff/site-tmac). + + * Makefile.in: Add $(localtmacdir). + (uninstall_dirs): Add $(localtmacdir). + * Makefile.comm (.man.n): Add @LOCALMACRODIR@. + * tmac/Makefile.sub (install_data, uninstall_sub): Handle man.local + in $(localtmacdir). Create $(localtmacdir). + * man/roff.man, src/roff/troff/troff.man, NEWS, doc/groff.texinfo: + Updated and minor fixes. + + Rename font/devps/generate/dingbats[r]map to dingbats.[r]map. + + * font/devps/generate/Makefile.sub, arch/djgpp/README: Adjust. + +2000-10-23 Werner LEMBERG + + Move hyphen.us to tmac directory. + + * src/roff/troff/hyphen.us: Removed. + * src/tmac/hyphen.us: Added. + * src/roff/troff/Makefile.sub, tmac/Makefile.sub: Updated. + + Change installation structure for data files from .../groff/... to + .../groff//... to be conform with other GNU + programs. + + * Makefile.in, Makefile.comm, src/utils/indxbib/Makefile.sub, + doc/Makefile: Implement it. + * aclocal.m4 (GROFF_PAGE): Add test for new directory structure. + * configure: Updated. + * arch/djgpp/README, font/devutf8/NOTES: Use it. + * NEWS: Document it. + * man/roff.man, tmac/groff_tmac.man: Use @FONTPATH@, @FONTDIR@, and + @MACRODIR@ instead of hard-coded directories. + +2000-10-22 Werner LEMBERG + + Implement $GROFF_BIN_PATH environment variable (which defaults to + $bindir) used for child programs of groff and similar wrappers. + + * gendefs.sh: Improve documentation. + * Makefile.comm (,man.n), src/include/Makefile.sub (defs.h), + src/preproc/eqn/Makefile.sub (neqn), + src/roff/nroff/Makefile.sub (nroff): Add $(bindir). + * src/preproc/eqn/neqn.sh, src/roff/nroff/nroff.sh: Implement + $GROFF_BIN_PATH. + * src/roff/groff/groff.cc (main): Implement $GROFF_BIN_PATH and + $GROFF_PATH__ (the latter for communication with troff). + * src/roff/troff/input.cc (main): Use $GROFF_PATH__ for $PATH if + set. + * NEWS, src/roff/nroff/nroff.man, src/roff/groff/groff.man, + doc/groff.texinfo: Document it. + + * doc/groff.texinfo: Improve documentation of troff's -a option. + +2000-10-17 Gaius Mulley + + * src/roff/troff/node.cc: Fixed calculation of opminx and fixed + non-intrusive eol marker. + (troff_output_file::determine_line_limits): New function. + (troff_output_file::draw): Use it. + * src/roff/troff/env.cc (environment::add_html_tag): Use output() + + output_pending_lines() instead of output_line(). + * src/preproc/eqn/main.cc (do_file): Fix graphic_end(). + * src/preproc/html2/pre-html.cc (char_buffer::write_file_troff, + createImage): Small fixes. + +2000-10-14 Werner LEMBERG + + Replace tmac.safer with a real secure solution. + + * src/roff/troff/input.cc (open_request, opena_request, pipe_source, + system_request, pipe_output): Disable requests if in safer mode. + * src/roff/groff/groff.cc (main): Remove reference to tmac.safer. + * tmac/tmac.safer, tmac/groff_msafer.man: Removed. + * tmac/Makefile.sub, NEWS, man/roff.man, tmac/groff_tmac.man, + doc/groff.texinfo, src/roff/groff/groff.man, + src/roff/troff/troff.man, arch/djgpp/README: Updated. + + * src/devices/grops/ps.cc (main), src/devices/grops/psrm.cc + (resource_manager::output_prolog): Replace setenv() with putenv(). + +2000-10-09 Werner LEMBERG + + * src/libs/libbib/map.c, src/libs/libgroff/getcwd.c, + src/libs/libgroff/strtol.c, src/preproc/html2/image.cc, + src/preproc/html2/pre-html.cc, src/preproc/html2/pushbackbuffer.cc, + src/roff/groff/pipeline.c: Removing `#ifndef errno' to avoid + compilation errors with some compilers. It seems that this code + is no longer necessary -- if yes, it is easy to add some #ifdef's + for that particular old-fashioned compiler. + + * MORE.STUFF: Added info about Meta-tbl. + + * doc/groff.texinfo: Added more info about `.if "..."..."'. + +2000-10-07 Werner LEMBERG + + Adding a new escape sequence \B'...': If the string between + the delimiters is a valid numeric expression, return the character + `1', and `0' otherwise. This is an analogon to \A. + + * src/roff/troff/input.cc (do_expr_test): Implement it. + (token::next): Use it. + * src/roff/troff/troff.man, NEWS, man/groff.man: Document it. + + * tmac/tmac.trace: Made independent from escape character. + +2000-10-06 Werner LEMBERG + + Adding a new request .dei: define indirect. The first and second + parameter of .dei are taken from string registers instead directly; + this very special request is needed to make tmac.trace independent + from the escape character (which might even be disabled). + + * src/roff/troff/input.cc (do_define_macro): Implement it. + (define_macro_indirect): New function. + (init_input_requests): Use it. + + Adding two requests .ecs and .ecr: Save and restore the escape + character. These two requests are needed to make tmac.trace + independent from the escape character (which might even be + disabled). + + * src/roff/troff/input.cc (save_escape_char, restore_escape_char): + Implement it. + (init_input_requests): Use it. + + * src/roff/troff/troff.man, NEWS, man/groff.man: Updated. + +2000-09-22 Ricardo Soares Guimarães + + Adding a new option -P and new environment variable GROPS_PROLOGUE + to grops, selecting a different prologue file (minor modifications + by WL). + + * src/devices/grops/psrm.cc (resource_manager::output_prolog), + src/devices/grops/ps.cc (main): Implement it. + * src/devices/grops/grops.man, NEWS: Document it. + +2000-09-22 Werner LEMBERG + + * INSTALL: Add info about selecting paper format. + +2000-09-21 Werner LEMBERG + + * src/roff/troff/input.cc (main): Fixing compiler warning. + * src/include/{driver.h, lib.h}: Move inclusion of string.h and + strings.h from the former to the latter. + * src/devices/grolbp/lpb.cc, src/include/lib.h: Move strncasecmp() + stuff from the former to the latter. + +2000-09-11 Werner LEMBERG + + Implementing two new requests .tm1 and .tmc: The former is similar + to .tm but can output leading spaces; its syntax is similar to + defining a string, i.e., a `"' can be used to mark the beginning of + the string to be written to stderr: `.tm1 " test'. The latter is + similar to .tm1 but doesn't write out a final newline character. + + * src/roff/troff/input.cc (terminal1, terminal_continue, + do_terminal): New functions. + (init_input_requests): Use them. + * src/roff/troff/troff.man, NEWS, man/groff.man: Updated. + +2000-09-09 Werner LEMBERG + + * tmac/groff_mdoc.samples.man: Small fixes. + +2000-09-08 Werner LEMBERG + + * tmac/groff_mdoc.man: Fixing typo. + +2000-09-02 Werner LEMBERG + + Implementing a .nop request which does nothing. + + * src/roff/troff/input.cc (nop_request): New function. + (init_input_requests): Use it. + * src/roff/troff/troff.man, NEWS, man/groff.man: Updated. + +2000-09-01 Werner LEMBERG + + * doc/groff.texinfo: Added some comments. + +2000-08-30 Werner LEMBERG + + * src/roff/troff/TODO: Updated. + +2000-08-28 Bruno Haible + + * contrib/mm/Makefile.sub: New target 'all', makes all prerequisites + of 'install'. + +2000-08-25 Werner LEMBERG + + * doc/groff.texinfo: Fix comment how to compile the DVI file. + +2000-08-25 Eli Zaretskii + + * font/devps/generate/Makefile (SHELL): Define explicitly to + "/bin/sh", for non-Unix platforms. + (extraclean): Use a more portable "" quoting instead of a + backslash (which doesn't work on DOS/Windows). + + * font/devlj4/generate/Makefile (extraclean): Ditto. + + * font/devdvi/generate/Makefile (extraclean): Ditto. + +2000-08-25 Werner LEMBERG + + * NEWS, doc/groff.texinfo, tmac/groff_tmac.man, man/roff.man, + src/roff/troff/troff.man: Document Eli's latest changes. + +2000-08-25 Eli Zaretskii + + * src/roff/troff/input.cc (open_mac_file, macro_source): Support + macro file names of the form NAME.tmac as well as tmac.NAME. + +2000-08-25 Werner LEMBERG + + * src/include/posix.h: Remove definition of FILENAME_MAX. + + * src/preproc/html2/pre-html.h, pre-html.cc: Add return type to + `sys_fatal' and `stop' function(). + + * test-groff: Updated. + +2000-08-24 Gaius Mulley + + Added the new troff command .output to suppress output (while + still obeying motion) and also the opminx, opminy, opmaxx, opmaxy + registers (for passing the output dimensions to the output device). + + * src/roff/troff/div.cc (top_level_diversion::output): Use `width' + parameter. + * src/roff/troff/node.h, src/roff/troff/node.cc + (troff_output_file::really_print_line, + ascii_output_file::really_print_line, + supress_output_file::really_print_line): Use `width' parameter. + (troff_output_file::really_on, troff_output_file::really_off, + output_file::on, output_file::off, real_output_file::on, + real_output_file::off, real_output_file::really_on, + real_output_file::really_off): New functions. + (real_output_file:public output_file): New variable `output_on'. + (real_output_file::begin_page, real_output_file::copy_file, + real_output_file::transparent_char, real_output_file::print_line): + Use it. + (real_output_file::print_line): Use check_output_limits. + * src/roff/troff/reg.h, src/roff/troff/request.h, + src/roff/troff/input.cc (assign_registers): New function to remove + two `goto's. + (do_ps_file): Use it. + (check_output_limits, reset_output_registers, output_request, + init_output_requests): New functions. + (init_input_requests): Updated. + + Added new grohtml2 device and html2 preprocessor (coding + not yet finished) which will eventually replace grohtml. + + * Makefile.in, tmac/Makefile.sub, tmac/eqnrc, tmac/troffrc-end: + Updated. + * src/include/htmlindicate.h, src/include/htmlindicate + (html_begin_suppress, html_end_suppress): New functions. + * src/preproc/tbl/main.cc: Use it. + * src/roff/groff/groff.cc: Add support for html2 device (which will + automatically invoke the html2 preprocessor). + * src/roff/troff/input.cc (is_html2): New variable. + * src/roff/troff/troff.h, src/roff/troff/env.h, + src/roff/troff/env.cc (environment::add_html_tag): New function + (uses `is_html2'). + (environment::do_break): Use it. + * font/devhtml2/*: New files. + * src/devices/grohtml2: New device. + * src/preproc/html2: New preprocessor. + * tmac/tmac.html-tags, tmac/tmac.html2: New files. + +2000-08-23 Werner LEMBERG + + * src/devices/grolbp/lbp.cc: Same workaround for sinix as for AIX. + +2000-08-22 Werner LEMBERG + + * src/include/lib.h: Provide a fix for IRIX to not include + groff-getopt.h. + +2000-08-18 Werner LEMBERG + + * configure.in: Don't provide an empty value for SH_SCRIPT_SED_CMD + since some non-GNU sed programs can't handle null regexps. + * configure, src/preproc/eqn/Makefile.sub, + src/roff/grog/Makefile.sub, src/roff/nroff/Makefile.sub: Updated. + + * src/devices/grolbp/lbp.cc: Add an AIX workaround for an autoconf + bug (string.h and strings.h are both needed according to latest + POSIX standard). + + * MORE.STUFF: Added info about unroff and troffcvt. + +2000-08-08 Werner LEMBERG + + * tmac/tmac.a4: Will now work with ms macros also; -ma4 should be + used before -ms. + + * tmac/tmac.man.old: Remove unused number register. + + * tmac.doc: Minor documentation fix. + +2000-08-07 Paul Eggert + + * src/roff/groff/pipeline.c (is_system_shell): + Fix typo: "monocased_shell" no longer exists. + +2000-08-07 Paul Eggert + + Remove FILENAME_MAX limits. + + * src/roff/groff/pipeline.c (is_system_shell): Do not assume + that the argument length is less than FILENAME_MAX. + * src/libs/libgroff/tmpfile.cc (add_tmp_file): Likewise. + Use struct hack to allocate and free file name. + (struct xtmpfile_list): fname is now part of the structure, + not a pointer to another string. + +2000-08-07 Tom Schmidt + + * src/include/posix.h: Add a default value for FILENAME_MAX. + +2000-08-06 Paul Eggert + + Add support for new BSD-style man pages (with ".Dd" instead of + ".TH"), so that "groff -man" understands both styles, even + when running "groff -man" on a host whose system man page + macros don't support ".Dd". + + * tmac/Makefile.sub (NORMALFILES): Add tmac.an.old. + (stamp-wrap): Source tmac.andoc first when wrapping man macros, + in case the system man macros don't define Dd or TH. + + * tmac/tmac.an.old: Renamed from tmac/tmac.an. + * tmac/tmac.an: New one-line file. + * tmac/tmac.andoc (TH): Adjust to the tmac.an.old file renaming. + +2000-08-06 Werner LEMBERG + + * src/roff/troff/troff.man: Fixing typos. + +Version 1.16.1 released +======================= + 2000-07-31 Werner LEMBERG Preparing release 1.16.1. @@ -1620,8 +3372,6 @@ * PROJECTS, PROBLEMS, NEWS: Updated. - * xditview/Makefile: Removed. - * VERSION: Updated to 1.12beta. * BUG-REPORT: Some cosmetic fixes. Corrected email address. @@ -1806,7 +3556,7 @@ * README, PROJECTS, NEWS, INSTALL, VERSION, doc/Makefile. doc/pic.ms, groff/groff.man: Prepare for 1.11 release. No code changes. - Documentation for pic added (doc/pic.ms). + Documentation for pic added (doc/pic.ms). Sun Nov 26 11:45:13 1995 James Clark @@ -7524,4 +9274,5 @@ Local Variables: version-control: never +coding: latin-1 End: diff -aruN groff-1.16.1/INSTALL groff-1.17/INSTALL --- groff-1.16.1/INSTALL Sun Jun 18 12:13:50 2000 +++ groff-1.17/INSTALL Fri Sep 22 18:09:22 2000 @@ -19,6 +19,16 @@ using the malloc that comes with GNU Emacs version 20 can give a worthwhile (and sometimes spectacular) performance improvement. +If you want A4 or letter paper format and the configure script produces +an incorrect guess, say + + PAGE=xxx ./configure + +where `xxx' should be either `A4' or `letter'. Note that this will only +affect the paper selection for grops. For compatibility with ditroff, +the default page length in gtroff is always 11 inches. The page length +can be changed with the `pl' request. + When you have built groff, you can use the test-groff script to try groff out on one of the man pages. (Use the .n files not the .man files.) The test-groff script sets up environment variables to allow diff -aruN groff-1.16.1/MORE.STUFF groff-1.17/MORE.STUFF --- groff-1.16.1/MORE.STUFF Mon Jul 31 12:41:29 2000 +++ groff-1.17/MORE.STUFF Fri Apr 13 19:11:31 2001 @@ -12,8 +12,7 @@ Kees Zeelenberg : - ftp://ftp.franken.de/pub/win32/develop/gnuwin32/ - cygwin/porters/Zeelenberg_Kees/B20/index.html + http://gnuwin32.sourceforge.net/ dos --- @@ -34,6 +33,13 @@ http://www.lunabase.org/~faber/Vault/software/grap/ +A djgpp port which runs on MS-DOS and all Win32 systems (Win95, Win98, +WinNT) done by Kees Zeelenberg is available from + + ftp://ftp.simtel.net/pub/simtelnet/gnu/djgpp/v2apps/ + +It is intended to be used with the djgpp port of groff. + plot2dev -------- @@ -44,6 +50,59 @@ ftp://ftp.ffii.org/pub/groff/plot2dev-x.x.tar.gz +troffcvt +-------- + +From the web page: + + troffcvt is a translator that turns troff input into a form that can be + more easily processed. The troffcvt distribution comes with + postprocessors that turn troffcvt into various destination formats such + as HTML (Hypertext Markup Language), RTF (Rich Text Format) or plain + text. + +Note that you need a lot of additional packages to compile troffcvt; +everything is available from + + http://www.primate.wisc.edu/software/troffcvt/ + +unroff +______ + +From the README file: + + Unroff is a Scheme-based, programmable, extensible troff translator with + a back-end for the Hypertext Markup Language. Unroff is free software + and is distributed both as source and as precompiled binaries. + + http://www.informatik.uni-bremen.de/~net/unroff/unroff.html + +You need als Elk, the Scheme based Extension Language Kit, which is +available from + + http://www.informatik.uni-bremen.de/~net/elk + +deroff +------ + +Deroff removes roff constructs from documents for the purpose of indexing, +spell checking etc. + +Michael Haardt's implementation is a little smarter than +traditional implementations, because it knows about certain -man and +-mm macros. It is able to generate a word list for spell checking tools +or omit headers for sentence analysis tools. It can further generate +cpp-style #line lines. + + http://www.moria.de/deroff/ + +Version 1.6 compiled with DJGPP (for MS-DOS and all Win32 systems, i.e. +Win95, Win98, WinNT) is available from + + ftp://ftp.simtel.net/pub/simtelnet/gnu/djgpp/v2apps/ + +and its mirrors. + miscellaneous ------------- @@ -79,6 +138,12 @@ Australian Journal of Management. They use the Memorandum Macros (mm) of AT&T, and so should be invoked with the UNIX troff -mm flag; they should also work with the GNU troff -mm flag. + +. Thomas Baruchel has developed Meta-tbl, a tbl + postprocessor to manipulate table cells (like adding gray shades). The + latest version can be found at + + http://perso.libertysurf.fr/baruchel/ documentation ------------- diff -aruN groff-1.16.1/Makefile.comm groff-1.17/Makefile.comm --- groff-1.16.1/Makefile.comm Sun Jun 18 12:13:50 2000 +++ groff-1.17/Makefile.comm Wed Nov 8 17:17:34 2000 @@ -119,9 +119,12 @@ .man.n: @echo Making $@ from $< @-rm -f $@ - @sed -e "s|@FONTDIR@|$(fontdir)|g" \ + @sed -e "s|@BINDIR@|$(bindir)|g" \ + -e "s|@FONTDIR@|$(fontdir)|g" \ -e "s|@FONTPATH@|$(fontpath)|g" \ -e "s|@MACRODIR@|$(tmacdir)|g" \ + -e "s|@SYSTEMMACRODIR@|$(systemtmacdir)|g" \ + -e "s|@LOCALMACRODIR@|$(localtmacdir)|g" \ -e "s|@MACROPATH@|$(tmacpath)|g" \ -e "s|@DEVICE@|$(DEVICE)|g" \ -e "s|@DEFAULT_INDEX@|$(indexdir)/$(indexname)|g" \ @@ -205,6 +208,7 @@ .PHONY: install_dev install_dev: -test -d $(datadir) || $(mkinstalldirs) $(datadir) + -test -d $(dataprogramdir) || $(mkinstalldirs) $(dataprogramdir) -test -d $(datasubdir) || $(mkinstalldirs) $(datasubdir) -test -d $(fontdir) || $(mkinstalldirs) $(fontdir) -test -d $(fontsubdir) || $(mkinstalldirs) $(fontsubdir) diff -aruN groff-1.16.1/Makefile.in groff-1.17/Makefile.in --- groff-1.16.1/Makefile.in Mon Jul 31 17:12:55 2000 +++ groff-1.17/Makefile.in Sat Apr 14 16:25:12 2001 @@ -1,4 +1,4 @@ -# Copyright (C) 1989-2000 Free Software Foundation, Inc. +# Copyright (C) 1989-2000, 2001 Free Software Foundation, Inc. # Written by James Clark (jjc@jclark.com) # # This file is part of groff. @@ -17,6 +17,15 @@ # with groff; see the file COPYING. If not, write to the Free Software # Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. +srcdir=@srcdir@ +top_srcdir=@top_srcdir@ +VPATH=@srcdir@ +top_builddir=@top_builddir@ + +version=`cat $(top_srcdir)/VERSION` +# No additional number if revision is zero +revision=`sed -e 's/^0$$//' -e 's/^[1-9].*$$/.&/' $(top_srcdir)/REVISION` + # Define `page' to be letter if your PostScript printer uses 8.5x11 # paper (USA) and define it to be A4, if it uses A4 paper (rest of the # world). @@ -71,27 +80,41 @@ # Used in definitions of exec_prefix, datasubdir, fontpath, manroot. # This must already exist when you do make install. prefix=@prefix@ - exec_prefix=@exec_prefix@ # bindir says where to install executables. -bindir=$(exec_prefix)/bin +bindir=@bindir@ -# datasubdir says where to install data files +# libdir says where to install platform-dependent data +libdir=@libdir@ +libprogramdir=$(libdir)/groff + +# datasubdir says where to install platform-independent data files datadir=@datadir@ -datasubdir=$(datadir)/groff +dataprogramdir=$(datadir)/groff +datasubdir=$(dataprogramdir)/$(version)$(revision) # fontdir says where to install dev*/*. fontdir=$(datasubdir)/font # fontpath says where to look for dev*/*. -fontpath=.:$(fontdir):/usr/lib/font +fontpath=$(fontdir):/usr/lib/font # tmacdir says where to install macros. tmacdir=$(datasubdir)/tmac +# systemtmacdir says where to install platform-dependent macros +systemtmacdir=$(libprogramdir)/site-tmac + +# localtmacdir says where local files will be installed +localtmacdir=$(dataprogramdir)/site-tmac + # tmacpath says where to look for macro files. -tmacpath=.:$(tmacdir) +# The current directory will be prepended in unsafe mode only; the home +# directory will be always added. +# `troffrc' and `troffrc-end' (and `eqnrc') are searched neither in the +# current nor in the home directory. +tmacpath=$(systemtmacdir):$(localtmacdir):$(tmacdir) # sys_tmac_prefix is prefix (if any) for system macro packages sys_tmac_prefix=@sys_tmac_prefix@ @@ -225,11 +248,6 @@ # Sed command with which to edit sh scripts. SH_SCRIPT_SED_CMD=@SH_SCRIPT_SED_CMD@ -srcdir=@srcdir@ -top_srcdir=@top_srcdir@ -VPATH=@srcdir@ -top_builddir=@top_builddir@ - # the program to create directory hierarchies mkinstalldirs=$(top_srcdir)/mkinstalldirs @@ -253,13 +271,18 @@ "top_builddir=$(top_builddir)" \ "prefix=$(prefix)" \ "exec_prefix=$(exec_prefix)" \ - "bindir=$(bindir)" \ "g=$(g)" \ "datadir=$(datadir)" \ + "dataprogramdir=$(dataprogramdir)" \ "datasubdir=$(datasubdir)" \ + "libdir=$(libdir)" \ + "libprogramdir=$(libprogramdir)" \ + "bindir=$(bindir)" \ "fontdir=$(fontdir)" \ "fontpath=$(fontpath)" \ "tmacdir=$(tmacdir)" \ + "systemtmacdir=$(systemtmacdir)" \ + "localtmacdir=$(localtmacdir)" \ "tmacpath=$(tmacpath)" \ "indexext=$(indexext)" \ "indexdir=$(indexdir)" \ @@ -318,6 +341,7 @@ src/preproc/grn \ src/preproc/refer \ src/preproc/soelim \ + src/preproc/html \ src/devices/grops \ src/devices/grotty \ src/devices/grodvi \ @@ -461,15 +485,10 @@ -f $$srcdir/Makefile.sub \ -f $(top_srcdir)/Makefile.man $(do) -version=`cat $(top_srcdir)/VERSION` -# No additional number for the groff archive if revision is zero -revision=`sed -e 's/^0$$//' -e 's/^[1-9].*$$/.&/' $(top_srcdir)/REVISION` - .PHONY: dist dist: -rm -fr tmp rm -f groff-$(version)$(revision).tar.gz - rm -f src/xditview/Imakefile; mkdir tmp for d in $(DISTDIRS); do \ $(mkinstalldirs) tmp/$$d; \ @@ -518,7 +537,9 @@ uninstall_dirs: # Use rmdir here so that the directories are only removed if they're empty -rmdir $(man1dir) $(man5dir) $(man7dir) $(manroot) \ - $(tmacdir) $(fontdir) $(bindir) $(datasubdir) $(datadir) + $(tmacdir) $(systemtmacdir) $(localtmacdir) $(fontdir) $(bindir) \ + $(datasubdir) $(dataprogramdir) $(datadir) \ + $(libprogramdir) $(libdir) .PHONY: check diff -aruN groff-1.16.1/Makefile.sub groff-1.17/Makefile.sub --- groff-1.16.1/Makefile.sub Sun Feb 6 10:34:30 2000 +++ groff-1.17/Makefile.sub Wed Apr 11 19:41:59 2001 @@ -1,4 +1,5 @@ -DISTCLEANFILES=config.status config.log config.cache Makefile +DISTCLEANFILES=config.status config.log config.cache Makefile \ + src/xditview/Imakefile CLEANADD=Makefile.cfg conftest* distfiles: configure diff -aruN groff-1.16.1/NEWS groff-1.17/NEWS --- groff-1.16.1/NEWS Mon Jul 31 12:41:29 2000 +++ groff-1.17/NEWS Tue Apr 10 14:54:11 2001 @@ -1,6 +1,244 @@ This file describes recent user-visible changes in groff. Bug fixes are not described. There are more details in the man pages. +Groff +----- + +o `-mFOO' will now search first for `FOO.tmac' and then for `tmac.FOO'. The + old behaviour has been changed to overcome problems with platforms which + have an 8+3 file name limit, and platforms which have other versions of + troff installed also. Additionally, all macro files have been renamed + using the latter scheme to avoid 8+3 name clashes. + +o The new environment variable GROFF_BIN_PATH will be checked for programs + groff is calling (preprocessors, troff, and output devices) before PATH. + If not set, it defaults to the directory where the groff binary is + located. Previously, it was PATH only. The nroff script will only use + GROFF_BIN_PATH to find the groff binary but passes both the GROFF_BIN_PATH + and PATH environment variable to groff. + +Troff +----- + +o The mdoc package has been completely rewritten, using the full power of + GNU troff to remove limitations of Unix troff (which is no longer + supported). Most important changes are: + + . No argument limit. + . Almost all macros are parsed and callable (if it makes sense). + . `.Lb': prints library names + . `.Nm ' now works as expected; `.Nm "" ' has + been withdrawn. + . Updated `.St' command + . `.Fx': prints FreeBSD + . `.Ox': prints OpenBSD + . `.Bsx': prints BSD/OS + . `.Brq', `.Bro', `.Brc': brace enclosure macros + . `.Bd -centered': center lines + . `.Bl -xwidth ': interpret and use the resulting width + . support for double-sided printing (-rD1 command line switch) + . support for 11pt and 12pt document sizes (-rS11, -rS12 command line + switches) + + `groff_mdoc.man' replaces `groff_mdoc.samples.man'; it now completely + documents the mdoc package. + + Great care has been taken to assure backwards compatibility. If you + encounter any abnormal results, please report them to bug-groff@gnu.org. + +o A new command line option for the `man' macros (similar to the `mdoc' + package has been implemented: `-rcR=1' (now the default in nroff mode) will + produce one single, very long page instead of multiple pages. `-rcR=0' + will deactivate it. + +o The `return' request has been added to return immediately from a macro. + +o A new request `nop' (no operation) has been added which is similar to + `if 1'. For example, + + .if t \{\ + Hallo! + .\} + + can now be written as + + .if t \{\ + . nop Hallo! + .\} + +o `box' and `boxa' are two new requests which behave similarly to `di' and + `da' but don't include a partially filled line (which is restored after + ending the diversion). + +o The `asciify' request has been extended to `unformat' space characters + and some other escape sequences also. + + `\ ' will no longer be unformatted as a space but remains an unpaddable, + unbreakable space character. + +o The new `unformat' request is similar to `asciify' but only handles space + characters and tabs specially if the diversion is reread, retaining font + information. This makes it possible to reformat diversions; for example + the following + + .ll 3i + . + a01 a02 a03 a04 a05 a06 a07 a08 a09 a10. + . + .box box1 + .ev 1 + .nf + \f[B]b01 b02 b03 b04 b05 b06 b07 b08 b09 b10.\f[P] + .br + .ev + .box + . + c01 c02 c03 c04 c05 c06 c07 c08 c09 c10. + . + .unformat box1 + .box1 + + gives + + a01 a02 a03 a04 a05 a06 a07 + a08 a09 a10. c01 c02 c03 c04 + c05 c06 c07 c08 c09 c10. b01 + b02 b03 b04 b05 b06 b07 b08 + b09 b10. + + Without the `unformat' request, space characters are converted to word + space nodes which are no longer stretchable, and the result would be + + a01 a02 a03 a04 a05 a06 a07 + a08 a09 a10. c01 c02 c03 c04 + c05 c06 c07 c08 c09 c10. b01 + b02 b03 b04 b05 b06 b07 b08 + b09 b10. + +o The new request `linetabs' controls the `line-tabs' mode. In line-tabs + mode, tab distances are computed relative to the (current) output line. + Otherwise they are taken relative to the input line. For example, the + following + + .ds x a\t\c + .ds y b\t\c + .ds z c + .ta 1i 3i + \*x + \*y + \*z + + yields + + a b c + + In line-tabs mode, the same code gives + + a b c + + The new read-only number register `.linetabs' returns 1 if in line-tabs + mode, and 0 otherwise. + +o Two new requests `tm1' and `tmc' have been added to improve writing + messages to the terminal. `tm1' is similar to `tm' but allows leading + whitespace. `tmc' is similar to `tm1' but doesn't emit a final newline. + +o A new request `dei' (define indirect) has been added. The first and + second parameter of `dei' are taken from string registers rather than + directly; this very special request is needed to make `trace.tmac' + independent from the escape character (which might even be disabled). + +o It is now possible to save and restore the escape character with two new + requests `ecs' and `ecr'. + +o The new escape sequence \B'...' is an analogon to `\A': If the string + within the delimiters is a valid numeric expression, return character `1', + and `0' otherwise. + +o The new escape sequence `\:' inserts a zero-width break point. This is + similar to `\%' but without a soft hyphen character. + +o The `tr' request can now map characters onto `\~'. + +o Calling the `fam' request without an argument switches back to the + previous font family. + +o The new read-only register `.int' is set to a positive value if the last + output line is interrupted (i.e., if it contains `\c'). + +o The `writem' request is not new, but hasn't been documented before. This + is similar to `write' but instead of a string the contents of a given + macro or string is written to a stream. + +o The read/write number register `hp' to get/set the current horizontal + position relative to the input line isn't new but hasn't been documented + properly before. + +o `\X' and `\Y' are no transparent for end-of-sentence recognition. + +o The `cu' request in nroff mode now works as documented (i.e., it does + underline spaces also). + +Nroff +----- + +Option -v shows the version number. + +Grog +---- + +o The grog script will now work in non-compatibility mode also (which is the + default). As usual, use the `-C' option to activate compatibility mode. + +o Option -v shows the version number. + +Grops +----- + +A new option `-P' resp. a new environment variable `GROPS_PROLOGUE' has been +added to select a different prologue file. + +The effect of the former `-mpsnew' option to access more Type 1 characters +is now the default and no longer available. To get the old behaviour (i.e., +emulation of some glyphs by composition) use `-mpsold'. + +Miscellaneous +------------- + +o For security reasons the following changes have been done: + + . The tmac.safer file has been replaced with a built-in solution; .open, + .opena, .pso, .sy, and .pi are completely disabled in safer mode (which + is the default); to enable these requests the `-U' command line flag + must be used. + + . Files specified with the .mso request or given with the `-m' command + line option, and hyphenation patterns loaded with `.hpf' are no longer + searched in the current directory by default (besides the usual tmac + path). Instead, the home directory is used. To add the current + directory, either use the `-U' or `-M' command line option or set the + GROFF_TMAC_PATH environment variable to an appropriate value. + + . troffrc, troffrc-end, and eqnrc are neither searched in the current nor + in the home directory (even if -U is given). Use -M or GROFF_TMAC_PATH + to change that. + + . Similarly, the current directory is no longer part of the font path. + Use the `-F' command line option or the GROFF_FONT_PATH environment + variable if you really need the current directory. + +o groff will now install its data files into + /usr/local/share/groff/ by default, following the GNU standard. + Additionally, a local tmac directory (by default + /usr/local/share/groff/site-tmac) will be scanned before the standard tmac + directory. Wrapper files for system-specific macro packages (if + necessary) are put into /usr/local/lib/groff/site-tmac; this directory + will be searched before the local tmac directory. + +o All programs now have option `-v' to show the version number; they will + exit immediately afterwards, following the GNU standards. Additionally, + `--version' and `--help' have been added, doing the obvious actions. + VERSION 1.16.1 ============== diff -aruN groff-1.16.1/PROBLEMS groff-1.17/PROBLEMS --- groff-1.16.1/PROBLEMS Fri Jul 21 12:23:28 2000 +++ groff-1.17/PROBLEMS Fri Apr 13 11:03:52 2001 @@ -118,11 +118,11 @@ * On Ultrix, the make stops with the message - *** Error code 1 + *** Error code 1 - Stop. + Stop. -for no apparent reason. + for no apparent reason. Use GNU make. @@ -172,10 +172,10 @@ ---------------------------------------------------------------------- -* Groff can't handle my troff document. It works fine with AT&T troff. +* Groff can't handle my troff document. It works fine with AT&T troff. Read the section on incompatibilities in gtroff(1). Try using the -C -option. Alternatively there's the sed script in tmac/fixmacros.sed +option. Alternatively there's the sed script `tmac/fixmacros.sed' which will attempt to edit a file of macros so that it can be used with groff without the -C flag. @@ -186,7 +186,8 @@ Yes, it does. You may need to compile fonts with Metafont at these magnifications. The CompileFonts script in the devdvi/generate -directory may help you to do this. (It will take a *long* time.) +directory may help you to do this. (It will take a *long* time on +slow computers.) ---------------------------------------------------------------------- @@ -222,7 +223,7 @@ ---------------------------------------------------------------------- * I've configured groff for A4 paper, but gtroff still seems to think - that the length of a page (as returned by \n(.p) is 11 inches. + that the length of a page (as returned by `\n(.p') is 11 inches. This is intentional. The PAGE option is used only by grops. For compatibility with ditroff, the default page length in gtroff is @@ -231,9 +232,22 @@ ---------------------------------------------------------------------- +* groff produces wrapper macros for `ms' and friends which call the + system's original macros. Then, to get groff's ms macro package I + have to use `-mgs' instead `-ms'. Can I avoid this? + +Yes. Configure and compile groff as usual, but install it with + + make install tmac_wrap="" + +Then no wrapper files are produced, and `-ms' will use groff's `ms' +macros. + +---------------------------------------------------------------------- + * Groff doesn't use the font names I'm used to. -Use the `ftr' request. See gtroff(1). +Use the `ftr' request. See (g)troff(1). ---------------------------------------------------------------------- @@ -326,11 +340,7 @@ * I get lots of errors when I use groff with the AT&T -mm macros. -The AT&T -mm macros need a few changes to work with groff; `make -install.dwbmm' will copy your -mm macros to groff's macro directory -and make the necessary changes. You may need to edit the commands for -the install.mm target in the Makefile. Alternatively use the groff --mm macros. +Use the groff -mm macros. ---------------------------------------------------------------------- @@ -369,7 +379,7 @@ There seem to be many different styles of page header and footer produced by different versions of the -man macros. You will need to -modify macros/tmac.an to suit your personal taste. For example, if +modify tmac/an-old.tmac to suit your personal taste. For example, if you want the center of the page header to say System Programmer's Manual @@ -410,10 +420,9 @@ The Ultrix man pages use a number of non-standard extensions to the Unix man macros. One solution is to use the Ultrix -man macros with -groff. Rename /usr/local/lib/groff/tmac/tmac.an to -/usr/local/lib/groff/tmac/tmac.an.gnu, copy /usr/lib/tmac/tmac.an to -/usr/local/lib/groff/tmac/tmac.an and apply the following patch (from -Frank Wortner): +groff. Copy /usr/lib/tmac/tmac.an to +/usr/local/share/groff/site-tmac/an.tmac and apply the following patch +(from Frank Wortner): *** /usr/local/lib/groff/tmac/tmac.an Wed Sep 9 12:29:28 1992 --- /usr/lib/tmac/tmac.an Fri Jul 24 19:58:19 1992 @@ -436,17 +445,25 @@ .}f Another possible solution is to install tmac/man.ultrix as -/usr/local/lib/groff/tmac/man.local. +/usr/local/share/groff/site-tmac/man.local. ---------------------------------------------------------------------- * I'm having problems formatting HP-UX 9.0 man pages with groff -man. -Rename /usr/local/lib/groff/tmac/tmac.an to (for example) -/usr/local/lib/groff/tmac/tmac.gan, copy HP's tmac.an into -/usr/local/lib/groff/tmac/tmac.an, and either put `.cp 1' at the -beginning or filter it (and any files it .so's) through -tmac/fixmacros.sed. +Copy HP's tmac.an into /usr/local/share/groff/site-tmac/an.tmac, and +either put `.cp 1' at the beginning or filter it (and any files it .so's) +through tmac/fixmacros.sed. + +---------------------------------------------------------------------- + +* On HP-UX, the compiler complains about missing symbol `alloca'. + +Say + + export LDFLAGS=-lPW + +before starting the configure script. ---------------------------------------------------------------------- diff -aruN groff-1.16.1/README groff-1.17/README --- groff-1.16.1/README Fri Mar 3 22:48:41 2000 +++ groff-1.17/README Thu Oct 26 23:49:47 2000 @@ -20,7 +20,7 @@ in compiling, installing, and running groff. For the moment, the documentation assumes that you are already familiar -with the Unix versions of troff, -man, -ms, and the preprocessors. +with the Unix versions of troff, -ms, and the preprocessors. The most recent released version of groff is always available by anonymous ftp from ftp.gnu.org in the directory pub/gnu/groff. diff -aruN groff-1.16.1/REVISION groff-1.17/REVISION --- groff-1.16.1/REVISION Mon Jul 31 12:41:29 2000 +++ groff-1.17/REVISION Tue Jan 30 15:54:55 2001 @@ -1 +1 @@ -1 +0 diff -aruN groff-1.16.1/VERSION groff-1.17/VERSION --- groff-1.16.1/VERSION Sun Feb 6 10:34:36 2000 +++ groff-1.17/VERSION Tue Jan 30 15:54:55 2001 @@ -1 +1 @@ -1.16 +1.17 diff -aruN groff-1.16.1/aclocal.m4 groff-1.17/aclocal.m4 --- groff-1.16.1/aclocal.m4 Sun Jun 11 08:27:26 2000 +++ groff-1.17/aclocal.m4 Sat Apr 14 16:25:12 2001 @@ -1,5 +1,5 @@ dnl Autoconf macros for groff. -dnl Copyright (C) 1989, 1990, 1991, 1992, 1995 Free Software Foundation, Inc. +dnl Copyright (C) 1989-1995, 2001 Free Software Foundation, Inc. dnl dnl This file is part of groff. dnl @@ -129,15 +129,12 @@ dnl dnl AC_DEFUN(GROFF_SYS_ERRLIST, -[AC_LANG_SAVE -AC_LANG_CPLUSPLUS -AC_MSG_CHECKING([for sys_errlist[] in or ]) +[AC_MSG_CHECKING([for sys_errlist[] in or ]) AC_TRY_COMPILE([#include #include ], [int k; k = (int)sys_errlist[0];], AC_MSG_RESULT(yes);AC_DEFINE(HAVE_SYS_ERRLIST), -AC_MSG_RESULT(no)) -AC_LANG_RESTORE])dnl +AC_MSG_RESULT(no))])dnl dnl dnl AC_DEFUN(GROFF_OSFCN_H, @@ -238,6 +235,13 @@ descfile=$prefix/share/groff/font/devps/DESC elif test -r $prefix/lib/groff/font/devps/DESC; then descfile=$prefix/lib/groff/font/devps/DESC + else + for f in $prefix/share/groff/*/font/devps/DESC; do + if test -r $f; then + descfile=$f + break + fi + done fi if test -n "$descfile" \ && grep "^paperlength 841890" $descfile >/dev/null 2>&1; then diff -aruN groff-1.16.1/arch/djgpp/README groff-1.17/arch/djgpp/README --- groff-1.16.1/arch/djgpp/README Sun Jun 18 12:03:58 2000 +++ groff-1.17/arch/djgpp/README Mon Nov 13 17:51:27 2000 @@ -24,9 +24,11 @@ where you unzip Groff. In this latter case, you will need to set additional environment variables: - GROFF_TMAC_PATH=.;%DJDIR%/share/groff/tmac - GROFF_TYPESETTER=ascii - GROFF_FONT_PATH=.;%DJDIR%/share/groff/font + GROFF_TMAC_PATH=%DJDIR%/share/groff//tmac:%DJDIR%/share/groff/site-tmac + GROFF_TYPESETTER=ascii + GROFF_FONT_PATH=%DJDIR%/share/groff//font + + is something like `1.16.1' or `1.17'. In addition, you can set the variable GROFF_TMPDIR to point to a directory where you want Groff to create temporary files it @@ -74,34 +76,34 @@ 5. For those who only need Groff to format man pages and don't like reading the docs, here's a minimal cookbook: - groff -man -s foo.1 > foo.man + groff -man -s foo.1 > foo.man where `foo.1' is the troff source of the man page and `foo.man' is the formatted page. If you need to view the man page, say this: - groff -man -s foo.1 | less + groff -man -s foo.1 | less You can also use the DJGPP clone of the Unix `man' command, in which case `man' runs the above command for you automatically. Here's how you print man pages on a PostScript printer: - groff -man -s -Tps foo.1 > prn + groff -man -s -Tps foo.1 > prn And this is for a LaserJet4 printer: - groff -man -s -Tlj4 foo.1 > prn + groff -man -s -Tlj4 foo.1 > prn Printing the documents produced by Groff is possible either by - redirecting Groff's stdandard output to the local printer + redirecting Groff's standard output to the local printer device, like shown above, or by using the `-l' switch to Groff. The latter possibility causes Groff to pipe its output to a program whose name and arguments appear in the files named `DESC' in each of the `devFOO' subdirectories of the - %DJDIR%/share/groff/font directory; for example, the file - devps/DESC is used by "groff -Tps". The relevant line in these - files begins with the word "print". + %DJDIR%/share/groff//font directory; for example, the + file devps/DESC is used by "groff -Tps". The relevant line in + these files begins with the word "print". As configured, when invoked with the `-l' switch, Groff will call `cat' (from GNU Textutils) to pipe its output to the @@ -117,7 +119,7 @@ Beginning with version 1.15, Groff can create HTML output, like this: - groff -man -s -Thtml foo.1 > foo.html + groff -man -s -Thtml foo.1 > foo.html Producing HTML files sometimes requires Ghostscript to be installed, and, for gif images, ppmquant and ppmtogif as well. @@ -136,10 +138,10 @@ These scripts need the following utilities to run (in addition to the Groff programs they invoke): - - bash - - gawk - - egrep - - sed + - bash + - gawk + - egrep + - sed The `afmtodit' and `mmroff' utilities are Perl scripts, so you will need a Perl port to run them. @@ -162,34 +164,16 @@ DJGPP FAQ list in case you have any problems with the emulator. 8. The package does not include the directories under - share/groff/font whose names begin with "devX": these are - needed on X-Windows for running the gxditview program, which is - not supported by this port. + share/groff//font whose names begin with "devX": these + are needed on X-Windows for running the gxditview program, which + is not supported by this port. 9. Due to 8+3 limitations of DOS filesystems, several files were renamed: - - tmac.mandoc was renamed to tmac.mndoc; you will need to say - "groff -m mndoc" instead of "groff -m mandoc". "groff -mandoc" - still works as usual. - - - tmac.tty-char was renamed to tmac.ttchar. All the files in - the distribution that referenced tmac.tty-char were edited - to refer to the new name. - - - tmac.doc.old was renamed to tmac.old-doc. Use -mold-doc - instead of -mdoc.old switch. The `grog' utility was - changed to suggest the -mold-doc switch instead of - -mdoc.old. - - - dingbatsmap and dingbatsrmap were renamed to dingbats.map - and dingbats.rmap, respectively. The Makefile in the - font/devps/generate directory was modified accordingly. - - - groff_mdoc.samples.7 was renamed to groff-mdoc_samples.7, - groff_msafer.7 to groff-msafer.7, and groff_mmse.7 to - groff-mmse.7. The latter was also converted from Latin-1 - encoding to codepage 437. + - groff_mdoc.samples.7 was renamed to groff-mdoc_samples.7 + and groff_mmse.7 to groff-mmse.7. The latter was also + converted from Latin-1 encoding to codepage 437. @@ -200,18 +184,18 @@ name in parentheses is what you need to download from one of the DJGPP sites): - - Standard DJGPP development environment (djdev203.zip) - - GNU C compiler (gcc2721b.zip) - - GNU C++ compiler (gpp2721b.zip) - - GNU Make 3.79 (mak379b.zip) - - Bash v2.03 (bsh203b.zip) - - Fileutils 3.16 (fil316b.zip) - - Textutils 2.0 (txt20b.zip) - - Sh-utils 1.12 (shl112b.zip) - - Sed 3.02 (sed302b.zip) - - Gawk 3.04 (gwk304b.zip) - - Grep 2.4 (grep24b.zip) - - Bison (only if you change one of the *.y files) + - Standard DJGPP development environment (djdev203.zip) + - GNU C compiler (gcc2721b.zip) + - GNU C++ compiler (gpp2721b.zip) + - GNU Make 3.79 (mak379b.zip) + - Bash v2.03 (bsh203b.zip) + - Fileutils 3.16 (fil316b.zip) + - Textutils 2.0 (txt20b.zip) + - Sh-utils 1.12 (shl112b.zip) + - Sed 3.02 (sed302b.zip) + - Gawk 3.04 (gwk304b.zip) + - Grep 2.4 (grep24b.zip) + - Bison (only if you change one of the *.y files) Note that you don't need to install libg++ (lgpNNNb.zip) since Groff doesn't use any C++ classes except its own. @@ -230,8 +214,8 @@ awk.exe. If not, go to the DJGPP bin/ subdirectory and type the following words of wisdom from the DOS prompt: - ln -s bash.exe sh.exe - ln -s gawk.exe awk.exe + ln -s bash.exe sh.exe + ln -s gawk.exe awk.exe (`ln' is part of GNU Fileutils, see above.) @@ -245,7 +229,7 @@ If you are building from the official GNU distribution, unpack the .tar.gz archive like this: - djtar -x groff-X.YZ.tar.gz + djtar -x groff-X.YZ.tar.gz (DJTAR is part of the standard DJGPP development distribution.) @@ -263,13 +247,13 @@ have to reconfigure Groff. To this end, use the CONFIG.BAT batch file in the DJGPP subdirectory: - arch\djgpp\config + arch\djgpp\config You can configure and build Groff from outside its source directory. In that case, you need to pass the full path to the source directory as an argument to CONFIG.BAT, like this: - d:\gnu\groff-1.16\arch\djgpp\config d:/gnu/groff-1.16 + d:\gnu\groff-1.16\arch\djgpp\config d:/gnu/groff-1.16 Note that you MUST use forward slashes in the path you pass to CONFIG.BAT, or else it may fail. (For versions of Groff other @@ -288,18 +272,18 @@ preconfigured package. If this is not an option, you will have to edit the file lang/cxx/_G_config.h and change this line: - #define _G_HAVE_SYS_SOCKET 1 + #define _G_HAVE_SYS_SOCKET 1 to say this instead: - #define _G_HAVE_SYS_SOCKET 0 + #define _G_HAVE_SYS_SOCKET 0 The problem with redefining NULL should not happen with DJGPP v2.03 or later. But if you still see compilation errors which say "`NULL' undeclared", comment out the line in _G_config.h that says this: - #undef NULL + #undef NULL Alternatively, you can reconfigure the package as described in the previous paragraph, before building it. @@ -327,7 +311,7 @@ subsidiary COMMAND.COM with plenty of environment space, like so: - command.com /e:3000 + command.com /e:3000 then invoke T-GROFF.BAT from that COMMAND.COM. @@ -343,7 +327,7 @@ install the package by setting the `prefix' variable. For example: - make install prefix=c:/groff + make install prefix=c:/groff "make install" doesn't format the man pages, it just copies them into subdirectories of the %DJDIR%\MAN directory. If you @@ -357,6 +341,6 @@ Consult the installation instructions for pre-compiled binaries above, for more info about installing and using Groff. - 8. You can safely delete the directories under share/groff/font - whose names begin with "devX": these are needed on X-Windows - which is not supported by this port. + 8. You can safely delete the directories under + share/groff//font whose names begin with "devX": these + are needed on X-Windows which is not supported by this port. diff -aruN groff-1.16.1/arch/djgpp/t-groff.bat groff-1.17/arch/djgpp/t-groff.bat --- groff-1.16.1/arch/djgpp/t-groff.bat Sun Jun 18 12:18:19 2000 +++ groff-1.17/arch/djgpp/t-groff.bat Thu Oct 26 16:15:07 2000 @@ -15,7 +15,7 @@ Rem chdir to src, to avoid overflowing the DOS limits with a long PATH. cd src set GROFF_FONT_PATH=..;../font -set GROFF_TMAC_PATH=../tmac;./roff/troff +set GROFF_TMAC_PATH=../tmac set PATH1=%PATH% set PATH=roff\troff;preproc\pic;preproc\eqn;preproc\tbl;preproc\grn;preproc\refer;preproc\soelim;devices\grotty;%PATH1% Rem diff -aruN groff-1.16.1/configure groff-1.17/configure --- groff-1.16.1/configure Sun Jun 11 08:27:26 2000 +++ groff-1.17/configure Mon Nov 13 17:51:26 2000 @@ -1389,7 +1389,7 @@ if echo ./conftest.sh | (csh >/dev/null 2>&1) >/dev/null 2>&1; then echo "$ac_t""yes" 1>&6; SH_SCRIPT_SED_CMD='1s/.*/:/' else - echo "$ac_t""no" 1>&6; SH_SCRIPT_SED_CMD='' + echo "$ac_t""no" 1>&6; SH_SCRIPT_SED_CMD='1s/a/a/' fi rm -f conftest.sh @@ -1963,18 +1963,10 @@ ac_link='${CC-cc} -o conftest${ac_exeext} $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS 1>&5' cross_compiling=$ac_cv_prog_cc_cross - -ac_ext=C -# CXXFLAGS is not in ac_cpp because -g, -O, etc. are not valid cpp options. -ac_cpp='$CXXCPP $CPPFLAGS' -ac_compile='${CXX-g++} -c $CXXFLAGS $CPPFLAGS conftest.$ac_ext 1>&5' -ac_link='${CXX-g++} -o conftest${ac_exeext} $CXXFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS 1>&5' -cross_compiling=$ac_cv_prog_cxx_cross - echo $ac_n "checking for sys_errlist in or ""... $ac_c" 1>&6 -echo "configure:1976: checking for sys_errlist in or " >&5 +echo "configure:1968: checking for sys_errlist in or " >&5 cat > conftest.$ac_ext < #include @@ -1982,7 +1974,7 @@ int k; k = (int)sys_errlist[0]; ; return 0; } EOF -if { (eval echo configure:1986: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then +if { (eval echo configure:1978: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* echo "$ac_t""yes" 1>&6;cat >> confdefs.h <<\EOF #define HAVE_SYS_ERRLIST 1 @@ -1995,13 +1987,6 @@ echo "$ac_t""no" 1>&6 fi rm -f conftest* -ac_ext=c -# CFLAGS is not in ac_cpp because -g, -O, etc. are not valid cpp options. -ac_cpp='$CPP $CPPFLAGS' -ac_compile='${CC-cc} -c $CFLAGS $CPPFLAGS conftest.$ac_ext 1>&5' -ac_link='${CC-cc} -o conftest${ac_exeext} $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS 1>&5' -cross_compiling=$ac_cv_prog_cc_cross - ac_ext=C # CXXFLAGS is not in ac_cpp because -g, -O, etc. are not valid cpp options. @@ -2011,16 +1996,16 @@ cross_compiling=$ac_cv_prog_cxx_cross echo $ac_n "checking C++ ""... $ac_c" 1>&6 -echo "configure:2015: checking C++ " >&5 +echo "configure:2000: checking C++ " >&5 cat > conftest.$ac_ext < int main() { read(0, 0, 0); open(0, 0); ; return 0; } EOF -if { (eval echo configure:2024: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then +if { (eval echo configure:2009: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* echo "$ac_t""yes" 1>&6;cat >> confdefs.h <<\EOF #define HAVE_CC_OSFCN_H 1 @@ -2049,16 +2034,16 @@ cross_compiling=$ac_cv_prog_cxx_cross echo $ac_n "checking C++ ""... $ac_c" 1>&6 -echo "configure:2053: checking C++ " >&5 +echo "configure:2038: checking C++ " >&5 cat > conftest.$ac_ext < int main() { int x = INT_MIN; int y = INT_MAX; int z = UCHAR_MAX; ; return 0; } EOF -if { (eval echo configure:2062: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then +if { (eval echo configure:2047: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* echo "$ac_t""yes" 1>&6;cat >> confdefs.h <<\EOF #define HAVE_CC_LIMITS_H 1 @@ -2087,16 +2072,16 @@ cross_compiling=$ac_cv_prog_cxx_cross echo $ac_n "checking for declaration of time_t""... $ac_c" 1>&6 -echo "configure:2091: checking for declaration of time_t" >&5 +echo "configure:2076: checking for declaration of time_t" >&5 cat > conftest.$ac_ext < int main() { time_t t = time(0); struct tm *p = localtime(&t); ; return 0; } EOF -if { (eval echo configure:2100: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then +if { (eval echo configure:2085: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* echo "$ac_t""yes" 1>&6 else @@ -2117,12 +2102,12 @@ cross_compiling=$ac_cv_prog_cc_cross echo $ac_n "checking return type of signal handlers""... $ac_c" 1>&6 -echo "configure:2121: checking return type of signal handlers" >&5 +echo "configure:2106: checking return type of signal handlers" >&5 if eval "test \"`echo '$''{'ac_cv_type_signal'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < #include @@ -2139,7 +2124,7 @@ int i; ; return 0; } EOF -if { (eval echo configure:2143: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then +if { (eval echo configure:2128: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* ac_cv_type_signal=void else @@ -2158,16 +2143,16 @@ echo $ac_n "checking struct exception""... $ac_c" 1>&6 -echo "configure:2162: checking struct exception" >&5 +echo "configure:2147: checking struct exception" >&5 cat > conftest.$ac_ext < int main() { struct exception e; ; return 0; } EOF -if { (eval echo configure:2171: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then +if { (eval echo configure:2156: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* echo "$ac_t""yes" 1>&6;cat >> confdefs.h <<\EOF #define HAVE_STRUCT_EXCEPTION 1 @@ -2181,7 +2166,7 @@ fi rm -f conftest* echo $ac_n "checking for sin in -lm""... $ac_c" 1>&6 -echo "configure:2185: checking for sin in -lm" >&5 +echo "configure:2170: checking for sin in -lm" >&5 ac_lib_var=`echo m'_'sin | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 @@ -2189,7 +2174,7 @@ ac_save_LIBS="$LIBS" LIBS="-lm $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then +if { (eval echo configure:2189: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -2225,17 +2210,17 @@ do ac_safe=`echo "$ac_hdr" | sed 'y%./+-%__p_%'` echo $ac_n "checking for $ac_hdr""... $ac_c" 1>&6 -echo "configure:2229: checking for $ac_hdr" >&5 +echo "configure:2214: checking for $ac_hdr" >&5 if eval "test \"`echo '$''{'ac_cv_header_$ac_safe'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:2239: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:2224: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out | grep -v "^conftest.${ac_ext}\$"` if test -z "$ac_err"; then rm -rf conftest* @@ -2264,12 +2249,12 @@ for ac_func in getpagesize do echo $ac_n "checking for $ac_func""... $ac_c" 1>&6 -echo "configure:2268: checking for $ac_func" >&5 +echo "configure:2253: checking for $ac_func" >&5 if eval "test \"`echo '$''{'ac_cv_func_$ac_func'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then +if { (eval echo configure:2281: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_func_$ac_func=yes" else @@ -2317,7 +2302,7 @@ done echo $ac_n "checking for working mmap""... $ac_c" 1>&6 -echo "configure:2321: checking for working mmap" >&5 +echo "configure:2306: checking for working mmap" >&5 if eval "test \"`echo '$''{'ac_cv_func_mmap_fixed_mapped'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else @@ -2325,7 +2310,7 @@ ac_cv_func_mmap_fixed_mapped=no else cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext} && (./conftest; exit) 2>/dev/null +if { (eval echo configure:2454: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext} && (./conftest; exit) 2>/dev/null then ac_cv_func_mmap_fixed_mapped=yes else @@ -2492,12 +2477,12 @@ for ac_func in fmod strtol getcwd strerror putenv do echo $ac_n "checking for $ac_func""... $ac_c" 1>&6 -echo "configure:2496: checking for $ac_func" >&5 +echo "configure:2481: checking for $ac_func" >&5 if eval "test \"`echo '$''{'ac_cv_func_$ac_func'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then +if { (eval echo configure:2509: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_func_$ac_func=yes" else @@ -2550,12 +2535,12 @@ for ac_func in rename mkstemp strcasecmp strncasecmp strsep strdup do echo $ac_n "checking for $ac_func""... $ac_c" 1>&6 -echo "configure:2554: checking for $ac_func" >&5 +echo "configure:2539: checking for $ac_func" >&5 if eval "test \"`echo '$''{'ac_cv_func_$ac_func'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then +if { (eval echo configure:2567: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_func_$ac_func=yes" else @@ -2603,12 +2588,12 @@ done echo $ac_n "checking for sys_siglist declaration in signal.h or unistd.h""... $ac_c" 1>&6 -echo "configure:2607: checking for sys_siglist declaration in signal.h or unistd.h" >&5 +echo "configure:2592: checking for sys_siglist declaration in signal.h or unistd.h" >&5 if eval "test \"`echo '$''{'ac_cv_decl_sys_siglist'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < #include @@ -2620,7 +2605,7 @@ char *msg = *(sys_siglist + 1); ; return 0; } EOF -if { (eval echo configure:2624: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then +if { (eval echo configure:2609: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* ac_cv_decl_sys_siglist=yes else @@ -2649,16 +2634,16 @@ cross_compiling=$ac_cv_prog_cxx_cross echo $ac_n "checking whether ANSI array delete syntax supported""... $ac_c" 1>&6 -echo "configure:2653: checking whether ANSI array delete syntax supported" >&5 +echo "configure:2638: checking whether ANSI array delete syntax supported" >&5 cat > conftest.$ac_ext <&5; (eval $ac_compile) 2>&5; }; then +if { (eval echo configure:2647: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* echo "$ac_t""yes" 1>&6 else @@ -2687,16 +2672,16 @@ cross_compiling=$ac_cv_prog_cxx_cross echo $ac_n "checking traditional preprocessor""... $ac_c" 1>&6 -echo "configure:2691: checking traditional preprocessor" >&5 +echo "configure:2676: checking traditional preprocessor" >&5 cat > conftest.$ac_ext <&5; (eval $ac_compile) 2>&5; }; then +if { (eval echo configure:2685: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* echo "$ac_t""yes" 1>&6;cat >> confdefs.h <<\EOF #define TRADITIONAL_CPP 1 @@ -2717,12 +2702,12 @@ cross_compiling=$ac_cv_prog_cc_cross echo $ac_n "checking w_coredump""... $ac_c" 1>&6 -echo "configure:2721: checking w_coredump" >&5 +echo "configure:2706: checking w_coredump" >&5 if test "$cross_compiling" = yes; then echo "$ac_t""no" 1>&6 else cat > conftest.$ac_ext < #include @@ -2737,7 +2722,7 @@ #endif } EOF -if { (eval echo configure:2741: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext} && (./conftest; exit) 2>/dev/null +if { (eval echo configure:2726: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext} && (./conftest; exit) 2>/dev/null then echo "$ac_t""yes" 1>&6;cat >> confdefs.h <<\EOF #define WCOREFLAG 0200 @@ -2753,18 +2738,25 @@ fi echo $ac_n "checking default value for grops -b option""... $ac_c" 1>&6 -echo "configure:2757: checking default value for grops -b option" >&5 +echo "configure:2742: checking default value for grops -b option" >&5 test -n "${BROKEN_SPOOLER_FLAGS}" || BROKEN_SPOOLER_FLAGS=7 echo "$ac_t""$BROKEN_SPOOLER_FLAGS" 1>&6 echo $ac_n "checking default paper size""... $ac_c" 1>&6 -echo "configure:2762: checking default paper size" >&5 +echo "configure:2747: checking default paper size" >&5 if test -z "$PAGE"; then descfile= if test -r $prefix/share/groff/font/devps/DESC; then descfile=$prefix/share/groff/font/devps/DESC elif test -r $prefix/lib/groff/font/devps/DESC; then descfile=$prefix/lib/groff/font/devps/DESC + else + for f in $prefix/share/groff/*/font/devps/DESC; do + if test -r $f; then + descfile=$f + break + fi + done fi if test -n "$descfile" \ && grep "^paperlength 841890" $descfile >/dev/null 2>&1; then @@ -2793,7 +2785,7 @@ echo "$ac_t""$PAGE" 1>&6 echo $ac_n "checking for existing troff installation""... $ac_c" 1>&6 -echo "configure:2797: checking for existing troff installation" >&5 +echo "configure:2789: checking for existing troff installation" >&5 if test "x`(echo .tm '|n(.g' | tr '|' '\\\\' | troff -z -i 2>&1) 2>/dev/null`" = x0; then echo "$ac_t""yes" 1>&6 g=g @@ -2803,7 +2795,7 @@ fi echo $ac_n "checking for prefix of system macro packages""... $ac_c" 1>&6 -echo "configure:2807: checking for prefix of system macro packages" >&5 +echo "configure:2799: checking for prefix of system macro packages" >&5 sys_tmac_prefix= sys_tmac_file_prefix= for d in /usr/share/lib/tmac /usr/lib/tmac; do @@ -2823,7 +2815,7 @@ tmac_wrap= echo $ac_n "checking which system macro packages should be made available""... $ac_c" 1>&6 -echo "configure:2827: checking which system macro packages should be made available" >&5 +echo "configure:2819: checking which system macro packages should be made available" >&5 if test "x$sys_tmac_file_prefix" = "xtmac."; then for f in $sys_tmac_prefix*; do suff=`echo $f | sed -e "s;$sys_tmac_prefix;;"` diff -aruN groff-1.16.1/configure.in groff-1.17/configure.in --- groff-1.16.1/configure.in Sun Jun 11 08:27:26 2000 +++ groff-1.17/configure.in Mon Nov 13 17:51:26 2000 @@ -15,7 +15,9 @@ GROFF_INSTALL_SH AC_PROG_INSTALL AC_PROG_LN_S -GROFF_CSH_HACK(SH_SCRIPT_SED_CMD='1s/.*/:/', SH_SCRIPT_SED_CMD='') +dnl use a dummy substitution if no csh hack is necessary to avoid errors +dnl with non-GNU sed programs +GROFF_CSH_HACK(SH_SCRIPT_SED_CMD='1s/.*/:/', SH_SCRIPT_SED_CMD='1s/a/a/') AC_SUBST(SH_SCRIPT_SED_CMD) dnl checks for headers AC_CHECK_HEADERS(stdlib.h unistd.h dirent.h limits.h sys/dir.h \ diff -aruN groff-1.16.1/contrib/mm/ChangeLog groff-1.17/contrib/mm/ChangeLog --- groff-1.16.1/contrib/mm/ChangeLog Sun Jun 18 12:08:06 2000 +++ groff-1.17/contrib/mm/ChangeLog Mon Mar 5 10:56:29 2001 @@ -1,7 +1,34 @@ -Sat Jun 17 23:00:00 2000 Eli Zaretskii +Mon Mar 5 09:30:18 2001 Jörgen Hägg (jh@axis.com) + + * S didn't reset to default point size + * (dummy line to force cvs update...) + +Sat Jan 06 10:30:00 2001 Werner Lemberg (wl@gnu.org) + + * Fixed assignment of page offset given as a command line argument. + +Fri Nov 17 05:34:17 2000 Jörgen Hägg (jh@axis.com) + + * Renamed tmac.m and tmac.mse to m.tmac and mse.tmac + +Thu Sep 14 05:52:48 2000 Jörgen Hägg (jh@axis.com) + + * New Changelog-format, it will show changes better. + Easier for other to use. (Somehow I didn't really + understand why the e-mail address was supposed to be + 'jh at axis.com' in the Changelog. :-) + +Thu Sep 7 06:17:42 2000 Jörgen Hägg (jh at axis.com) + + * version 2.0 + * Had to do something about my version numbering. + The main CVS archive was not in sync with mine. + So, now it is 2.0. :-) + +Sat Jun 17 23:00:00 2000 Eli Zaretskii (eliz@is.elta.co.il) * Makefile.sim (.man.n): Replace `;' with `|', since DOS/Windows - path lists use the semicolon as a separator. + path lists use the semicolon as a separator. Sun Jun 4 21:39:00 2000 Kaneda Hiroshi (vanitas at ma3.seikyou.ne.jp) @@ -11,6 +38,7 @@ * version 1.34 * Changed the version number in the CVS repository + * MC had a bug in column calculation, (thanks to T. Kurt Bond) Fri Sep 3 07:33:14 1999 Jörgen Hägg (jh at axis.com) diff -aruN groff-1.16.1/contrib/mm/Makefile.sim groff-1.17/contrib/mm/Makefile.sim --- groff-1.16.1/contrib/mm/Makefile.sim Sun Jun 18 12:08:06 2000 +++ groff-1.17/contrib/mm/Makefile.sim Fri Nov 17 05:26:02 2000 @@ -1,11 +1,11 @@ # -# $Id: Makefile.sim,v 1.2 2000/06/18 10:08:06 wlemb Exp $ +# $Id: Makefile.sim,v 2.1 2000/11/17 04:26:02 jhaegg Exp $ # -# To install mgm separately as tmac.gm: +# To install mgm separately as gm.tmac: # make -f Makefile.sub tmacdir=/usr/local/lib/groff/tmac srcdir=. \ # INSTALL_DATA='install -m 644' tmac_m=gm install # -# or as tmac.m: +# or as m.tmac: # # tmacdir is the destination for your groff/tmac-directory, srcdir is # this directory and INSTALL_DATA is the command to install a file with. diff -aruN groff-1.16.1/contrib/mm/Makefile.sub groff-1.17/contrib/mm/Makefile.sub --- groff-1.16.1/contrib/mm/Makefile.sub Tue Mar 7 23:17:58 2000 +++ groff-1.17/contrib/mm/Makefile.sub Fri Nov 17 05:26:02 2000 @@ -1,5 +1,5 @@ # -# $Id: Makefile.sub,v 1.3 2000/03/07 22:17:58 wlemb Exp $ +# $Id: Makefile.sub,v 2.1 2000/11/17 04:26:02 jhaegg Exp $ # PROG=mmroff MAN7=\ @@ -10,6 +10,9 @@ # Local configuration files with default values. LOCALE = locale se_locale CLEANADD=temp + +all: mmroff + install: install_mm install_mm: install_mmroff install_m @@ -25,9 +28,10 @@ install_m: -test -d $(tmacdir) || $(mkinstalldirs) $(tmacdir) -rm -f $(tmacdir)/tmac.$(tmac_m_prefix)m - $(INSTALL_DATA) $(srcdir)/tmac.m $(tmacdir)/tmac.$(tmac_m_prefix)m - @sed -e "s;^.mso tmac.m;.mso tmac.$(tmac_m_prefix)m;g" \ - $(srcdir)/tmac.mse > $(tmacdir)/tmac.$(tmac_m_prefix)mse + -rm -f $(tmacdir)/$(tmac_m_prefix)m.tmac + $(INSTALL_DATA) $(srcdir)/m.tmac $(tmacdir)/$(tmac_m_prefix)m.tmac + @sed -e "s;^.mso m.tmac;.mso $(tmac_m_prefix)m.tmac;g" \ + $(srcdir)/mse.tmac > $(tmacdir)/$(tmac_m_prefix)mse.tmac install_mmroff : mmroff -test -d $(bindir) || $(mkinstalldirs) $(bindir) -rm -f $(bindir)/mmroff @@ -45,6 +49,7 @@ test -s $(tmacdir)/mm/$$f || rm -f $(tmacdir)/mm/$$f; \ done -rm -f $(tmacdir)/tmac.$(tmac_m_prefix)m - -rm -f $(tmacdir)/tmac.$(tmac_m_prefix)mse + -rm -f $(tmacdir)/$(tmac_m_prefix)m.tmac + -rm -f $(tmacdir)/$(tmac_m_prefix)mse.tmac -rmdir $(tmacdir)/mm -rm -f $(bindir)/mmroff diff -aruN groff-1.16.1/contrib/mm/NOTES groff-1.17/contrib/mm/NOTES --- groff-1.16.1/contrib/mm/NOTES Sun Feb 6 10:34:46 2000 +++ groff-1.17/contrib/mm/NOTES Thu Sep 14 05:40:24 2000 @@ -1,4 +1,6 @@ ###################################################################### +$Id: NOTES,v 2.0 2000/09/14 03:40:24 jhaegg Exp $ + Beware! This may be old information. Trust only the source. :-) diff -aruN groff-1.16.1/contrib/mm/README groff-1.17/contrib/mm/README --- groff-1.16.1/contrib/mm/README Sun Feb 6 10:34:46 2000 +++ groff-1.17/contrib/mm/README Fri Nov 17 05:27:03 2000 @@ -1,20 +1,21 @@ +$Id: README,v 2.1 2000/11/17 04:27:03 jhaegg Exp $ + This is mgm, a macro package for groff. It is supposed to be compatible with the DWB mm macros, and has several extensions. -Send bug reports to jh@axis.se with a description of the problem +Send bug reports to jh@axis.com with a description of the problem and a sample of text which reproduces the error. Don't forget to mention the version of mgm (look in the beginning -of tmac.m) and the version of groff. +of m.tmac) and the version of groff. Any new ideas or improvements are welcome. -Newest version is available with anonymous FTP -at ftp://ftp.efd.lth.se/pub/groff/mm.gz -or ftp://ftp.axis.se/pub/groff/mm.gz +Newest version is available here or at the groff CVS repository. +ftp://ftp.axis.se/pub/groff/mm.gz You can install mgm as a separate package without the configure in groff with the following command: @@ -23,6 +24,14 @@ This README should be bigger :-) -Jörgen. +/Jörgen Hägg Thanks to everyone who have sent me bug-reports and fixes. + + +Yes, my version numbering differs from the groff CVS, but I +like mine better. :-) + +More likely, I'm too lazy to change it, but someday I'll +try to sync them... +The step to 2.0 is an attempt, let's see if it works. diff -aruN groff-1.16.1/contrib/mm/groff_mm.man groff-1.17/contrib/mm/groff_mm.man --- groff-1.16.1/contrib/mm/groff_mm.man Sun Jun 4 23:47:19 2000 +++ groff-1.17/contrib/mm/groff_mm.man Fri Apr 13 11:03:52 2001 @@ -1,5 +1,5 @@ .\" -.\" $Id: groff_mm.man,v 1.3 2000/06/04 21:47:19 wlemb Exp $ +.\" $Id: groff_mm.man,v 2.1 2001/04/13 09:03:52 wlemb Exp $ .\" .de T2 .ne 2v @@ -318,13 +318,15 @@ if \fBDe\fP is not zero. .in .TP -.B "DL [text-indent [1]]" +.B "DL [text-indent [1 [1]]]" Dash list start. Begins a list where each item is printed after a dash. \fIText-indent\fP changes the default indentation of the list items set by number register \fBPi\fP. A second argument prevents the empty line between each list item to be printed. See \fBLI\fP. +A third argument will prohibit printing of a blank line before each +item. .TP .B "DS [format [fill [rindent]]]" Static display start. @@ -498,7 +500,7 @@ .sp .fi .DT -Argument greater than 11 is considered as arg 0. +Argument greater than or equal to 11 is considered as arg 0. Default for m@TMAC_M_PREFIX@m is 10. .TP .B FE @@ -1179,7 +1181,7 @@ number between two dashes. .TP .B PS -Picture start (from pic). Begins a picture for \fB@TMAC@pic\fP, see +Picture start (from pic). Begins a picture for \fB@g@pic\fP, see the manual. .TP .B PX @@ -1388,9 +1390,9 @@ .TP .B "TS [H]" Table start. This is the start of a table specification -to \fB@TMAC@tbl\fP. See separate manual for \fB@TMAC@tbl\fP. +to \fB@g@tbl\fP. See separate manual for \fB@g@tbl\fP. \fBTS\fP ends with \fBTE\fP. -Argument \fIH\fP tells \fBm@TMAC@m\fP that the table +Argument \fIH\fP tells \fBm@TMAC_M_PREFIX@m\fP that the table has a header. See \fBTH\fP. .TP .B TX diff -aruN groff-1.16.1/contrib/mm/groff_mmse.man groff-1.17/contrib/mm/groff_mmse.man --- groff-1.16.1/contrib/mm/groff_mmse.man Mon Feb 21 21:32:58 2000 +++ groff-1.17/contrib/mm/groff_mmse.man Thu Sep 14 05:40:24 2000 @@ -1,5 +1,5 @@ .\" -.\" $Id: groff_mmse.man,v 1.2 2000/02/21 20:32:58 jhaegg Exp $ +.\" $Id: groff_mmse.man,v 2.0 2000/09/14 03:40:24 jhaegg Exp $ .\" Skrivet av Jörgen Hägg, Lund, Sverige .\" .TH GROFF_MMSE @MAN7EXT@ "@MDATE@" "Groff Version @VERSION@" diff -aruN groff-1.16.1/contrib/mm/m.tmac groff-1.17/contrib/mm/m.tmac --- groff-1.16.1/contrib/mm/m.tmac Thu Jan 1 01:00:00 1970 +++ groff-1.17/contrib/mm/m.tmac Mon Mar 5 10:56:29 2001 @@ -0,0 +1,3477 @@ +.\" +.de @revision +.ds RE \\$2 +.. +.\" +.\" $Id: m.tmac,v 2.3 2001/03/05 09:56:29 jhaegg Exp $ +.@revision $Revision: 2.3 $ +.ig + +Copyright (C) 1991-2000 Free Software Foundation, Inc. +mgm is written by Jörgen Hägg + +mgm is free software; you can redistribute it and/or modify it under +the terms of the GNU General Public License as published by the Free +Software Foundation; either version 2, or (at your option) any later +version. + +mgm is distributed in the hope that it will be useful, but WITHOUT ANY +WARRANTY; without even the implied warranty of MERCHANTABILITY or +FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License +for more details. + +You should have received a copy of the GNU General Public License along +with groff; see the file COPYING. If not, write to the Free Software +Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. + +Please send bugreports with examples to jh@axis.com. + +Naming convention stolen from mgs. +Local names module*name +Extern names module@name +Env.var environ:name +Index array!index +.. +.if !\n(.g .ab These mm macros require groff. +.if \n(.C .ab The groff mm macros do not work in compatibility mode. +.warn +.\" ######## init ####### +.\" Contents level [0:7], contents saved if heading level <= Cl +.nr Cl 2 +.\" Eject page between LIST OF XXXX if Cp == 0 +.nr Cp 0 +.\" Debugflag +.if !r D .nr D 0 +.\" Eject after floating display is output [0:1] +.nr De 0 +.\" Floating keep output [0;5] +.nr Df 5 +.\" space before and after display if == 1 [0:1] +.nr Ds 1 +.\" Eject page +.nr Ej 0 +.\" Equation label adjust 0=left, 1=right +.nr Eq 0 +.\" Em dash string +.ie n .ds EM " -- +.el .ds EM \(em +.\" Footnote spacing +.nr Fs 1 +.\" H1-H7 heading counters +.nr H1 0 1 +.nr H2 0 1 +.nr H3 0 1 +.nr H4 0 1 +.nr H5 0 1 +.nr H6 0 1 +.nr H7 0 1 +.\" Heading break level [0:7] +.nr Hb 2 +.\" heading centering level, [0:7] +.nr Hc 0 +.\" header format +.ds HF 2 2 2 2 2 2 2 +.\" heading temp. indent [0:2] +.\" 0 -> 0 indent, left margin +.\" 1 -> indent to right , like .P 1 +.\" 2 -> indent to line up with text part of preceding heading +.nr Hi 1 +.\" header pointsize +.ds HP 0 0 0 0 0 0 0 +.\" heading space level [0:7] +.nr Hs 2 +.\" heading numbering type +.\" 0 -> multiple (1.1.1 ...) +.\" 1 -> single +.nr Ht 0 +.\" Unnumbered heading level +.nr Hu 2 +.\" hyphenation in body +.\" 0 -> no hyphenation +.\" 1 -> hyphenation 14 on +.nr Hy 0 +.\" text for toc, selfexplanatory. Look in the new variable section +.ds Lf LIST OF FIGURES +.nr Lf 1 +.ds Lt LIST OF TABLES +.nr Lt 1 +.ds Lx LIST OF EXHIBITS +.nr Lx 1 +.ds Le LIST OF EQUATIONS +.nr Le 0 +.\" List indent, used by .AL +.nr Li 6 +.\" List space, if listlevel > Ls then no spacing will occur around lists. +.nr Ls 99 +.\" Numbering style [0:5] +.if !r N .nr N 0 +.\" numbered paragraphs +.\" 0 == not numbered +.\" 1 == numbered in first level headings. +.nr Np 0 +.\" Format of figure,table,exhibit,equation titles. +.\" 0= ". ", 1=" - " +.nr Of 0 +.\" Table of contents page numbering style +.nr Oc 0 +.\" Page-number, normally same as %. +.nr P 0 +.\" paragraph indent +.nr Pi 5 +.\" paragraph spacing +.nr Ps 1 +.\" paragraph type +.\" 0 == left-justified +.\" 1 == indented .P +.\" 2 == indented .P except after .H, .DE or .LE. +.nr Pt 0 +.\" Reference title +.ds Rp REFERENCES +.\" Display indent +.nr Si 5 +.\" +.\" Current state of TOC, empty outside TC, inside +.\" it will be set to co,fg,tb,ec,ex or ap. +.ds Tcst +.\" +.ds Tm \(tm +.\" +.\"--------------------------------------------- +.\" Internal global variables +.\" +.\" This is for cover macro .MT +.\" .ds @language +.\" +.nr @copy_type 0 +.if r C .nr @copy_type \n[C] +.\" >0 if Subject/Date/From should be bold, roman otherwise +.ie n .ds @sdf_font R +.el .ds @sdf_font B +.if \n[@copy_type]=4 \{\ +. ls 2 +. nr Pi 10 +. nr Pt 1 +.\} +.\" +.\" +.if r E \{\ +. ie \n[E] .ds @sdf_font B +. el .ds @sdf_font R +.\} +.\" +.\" Current pointsize and vertical space, always in points. +.if !r S .nr S 10 +.ps \n[S] +.vs \n[S]+2 +.\" +.nr @ps \n[.ps] +.nr @vs \n[.v] +.if \n[D]>1 .tm @ps=\n[@ps], @vs=\n[@vs] +.if \n[D]>3 .tm INIT: l:\n[.l] p:\n[.p] o:\n[.o] +.\" +.\" Page length +.if r L \{\ +. ie n .pl \n[L]u +. el .pl \n[L]u +.\} +.nr @pl \n[.p] +.\" +.\" page width +.ie r W \{\ +. ie n .ll \n[W]u +. el .ll \n[W]u +.\} +.el .ll 6i +.nr @ll \n[.l] +.nr @cur-ll \n[@ll] +.lt \n[@ll]u +.\" +.\" page offset +.ie r O .po \n[O]u +.el \{\ +. ie n .po .75i +. el .po .963i +.\} +.\" +.nr @po \n[.o] +.\" +.\" non-zero if escape mechanism is turned off. Used by VERBON/OFF +.nr @verbose-flag 0 +.\"--------------------------------------------- +.\" New variables +.\" +.\" Appendix name +.ds App APPENDIX +.\" print appendixheader, 0 == don't +.nr Aph 1 +.\" +.\" Current appendix text +.ds Apptext +.\" Controls the space before and after static displays if defined. +.\" Lsp is used otherwise +.\" .nr Dsp 1v +.\" +.\" Add a dot after level one heading number if >0 +.nr H1dot 1 +.\" +.\" header prespace level. If level <= Hps, then two lines will be printed +.\" before the header instead of one. +.nr Hps 1 +.\" +.\" These variables controls the number of lines preceding .H. +.\" Hps1 is the number of lines when level > Hps +.nr Hps1 0.5 +.if n .nr Hps1 1 +.\" +.\" Hps2 is the number of lines when level <= Hps +.nr Hps2 1 +.if n .nr Hps2 2 +.\" +.\" Hss is the number of lines (Lsp) after the header. +.nr Hss 1 +.\" +.\" H1txt will be updated by .H and .HU, containing the heading text. +.\" Will also be updated in table of contents & friends +.\" +.ds H1txt +.\" +.\" header text for the index +.ds Index INDEX +.\" command to sort the index +.ds Indcmd sort +.\" +.\" flag for mkindex +.if !r Idxf .nr Idxf 0 +.\" Change these in the national configuration file +.ds Lifg Figure +.ds Litb TABLE +.ds Liex Exhibit +.ds Liec Equation +.ds Licon CONTENTS +.\" Flag for space between mark and prefix 1==space, 0==no space +.\" Can also be controlled by using '.LI mark 2' +.nr Limsp 1 +.\" +.\" Lsp controls the height of an empty line. Normally 0.5v +.\" Normally used for nroff compatibility. +.nr Lsp 0.5v +.if n .nr Lsp 1v +.ds MO1 January +.ds MO2 February +.ds MO3 March +.ds MO4 April +.ds MO5 May +.ds MO6 June +.ds MO7 July +.ds MO8 August +.ds MO9 September +.ds MO10 October +.ds MO11 November +.ds MO12 December +.\" for GETR +.ds Qrf See chapter \\*[Qrfh], page \\*[Qrfp]. +.\" +.\" header- and footer-size will only change to the current +.\" if Pgps is > 0. +.nr Pgps 1 +.\" +.\" section-page if Sectp > 0 +.nr Sectp 0 +.if (\n[N]=3):(\n[N]=5) \{\ +. nr Sectp 1 +. nr Ej 1 +.\} +.\" section-figure if Sectf > 0 +.nr Sectf 0 +.if \n[N]=5 .nr Sectf 1 +.\" +.\" argument to .nm in .VERBON. +.ds Verbnm "1 +.\" indent for VERBON +.nr Verbin 5n +.\" +.\" Letter section +.\" Formal closing (.FC) +.ds Letfc Yours very truly, +.\" +.\" Approval line +.ds Letapp APPROVED: +.\" Approval date-string +.ds Letdate Date +.\" +.ds LetCN CONFIDENTIAL\" Confidential default +.ds LetSA To Whom It May Concern:\" Salutation default +.ds LetAT ATTENTION:\" Attention string +.ds LetSJ SUBJECT:\" Subject string +.ds LetRN In reference to:\" Reference string +.\" +.\" Copy to (.NS) +.ds Letnsdef 0 +.ds Letns!copy Copy \" space! +.ds Letns!to " to +.ds Letns!0 Copy to +.ds Letns!1 Copy (with att.) to +.ds Letns!2 Copy (without att.) to +.ds Letns!3 Att. +.ds Letns!4 Atts. +.ds Letns!5 Enc. +.ds Letns!6 Encs. +.ds Letns!7 Under separate cover +.ds Letns!8 Letter to +.ds Letns!9 Memorandum to +.ds Letns!10 Copy (with atts.) to +.ds Letns!11 Copy (without atts.) to +.ds Letns!12 Abstract Only to +.ds Letns!13 Complete Memorandum to +.ds Letns!14 CC: +.\" +.\" Text printed below the footer. Controlled by @copy_type (C). +.ds Pg_type!0 +.ds Pg_type!1 OFFICIAL FILE COPY +.ds Pg_type!2 DATE FILE COPY +.ds Pg_type!3 D\ R\ A\ F\ T +.ds Pg_type!4 D\ R\ A\ F\ T +.\" Max lines in return address +.nr Letwam 14 +.\"-------------------------- +.\" test for mgm macro. This can be used if the text must test +.\" what macros is used. +.nr .mgm 1 +.\" +.\" Due to security problems with groff I had to rewrite +.\" the reference system. It's not as elegant as before, you +.\" have to run groff with '-z -rRef=1' and put stderr into the filename +.\" for .INITR +.\" +.\" Output references to stderr if non-zero +.ie !r Ref \{\ +. nr Ref 0 +.\} +.el .warn 0 +.\" +.\"--------------------------------------------- +.\" set local variables. +.ie d @language .mso mm/\*[@language]_locale +.el .mso mm/locale +.\"--------------------------------------------- +.if \n[D] .tm Groff mm, version \*[RE]. +.\" ####### module init ###### +.\" reset all things +.de init@reset +.ie \\n[misc@adjust] 'ad +.el 'na +.ie \\n[Hy] 'hy 14 +.el 'nh +'in 0 +'ti 0 +.ps \\n[@ps]u +.vs \\n[@vs]u +.. +.de @warning +'tm WARNING:(\\n[.F]) input line \\n[.c]:\\$* +.if \\n[D] .backtrace +.. +.de @error +'tm ****************** +'tm ERROR:(\\n[.F]) input line \\n[.c]:\\$* +.if \\n[D] .backtrace +'tm ****************** +.ab "Input aborted, syntax error" +.. +.de misc@toupper +.tr aAbBcCdDeEfFgGhHiIjJkKlLmMnNoOpPqQrRsStTuUvVwWxXyYzZ +.br +\\$1 +.tr aabbccddeeffgghhiijjkkllmmnnooppqqrrssttuuvvwwxxyyzz +.br +.. +.\" ####### module debug ################################# +.de debug +'tm \\$1:\\n[.F]:\\n[c.] ll=\\n[.l] vs=\\n[.v] ps=\\n[.s],\\n[.ps] \ +in=\\n[.i] fi=\\n[.u] .d=\\n[.d] nl=\\n[nl] pg=\\n[%] +.. +.de debug-all +.nr debug*n 1n +.nr debug*m 1m +'tm \\$1:\\n[.F]:\\n[c.] ll=\\n[.l] vs=\\n[.v] ps=\\n[.s] in=\\n[.i]\ + ad=\\n[.j] fi=\\n[.u] pl=\\n[.p] page=\\n[%] .o=\\n[.o] +'tm _______ .d=\\n[.d] .f=\\n[.f] .h=\\n[.h] .k=\\n[.k] .n=\\n[.n]\ + .p=\\n[.p] .t=\\n[.t] .z=\\n[.z] nl=\\n[nl] dn=\\n[dn] n=\\n[debug*n] +.. +.\" ####### module par ################################# +.nr par@ind-flag 1 \" indent on following P if Pt=2 +.nr hd*last-pos -1 +.nr hd*last-hpos -1 +.nr par*number 0 1 +.af par*number 01 +.nr par*number2 0 1 +.af par*number2 01 +.nr par*num-count 0 1 +.af par*num-count 01 +.\" reset numbered paragraphs, arg1 = headerlevel +.de par@reset-num +.if \\$1<3 .nr par*num-count 0 +.if (\\$1=1)&(\\n[Np]=1) .nr par*number 0 +.. +.\"------------ +.\" paragraph +.de P +.\" skip P if previous heading +.ie !((\\n[nl]=\\n[hd*last-pos]):(\\n[nl]=(\\n[hd*last-pos]-.5v))) \{\ +. if \\n[D]>2 .tm Paragraph nl=\\n[nl] +. par@doit \\$* +. if \\n[Np] \\n[H1].\\n+[par*number]\ \ \c +.\} +.el .if !(\\n[hd*last-hpos]=\\n[.k]) \{\ +. if \\n[D]>2 .tm Paragraph nl=\\n[nl] +. par@doit \\$* +. if \\n[Np] \\n[H1].\\n+[par*number]\ \ \c +.\} +.nr par@ind-flag 1 +.. +.\"------------ +.de nP +.\" skip P if previous heading +.ie !((\\n[nl]=\\n[hd*last-pos]):(\\n[nl]=(\\n[hd*last-pos]-.5v))) \{\ +. if \\n[D]>2 .tm Paragraph nl=\\n[nl] +. par@doit \\$* +\\n[H2].\\n+[par*number2]\ \ \c +.\} +.el .if !(\\n[hd*last-hpos]=\\n[.k]) \{\ +. if \\n[D]>2 .tm Paragraph nl=\\n[nl] +. par@doit \\$* +\\n[H2].\\n+[par*number2]\ \ \c +.\} +.nr par@ind-flag 1 +.. +.\"------------ +.de par@doit +.SP (u;\\n[Ps]*\\n[Lsp]) +.ie \\n[.$] \{\ +. if \\$1=1 .ti +\\n[Pi]n +.\} +.el \{\ +. if \\n[Pt]=1 .ti +\\n[Pi]n +. if (\\n[Pt]=2)&\\n[par@ind-flag] .ti +\\n[Pi]n +.\} +.. +.\" ####### module line ####################################### +.de SP +.br +.if !r line*lp\\n[.z] .nr line*lp\\n[.z] 0 +.if !r line*ac\\n[.z] .nr line*ac\\n[.z] 0 +.ie \\n[.$] .nr line*temp (v;\\$1) +.el .nr line*temp 1v +.\" +.ie \\n[line*lp\\n[.z]]=\\n[.d] \{\ +. \" go here if no output since the last .SP +. nr line*output \\n[line*temp]-\\n[line*ac\\n[.z]] +. if \\n[line*output]<0 .nr line*output 0 +. nr line*ac\\n[.z] +\\n[line*output] +.\} +.el \{\ +. nr line*ac\\n[.z] \\n[line*temp] +. nr line*output \\n[line*temp] +. \" no extra space in the beginning of a page +. if (\\n[.d]<0):(\\n[pg*head-mark]=\\n[.d]) .nr line*output 0 +.\} +.if \\n[line*output] .sp \\n[line*output]u +.nr line*lp\\n[.z] \\n[.d] +.. +.\" ######## module misc ############### +.nr misc@adjust 14 +.de SA +.if \\n[.$] \{\ +. if \\$1-1 .@error "SA: bad arg: \\$1" +. nr misc@adjust 0\\$1 +.\} +.ie \\n[misc@adjust] 'ad +.el 'na +.. +.\"------------- +.\" switch environment, keep all important settings. +.de misc@ev-keep +.nr misc*ll \\n[.l] +.ev \\$1 +.ll \\n[misc*ll]u +.lt \\n[misc*ll]u +.. +.\"------------- +.\" .misc@push stackname value +.de misc@push +.ie d misc*st-\\$1 .ds misc*st-\\$1 \\$2 \\*[misc*st-\\$1] +.el .ds misc*st-\\$1 \\$2 +.. +.\"------------- +.\" .misc@pop stackname +.\" value returned in the string misc*pop +.de misc@pop +.misc@pop-set misc*st-\\$1 \\*[misc*st-\\$1] +.. +.\"------------- +.de misc@pop-set +.ds misc*st-name \\$1 +.shift +.if \\n[.$]<1 .@error "stack \\*[misc*st-name] empty" +.ds misc*pop \\$1 +.shift +.ds \\*[misc*st-name] \\$* +.. +.\"------------- +.\" .misc@pop-nr stackname varname +.de misc@pop-nr +.misc@pop \\$1 +.nr \\$2 \\*[misc*pop] +.. +.\"------------- +.\" .misc@pop-ds stackname varname +.de misc@pop-ds +.misc@pop \\$1 +.ds \\$2 \\*[misc*pop] +.. +.\"----------- +.\" reset tabs +.de TAB +.ta T 5n +.. +.\"------------- +.\" .PGFORM linelength [ pagelength [ pageoffset [1]]] +.de PGFORM +.\" Break here to avoid problems with new linesetting of the previous line. +.\" Hope this doesn't break anything else :-) +.\" Don't break if arg_4 is a '1'. +.if \\n[D]>2 .tm PGFORM: \\$* +.if ''\\$4' .br +.if \\n[D]>3 .tm PGFORM: IN l:\\n[.l] p:\\n[.p] o:\\n[.o] +.ie !''\\$1' \{\ +. ll \\$1 +. nr @ll \\n[.l] +. nr @cur-ll \\n[@ll] +. lt \\n[@ll]u +.\} +.el \{\ +. ll \\n[@ll]u +. lt \\n[@ll]u +.\} +.\" +.ie !''\\$2' \{\ +. pl \\$2 +. nr @pl \\n[.p] +.\} +.el .pl \\n[@pl]u +.\" +.ie !''\\$3' \{\ +. po \\$3 +. nr @po \\n[.o] +.\} +.el .po \\n[@po]u +.if \\n[D]>3 .tm PGFORM: OUT l:\\n[.l] p:\\n[.p] o:\\n[.o] +.if \\n[D]>2 .tm PGFORM: ll=\\n[@ll], pl=\\n[@pl], po=\\n[@po] +'in 0 +.pg@move-trap +.if \\n[D]>2 \{\ +. tm Traps: +. ptr +.\} +.. +.\"------------- +.\" .MOVE y [[x] linelength] +.\" move to line y, indent to x +.de MOVE +.if !\\n[.$] .@error "MOVE y [x]: no arguments" +.if \\n[nl]<0 \c +.\" move to Y-pos +.sp |(v;\\$1) +.\" calc linelength +.ie \\n[.$]>2 .nr pg*i (n;\\$3) +.el \{\ +. ie \\n[.$]>1 .nr pg*i (n;\\n[@ll]u-\\$2) +. el .nr pg*i \\n[@ll]u +.\} +.\" move to X-pos, if any +.if !''\\$2' .po \\$2 +.\" set linelength +.ll \\n[pg*i]u +.. +.\"------------- +.de SM +.if !\\n[.$] .@error "SM: no arguments" +.if \\n[.$]=1 \s-1\\$1\s0 +.if \\n[.$]=2 \s-1\\$1\s0\\$2 +.if \\n[.$]=3 \\$1\s-1\\$2\s0\\$3 +.. +.\"------------- +.nr misc*S-ps \n[@ps] +.nr misc*S-vs \n[@vs] +.nr misc*S-ps1 \n[@ps] +.nr misc*S-vs1 \n[@vs] +.ds misc*a +.ds misc*b +.de S +.ie !\\n[.$] \{\ +. ds misc*a P +. ds misc*b P +.\} +.el \{\ +. ie \\n[.$]=1 .ds misc*b D +. el \{\ +. ie \w@\\$2@=0 .ds misc*b C +. el .ds misc*b \\$2 +. \} +. ie \w@\\$1@=0 .ds misc*a C +. el .ds misc*a \\$1 +.\} +.\" +.\" set point size +.if !'\\*[misc*a]'C' \{\ +. ie '\\*[misc*a]'P' .ps \\n[misc*S-ps]u +. el \{\ +. ie '\\*[misc*a]'D' .ps \\n[S] +. el .ps \\*[misc*a] +. if \\n[D]>2 .tm S: .ps \\*[misc*a] +. \} +.\} +.\" +.\" set vertical spacing +.if !'\\*[misc*b]'C' \{\ +. ie '\\*[misc*b]'P' .vs \\n[misc*S-vs]u +. el \{\ +. ie '\\*[misc*b]'D' .vs \\n[.ps]u+2p +. el .vs \\*[misc*b] +. if \\n[D]>2 .tm S: .vs \\*[misc*b] +. \} +.\} +.nr @ps \\n[.ps] +.nr @vs \\n[.v] +.\" +.if \\n[D]>1 .tm S(\\$*): ma:\\*[misc*a], mb:\\*[misc*b] => ps:\\n[@ps]u, vs:\\n[@vs]u +.nr misc*S-ps \\n[misc*S-ps1] +.nr misc*S-vs \\n[misc*S-vs1] +.nr misc*S-ps1 \\n[@ps] +.nr misc*S-vs1 \\n[@vs] +.pg@move-trap +.. +.\"------------ +.de HC +.ev 0 +.hc \\$1 +.ev +.ev 1 +.hc \\$1 +.ev +.ev 2 +.hc \\$1 +.ev +.. +.\"------------ +.de RD +.di misc*rd +'fl +.rd \\$1\t +.br +.di +.ie !''\\$3' \{\ +. di misc*rd2 +. ds \\$3 "\\*[misc*rd] +. br +. di +.\} +.if !''\\$2' .rn misc*rd \\$2 +.rm misc*rd misc*rd2 +.. +.\"------------ +.\" VERBON [flag [pointsize [font]]] +.\" flag +.\" bit function +.\" 0 escape on +.\" 1 add an empty line before verbose text +.\" 2 add an empty line after verbose text +.\" 3 numbered lines (controlled by the string Verbnm) +.\" 4 indent text by the numbervariable Verbin. +.de VERBON +.br +.nr misc*verb 0\\$1 +.if (0\\n[misc*verb]%4)/2 .SP \\n[Lsp]u +.misc@ev-keep misc*verb-ev +.nf +.if (0\\n[misc*verb]%16)/8 .nm \\*[Verbnm] +.ie !'\\$3'' .ft \\$3 +.el .ft CR +.ie 0\\$2 \{\ +. ss \\$2 +. ps \\$2 +. vs \\$2 +.\} +.el .ss 12 +.ta T 8u*\w@n@u +.if (0\\n[misc*verb]%32)/16 .in +\\n[Verbin]u +.if 0\\n[misc*verb]%2 \{\ +. eo +. nr @verbose-flag 1 \" tell pageheader to set ec/eo +.\} +.. +.de VERBOFF +.ec +.br +.if (0\\n[misc*verb]%8)/4 .SP \\n[Lsp]u +.if (0\\n[misc*verb]%16)/8 .nm +.if (0\\n[misc*verb]%32)/16 .in +.ev +.nr @verbose-flag 0 +.. +.\" ######## module pict ################# +.nr pict*width 0 +.nr pict*height 0 +.nr pict*mode 0 +.nr pict*ind 0 +.nr pict*id 0 1 +.\" I assume that the number variable pict*id is the same +.\" between two runs. +.de PIC +.br +.nr pict*ind 0 +.nr pict*box 0 +.while \\n[.$]>0 \{\ +. if '-B'\\$1' \{\ +. nr pict*box 1 +. shift +. continue +. \} +. if '-L'\\$1' \{\ +. nr pict*mode 0 +. shift +. continue +. \} +. if '-R'\\$1' \{\ +. nr pict*mode 1 +. shift +. continue +. \} +. if '-I'\\$1' \{\ +. nr pict*ind (m;\\$2) +. nr pict*mode 2 +. shift 2 +. continue +. \} +. if '-C'\\$1' \{\ +. nr pict*mode 3 +. shift +. continue +. \} +. ds pict*f \\$1 +. nr pict*id +1 +. shift +. if \\n[.$]>0 \{\ +. nr pict*width (i;\\$1) +. shift +. \} +. if \\n[.$]>0 \{\ +. nr pict*height (i;\\$1) +. shift +. \} +.\} +.if \\n[Ref]>0 \{\ +. tm .\\\\" PIC id \\n[pict*id] +. tm .\\\\" PIC file \\*[pict*f] +.\} +.if d pict*file!\\n[pict*id] \{\ +. ds pict*f \\*[pict*file!\\n[pict*id]] +. nr pict*llx \\n[pict*llx!\\n[pict*id]] +. nr pict*lly \\n[pict*lly!\\n[pict*id]] +. nr pict*urx \\n[pict*urx!\\n[pict*id]] +. nr pict*ury \\n[pict*ury!\\n[pict*id]] +. \" +. nr pict*w (p;\\n[pict*urx]-\\n[pict*llx]) +. if \\n[pict*w]<0 .nr pict*w 0-\\n[pict*w] +. nr pict*h (p;\\n[pict*ury]-\\n[pict*lly]) +. if \\n[pict*h]<0 .nr pict*h 0-\\n[pict*h] +. if \\n[pict*width]>0 \{\ +. nr pict*rs (u;1000*\\n[pict*width]/\\n[pict*w]) +. nr pict*w (u;\\n[pict*w]*\\n[pict*rs]/1000) +. nr pict*h (u;\\n[pict*h]*\\n[pict*rs]/1000) +. \} +. if \\n[pict*height]>0 \{\ +. nr pict*rs (u;1000*\\n[pict*height]/\\n[pict*h]) +. nr pict*h (u;\\n[pict*h]*\\n[pict*rs]/1000) +. \} +. if '0'\\n[pict*mode]' \{\ +. nr pict*in \\n[.i]u +. \} +. if '1'\\n[pict*mode]' \{\ +. nr pict*in (u;\\n[.l]-\\n[.i]-\\n[pict*w]) +. \} +. if '2'\\n[pict*mode]' \{\ +. nr pict*in \\n[pict*ind]u +. \} +. if '3'\\n[pict*mode]' \{\ +. nr pict*in (u;(\\n[.l]-\\n[.i]-\\n[pict*w])/2) +. \} +. ds pict*h " +. if \\n[pict*h]>0 .ds pict*h \\n[pict*h] +. \" +. ne \\n[pict*h]u +. \" +. \" these lines are copied and modified from tmac.pspic. +. \" Originally written by James Clark +. br +. ie \\n[pict*box]>0 \{\ +\h'\\n[pict*in]u'\ +\Z'\D'p 0 \\n[pict*h]u \\n[pict*w]u 0 0 -\\n[pict*h]u''\ +\v'\\n[pict*h]u'\X'ps: import \\*[pict*f] \ +\\n[pict*llx] \\n[pict*lly] \\n[pict*urx] \\n[pict*ury] \\n[pict*w] \\n[pict*h]' +.\} +. el \{\ +\h'\\n[pict*in]u'\ +\X'ps: invis'\ +\Z'\D'p 0 \\n[pict*h]u \\n[pict*w]u 0 0 -\\n[pict*h]u''\ +\X'ps: endinvis'\ +\v'\\n[pict*h]u'\X'ps: import \\*[pict*f] \ +\\n[pict*llx] \\n[pict*lly] \\n[pict*urx] \\n[pict*ury] \\n[pict*w] \\n[pict*h]' +. \} +. br +. sp \\n[pict*h]u +.\} +.. +.\" external picture +.de EPIC +.if \\n[.$]< 2 .@error "EPIC: Not enough arguments" +.nr pict*w \\$1 +.nr pict*h \\$2 +.ds pict*name "External picture +.if !''$3' .ds pict*name \\$3 +\& +.br +.ne \\n[pict*h]u +.sp \\n[pict*h]u +.nr pict*ind (u;(\\n[.l]-\\n[.i]-\\n[pict*w])/2) +.in +\\n[pict*ind]u +\D'l \\n[pict*w]u 0'\ +\D'l 0 -\\n[pict*h]u'\ +\D'l -\\n[pict*w]u 0'\ +\D'l 0 \\n[pict*h]u'\ +\v'-(u;\\n[pict*h]/2)'\ +\h'(u;(\\n[pict*w]-\w'\\*[pict*name]'/2))'\\*[pict*name] +.in +.. +.\" ######## module acc ################# +.\"----------- +.\" accents. These are copied from mgs, written by James Clark. +.de acc@over-def +.ds \\$1 \Z'\v'(u;\w'x'*0+\En[rst]-\En[.cht])'\ +\h'(u;-\En[skw]+(-\En[.w]-\w'\\$2'/2)+\En[.csk])'\\$2' +.. +.de acc@under-def +.ds \\$1 \Z'\v'\En[.cdp]u'\h'(u;-\En[.w]-\w'\\$2'/2)'\\$2' +.. +.acc@over-def ` \` +.acc@over-def ' \' +.acc@over-def ^ ^ +.acc@over-def ~ ~ +.acc@over-def : \(ad +.acc@over-def ; \(ad +.acc@under-def , \(ac +.\" ######## module uni ################# +.\" unimplemented macros +.de OK +'tm "OK: not implemented" +.. +.de PM +'tm "PM: not implemented" +.. +.\" ######## module hd ################# +.\" support for usermacro +.nr hd*h1-page 1 \" last page-number for level 1 header. +.nr hd*htype 0 +.ds hd*sect-pg +.ds hd*mark +.ds hd*suf-space +.nr hd*need 0 +.aln ;0 hd*htype +.als }0 hd*mark +.als }2 hd*suf-space +.aln ;3 hd*need +.\"------------- +.\" .hd@split varable index name val1 val2 ... +.de hd@split +.if \\$2>(\\n[.$]-3) .@error "\\$3 must have at least \\$2 values (\\*[\\$3]). +.nr hd*sp-tmp \\$2+3 +.ds \\$1 \\$[\\n[hd*sp-tmp]] +.. +.de HU +.H 0 "\\$1" +.. +.\"------------- +.de H +.if !r hd*cur-bline .nr hd*cur-bline \\n[nl] +.br +.df@print-float 2\" $$$ could be wrong... +.\" terminate all lists +.LC +.init@reset +.nr hd*level 0\\$1 +.nr hd*arg1 0\\$1 +.if !\\n[hd*level] .nr hd*level \\n[Hu] +.\" +.\" clear lower counters +.nr hd*i 1 1 +.while \\n+[hd*i]<8 .if \\n[hd*level]<\\n[hd*i] .nr H\\n[hd*i] 0 1 +.\" +.\" save last text for use in TP +.if \\n[hd*level]=1 .ds H1txt \\$2\\$3 +.\" +.\" This is a little fix to be able to get correct H1 heading number +.\" in page headers. Special attention was needed when other formats are used. +.ie !''\\g[H1]' \{\ +. ds hd*format \\g[H1] +. af H1 0 +. nr H1h \\n[H1] 1 +. af H1 \\*[hd*format] +.\} +.el .nr H1h \\n[H1] 1 +.if \\n[hd*level]=1 .nr H1h +1 +.\" +.\" Check if it's time for new page. Only if text has +.\" appeared before. +.if \\n[Ej]&(\\n[Ej]>=\\n[hd*level])&(\\n[nl]>\\n[hd*cur-bline]) .pg@next-page +.\" +.\" increment current counter +.nr H\\n[hd*level] +1 +.\" +.\" update pagenumber if section-page is used +.if (\\n[hd*level]=1)&(\\n[Sectp]>0) .hd@set-page 1 +.\" +.\" hd*mark is the text written to the left of the header. +.ds hd*mark \\n[H1]. +.\" +.if \\n[hd*level]>1 .as hd*mark \\n[H2] +.\" +.nr hd*i 2 1 +.while \\n+[hd*i]<8 .if \\n[hd*level]>(\\n[hd*i]-1) .as hd*mark .\\n[H\\n[hd*i]] +.if \\n[Ht] .ds hd*mark \\n[H\\n[hd*level]]. +.\" +.\" special case, no dot after level one heading if not H1dot true +.if (\\n[hd*level]=1)&(\\n[H1dot]=0) .ds hd*mark \\n[H1] +.\" +.as hd*mark \ \ \" add spaces between mark and heading +.if !\\n[hd*arg1] .ds hd*mark\" no mark for unnumbered +.\" +.if \\n[D]>1 .tm At header \\*[hd*mark] "\\$2" +.nr hd*htype 0 \" hd*htype = check break and space +. \" 0 = run-in, 1 = break only, 2 = space +.if \\n[hd*level]<=\\n[Hb] .nr hd*htype 1 +.if \\n[hd*level]<=\\n[Hs] .nr hd*htype 2 +. \" two spaces if hd*htype == 0 +.ie (\\n[hd*htype]=0)&(\w@\\$2@) .ds hd*suf-space " \" +.el .ds hd*suf-space +.nr hd*need 2v \" hd*need = header need space +.\"---------- user macro HX ------------ +.\" User exit macro to override numbering. +.\" May change hd*mark (}0), hd*suf-space (}2) and hd*need (;3) +.\" Can also change Hps1/2. +.if d HX .HX \\n[hd*level] \\n[hd*arg1] "\\$2\\$3" +.\"-------------------------------------- +.\" pre-space +.ie \\n[hd*level]<=\\n[Hps] .SP (u;\\n[Hps2]) +.el .SP (u;\\n[Hps1]) +.\" +.par@reset-num \\n[hd*level]\" reset numbered paragraph +.\" start diversion to measure size of header +.di hd*div +\\*[hd*mark]\\$2\\$3\\*[hd*suf-space] +.br +.di +.rm hd*div +.if \\n[hd*htype] .na \" no adjust if run-in +.if \\n[hd*htype]<2 .nr hd*need +\\n[Lsp]u \" add some extra space +.ne \\n[hd*need]u+\\n[dn]u+.5p-1v \" this is the needed space for a header +.\" +.\" size and font calculations +.hd@split hd*font \\n[hd*level] HF \\*[HF]\" get font for this level +.ft \\*[hd*font]\" set new font +.hd@split hd*new-ps \\n[hd*level] HP \\*[HP]\" get point size +.ie (\\*[hd*new-ps]=0):(\w@\\*[hd*new-ps]@=0) \{\ +. if \\n[hd*htype] \{\ +. if '\\*[hd*font]'3' \{\ +. ps -1 +. vs -1 +. \} +. if '\\*[hd*font]'B' \{\ +. ps -1 +. vs -1 +. \} +. \} +.\} +.el \{\ +. ps \\*[hd*new-ps] +. vs \\*[hd*new-ps]+2 +.\} +.\" +.\"---------- user macro HY ------------- +.\" user macro to reset indents +.if d HY .HY \\n[hd*level] \\n[hd*arg1] "\\$2\\$3" +.\"-------------------------------------- +.nr hd*mark-size \w@\\*[hd*mark]@ +.if (\\n[hd*level]<=\\n[Hc])&\\n[hd*htype] .ce\" center if level<=Hc +.\" +.\" finally, output the header +\\*[hd*mark]\&\c +.\" and the rest of the header +.ie \\n[hd*htype] \{\ +\\$2\\$3 +. br +.\} +.el \\$2\\$3\\*[hd*suf-space]\&\c +.ft 1 +.\" restore pointsize and vertical size. +.ps \\n[@ps]u +.vs \\n[@vs]u +.\" +.\" table of contents +.if (\\n[hd*level]<=\\n[Cl])&\w@\\$2@ .toc@entry \\n[hd*level] "\\$2" +.\" set adjust to previous value +.SA +.\" do break or space +.if \\n[hd*htype] .br +.if \\n[hd*htype]>1 .SP (u;\\n[Lsp]*\\n[Hss]) +.if \\n[hd*htype] \{\ +. \" indent if Hi=1 and Pt=1 +. if (\\n[Hi]=1)&(\\n[Pt]=1) .ti +\\n[Pi]n +. \" indent size of mark if Hi=2 +. if \\n[hd*htype]&(\\n[Hi]>1) .ti +\\n[hd*mark-size]u +.\} +.nr par@ind-flag 0 \" no indent on .P if Pt=2 +.\" +.\" check if it is time to reset footnotes +.if (\\n[hd*level]=1)&\\n[ft*clear-at-header] .nr ft*nr 0 1 +.\" +.\" check if it is time to reset indexes +.if (\\n[hd*level]=1)&\\n[Sectf] \{\ +. nr lix*fg-nr 0 1 +. nr lix*tb-nr 0 1 +. nr lix*ec-nr 0 1 +. nr lix*ex-nr 0 1 +.\} +.\"---------- user macro HZ ---------- +.if d HZ .HZ \\n[hd*level] \\n[hd*arg1] "\\$2\\$3" +.nr hd*last-pos \\n[nl] +.nr hd*last-hpos \\n[.k] +.nr par@ind-flag 0 +.. +.\"-------- +.de HM +.nr hd*i 0 1 +.while \\n+[hd*i]<8 .af H\\n[hd*i] \\$[\\n[hd*i]] 1 +.. +.\"---------------------- +.\" set page-nr, called from header +.\" +.de hd@set-page +.\" +.ie \\n[.$]>0 .nr P \\$1 +.el .nr P +1 +.\" Set section-page-string +.ds hd*sect-pg \\n[H1]-\\n[P] +.if \\n[Sectp]>1 .if '\\n[H1]'0' .ds hd*sect-pg " +.. +.\"########### module pg #################### +.\" set end of text trap +.wh 0 pg@header +.em pg@end-of-text +.\" +.ds pg*header ''- \\nP -'' +.ds pg*footer +.if \n[N]=4 .ds pg*header '''' +.if (\n[N]=3):(\n[N]=5) \{\ +. ds pg*header '''' +. ds pg*footer ''\\*[hd*sect-pg]'' +.\} +.ds pg*even-footer +.ds pg*odd-footer +.ds pg*even-header +.ds pg*odd-header +.\" +.nr pg*top-margin 0 +.nr pg*foot-margin 0 +.nr pg*block-size 0 +.nr pg*footer-size 5\" 1v+footer+even/odd footer+2v +.nr pg*header-size 7\" 3v+header+even/odd header+2v +.nr pg*extra-footer-size 0 +.nr pg*extra-header-size 0 +.nr ft*note-size 0 +.nr pg*cur-column 0 +.nr pg*cols-per-page 1 +.nr pg*cur-po \n[@po] +.nr pg*head-mark 0 +.\" +.nr pg*ps \n[@ps] +.nr pg*vs \n[@vs] +.\"------------------------- +.\" footer TRAPS: set, enable and disable +.de pg@set-new-trap +.nr pg*foot-trap \\n[@pl]u-(\\n[pg*block-size]u+\\n[ft*note-size]u+\\n[pg*foot-margin]u+\\n[pg*footer-size]v+\\n[pg*extra-footer-size]u) +.\" +.if \\n[D]>2 .tm pg*foot-trap \\n[@pl]u-(\\n[pg*block-size]u+\\n[ft*note-size]u+\\n[pg*foot-margin]u+\\n[pg*footer-size]v+\\n[pg*extra-footer-size]u) = \\n[pg*foot-trap] +.\" +.\" last-pos points to the position of the footer and bottom +.\" block below foot-notes. +.nr pg*last-pos \\n[@pl]u-(\\n[pg*block-size]u+\\n[pg*foot-margin]u+\\n[pg*footer-size]v) +.if \\n[D]>2 .tm pg*last-pos \\n[@pl]u-(\\n[pg*block-size]u+\\n[pg*foot-margin]u+\\n[pg*footer-size]v) = \\n[pg*last-pos] +.. +.de pg@enable-trap +.wh \\n[pg*foot-trap]u pg@footer +.if \\n[D]>2 .tm pg@enable-trap .t=\\n[.t] nl=\\n[nl] +.if \\n[D]>2 .ptr +.. +.de pg@disable-trap +.ch pg@footer +.. +.\" move to new trap (if changed). +.de pg@move-trap +.pg@disable-trap +.pg@set-new-trap +.pg@enable-trap +.. +.de pg@enable-top-trap +.\" set trap for pageheader. +.nr pg*top-enabled 1 +.. +.de pg@disable-top-trap +.\" remove trap for pageheader. +.nr pg*top-enabled 0 +.. +.\" no header on the next page +.de PGNH +.nr pg*top-enabled (-1) +.. +.\" set first trap for pagefooter +.pg@enable-top-trap +.pg@set-new-trap +.pg@enable-trap +.\"------------------------- +.\" stop output and begin on next page. Fix footnotes and all that. +.de pg@next-page +.\".debug next-page +.ne 999i \" activate trap +.\" .pg@footer +.. +.\"------------------------- +.\" support for PX, TP and EOP. +.als }t pg*header +.als }e pg*even-header +.als }o pg*odd-header +.als TPh pg*header +.als TPeh pg*even-header +.als TPoh pg*odd-header +.\" +.als EOPf pg*footer +.als EOPef pg*even-footer +.als EOPof pg*odd-footer +.\"------------------------------------------------------------ +.\" HEADER +.de pg@header +.if \\n[D]>1 .tm Page# \\n[%] (\\n[.F]:\\n[c.]) +.if \\n[Idxf] \{\ +.tl '''' +.\} +.\" assign current page-number to P +.hd@set-page +.\" reset spacing +.nr line*lp\\n[.z] 0 +.nr line*ac\\n[.z] 0 +.\" +.\" suppress pageheader if pagenumber == 1 and N == [124] +.if \\n[pg*top-enabled] \{\ +.\" must be fixed!! +.\". pg@disable-top-trap +. if \\n[pg*extra-header-size] 'sp \\n[pg*extra-header-size]u +. if \\n[pg*top-margin] 'sp \\n[pg*top-margin]u +. ev pg*tl-ev +. pg@set-env +. ie d let@header .let@header +. el \{\ +. ie d TP .TP +. el \{\ +' sp 3 +. ie ((\\n[%]=1)&((\\n[N]=1):(\\n[N]=2))) .sp +. el .tl \\*[pg*header] +. ie o .tl \\*[pg*odd-header] +. el .tl \\*[pg*even-header] +' sp 2 +. \} +. \} +. ev +. \" why no-space?? +. if d PX \{\ +. ns +. PX +. rs +. \} +. \" check for pending footnotes +. ft@check-old +. \" +. \" back to normal text processing +. pg@enable-trap +. \" mark for multicolumn +. nr pg*head-mark \\n[nl]u +. \" reset NCOL pointer at each new page. +. nr pg*last-ncol 0 +. \" set multicolumn +. \" +. pg@set-po +. \" print floating displays +. df@print-float 4 +. tbl@top-hook +. ns +.\} +.if \\n[pg*top-enabled]<0 .nr pg*top-enabled 1 +.nr hd*cur-bline \\n[nl] \" .H needs to know if output has occured +.. +.\"--------------------------------------------------------- +.\" FOOTER +.de pg@footer +.ec +.if \\n[D]>2 .tm Footer# \\n[%] (\\n[.F]:\\n[c.]) +.pg@disable-trap +.\".debug footer +.tbl@bottom-hook +.\" increment pageoffset for MC +.\" move to the exact start of footer. +'sp |\\n[pg*foot-trap]u+1v +.\" +.if \\n[D]>3 .tm FOOTER after .sp +.\" print footnotes +.if d ft*div .ft@print +.\" +.pg@inc-po +.if !\\n[pg*cur-column] .pg@print-footer +.\" next column +.pg@set-po +.pg@enable-trap +.if \\n[@verbose-flag] .eo \" to help VERBON/VERBOFF +.. +.\"------------------------- +.de pg@print-footer +.\" jump to the position just below the foot-notes. +'sp |\\n[pg*last-pos]u+1v +.\" check if there are any bottom block +.if d pg*block-div .pg@block +.\" +.\" print the footer and eject new page +.ev pg*tl-ev +.pg@set-env +.\" user defined end-of-page macro +.ie d EOP .EOP +.el \{\ +. ie o .tl \\*[pg*odd-footer] +. el .tl \\*[pg*even-footer] +. ie (\\n[%]=1)&(\\n[N]=1) .tl \\*[pg*header] +. el .tl \\*[pg*footer] +. tl ''\\*[Pg_type!\\n[@copy_type]]'' +.\} +.ev +.\" be sure that floating displays and footnotes will be +.\" printed at the end of the document. +.ie (\\n[df*fnr]>=\\n[df*o-fnr]):\\n[ft*exist] \{\ +. ev ne +' bp +. ev +.\} +.el 'bp +.. +.\"------------------------- +.\" +.\" Initialize the title environment +.de pg@set-env +'na +'nh +'in 0 +'ti 0 +.ie \\n[Pgps] \{\ +. ps \\n[@ps]u +. vs \\n[@vs]u +.\} +.el \{\ +. ps \\n[pg*ps]u +. vs \\n[pg*vs]u +.\} +.lt \\n[@ll]u +.. +.\"------------------------- +.de PH +.ds pg*header "\\$1 +.pg@set-new-size +.. +.de PF +.ds pg*footer "\\$1 +.pg@set-new-size +.. +.de OH +.ds pg*odd-header "\\$1 +.pg@set-new-size +.. +.de EH +.ds pg*even-header "\\$1 +.pg@set-new-size +.. +.de OF +.ds pg*odd-footer "\\$1 +.pg@set-new-size +.. +.de EF +.ds pg*even-footer "\\$1 +.pg@set-new-size +.. +.de pg@clear-hd +.ds pg*even-header +.ds pg*odd-header +.ds pg*header +.. +.de pg@clear-ft +.ds pg*even-footer +.ds pg*odd-footer +.ds pg*footer +.. +.de pg@set-new-size +.nr pg*ps \\n[@ps] +.nr pg*vs \\n[@vs] +.pg@move-trap +.. +.\"------------------------- +.\" end of page processing +.de pg@footnotes +.\".debug footnotes +.\" output footnotes. set trap for block +.\" +.. +.\"------------------------- +.\" print bottom block +.de pg@block +.ev pg*block-ev +'nf +'in 0 +.ll 100i +.pg*block-div +.br +.ev +.. +.\"------------------------- +.\" define bottom block +.de BS +.misc@ev-keep pg*block-ev +.init@reset +.br +.di pg*block-div +.. +.\"------------------------- +.de BE +.br +.di +.nr pg*block-size \\n[dn]u +.ev +.pg@move-trap +.. +.\"------------------------- +.\" print out all pending text +.de pg@end-of-text +.if \\n[D]>2 .tm ---------- End of text processing ---------------- +.df@eot-print +.ref@eot-print +.. +.\"------------------------- +.\" set top and bottom margins +.de VM +.if \\n[.$]=0 \{\ +. nr pg*extra-footer-size 0 +. nr pg*extra-header-size 0 +.\} +.if \\n[.$]>0 .nr pg*extra-header-size (v;\\$1) +.if \\n[.$]>1 .nr pg*extra-footer-size (v;\\$2) +.if \\n[D]>2 \{\ +. tm extra top \\n[pg*extra-footer-size] +. tm extra bottom \\n[pg*extra-header-size] +.\} +.pg@move-trap +.. +.\"--------------------- +.\" multicolumn output. +.de pg@set-po +.if \\n[pg*cols-per-page]>1 \{\ +. ll \\n[pg*column-size]u +.\} +.. +.de pg@inc-po +.if \\n[pg*cols-per-page]>1 \{\ +. ie \\n+[pg*cur-column]>=\\n[pg*cols-per-page] \{\ +. nr pg*cur-column 0 1 +. nr pg*cur-po \\n[@po]u +. po \\n[@po]u +. ll \\n[@ll]u +. \} +. el \{\ +. nr pg*cur-po +(\\n[pg*column-size]u+\\n[pg*column-sep]u) +. po \\n[pg*cur-po]u +' sp |\\n[pg*head-mark]u +. tbl@top-hook +. \} +.\} +.. +.\" An argument disables the page-break. +.de 1C +.br +.if \\n[pg*cols-per-page]<=1 .@error "1C: multicolumn mode not active" +.nr pg*cols-per-page 1 +.nr pg*column-sep 0 +.nr pg*column-size \\n[@ll] +.nr pg*ncol-i \\n[pg*cur-column]\" temp variable +.nr pg*cur-column 0 1 +.nr pg*cur-po \\n[@po]u +.PGFORM +.ie !'\\$1'1' .SK +.el \{\ +. if d ft*div \{\ +. if \\n[pg*ncol-i]>0 \{\ +. @warning 1C: footnotes will be messy +. \} +. \} +. if \\n[pg*last-ncol]>0 \{\ +. sp |\\n[pg*last-ncol]u +. nr pg*last-ncol 0 +. \} +.\} +.. +.de 2C +.br +.nr pg*head-mark \\n[nl]u +.if \\n[pg*cols-per-page]>1 .@error "2C: multicolumn mode already active" +.nr pg*cols-per-page 2 +.nr pg*column-sep \\n[@ll]/15 +.nr pg*column-size (\\n[@ll]u*7)/15 +.nr pg*cur-column 0 1 +.nr pg*cur-po \\n[@po]u +.ll \\n[pg*column-size]u +.\" .lt \\n[pg*column-size]u +.. +.\" MC column-size [ column-separation ] +.de MC +.br +.nr pg*head-mark \\n[nl]u +.if \\n[pg*cols-per-page]>1 .@error "MC: multicolumn mode already active" +.ie ''\\$1' .nr pg*column-size \\n[.l] +.el .nr pg*column-size (n;\\$1) +.ie ''\\$2' .nr pg*column-sep \\n[pg*column-size]/15 +.el .nr pg*column-sep (n;\\$2) +.\" +.\" calculate the number of columns/page +.nr pg*cols-per-page 0 +.nr pg*i \\n[pg*column-size] +.while \\n[pg*i]<=\\n[.l] \{\ +. nr pg*cols-per-page \\n[pg*cols-per-page]+1 +. nr pg*i \\n[pg*i]+\\n[pg*column-sep]+\\n[pg*column-size] +.\} +.nr pg*cur-column 0 1 +.nr pg*cur-po \\n[@po]u +.ll \\n[pg*column-size]u +.\" .lt \\n[pg*column-size]u +.. +.\" begin a new column +.de NCOL +.br +.if \\n[nl]>\\n[pg*last-ncol] .nr pg*last-ncol \\n[nl] +.pg@footer +.. +.\" skip pages +.de SK +.br +.bp +.nr pg*i 0 1 +.\" force new page by writing something invisible. +.while \\n+[pg*i]<=(0\\$1) \{\ +\& +. bp +.\} +.. +.\"------------------------------- +.\" MULB width1 space1 width2 space2 width3 space3 ... +.de MULB +.br +.nr pg*i 0 1 +.nr pg*mul-x 0 1 +.nr pg*mul-ind 0 +.nr pg*mul-last 0 +.while \\n[.$] \{\ +. nr pg*mul!\\n+[pg*i] (n;0\\$1) +. nr pg*muls!\\n[pg*i] (n;0\\$2) +. shift 2 +.\} +.nr pg*mul-max-col \\n[pg*i] +.ds pg*mul-fam \\n[.fam] +.nr pg*mul-font \\n[.f] +.ev pg*mul-ev +.ps \\n[@ps]u +.vs \\n[@vs]u +.fam \\*[pg*mul-fam] +.ft \\n[pg*mul-font] +.fi +.hy 14 +.di pg*mul-div +.MULN +.. +.\"----------- +.de MULN +.if \\n[pg*mul-x]>=\\n[pg*mul-max-col] .@error "MULN: Undefined columnwidth" +.br +.if \\n[.d]>\\n[pg*mul-last] .nr pg*mul-last \\n[.d] +.rt +0 +.in \\n[pg*mul-ind]u +.ll (u;\\n[.i]+\\n[pg*mul!\\n+[pg*mul-x]])u +.nr pg*mul-ind +(u;\\n[pg*mul!\\n[pg*mul-x]]+\\n[pg*muls!\\n[pg*mul-x]]) +.. +.\"----------- +.\" MULE +.de MULE +.br +.if \\n[.d]>\\n[pg*mul-last] .nr pg*mul-last \\n[.d] +.di +.ev +.ne \\n[pg*mul-last]u +.nf +.mk +.pg*mul-div +.rt +.sp \\n[pg*mul-last]u +.fi +.. +.\"----------- +.de OP +.br +.ie o .if !\\n[pg*head-mark]=\\n[nl] \{\ +. bp +1 +. bp +1 +.\} +.el .bp +.. +.\"########### module footnotes ################### +.nr ft*note-size 0 +.nr ft*busy 0 +.nr ft*nr 0 1 +.nr ft*wide 0 +.nr ft*hyphen 0\" hyphenation value +.nr ft*adjust 1\" >0 if adjust true +.nr ft*indent 1\" >0 if text indent true (not imp. $$$) +.nr ft*just 0\" 0=left justification, 1=right (not imp. $$$) +.nr ft*exist 0\" not zero if there are any footnotes to be printed +.nr ft*clear-at-header 0\" >0 if footnotes should be reset at first level head. +.\" +.ds F \v'-.4m'\s-3\\n+[ft*nr]\s0\v'.4m' +.\" +.\"----------------- +.\" init footnote environment +.de ft@init +.\" indentcontrol not implemented $$$ +.\" label justification not implemented $$$ +'in 0 +'fi +.ie \\n[ft*adjust] 'ad +.el 'na +.ie \\n[ft*hyphen] 'hy 14 +.el 'hy 0 +.ll \\n[@cur-ll]u +.lt \\n[@cur-ll]u +.ps (p;\\n[@ps]u-2) +.vs (p;\\n[@vs]u-1) +.. +.\"----------------- +.\" set footnote format +.\" no support for two column processing (yet). $$$ +.de FD +.if \\n[.$]=0 .@error "FD: bad arg \\$1" +.ie \\n[.$]=2 .nr ft*clear-at-header 1 +.el .nr ft*clear-at-header 0 +.\" +.if !'\\$1'' \{\ +. ie \\$1>11 .nr ft*format 0 +. el .nr ft*format \\$1 +. \" +. nr ft*hyphen (\\n[ft*format]%2)*14 +. nr ft*format \\n[ft*format]/2 +. \" +. nr ft*adjust 1-(\\n[ft*format]%2) +. nr ft*format \\n[ft*format]/2 +. \" +. nr ft*indent 1-(\\n[ft*format]%2) +. nr ft*format \\n[ft*format]/2 +. \" +. nr ft*just \\n[ft*format]%2 +.\} +.. +.\"--------------- +.\" Footnote and display width control $$$ +.de WC +.nr ft*i 0 1 +.while \\n+[ft*i]<=\\n[.$] \{\ +. ds ft*x \\$[\\n[ft*i]] +. if '\\*[ft*x]'N' \{\ +. nr ft*wide 0 +. nr ft*first-fn 0 +. nr ds*wide 0 +. nr ds*float-break 1 +. \} +. if '\\*[ft*x]'-WF' .nr ft*wide 0 +. if '\\*[ft*x]'WF' .nr ft*wide 1 +. if '\\*[ft*x]'-FF' .nr ft*first-fn 0 +. if '\\*[ft*x]'FF' .nr ft*first-fn 1 +. if '\\*[ft*x]'-WD' \{\ +. nr ds*wide 0 +. if r ft*df-save \{\ +. nr Df \\n[ft*df-save] +. rm ft*df-save +. \} +. \} +. if '\\*[ft*x]'WD' \{\ +. nr ds*wide 1 +. nr ft*df-save \\n[Df] +. nr Df 4 +. \} +. if '\\*[ft*x]'-FB' .nr ds*float-break 0 +. if '\\*[ft*x]'FB' .nr ds*float-break 1 +. if \\n[D]>1 .tm WC WF=\\n[ft*wide] WD=\\n[ds*wide] +.\} +.. +.\"----------------- +.\" begin footnote +.\" Change environment, switch to diversion and print the foot-note mark. +.de FS +.if \\n[ft*busy] .@error "FS: missing FE" +.nr ft*busy 1 +.ev ft*ev +.ft@init +.if !\\n[ft*wide] .pg@set-po +.di ft*tmp-div +.nr ft*space (u;\\n[Fs]*\\n[Lsp]) +.sp \\n[ft*space]u +.\" print mark +.ie \\n[.$] .ds ft*mark \\$1 +.el .ds ft*mark \\n[ft*nr]. +\\*[ft*mark] +.in +.75c +.sp -1 +.nr ft*exist 1 +.. +.\"----------------- +.\" init footnote diversion +.de ft@init-footnote +.di ft*div +\l'20n' +.br +.di +.nr ft*note-size \\n[dn] +.. +.\"----------------- +.\" end footnote +.\" End the diversion, back to previous environment, and adjust +.\" the trap to the new foot-note size. +.de FE +.nr ft*busy 0 +.br +.di +'in 0 +'nf +.if \\n[@pl]u<\\n[dn]u .@error "FE: too big footnote" +.if !d ft*div .nr dn +1v +.if \\n[D]>3 .tm FE: foot-trap=\\n[pg*foot-trap] .d=\\n[.d] dn=\\n[dn] +.ie (\\n[pg*foot-trap]u-\\n[.d]u)<\\n[dn]u \{\ +. da ft*next-div +. ft*tmp-div +. br +. di +.\} +.el \{\ +. if !d ft*div .ft@init-footnote +. da ft*div +. ft*tmp-div +. di +. nr ft*note-size +\\n[dn] +.\} +.rm ft*tmp-div +.ev +.pg@move-trap +.. +.\"----------------- +.\" print footnotes, see pg@footer +.de ft@print +.ev ft*print-ev +'nf +'in 0 +.ll 100i +.ft*div +.br +.ev +.rm ft*div +.nr ft*note-size 0 +.pg@move-trap +.. +.\"----------------- +.\" check if any pending footnotes, see pg@header +.de ft@check-old +.if d ft*next-div \{\ +. ev ft*ev +. ft@init +. ft@init-footnote +. nf +. in 0 +. da ft*div +. ft*next-div +. di +. nr ft*note-size +\\n[dn] +. rm ft*next-div +. ev +. nr ft*exist 0 +. pg@move-trap +.\} +.. +.\"########### module display ################### +.nr ds*wide 0\" >0 if wide displays wanted +.nr df*fnr 0 1\" floating display counter +.nr df*o-fnr 1\" floating display counter, already printed +.nr ds*snr 0 1\" static display counter +.nr ds*lvl 0 1\" display level +.nr ds*float-busy 0\" >0 if printing float +.nr df*float 0 >0 if previous display was floating +.\"-------------------------------------------- +.de DE +.ie \\n[df*float] .df@end \\$@ +.el .ds@end \\$@ +.. +.\"-------------------------------------------- +.\" floating display start +.\" nested DF/DE is not allowed. +.de DF +.if \\n[df*float] .@error "DF:nested floating is not allowed. Use DS." +.ds@set-format \\$@ +.\" +.nr df*old-ll \\n[.l] +.nr ds*ftmp \\n[.f] +.misc@ev-keep df*ev +.ft \\n[ds*ftmp] +.\" +.init@reset +.di df*div +'in 0 +.\" +.ds@set-new-ev \\n[df*old-ll] +.SP \\n[Lsp]u +.nr df*float 1 +.. +.\"-------------------------------------------- +.de df@end +.br +.SP \\n[Lsp]u +.di +.nr df*width!\\n+[df*fnr] \\n[dl] +.nr df*height!\\n[df*fnr] \\n[dn] +.nr df*wide!\\n[df*fnr] \\n[ds*wide] +.nr df*format!\\n[df*fnr] \\n[ds*format] +.ev +.if \\n[D]>2 .tm DF:fnr=\\n[df*fnr] w=\\n[dl] h=\\n[dn] wide=\\n[ds*wide] \ + form=\\n[ds*format] +.\" move div to the floating display list +.rn df*div df*fdiv!\\n[df*fnr] +.\" +.nr par@ind-flag 0 +.\" print float if queue is empty and the display fits into +.\" the current page +.if ((\\n[df*fnr]>=\\n[df*o-fnr])&(\\n[dn]<\\n[.t])) .df@print-float 1 +.nr df*float 0 +.. +.\"------------- +.\" called by end-of-text +.de df@eot-print +.br +.if \\n[df*o-fnr]<=\\n[df*fnr] \{\ +. if \\n[D]>2 .tm Print remaining displays. +.\" still some floats left, make non-empty environment +. misc@ev-keep ne +. init@reset +\c +. df@print-float 3 +. ev +.\} +.. +.\"--------------- +.\" print according to Df and De. +.\" .df@print-float type +.\" type called from +.\" 1 .DE +.\" 2 end of section +.\" 3 end of document +.\" 4 beginning of new page +.\" +.de df@print-float +.if \\n[Df]>5 .@error "Df=\\n[Df], max value is 5" +.if !\\n[ds*float-busy] \{\ +. nr ds*float-busy 1 +.\" at .DE +. if \\n[D]>3 .tm print-float: .t=\\n[.t], h=\\n[df*height!\\n[df*o-fnr]] +. \" Df = 1 or 5 +. if (\\$1=1)&((\\n[Df]=1):(\\n[Df]=5)) \{\ +. if \\n[.t]>\\n[df*height!\\n[df*o-fnr]] \{\ +. \" Print only new displays. +. if \\n[df*o-fnr]=\\n[df*fnr] \{\ +. br +. ds@print-one-float +. \} +. \} +. \} +. \" Df = 3 +. if (\\$1=1)&(\\n[Df]=3) \{\ +. if \\n[.t]>\\n[df*height!\\n[df*o-fnr]] \{\ +. br +. ds@print-one-float +. \} +. \} +.\" print all if Df<2 and end of section +. if (\\$1=2)&(\\n[Sectp]>0)&(\\n[Df]<2) \{\ +. br +. ds@print-all-floats +. \} +.\" print all if end of document. Where should they go instead? +. if \\$1=3 \{\ +. br +. ds@print-all-floats +.\} +.\" new page +. if (\\$1=4)&(\\n[Df]>1) \{\ +. if \\n[Df]=2 .ds@print-one-float +. if \\n[Df]=3 .ds@print-one-float +. if \\n[Df]>3 \{\ +. ie \\n[De] .ds@print-all-floats +. el .ds@print-this-page +. \} +. \} +. nr ds*float-busy 0 +.\} +.. +.\"--------------- +.\" DF out +.\" print a floating diversion +.de ds@output-float +.nr df*old-ll \\n[.l] +.nr df*old-in \\n[.i] +.ev ds*fev +.nf +.nr df*i \\n[df*o-fnr] +.nr df*f \\n[df*format!\\n[df*i]] +.\" +.in \\n[df*old-in]u +.if \\n[df*f]=1 'in +\\n[Si]n +.if \\n[df*f]>=2 'in 0 +.if \\n[df*f]=2 'ce 9999 +.if \\n[df*f]=3 'in (u;(\\n[.l]-\\n[df*width!\\n[df*i]])/2) +.if \\n[df*f]=4 'rj 9999 +.if \\n[df*f]=5 'in (u;\\n[.l]-\\n[df*width!\\n[df*i]]) +.\" +.\" +.df*fdiv!\\n[df*o-fnr] +.\" +.if \\n[df*f]=2 'ce 0 +.if \\n[df*f]=4 'rj 0 +.ev +.rm df*fdiv!\\n[df*i] +.rm df*height!\\n[df*i] +.rm df*format!\\n[df*i] +.if \\n[df*wide!\\n[df*i]] .nr pg*head-mark \\n[nl]u +.nr df*o-fnr +1 +.. +.\"--------------- +.\" print one floating display if there is one. +.de ds@print-one-float +.if \\n[df*o-fnr]<=\\n[df*fnr] \{\ +. if \\n[D]>3 .tm print-one-float: .t=\\n[.t], h=\\n[df*height!\\n[df*o-fnr]] +. if \\n[.t]<\\n[df*height!\\n[df*o-fnr]] .pg@next-page +. ds@output-float +. if \\n[De] .pg@next-page +.\} +.. +.\"--------------- +.\" print all queued floats. +.\" if De>0 do a page eject between the floats. +.de ds@print-all-floats +.while \\n[df*o-fnr]<=\\n[df*fnr] \{\ +. if \\n[D]>3 .tm print-all-floats: .t=\\n[.t], h=\\n[df*height!\\n[df*o-fnr]] +. if \\n[.t]<\\n[df*height!\\n[df*o-fnr]] .pg@next-page +. br +\c +. ds@output-float +. if \\n[De] .pg@next-page +.\} +.. +.\"--------------- +.\" print as many floats as will fit on the current page +.de ds@print-this-page +.while \\n[df*o-fnr]<=\\n[df*fnr] \{\ +. if \\n[D]>3 .tm print-this-page: .t=\\n[.t], h=\\n[df*height!\\n[df*o-fnr]] +. if \\n[.t]<\\n[df*height!\\n[df*o-fnr]] .break +. ds@output-float +.\} +.. +.\"--------------------------------------------------- +.\" get format of the display +.de ds@set-format +.ie \\n[.$] \{\ +. ie r ds*format!\\$1 .nr ds*format \\n[ds*format!\\$1] +. el .@error "DS/DF:wrong format:\\$1" +.\} +.el .nr ds*format 0 +.if \\n[D]>2 .tm set format=\\n[ds*format] +.\" fill or not to fill, that is the... +.nr ds*fill 0 +.ie \\n[.$]>1 \{\ +. ie r ds*fill!\\$2 .nr ds*fill \\n[ds*fill!\\$2] +. el .@error "\\*[ds*type]:wrong fill:\\$2" +.\} +.if \\n[D]>2 .tm set fill=\\n[ds*fill] +.nr ds*rindent 0 +.if \\n[.$]>2 .nr ds*rindent \\$3 +.if \\n[D]>2 .tm set indent=\\n[ds*rindent] +.. +.\"----------------------------- +.\" .ds@set-new-ev previous-line-length +.de ds@set-new-ev +.ll \\$1u +.lt \\$1u +.if \\n[ds*rindent] \{\ +. ll -\\n[ds*rindent]n +. lt -\\n[ds*rindent]n +.\} +.if \\n[ds*wide] \{\ +. ll \\n[@ll]u +. lt \\n[@ll]u +.\} +.\" +.ie \\n[ds*fill] 'fi +.el 'nf +.. +.\"-------------------------------------------------------- +.nr ds*format 0\" dummy value for .En/.EQ +.nr ds*format! 0\" no indent +.nr ds*format!0 0\" no indent +.nr ds*format!L 0\" no indent +.nr ds*format!I 1\" indent +.nr ds*format!1 1\" indent +.nr ds*format!C 2\" center each line +.nr ds*format!2 2\" center each line +.nr ds*format!CB 3\" center as block +.nr ds*format!3 3\" center as block +.nr ds*format!R 4\" right justify each line +.nr ds*format!4 4\" right justify each line +.nr ds*format!RB 5\" right justify as block +.nr ds*format!5 5\" right justify as block +.\"--------------- +.nr ds*fill! 0\" no fill +.nr ds*fill!N 0\" no fill +.nr ds*fill!0 0\" no fill +.nr ds*fill!F 1\" fill on +.nr ds*fill!1 1\" fill on +.\"-------------------------------------------- +.\" static display start +.\" nested DS/DE is allowed. No limit on depth. +.de DS +.br +.nr ds*lvl +1 +.ds@set-format \\$@ +.\" +.nr ds*old-ll \\n[.l] +.nr ds*old-in \\n[.i] +.misc@push ds-ll \\n[.l] +.misc@push ds-form \\n[ds*format] +.nr ds*i \\n[.i] +.nr ds*ftmp \\n[.f] +.misc@ev-keep ds*ev!\\n+[ds*snr] +.ft \\n[ds*ftmp] +.\" +.init@reset +.\" indent in a diversion doesn't seem like a good idea. +'in 0 +.di ds*div!\\n[ds*snr] +.\" +.ds@set-new-ev \\n[ds*old-ll] +.nr df*float 0 +.. +.\"-------------------------------------------- +.de ds@end +.if \\n-[ds*lvl]<0 .@error "DE: no corresponding DS" +.br +.di +.\" ********** +.nr ds*width \\n[dl] +.nr ds*height \\n[dn] +.misc@pop-nr ds-ll ds*old-ll +.misc@pop-nr ds-form ds*format +.\" +.\" ********** +'nf +.\" calculate needed space +.nr ds*need \\n[ds*height] +.nr ds*i \\n[pg*foot-trap]-\\n[pg*header-size]v-\\n[pg*extra-header-size]v +.if (\\n[ds*height]>\\n[ds*i])&(\\n[.t]<(\\n[ds*i]/2)) .nr ds*need \\n[.t]u+1v +.if (\\n[ds*height]<\\n[ds*i])&(\\n[.t]<(\\n[ds*height])) .nr ds*need \\n[.t]u+1v +.\" Eject page if display will fit one page and +.\" there are less than half of the page left. +.if \\n[ds*need] .ne \\n[ds*need]u +.\" +.\" check if pending equation label +.eq@check \\n[ds*need] +'in \\n[ds*old-in]u +.if \\n[ds*format]=1 'in \\n[ds*old-in]u+\\n[Si]n +.if \\n[ds*format]>=2 'in 0 +.if \\n[ds*format]=2 'ce 9999 +.if \\n[ds*format]=3 'in (u;(\\n[.l]-\\n[ds*width])/2) +.if \\n[ds*format]=4 'rj 9999 +.if \\n[ds*format]=5 'in (u;\\n[.l]-\\n[ds*width]) +.\" ********** +.\" +.\" Print static display +.nr ds*i \\n[Lsp] +.if r Dsp .nr ds*i \\n[Dsp] +.\" +.if \\n[Ds] .SP \\n[ds*i]u +.ds*div!\\n[ds*snr] +.if \\n[Ds] .SP \\n[ds*i]u +.\" +.if \\n[ds*format]=2 'ce 0 +.if \\n[ds*format]=4 'rj 0 +.rm ds*div!\\n[ds*snr] +.nr ds*snr -1 +.nr par@ind-flag 0 +.ev +.. +.\"########### module list ################### +.\" .LI text-indent mark-indent pad type [mark [LI-space [LB-space] ] ] +.\" +.nr li*tind 0 +.nr li*mind 0 +.nr li*pad 0 +.nr li*type 0 +.ds li*mark 0 +.nr li*li-spc 0 +.nr li*lvl 0 1 +.aln :g li*lvl +.nr li*cur-vpos 0 +.\"-------------------------- +.\" the major list-begin macro. +.\" If type == -1 a 'break' will occur. +.de LB +.if \\n[.$]<4 .@error "LB: not enough arguments, min 4" +.misc@push cind \\n[.i] +.misc@push tind \\n[li*tind] +.misc@push mind \\n[li*mind] +.misc@push pad \\n[li*pad] +.misc@push type \\n[li*type] +.misc@push li-spc \\n[li*li-spc] +.ds li*mark-list!\\n[li*lvl] \\*[li*mark] +.nr li*lvl +1 +.\" +.nr li*tind (n;0\\$1)\" text-indent +.nr li*mind (n;0\\$2)\" mark-indent +.nr li*pad (n;0\\$3)\" pad +.nr li*type 0\\$4\" type +.ds li*mark \\$5\" mark +.ie !'\\$6'' .nr li*li-spc \\$6\" LI-space +.el .nr li*li-spc 1 +.ie !'\\$7'' .nr li*lb-spc \\$6\" LB-space +.el .nr li*lb-spc 0 +.\" init listcounter +.nr li*cnt!\\n[li*lvl] 0 1 +.\" assign format +.af li*cnt!\\n[li*lvl] 1 +.if \\n[li*type] .if !'\\*[li*mark]'' .af li*cnt!\\n[li*lvl] \\*[li*mark] +.\" +.if \\n[li*lb-spc] .SP (u;\\n[li*lb-spc]*\\n[Lsp]) +.in +\\n[li*tind]u +.. +.\"--------------- +.de LI +.if \\n[li*lvl]<1 .@error "LI:no lists active" +.if \\n[li*li-spc]&(\\n[Ls]>=\\n[li*lvl]) .SP (u;\\n[li*li-spc]*\\n[Lsp]) +.ne 2v +.\" +.ds li*c-mark \\*[li*mark] +.nr li*cnt!\\n[li*lvl] +1 +.if \\n[li*type]=1 .ds li*c-mark \\n[li*cnt!\\n[li*lvl]]. +.if \\n[li*type]=2 .ds li*c-mark \\n[li*cnt!\\n[li*lvl]]) +.if \\n[li*type]=3 .ds li*c-mark (\\n[li*cnt!\\n[li*lvl]]) +.if \\n[li*type]=4 .ds li*c-mark [\\n[li*cnt!\\n[li*lvl]]] +.if \\n[li*type]=5 .ds li*c-mark <\\n[li*cnt!\\n[li*lvl]]> +.if \\n[li*type]=6 .ds li*c-mark {\\n[li*cnt!\\n[li*lvl]]} +.if \\n[.$]=1 .ds li*c-mark \\$1 +.ie \\n[.$]=2 \{\ +. ie (\\$2=2):(\\n[Limsp]=0) .ds li*c-mark \\$1\\*[li*c-mark] +. el .ds li*c-mark \\$1\ \\*[li*c-mark] +.\} +.\" +.\" determine where the text begins +.nr li*text-begin \\n[li*tind]>?\w@\\*[li*c-mark]\ @ +.nr x \w@\\*[li*c-mark]\ @ +.\" +.\" determine where the mark begin +.ie !\\n[li*pad] .nr li*in \\n[li*mind] +.el .nr li*in \\n[li*text-begin]-\\n[li*pad]-\w@\\*[li*c-mark]@ +.if !\\n[li*in] .nr li*in 0 +.\" +.ti -\\n[li*tind]u +.\" no indentation if hanging indent +.if (\w@\\*[li*c-mark]@=0)&((\\n[.$]=0):(\w@\\$1@=0)) .nr li*text-begin 0 +\Z'\&\h'\\n[li*in]u'\\*[li*c-mark]'\h'\\n[li*text-begin]u'\&\c +.if \\n[li*type]=-1 .br +.. +.\" +.\"------------- +.de li@pop +.nr li*lvl -1 +.misc@pop-nr cind li*tmp +.in \\n[li*tmp]u +.misc@pop-nr tind li*tind +.misc@pop-nr mind li*mind +.misc@pop-nr pad li*pad +.misc@pop-nr type li*type +.misc@pop-nr li-spc li*li-spc +.ds li*mark \\*[li*mark-list!\\n[li*lvl]] +.. +.de LE +.if \\n[li*lvl]<1 .@error "LE:mismatched" +.li@pop +.if '\\$1'1' .SP \\n[Lsp]u +.. +.\"------------- +.\" list status clear. +.\" terminate all lists to level i +.de LC +.ie \\n[.$]<1 .nr li*i 0 +.el .nr li*i \\$1 +.if \\n[li*i]>\\n[li*lvl] .@error "LC: incorrect argument: \\n[li*i] (too big)" +.while \\n[li*lvl]>\\n[li*i] .li@pop +.nr par@ind-flag 0 +.. +.\"------------- +.de AL +.if \\n[.$]>3 .@error "AL: too many arguments" +.if \\n[D]>2 .tm AL $* +.ie \\n[.$]<=1 .LB \\n[Li] 0 2 1 "\\$1" +.el \{\ +. ie \\n[.$]=2 .LB 0\\$2 0 2 1 "\\$1" +. el \{\ +. ie !'\\$2'' .LB \\$2 0 2 1 "\\$1" 0 1 +. el .LB \\n[Li] 0 2 1 "\\$1" 0 1 +. \} +.\} +.. +.de ML +.if \\n[.$]>3 .@error "ML: too many arguments" +.if \\n[D]>2 .tm ML $* +.nr li*ml-width \w@\\$1@u+1n +.if \\n[.$]<2 .LB \\n[li*ml-width]u 0 1 0 "\\$1" +.if \\n[.$]=2 .LB 0\\$2 0 1 0 "\\$1" +.if \\n[.$]=3 \{\ +. ie '\\$2'' .LB \\n[li*ml-width]u 0 1 0 "\\$1" 0 1 +. el .LB \\n[Li] 0 1 0 "\\$1" 0 1 +.\} +.. +.de VL +.if \\n[D]>2 .tm VL $* +.if \\n[.$]>3 .@error "VL: too many arguments" +.if \\n[.$]<1 .@error "VL: missing text-indent" +.ie \\n[.$]<3 .LB 0\\$1 0\\$2 0 0 +.el .LB 0\\$1 0\\$2 0 0 \& 0 1 +.. +.\" Bullet (for .BL) +.de BL +.if \\n[D]>2 .tm BL $* +.ds BU \s-2\(bu\s0 +.if \\n[.$]>2 .@error "BL: too many arguments" +.if \\n[.$]<1 .LB \\n[Pi] 0 1 0 \\*[BU] +.if \\n[.$]=1 .LB 0\\$1 0 1 0 \\*[BU] +.if \\n[.$]=2 \{\ +. ie '\\$1'' .LB \\n[Pi] 0 1 0 \\*[BU] 0 1 +. el .LB 0\\$1 0 1 0 \\*[BU] 0 1 +.\} +.. +.de DL +.if \\n[D]>2 .tm DL $* +.if \\n[.$]>2 .@error "DL: too many arguments" +.if \\n[.$]<1 .LB \\n[Pi] 0 1 0 \(em +.if \\n[.$]=1 .LB 0\\$1 0 1 0 \(em +.if \\n[.$]=2 \{\ +. ie '\\$1'' .LB \\n[Pi] 0 1 0 \(em 0 1 +. el .LB 0\\$1 0 1 0 \(em 0 1 +.\} +.. +.de RL +.if \\n[D]>2 .tm RL $* +.if \\n[.$]>2 .@error "RL: too many arguments" +.if \\n[.$]<1 .LB 6 0 2 4 +.if \\n[.$]=1 .LB 0\\$1 0 2 4 +.if \\n[.$]=2 \{\ +. ie '\\$1'' .LB 6 0 2 4 1 0 1 +. el .LB 0\\$1 0 2 4 1 0 1 +.\} +.. +.\" Broken Variable List. As .VL but text begin on the next line +.de BVL +.if \\n[D]>2 .tm BVL $* +.if \\n[.$]>3 .@error "BVL: too many arguments" +.if \\n[.$]<1 .@error "BVL: missing text-indent" +.ie \\n[.$]<3 .LB 0\\$1 0\\$2 0 -1 +.el .LB 0\\$1 0\\$2 0 -1 \& 0 1 +.. +.\" ####### module tbl ####################################### +.\" This module is copied from groff_ms and modified for mgm. +.\" Yes, it does not resemble the original anymore :-). +.\" Don't know if I missed something important. +.\" Groff_ms is written by James Clark. +.nr tbl*have-header 0 +.nr tbl*header-written 0 +.de TS +.br +.if ''\\n[.z]' .SP +.if '\\$1'H' .di tbl*header-div +.. +.de tbl@top-hook +.if \\n[tbl*have-header] \{\ +. ie \\n[.t]-\\n[tbl*header-ht]-1v .tbl@print-header +. el .sp \\n[.t]u +.\} +.. +.de tbl@bottom-hook +.if \\n[tbl*have-header] \{\ +. nr T. 1 +.\" draw bottom and side lines of boxed tables. +. T# +.\} +.nr tbl*header-written 0 +.. +.de tbl@print-header +.ev tbl*ev +'nf +.tbl*header-div +.ev +.mk #T +.nr tbl*header-written 1 +.. +.de TH +.if '\\$1'N' @error TH: N not implemented yet. Sorry. +.ie '\\n[.z]'tbl*header-div' \{\ +. nr T. 0 +. T# +. br +. di +. nr tbl*header-ht \\n[dn] +. ne \\n[dn]u+1v +. nr tbl*have-header 1 +. ie '\\$1'N' .if !\\n[tbl*header-written] .tbl@print-header +. el .tbl@print-header +.\} +.el .@error ".TH without .TS H" +.. +.de TE +.ie '\\n(.z'tbl*header-div' .@error ".TS H but no .TH before .TE" +.el \{\ +. nr tbl*have-header 0 +.\} +.\" reset tabs +.TAB +.. +.de T& +.. +.\" ####### module pic ####################################### +.de PS +.nr pic*in 0 +.br +.SP .5 +.ie \\n[.$]<2 .@error "PS: bad arguments. Probably not processed with pic." +.el \{\ +. if !\\n[ds*lvl] .ne (u;\\$1)+1v +.\" should be contained between .DS/.DE +.if r ds*format \{\ +. if \\n[ds*lvl]&((\\n[ds*format]=2):(\\n[ds*format]=3)) \{\ +. nr pic*in \\n[.i] +.\" . in +(u;\\n[.l]-\\n[.i]-\\$2/2) +. \} +. \} +.\} +.. +.de PE +.init@reset +.SP .5 +.. +.\" ####### module eq ####################################### +.\" +.nr eq*number 0 1 +.ds eq*label +.de EQ +.ds eq*label "\\$1 +.. +.de eq@check +.if !'\\*[eq*label]'' \{\ +. mk +' sp (u;\\$1/2-.45v) +. ie (\\n[Eq]%2) \{\ +. \" label to the left +\h'|0'\\*[eq*label]\c +. \} +. el \{\ +. \" label to the right +\h'|\\n[.l]u'\\*[eq*label] +. \} +. rt +.\} +.ds eq*label +.. +.de EN +.. +.\"########### module toc ################### +.\" table of contents +.nr toc*slevel 1 +.nr toc*spacing \n[Lsp]u +.nr toc*tlevel 2 +.nr toc*tab 0 +.\"----------- +.\" Table of contents with friends (module lix) +.de TC +.br +.\" print any pending displays and references +.df@print-float 3 +.if \\n[ref*flag] .RP 0 1 +.\" +.if \w@\\$1@>0 .nr toc*slevel \\$1 +.if \w@\\$2@>0 .nr toc*spacing (u;\\$2*\\n[Lsp]) +.if \w@\\$3@>0 .nr toc*tlevel \\$3 +.if \w@\\$4@>0 .nr toc*tab \\$4 +.if \\n[pg*cols-per-page]>1 .1C +.ds H1txt \\*[Licon] +.ds Tcst co +.pg@clear-hd +.EF "" +.OF "" +.pg@next-page +.\"------------- +.if d Ci .toc@read-Ci \\*[Ci] +.nf +.in 0 +.ie \\n[Oc] .hd@set-page 1 +.el \{\ +. nr toc*pn 1 1 +. af toc*pn i +. aln ;g toc*pn +. PF "''\\\\\\\\n[toc*pn]''" +. am pg@header +. nr toc*pn +1 +\\.. +.\} +.nr toc*i 4 1 +.while \\n+[toc*i]<10 \{\ +. if !'\\$\\n[toc*i]'' \{\ +. ce +\\$\\n[toc*i] +. br +. \} +.\} +.if \\n[.$]<=4 .if d TX .TX +.ie d TY .if \\n[.$]<=4 .TY +.el \{\ +. ce +\\*[Licon] +. br +. SP 3 +.\} +.if d toc*list .toc*list +.br +.\" print LIST OF XXX +.if d lix*dsfg .lix@print-ds fg FG "\\*[Lf]" \\n[.$] +.if d lix*dstb .lix@print-ds tb TB "\\*[Lt]" \\n[.$] +.if d lix*dsec .lix@print-ds ec EC "\\*[Le]" \\n[.$] +.if d lix*dsex .lix@print-ds ex EX "\\*[Lx]" \\n[.$] +.. +.\"----------- +.\" .toc@read-Ci lev1 lev2 lev3 lev4 ... lev7 +.de toc@read-Ci +.nr toc*i 0 1 +.while \\n+[toc*i]<8 \{\ +. nr toc*hl!\\n[toc*i] \\$\\n[toc*i] +.\} +.. +.\"----------- +.de toc@entry +.ie \\n[Sectp] \{\ +. toc@save \\$1 "\\*[hd*mark]" "\\$2" \\*[hd*sect-pg] +.\} +.el .toc@save \\$1 "\\*[hd*mark]" "\\$2" \\n[%] +.. +.als )E toc@entry +.\"----------- +.de toc@save +.\" collect maxsize of mark if string Ci don't exist. +.if !d Ci \{\ +. if !r toc*hl!\\$1 .nr toc*hl!\\$1 0 +. if \\n[toc*hl!\\$1]<=\w@\\$2@ \{\ +. nr toc*hl!\\$1 \w@\\$2@u +. \} +.\} +.am toc*list +.\" .toc@set level headernumber text pagenr +.toc@set \\$1 "\\$2" "\\$3" \\$4 +\\.. +.. +.\"----------- +.\" level mark text pagenumber +.de toc@set +.if \\$1<=\\n[toc*slevel] .SP \\n[toc*spacing]u +.na +.fi +.nr toc*ind 0 +.nr toc*i 0 1 +.ie d Ci \{\ +. nr toc*ind +\\n[toc*hl!\\$1]u +.\} +.el \{\ +. while \\n+[toc*i]<\\$1 \{\ +. nr toc*ind +\\n[toc*hl!\\n[toc*i]]u +. \} +.\} +.nr toc*text \\n[toc*ind]u+\\n[toc*hl!\\$1]u +.in \\n[toc*text]u +.ti -\\n[toc*hl!\\$1]u +.\" +.\" length of headernum space +.nr toc*i \\n[toc*hl!\\$1]-\w@\\$2@ +.\" +.ll \\n[@ll]u-\w@\\$4@u-2m +.ne 2v +.\" ragged right --------------------------------- +.ie \\$1>\\n[toc*tlevel] \{\ +\\$2 +. sp -1 +\\$3\ \ \ \\$4 +. br +.\} +.el \{\ +. \" unnumbered heading -------------------- +. ie '\\$2'' \{\ +. in \\n[toc*ind]u +\\$3\h'1m' +. \} +. \" normal heading ------------------------ +. el \{\ +\\$2 +. sp -1 +\\$3\h'1m' +. \} +. ll \\n[@ll]u +. sp -1 +. nr toc*sep (u;\\n[.l]-\\n[.n]-\\n[.i]-\w@\\$4@)-1m +\h'|\\n[.n]u'\l'\\n[toc*sep]u.'\h'1m'\\$4 +.\} +.ll \\n[@ll]u +.. +.\"########################### module lix ############################ +.\" LIST OF figures, tables, exhibits and equations +.nr lix*fg-nr 0 1 +.nr lix*tb-nr 0 1 +.nr lix*ec-nr 0 1 +.nr lix*ex-nr 0 1 +.aln Fg lix*fg-nr +.aln Tb lix*tb-nr +.aln Ec lix*ec-nr +.aln Ex lix*ex-nr +.\"------------ +.de FG +.lix@print-line fg Lf \\n+[lix*fg-nr] "\\$1" "\\$2" "\\$3" "\\$4" +.. +.de TB +.lix@print-line tb Lt \\n+[lix*tb-nr] "\\$1" "\\$2" "\\$3" "\\$4" +.. +.de EC +.lix@print-line ec Le \\n+[lix*ec-nr] "\\$1" "\\$2" "\\$3" "\\$4" +.. +.de EX +.lix@print-line ex Lx \\n+[lix*ex-nr] "\\$1" "\\$2" "\\$3" "\\$4" +.. +.\"------------ +.\" print line with 'figure' in the text +.\" type stringvar number text override flag refname +.de lix@print-line +.ds lix*text "\\$4 +.\" +.ie \\n[Sectf] .ds lix*numb \\n[H1]-\\$3 +.el .ds lix*numb \\$3 +.\" +.ie !\\n[Of] .ds lix*ds-form .\ \ \" +.el .ds lix*ds-form "\ \(em\ \" +.nr lix*in \\n[.i] +.ds lix*label \\*[Li\\$1]\ \\*[lix*numb]\\*[lix*ds-form] +.if !'\\$5'' \{\ +. if !0\\$6 .ds lix*label \\*[Li\\$1]\ \\$5\\*[lix*numb]\\*[lix*ds-form] +. if 0\\$6=1 .ds lix*label \\*[Li\\$1]\ \\*[lix*numb]\\$5\\*[lix*ds-form] +. if 0\\$6=2 .ds lix*label \\*[Li\\$1]\ \\$5\\*[lix*ds-form] +.\} +.\" print line if not between DS/DE +.ie \\n[ds*lvl]<1&\\n[df*float]=0 \{\ +. lix@print-text "\\*[lix*label]" "\\*[lix*text]" \\$1 \\$2 \\$7 +.\} +.el \{\ +. lix@embedded-text "\\*[lix*label]" "\\*[lix*text]" \\$1 \\$2 \\$7 +.\} +.\" +.. +.\"----------- +.\" label text type stringvar refname +.de lix@print-text +.ie \\n[Sectp] .ds lix*pgnr \\*[hd*sect-pg] +.el .ds lix*pgnr \\n[%] +.SP \\n[Lsp]u +.misc@ev-keep lix +.init@reset +.br +.ie (\w@\\$1\\$2@)>(\\n[.l]-\\n[.i]) \{\ +. in +\w@\\$1@u +. ti 0 +.\} +.el .ce 1 +\fB\\$1\fP\\$2 +.br +.ev +.\" save line for LIST OF XXX, wth is the width of the label +.if !r lix*wth\\$3 .nr lix*wth\\$3 0 +.\" find the maximum width +.if \w@\\*[lix*label]@>\\n[lix*wth\\$3] .nr lix*wth\\$3 \w@\\*[lix*label]@ +.if \\n[\\$4] .lix@ds-save \\$3 \\*[lix*pgnr] "\\*[lix*text]" "\\*[lix*label]" +.\" save reference to the figure +.if !'\\$5'' .SETR \\$5 \\*[lix*numb] +.. +.\" hide printout until diversion is evaluated +.de lix@embedded-text +\!.ie \\\\n[Sectp] .ds lix*pgnr \\\\*[hd*sect-pg] +\!.el .ds lix*pgnr \\\\n[%] +\!.SP \\\\n[Lsp]u +\!.misc@ev-keep lix +\!.ll \\n[.l]u +\!.init@reset +\!.fi +\!.ie (\w@\\$1\\$2@)>(\\\\n[.l]-\\\\n[.i]) \{\ +. in +\w@\\$1@u +\!. ti 0 +\!\fB\\$1\fP\\$2 +\!.\} +\!.el \{\ +. ce 1 +\!\fB\\$1\fP\\$2 +\!.\} +\!.br +\!.ev +.\" save line for LIST OF XXX, wth is the width of the label +\!.if !r lix*wth\\$3 .nr lix*wth\\$3 0 +.\" find the maximum width +\!.if \w@\\*[lix*label]@>\\\\n[lix*wth\\$3] .nr lix*wth\\$3 \w@\\*[lix*label]@ +\!.if \\\\n[\\$4] .lix@ds-save \\$3 \\\\*[lix*pgnr] "\\*[lix*text]" "\\*[lix*label]" +.\" save reference to the figure +\!.if !'\\$5'' .SETR \\$5 \\*[lix*numb] +.. +.\"------------ +.\" print complete list of XXXX +.de lix@print-ds +.\" arg: fg,tb,ec,ex text +.ds H1txt \\$3 +.ds Tcst \\$1 +.if !\\n[Cp] .pg@next-page +.\" print LIST OF XXXX +.\" execute user-defined macros +.if \\$4<=4 .if d TX\\$2 .TX\\$2 +.ie d TY\\$2 .if \\$4<=4 .TY\\$2 +.el \{\ +. ce +\\$3 +. SP 3 +.\} +.in \\n[lix*wth\\$1]u +.fi +.lix*ds\\$1 +.. +.\"------------ +.\" save line of list in macro +.de lix@ds-save +.\" type pagenumber text +.am lix*ds\\$1 +.lix@dsln \\$1 \\$2 "\\$3" "\\$4" \\$5 +\\.. +.. +.\"------------ +.\" print appended macro +.\" lix@dsln type pagenumber text headernr +.de lix@dsln +.nr lix*i \\n[lix*wth\\$1]-\w@\\$4@ +.ne 4v +.ll \\n[@ll]u-\w@\\$4@u-\w@\\$2@u-2m +.ti -\\n[lix*wth\\$1]u +\\$4 +.sp -1 +\\$3\h'1m' +.sp -1 +.ll +.nr lix*sep (u;\\n[.l]-\\n[.n]-\\n[.i]-\w@\\$2@)-1m +\h'|\\n[.n]u'\l'\\n[lix*sep]u.'\h'1m'\\$2 +.SP \\n[toc*spacing]u +.. +.\"########################### module fnt ############################ +.\" some font macros. +.de R +.ft R +.ul 0 +.. +.\"----------- +.de fnt@switch +.ul 0 +.ds fnt*tmp +.nr fnt*prev \\n[.f] +.nr fnt*i 2 1 +.while \\n+[fnt*i]<=\\n[.$] \{\ +. if \\n[fnt*i]>3 .as fnt*tmp \, +. ie (\\n[fnt*i]%2)=1 .as fnt*tmp \\$1\\$[\\n[fnt*i]] +. el .as fnt*tmp \\$2\\$[\\n[fnt*i]] +. if \\n[fnt*i]<\\n[.$] .as fnt*tmp \/ +.\} +\&\\*[fnt*tmp]\f[\\n[fnt*prev]] +.. +.\"----------- +.de B +.ie \\n[.$] .fnt@switch \fB \f[\\n[.f]] \\$@ +.el .ft B +.. +.de I +.ie \\n[.$] .fnt@switch \fI \f[\\n[.f]] \\$@ +.el .ft I +.. +.de IB +.if \\n[.$] .fnt@switch \fI \fB \\$@ +.. +.de BI +.if \\n[.$] .fnt@switch \fB \fI \\$@ +.. +.de IR +.if \\n[.$] .fnt@switch \fI \fR \\$@ +.. +.de RI +.if \\n[.$] .fnt@switch \fR \fI \\$@ +.. +.de RB +.if \\n[.$] .fnt@switch \fR \fB \\$@ +.. +.de BR +.if \\n[.$] .fnt@switch \fB \fR \\$@ +.. +.\"########################### module box ############################ +.\" draw a box around some text. Text will be kept on the same page. +.\" +.nr box*ll 0 +.\" .B1 and .B2 works like .DS +.de B1 +.if \\n[box*ll] .@error "B1: missing B2" +.nr box*ll \\n[.l] +.nr box*ind \\n[.i] +.nr box*hyp \\n[.hy] +.nr box*wid \\n[.l]-\\n[.i] +.\" +.\" jump to new environment. +.ev box*ev +.di box*div +.ps \\n[@ps]u +.vs \\n[@vs]u +.in 1n +.ll (u;\\n[box*wid]-1n) +.hy \\n[.hy] +.. +.de B2 +.if !\\n[box*ll] .@error "B2: missing B1" +.br +.di +.nr box*height \\n[dn] +.ne \\n[dn]u+1v +.ll \\n[box*ll]u +.in \\n[box*ind]u +.nr box*y-pos \\n[.d]u +.nf +.box*div +.fi +\v'-1v+.25m'\ +\D'l \\n[box*wid]u 0'\ +\D'l 0 -\\n[box*height]u'\ +\D'l -\\n[box*wid]u 0'\ +\D'l 0 \\n[box*height]u' +.br +.sp -1 +.ev +.sp .20v +.in \\n[box*ind]u +.ll \\n[box*ll]u +.rm box*div +.nr box*ll 0 +.. +.\"########################### module ref ############################ +.nr ref*nr 0 1 +.aln :R ref*nr +.nr ref*nr-width 5n +.nr ref*flag 0 \" for end-of-text +.ds Rf \v'-.4m'\s-3[\\n+[ref*nr]]\s0\v'.4m' +.\" +.\" start reference +.\"------------ +.de RS +.if !''\\$1' .ds \\$1 \v'-.4m'\s-3[\\n[ref*nr]]\s0\v'.4m' +.nr ref*flag 1 +.am ref*mac +.ref@start-print \\n[ref*nr] +\\.. +.eo +.am ref*mac RF +.. +.\"------------ +.de RF +.ec +.am ref*mac +.ref@stop-print +\\.. +.. +.\"------------ +.de ref@start-print +.di ref*div +.in \\n[ref*nr-width]u +.ti -(\w@\\$1.@u+1n) +\\$1. +.sp -1 +.. +.de ref@stop-print +.br +.di +.ne \\n[dn]u +.ev ref*ev2 +.nf +.ref*div +.ev +.rm ref*div +.if \\n[Ls] .SP \\n[Lsp]u +.. +.\"----------- +.de RP +.if !d ref*mac .@error "RP: No references!" +.nr ref*i 0\\$2 +.if \\n[ref*i]<2 .SK +.SP 2 +.ref@print-refs +.if 0\\$1<1 .nr ref*nr 0 1 +.if ((\\n[ref*i]=0):(\\n[ref*i]=2)) .SK +.. +.\"----------- +.\" called by end-of-text! +.de ref@eot-print +.\".if \\n[ref*flag] \{ +.if d ref*mac \{\ +. if \\n[D]>2 .tm Print references, called by eot +. nr ref*flag 0 +. br +. misc@ev-keep ne +. init@reset +\c +' bp +. ev +. ref@print-refs +.\} +.. +.\"----------- +.\" prints the references +.de ref@print-refs +.toc@save 1 "" "\\*[Rp]" \\n[%] +.ce +\fI\\*[Rp]\fP +.sp +.nr ref*ll \\n[.l] +.misc@ev-keep ref*ev +.ll \\n[ref*ll]u +.in 0 +.ref*mac +.in +.rm ref*mac +.ev +.nr ref*flag 0 1 +.. +.\"########################### module app ############################ +.\" +.nr app*nr 0 1 +.af app*nr A +.nr app*dnr 0 1 +.nr app*flag 0 +.\"------------ +.\" .APP name text +.\" name == "" -> autonumber +.de APP +.\" .if \\n[.$]<2 .@error "APP: too few arguments" +.app@set-ind "\\$1" +.\" +.ds Tcst ap +.ds Apptxt \\$2 +.\" +.ie \\n[Aph] .app@header \\*[app*ind] "\\$2" +.el .bp +.app@index "\\*[app*ind]" "\\$2" +.. +.\"------------ +.\" .APPSK name pages text +.\" name == "" -> autonumber +.de APPSK +.if \\n[.$]<2 .@error "APPSK: too few arguments" +.app@set-ind "\\$1" +.\" +.ds Tcst ap +.ds Apptxt \\$3 +.\" +.ie \\n[Aph] .app@header \\*[app*ind] "\\$3" +.el .bp +.app@index "\\*[app*ind]" "\\$3" +.pn +\\$2 +.. +.\"------------ +.de app@set-ind +.ie \w@\\$1@ .ds app*ind \\$1 +.el \{\ +. if !\\n[app*flag] \{\ +. nr H1 0 1 +. af H1 A +. af H1h A +. nr app*flag 1 +. \} +. ds app*ind \\n+[app*nr] +. nr H1 \\n+[app*dnr] +. nr H1h \\n[app*dnr] +.\} +.\" clear lower counters +.nr app*i 1 1 +.while \\n+[app*i]<8 .nr H\\n[app*i] 0 1 +.. +.\"------------ +.de app@index +.toc@save 1 "" "\\*[App] \\$1: \\$2" \\n[%] +.. +.\"------------ +.\" app@heaer name text +.de app@header +.bp +.SP (u;\\n[Lsp]*4) +.ce 1 +\s+4\fB\\*[App]\ \\$1\fP\s0 +.SP (u;\\n[Lsp]*2) +.if \w@\\$2@<\\n[.l] .ce 1 +\fB\s+2\\$2\s0\fP +.SP (u;\\n[Lsp]*4) +.. +.als APPX app@header +.\"########################### module cov ############################ +.\" title stored in diversion cov*title +.\" abstract stored in diversion cov*abstract +.\" arg to abstract stored in cov*abs-arg +.\" indent stored in cov*abs-ind +.\" number of authors stored in cov*au +.\" author(s) stored in cov*au!x!y +.\" author(s) title stored in cov*at!x!y +.\" x is the author-index [1-cov*au], y is the argument-index [1-9]. +.\" author(s) firm stored in cov*firm +.\" new date (if .ND exists) is stored in cov*new-date +.\" +.\" +.ds cov*abs-name ABSTRACT +.\" +.nr cov*au 0 +.de TL +.rm IA IE WA WE LO LT +.if \\n[.$]>0 .ds cov*title-charge-case \\$1 +.if \\n[.$]>1 .ds cov*title-file-case \\$2 +.pg@disable-top-trap +.eo +.de cov*title AU +.. +.\"------------------- +.de cov@title-end +.ec +.. +.\"------------------- +.\" .AU name [initials [loc [dept [ext [room [arg [arg [arg]]]]]]]] +.de AU +.cov@title-end +.pg@disable-top-trap +.nr cov*au +1 +.nr cov*i 0 1 +.ds cov*au!\\n[cov*au]!1 +.while \\n[.$]>=\\n+[cov*i] \{\ +. ds cov*au!\\n[cov*au]!\\n[cov*i] "\\$[\\n[cov*i]] +.\} +.if (\\n[.$]>=3)&(\w@\\$3@) \{\ +. if d cov*location-\\$3] \{\ +. ds cov*au!3!\\n[cov*au] \\*[cov*location-\\$3] +. \} +.\} +.. +.\"------------------- +.\" .AT title1 [title2 [... [title9] ]]]] +.\" Well, thats all that COVEND look for. +.\" Must appear directly after .AU +.de AT +.if \\n[.$]<1 .@error "AT: no arguments" +.nr cov*i 0 1 +.while \\n[.$]>=\\n+[cov*i] \{\ +. ds cov*at!\\n[cov*au]!\\n[cov*i] "\\$[\\n[cov*i]] +.\} +.. +.\"------------------- +.de AF +.cov@title-end +.ds cov*firm \\$1 +.. +.de AST +.ds cov*abs-name \\$1 +.. +.de AS +.pg@disable-top-trap +.if d cov*abstract .@error "AS: only one abstract allowed" +.if !''\\n[.z]' .@error "AS: no diversion allowed (previous .AS?)" +.nr cov*abs-arg 0\\$1 +.nr cov*abs-ind (n;0\\$2) +.de cov*abstract AE +.. +.de AE +.. +.\" fixed for 2000, now uses \n[year]. +.de ISODATE +. \" support for ISO-date +. nr cov*mm \\n[mo] +. nr cov*dd \\n[dy] +. af cov*mm 01 +. af cov*dd 01 +. ie '0'\\$1' \{\ +. ds cov*new-date \\*[MO\\n[mo]] \\n[dy], \\n[year] +. \} +. el \{\ +. ds cov*new-date \\n[year]-\\n[cov*mm]-\\n[cov*dd] +. \} +.. +.ISODATE 0 +.als DT cov*new-date +.de ND +.ds cov*new-date \\$1 +.. +.\" switch to ISO-date if register Iso exist: YYYY-MM-DD +.if r Iso .ISODATE 1 +.\"------------------- +.\" save technical numbers. +.de TM +.nr cov*i 0 1 +.while \\n[.$]>=\\n+[cov*i] .ds cov*mt-tm!\\n[cov*i] \\$[\\n[cov*i]] +.nr cov*mt-tm-max \\n[.$] +.. +.\"----------------------- +.\" cover sheet +.\" the file must have the following last lines (somewhere): +.\" .pg@enable-top-trap +.\" .bp 1 +.\" .pg@enable-trap +.ds cov*mt-file!0 0.MT +.ds cov*mt-file!1 0.MT +.ds cov*mt-file!2 0.MT +.ds cov*mt-file!3 0.MT +.ds cov*mt-file!4 4.MT +.ds cov*mt-file!5 5.MT +.ds cov*mt-file!6 0.MT +.\"------------ +.de MT +.ie \\n[.$] \{\ +. ie d cov*mt-file!\\$1 .ds cov*mt-type \\$1 +. el .ds cov*mt-type 6 +.\} +.el .ds cov*mt-type 1 +.ds cov*mt-addresse "\\$2 +.ds cov*mt-type-text "\\$1 +.ie d @language .ds cov*str mm/\\*[@language]_ +.el .ds cov*str mm/ +.mso \\*[cov*str]\\*[cov*mt-file!\\*[cov*mt-type]] +.. +.de COVER +.ie !\\n[.$] .ds cov*cov-type ms +.el .ds cov*cov-type \\$1 +.pg@disable-top-trap +.ie d @language .ds cov*str mm/\\*[@language]_\\*[cov*cov-type].cov +.el .ds cov*str mm/\\*[cov*cov-type].cov +.mso \\*[cov*str] +.. +.\"########################### module qrf ############################ +.\" forward and backward reference thru special files. +.\" +.\" check if stderr-method is wanted +.\" This was needed when I discovered that groff was considered unsafe +.\" and groff -U didn't work. It's a workaround like the original +.\" index method, but not in my view elegant enough. +.\" +.\" init reference system +.de INITR +.ds qrf*file \\$1.qrf +.nr qrf*pass 2 +.if \\n[D]>1 .tm INITR: source \\*[qrf*file] +.ie \\n[Ref] \{\ +. tm .\\\\" Rfilename: \\*[qrf*file] +.\} +.el 'so \\*[qrf*file] +.. +.\"--------------- +.\" set a reference. +.de SETR +.if \\n[.$]<1 .@error "SETR:reference name missing" +.if !r qrf*pass .tm "SETR: No .INITR in this file" +.if \\n[Ref] \{\ +. ds qrf*name qrf*ref-\\$1 +. if \\n[D]>2 .tm SETR: ref \\*[qrf*name]=\\*[hd*mark],\\n[%] +. \" heading-number +. ds \\*[qrf*name]-hn \\*[hd*mark] +. \" page-number +. ds \\*[qrf*name]-pn \\n[%] +. \" +. if \\n[Ref] \{\ +. tm .ds \\*[qrf*name]-hn \\*[hd*mark] +. tm .ds \\*[qrf*name]-pn \\n[%] +. if !'\\$2'' .tm .ds \\*[qrf*name]-xx \\$2 +. \} +.\} +.. +.\"--------------- +.\" get misc-string +.\" If two arg -> set var. arg to misc-string. +.de GETST +.if \\n[.$]<1 .@error "GETST:reference name missing" +.if !r qrf*pass .tm "GETST: No .INITR in this file" +.ds qrf*name qrf*ref-\\$1 +. if d \\*[qrf*name]-xx \{\ +. ie \\n[.$]>1 .ds \\$2 \\*[\\*[qrf*name]-xx] +. el \\*[\\*[qrf*name]-xx]\c +. \} +.\} +.. +.\"--------------- +.\" get header-number +.\" If two arg -> set var. arg to header-number. +.de GETHN +.if \\n[.$]<1 .@error "GETHN:reference name missing" +.if !r qrf*pass .tm "GETHN: No .INITR in this file" +.ds qrf*name qrf*ref-\\$1 +.if d \\*[qrf*name]-hn \{\ +. ie \\n[.$]>1 .ds \\$2 \\*[\\*[qrf*name]-hn] +. el \\*[\\*[qrf*name]-hn]\c +.\} +.. +.\"--------------- +.\" get page-number +.\" If two arg -> set var. arg to page-number. +.de GETPN +.if \\n[.$]<1 .@error "GETPN:reference name missing" +.if !r qrf*pass .tm "GETPN: No .INITR in this file" +.ds qrf*name qrf*ref-\\$1 +.if d \\*[qrf*name]-pn \{\ +. ie \\n[.$]>1 .ds \\$2 \\*[\\*[qrf*name]-pn] +. el \\*[\\*[qrf*name]-pn]\c +.\} +.. +.\"---------- +.de GETR +.if \\n[.$]<1 .@error "GETR:reference name missing" +.ie !r qrf*pass \{\ +. tm "GETR: No .INITR in this file" +.\} +.el \{\ +. GETHN \\$1 Qrfh +. GETPN \\$1 Qrfp +\\*[Qrf] +.\} +.. +.\"########################### module ind ############################ +.\" Support for mgs-style indexing, borrowed from mgs. +.de IX +.tm \\$1\t\\$2\t\\$3\t\\$4 ... \\n[%] +.. +.\"-------------------- +.\" Another type of index system +.\" INITI type filename [macro] +.de INITI +.if \\n[.$]<1 .@error "INITI:type missing" +.\" ignore if INITI has already been used +.if \\n[.$]>1 \{\ +. if d ind*file .@error "INITI:file already set" +. ds ind*file \\$2.ind +. if \\n[D]>1 .tm INITI: source \\*[ind*file] +.\} +.if !d ind*file .@error "INITI:file not specified" +.ds ind*type \\$1 +.if \\n[Ref] \{\ +. if \\n[.$]>2 .tm .\\\\" Imacro: \\$3 +.\} +.. +.\"--------------- +.de IND +.if !d ind*file .@error "IND: No active INITI" +.if \\n[D]>1 .tm IND: type=\\*[ind*type] +.ds ind*ref +.if '\\*[ind*type]'N' .ds ind*ref \\n[%] +.if '\\*[ind*type]'H' .ds ind*ref \\*[hd*mark] +.if '\\*[ind*type]'B' .ds ind*ref \\*[hd*mark]\t\\n[%] +.if '\\*[ind*ref]'' .@error "IND:wrong index type: \\*[ind*ref]" +.\" +.ds ind*line \\$1 +.while \\n[.$]>0 \{\ +. shift +. as ind*line \t\\$1 +.\} +.as ind*line \\*[ind*ref] +.if \\n[Ref] .tm .\\\\" IND \\*[ind*line] +.. +.\" print index +.de INDP +.ie \\n[Ref] .tm .\\\\" Index: \\*[ind*file] +.el \{\ +. if !\\n[Cp] .pg@next-page +. \" print INDEX +. \" execute user-defined macros +. if d TXIND .TXIND +. ie d TYIND .TYIND +. el \{\ +. SK +. ce +\\*[Index] +. SP 3 +. 2C +. nf +. \} +' so \\*[ind*file] +. ie d TZIND .TZIND +. el \{\ +. fi +. 1C +. \} +.\} +.rm ind*file +.. +.\"########################### module let ############################ +.\" Letter macros +.\"------------------------ +.\" Formal closing +.de FC +.df@print-float 3 +.ie \\n[.$] .ds let*i \\$1 +.el .ds let*i \\*[Letfc] +.ie d let*type .let@fc_\\*[let*type] "\\*[let*i]" \\$@ +.el .let@mt-closing "\\*[let*i]" \\$@ +.. +.\"------- +.de let@mt-closing +.ne 5v +.in (u;\\n[.l]/2) +.sp +\\$1 +.in +.. +.\"------------------------ +.\" Signature line +.de SG +.ie d let*type .let*lt-sign \\$@ +.el .let*mt-sign \\$@ +.. +.\"------------------------ +.de let*lt-sign +.if !d let@sg_\\*[let*type] .@error "SG: letter type \\*[let*type] undefined" +.df@print-float 3 +.nr let*i 0 1 +.nr let*j 0 +.while \\n+[let*i]<=\\n[let*wa-n] \{\ +.if \\n[let*i]=\\n[let*wa-n] .nr let*j 1 +.let@sg_\\*[let*type] "\\*[let*wa-name!\\n[let*i]]" "\\*[let*wa-title!\\n[let*i]]" \\n[let*i] \\n[let*j] \\$@ +.\} +.. +.\"------------------------ +.\" Memorandum signature +.de let*mt-sign +.df@print-float 3 +.ne \\n[cov*au]u*4v +.ie \\n[.$]>1 .nr let*k 1 +.el .nr let*k \\n[cov*au] +.ds let*tmp \\*[cov*au!\\n[let*k]!3]-\\*[cov*au!\\n[let*k]!4]- +.nr let*i 0 1 +.while \\n+[let*i]<=\\n[cov*au] \{\ +. if \\n[let*i]>1 .as let*tmp / +. as let*tmp \\*[cov*au!\\n[let*k]!2] +.\} +.if !''\\$1' .as let*tmp -\\$1 +.in (u;\\n[.l]/2) +.nf +.nr let*i 0 1 +.while \\n+[let*i]<=\\n[cov*au] \{\ +. SP 3v +. if \\n[let*i]=\\n[let*k] \{\ +\Z'\h'-(u;\\n[.l]/2)'\\*[let*tmp]'\c +. \} +\\*[cov*au!\\n[let*i]!1] +.\} +.fi +.in +.. +.\"------------------------ +.\" Approval signature +.de AV +.ne 6v +.nf +.sp +.ie \\n[.$]<2 \\*[Letapp] +.el .sp +.sp 2 +.ie n ______________________________ ______________ +.el \D'l 25m 0'\h'4m'\D'l 12m 0' +\Z'\\$1'\h'29m'\f[\\*[@sdf_font]]\\*[Letdate]\fP +.fi +.. +.\"------------------------ +.\" Letter signature +.de AVL +.ne 6v +.nf +.sp 3 +.ie n ______________________________ +.el \D'l 25m 0' +\Z'\\$1' +.fi +.. +.\"------------------------ +.\" Letter type +.\" let@header is called from the header. It is supposed +.\" to remove the alias itself. +.de LT +.rm AF AS AE AT AU CS OK TL MT +.ds let*type BL +.nr Pi 5 +.nr Pt 0 +.if !''\\$1' .ds let*type \\$1 +.if !d let@head_\\*[let*type] .@error "LT: unknown letter type \\$1" +.shift +.als let@header let@head_\\*[let*type] +.let@init_\\*[let*type] \\$@ +.if \n[D]>1 .tm Letter type \\*[let*type] +.. +.\"----------- +.\" Blocked letter +.de let@init_BL +.. +.de let@head_BL +.rm let@header +.let@print-head 1 +.. +.de let@sg_BL +.ne 5v +.nf +.in (u;\\n[.l]/2) +.sp 3v +\\$1 +\\$2 +.in +.if \\$4 .sp +.if \w'\\$5'&\\$4 \\$5 +.fi +.. +.als let@fc_BL let@mt-closing +.\"----------- +.\" Semiblocked letter +.de let@init_SB +.nr Pt 1 +.. +.de let@head_SB +.rm let@header +.let@print-head 1 +.. +.als let@sg_SB let@sg_BL +.als let@fc_SB let@mt-closing +.\"----------- +.\" Full-blocked letter +.de let@init_FB +.. +.de let@head_FB +.rm let@header +.let@print-head +.. +.de let@sg_FB +.ne 5v +.nf +.sp 3v +\\$1 +\\$2 +.if \\$4 .sp +.if \w'\\$5'&\\$4 \\$5 +.fi +.. +.de let@fc_FB +.ne 5v +.sp +\\$1 +.. +.\"----------- +.\" Simplified letter +.de let@init_SP +.. +.de let@head_SP +.rm let@header +.let@print-head +.. +.de let@sg_SP +.nf +.if \\$3=1 .sp +.sp +.misc@toupper "\\$1, \\$2" +.if \\$4 .sp +.if \w'\\$5'&\\$4 \\$5 +.fi +.. +.de let@fc_SP +.sp 2 +.. +.\"-------------------------------------- +.\" Print the letter-head +.de let@print-head +.nf +.sp |11 +.if '1'\\$1' .in (u;\\n[.l]/2) +.\" ---- WA +.ie d let@wa-div .let@wa-div +.el .sp 3 +.\" ---- datum +\\*[cov*new-date] +.sp +.if '1'\\$1' .if !d let*lo-CN .if !d let*lo-RN .sp 2 +.\" ---- Confidential +.if d let*lo-CN \{\ +. ti 0 +. ie !''\\*[let*lo-CN]' \\*[let*lo-CN] +. el \\*[LetCN] +. sp +.\} +.\" ---- Reference +.if d let*lo-RN \{\ +\\*[LetRN] \\*[let*lo-RN] +. sp +.\} +.\" ---- IA +.sp +.in 0 +.nr let*i 0 1 +.while \\n+[let*i]<=\\n[let*ia-n] \{\ +\\*[let*ia-name!\\n[let*i]] +\\*[let*ia-title!\\n[let*i]] +.\} +.if d let@ia-div .let@ia-div +.\" ---- Attention +.if d let*lo-AT \{\ +. sp +\\*[LetAT] \\*[let*lo-AT] +.\} +.\" ---- Salutation +.if !'\\*[let*type]'SP' .if d let*lo-SA \{\ +. sp +. ti 0 +. ie !''\\*[let*lo-SA]' \\*[let*lo-SA] +. el \\*[LetSA] +.\} +.\" ---- Subject +.if d let*lo-SJ \{\ +. ie '\\*[let*type]'SP' \{\ +. sp 2 +. misc@toupper \\*[let*lo-SJ] +. sp +. \} +. el \{\ +. sp +. if '\\*[let*type]'SB' .ti +5m +\\*[LetSJ] \f[\\*[@sdf_font]]\\*[let*lo-SJ]\fP +. \} +.\} +.. +.\"------------------- +.\" .IA [name [title]] +.nr let*ia-n 0 1 +.de IA +.if \\n[.$] .ds let*ia-name!\\n+[let*ia-n] \\$1 +.if \\n[.$]>1 .ds let*ia-title!\\n[let*ia-n] \\$2 +.ev let@ev +'nf +.di let@ia-div +.eo +.. +.de IE +.di +.ec +.ev +.. +.\"------------------- +.\" .WA [name [title]] +.nr let*wa-n 0 1 +.de WA +.if \\n[.$] .ds let*wa-name!\\n+[let*wa-n] \\$1 +.if \\n[.$]>1 .ds let*wa-title!\\n[let*wa-n] \\$2 +.ev let@ev +'nf +.di let@wa-div +.it \\n[Letwam] let@wa-drain +.eo +.. +.\"------ +.de let@wa-drain +.it +.di +.di let@wa-junk +.. +.\"------ +.de WE +.it +.ec +.di +.ev +.if d let@wa-junk .rm let@wa-junk +.. +.\"------------------- +.\" Copy to +.de NS +.sp +.ie !''\\$2' .ds let*str \\$1 +.el \{\ +. ie \\n[.$]>0 \{\ +. ie !\w'\\$1' .ds let*str \\*[Letns!\\*[Letnsdef]] +. el \{\ +. ie d Letns!\\$1 .ds let*str \\*[Letns!\\$1] +. el .ds let*str \\*[Letns!copy](\\$1)\\*[Letns!to] +. \} +. \} +. el .ds let*str \\*[Letns!\\*[Letnsdef]] +.\} +.ne 2 +.nf +\\*[let*str] +.. +.de NE +.fi +.. +.\"------------------- +.\" Letter options +.de LO +.rm AF AS AE AT AU CS OK TL MT +.if ''\\$1' .@error "LO: missing option" +.if !d Let\\$1 .@error "LO: unknown option (\\$1)" +.ds let*lo-\\$1 \\$2 +.if \n[D]>1 .tm Letter option \\$1 \\$2 +.. +.\"-------------------- +.\" Start with a clean slate +.init@reset diff -aruN groff-1.16.1/contrib/mm/mm/0.MT groff-1.17/contrib/mm/mm/0.MT --- groff-1.16.1/contrib/mm/mm/0.MT Mon Feb 21 21:32:58 2000 +++ groff-1.17/contrib/mm/mm/0.MT Thu Sep 14 05:40:25 2000 @@ -1,5 +1,5 @@ .\"------------ -.\" $Id: 0.MT,v 1.2 2000/02/21 20:32:58 jhaegg Exp $ +.\" $Id: 0.MT,v 2.0 2000/09/14 03:40:25 jhaegg Exp $ .\" Cover sheet. Memorandum type 0-3 and "string". .\"------------ .if !r Au .nr Au 1 diff -aruN groff-1.16.1/contrib/mm/mm/4.MT groff-1.17/contrib/mm/mm/4.MT --- groff-1.16.1/contrib/mm/mm/4.MT Mon Feb 21 21:32:58 2000 +++ groff-1.17/contrib/mm/mm/4.MT Thu Sep 14 05:40:25 2000 @@ -1,5 +1,5 @@ .\"------------ -.\" $Id: 4.MT,v 1.2 2000/02/21 20:32:58 jhaegg Exp $ +.\" $Id: 4.MT,v 2.0 2000/09/14 03:40:25 jhaegg Exp $ .\" Cover sheet. Memorandum type 4 .\"------------ .de cov@print-title diff -aruN groff-1.16.1/contrib/mm/mm/5.MT groff-1.17/contrib/mm/mm/5.MT --- groff-1.16.1/contrib/mm/mm/5.MT Mon Feb 21 21:32:58 2000 +++ groff-1.17/contrib/mm/mm/5.MT Thu Sep 14 05:40:25 2000 @@ -1,5 +1,5 @@ .\"------------ -.\" $Id: 5.MT,v 1.2 2000/02/21 20:32:58 jhaegg Exp $ +.\" $Id: 5.MT,v 2.0 2000/09/14 03:40:25 jhaegg Exp $ .\" Cover sheet. Memorandum type 5 .\"------------ .nr cov*mt0-ind 1.1c diff -aruN groff-1.16.1/contrib/mm/mm/ms.cov groff-1.17/contrib/mm/mm/ms.cov --- groff-1.16.1/contrib/mm/mm/ms.cov Mon Feb 21 21:32:58 2000 +++ groff-1.17/contrib/mm/mm/ms.cov Thu Sep 14 05:40:25 2000 @@ -1,5 +1,5 @@ .\"------------ -.\" $Id: ms.cov,v 1.2 2000/02/21 20:32:58 jhaegg Exp $ +.\" $Id: ms.cov,v 2.0 2000/09/14 03:40:25 jhaegg Exp $ .\" Cover sheet. Mostly like ms cover. .\"------------ .de cov@print-title diff -aruN groff-1.16.1/contrib/mm/mm/se_ms.cov groff-1.17/contrib/mm/mm/se_ms.cov --- groff-1.16.1/contrib/mm/mm/se_ms.cov Mon Feb 21 21:32:58 2000 +++ groff-1.17/contrib/mm/mm/se_ms.cov Thu Sep 14 05:40:25 2000 @@ -1,3 +1,3 @@ -.\" $Id: se_ms.cov,v 1.2 2000/02/21 20:32:58 jhaegg Exp $ +.\" $Id: se_ms.cov,v 2.0 2000/09/14 03:40:25 jhaegg Exp $ .mso mm/ms.cov .nr cur*abstract-ll 11c diff -aruN groff-1.16.1/contrib/mm/mmroff.man groff-1.17/contrib/mm/mmroff.man --- groff-1.16.1/contrib/mm/mmroff.man Mon Feb 21 21:32:58 2000 +++ groff-1.17/contrib/mm/mmroff.man Thu Sep 14 05:40:24 2000 @@ -1,5 +1,5 @@ .\" -.\" $Id: mmroff.man,v 1.2 2000/02/21 20:32:58 jhaegg Exp $ +.\" $Id: mmroff.man,v 2.0 2000/09/14 03:40:24 jhaegg Exp $ .\" .TH MMROFF @MAN7EXT@ "@MDATE@" "Groff Version @VERSION@" .SH NAME diff -aruN groff-1.16.1/contrib/mm/mse.tmac groff-1.17/contrib/mm/mse.tmac --- groff-1.16.1/contrib/mm/mse.tmac Thu Jan 1 01:00:00 1970 +++ groff-1.17/contrib/mm/mse.tmac Fri Nov 17 05:26:02 2000 @@ -0,0 +1,184 @@ +.\" $Id: mse.tmac,v 2.1 2000/11/17 04:26:02 jhaegg Exp $ +.\" +.\" swedish version of mm +.\" See m.tmac for version-information. +.ds @language se +.mso m.tmac +.ISODATE +.\" +.ds App Bilaga +.ds Lf Figurer +.ds Lt Tabeller +.ds Lx Uppställningar +.ds Le Ekvationer +.\" Page length +.if !r L .nr @pl 28.5c +.\" page width +.if !r W .nr @ll 13c +.\" page offset +.if !r O .nr @po 3.5c +.\" set the above parameters +.ll \n[@ll]u +.po \n[@po]u +.pl \n[@pl]u +.ds Lifg Figur +.ds Litb Tabell +.ds Liex Uppställning +.ds Liec Ekvation +.ds Licon Innehållsförteckning +.ds Qrf Se kapitel \\*[Qrfh], sidan \\*[Qrfp]. +.ds Rp Referenser +.ds Letfc Vänliga hälsningar +.ds Letapp Godkänd av: +.ds Letdate datum +.ds Letconf KONFIDENTIELLT +.ds Letsal Till vederbörande: +.ds Letatt ATTENTION: +.ds Letsubj Innehåll: +.ds Letref Refererande till: +.\" +.ds Letns!copy Kopia \" space! +.ds Letns!to " till +.ds Letns!0 Kopia till +.ds Letns!1 Kopia (med att.) till +.ds Letns!2 Kopia (utan att.) till +.ds Letns!3 Att. +.ds Letns!4 Atts. +.ds Letns!5 Enc. +.ds Letns!6 Encs. +.ds Letns!7 Annat försättsblad +.ds Letns!8 Brev till +.ds Letns!9 Dokument till +.ds Letns!10 Kopia (med atts.) till +.ds Letns!11 Kopia (utan atts.) till +.ds Letns!12 Endast abstract till +.ds Letns!13 Hela dokumentet till +.ds Letns!14 CC: +.\" +.ds MO1 januari +.ds MO2 februari +.ds MO3 mars +.ds MO4 april +.ds MO5 maj +.ds MO6 juni +.ds MO7 juli +.ds MO8 augusti +.ds MO9 september +.ds MO10 oktober +.ds MO11 november +.ds MO12 december +.nr pg*footer-size 4\" 1v+footer+even/odd footer+1v +.\"------------------------------------------------ +.\" Dokumentnamn +.ds LetDNAMN +.\" Mottagarens datum +.ds LetMDAT Ert datum: +.\" Bilaga +.ds LetBIL Bilaga \" +.\" Kompletteringsuppgift +.ds LetKOMP +.\" Dokumentbeteckning eller dokumentnummer +.ds LetDBET +.\" Beteckning (ärendebeteckning i form av diarienummer e.d. +.ds LetBET Beteckning: +.\" Mottagarens beteckning. +.ds LetMBET Er beteckning: +.\" Antal sidor +.ds LetSIDOR +.\" Svensk standard med högerställd löptext. --------------------- +.de let@init_SVH +.in 4.57c +.ll 17.57c +.. +.de let@head_SVH +.rm let@header +.let@print_SV H +.. +.de let@sg_SVH +.. +.de let@fc_SVH +.. +.\" Svensk standard med vänsterställd löptext. --------------------- +.de let@init_SVV +.. +.de let@head_SVV +.rm let@header +.let@print_SV V +.. +.de let@sg_SVV +.. +.de let@fc_SVV +.. +.\"-------------------------------- +.de let@print_SV +.nf +.\" pos T0 ----------------------------------- +.in 0 +.sp |3 +.if d let@wa-div .let@wa-div +.\"----- addressat +.if '\\$1'V' .if d let@ia-div \{\ +. sp |10 +. let@ia-div +.\} +.\" pos T4 ----------------------------------- +.in 9.14c +.\"----- kompletteringsuppgift +.if d let*lo-KOMP \{\ +. sp |2 +\\*[let*lo-KOMP] +.\} +.\"----- dokumentnamn +.if d let*lo-DNAMN \{\ +. sp |3 +\\*[let*lo-DNAMN] +.\} +.\"----- datum +.if d cov*new-date \{\ +. sp |5 +Datum: +\\*[cov*new-date] +.\} +.\"----- mottagarens datum +.if d let*lo-MDAT \{\ +. sp |7 +\\*[LetMDAT] +\\*[let*lo-MDAT] +.\} +.\"----- addressat +.if '\\$1'H' .if d let@ia-div \{\ +. sp |10 +. let@ia-div +.\} +.\" pos T6 ----------------------------------- +.in 13.72c +.\"----- mottagarens beteck. +.if d let*lo-MBET \{\ +. sp |7 +\\*[LetMBET] +\\*[let*lo-MBET] +.\} +.\"----- dokumentbeteck. +.if d let*lo-BET \{\ +. sp |3 +\\*[LetBET] +\\*[let*lo-BET] +.\} +.\" pos T7 ----------------------------------- +.in 16c +.\"----- bilaga +.if d let*lo-BIL \{\ +. sp |2 +\\*[LetBIL]\\*[let*lo-BIL] +.\} +.\" +.\"----- sidnummer +.sp |3 +.ie d let*lo-SIDOR \\n[%] (\\*[let*lo-SIDOR]) +.el \\n[%] +.\" +.\" Ta hand om special +.if d TP .TP +.sp |17 +.. +.\" ----------------------------------- diff -aruN groff-1.16.1/contrib/mm/tmac.m groff-1.17/contrib/mm/tmac.m --- groff-1.16.1/contrib/mm/tmac.m Mon Feb 21 21:32:58 2000 +++ groff-1.17/contrib/mm/tmac.m Thu Jan 1 01:00:00 1970 @@ -1,3471 +0,0 @@ -.\" -.de @revision -.ds RE \\$2 -.. -.\" -.\" $Id: tmac.m,v 1.2 2000/02/21 20:32:58 jhaegg Exp $ -.@revision $Revision: 1.2 $ -.ig - -Copyright (C) 1991-2000 Free Software Foundation, Inc. -mgm is written by Jörgen Hägg - -mgm is free software; you can redistribute it and/or modify it under -the terms of the GNU General Public License as published by the Free -Software Foundation; either version 2, or (at your option) any later -version. - -mgm is distributed in the hope that it will be useful, but WITHOUT ANY -WARRANTY; without even the implied warranty of MERCHANTABILITY or -FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -for more details. - -You should have received a copy of the GNU General Public License along -with groff; see the file COPYING. If not, write to the Free Software -Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. - -Please send bugreports with examples to jh@axis.com. - -Naming convention stolen from mgs. -Local names module*name -Extern names module@name -Env.var environ:name -Index array!index -.. -.if !\n(.g .ab These mm macros require groff. -.if \n(.C .ab The groff mm macros do not work in compatibility mode. -.warn -.\" ######## init ####### -.\" Contents level [0:7], contents saved if heading level <= Cl -.nr Cl 2 -.\" Eject page between LIST OF XXXX if Cp == 0 -.nr Cp 0 -.\" Debugflag -.if !r D .nr D 0 -.\" Eject after floating display is output [0:1] -.nr De 0 -.\" Floating keep output [0;5] -.nr Df 5 -.\" space before and after display if == 1 [0:1] -.nr Ds 1 -.\" Eject page -.nr Ej 0 -.\" Equation label adjust 0=left, 1=right -.nr Eq 0 -.\" Em dash string -.ie n .ds EM " -- -.el .ds EM \(em -.\" Footnote spacing -.nr Fs 1 -.\" H1-H7 heading counters -.nr H1 0 1 -.nr H2 0 1 -.nr H3 0 1 -.nr H4 0 1 -.nr H5 0 1 -.nr H6 0 1 -.nr H7 0 1 -.\" Heading break level [0:7] -.nr Hb 2 -.\" heading centering level, [0:7] -.nr Hc 0 -.\" header format -.ds HF 2 2 2 2 2 2 2 -.\" heading temp. indent [0:2] -.\" 0 -> 0 indent, left margin -.\" 1 -> indent to right , like .P 1 -.\" 2 -> indent to line up with text part of preceding heading -.nr Hi 1 -.\" header pointsize -.ds HP 0 0 0 0 0 0 0 -.\" heading space level [0:7] -.nr Hs 2 -.\" heading numbering type -.\" 0 -> multiple (1.1.1 ...) -.\" 1 -> single -.nr Ht 0 -.\" Unnumbered heading level -.nr Hu 2 -.\" hyphenation in body -.\" 0 -> no hyphenation -.\" 1 -> hyphenation 14 on -.nr Hy 0 -.\" text for toc, selfexplanatory. Look in the new variable section -.ds Lf LIST OF FIGURES -.nr Lf 1 -.ds Lt LIST OF TABLES -.nr Lt 1 -.ds Lx LIST OF EXHIBITS -.nr Lx 1 -.ds Le LIST OF EQUATIONS -.nr Le 0 -.\" List indent, used by .AL -.nr Li 6 -.\" List space, if listlevel > Ls then no spacing will occur around lists. -.nr Ls 99 -.\" Numbering style [0:5] -.if !r N .nr N 0 -.\" numbered paragraphs -.\" 0 == not numbered -.\" 1 == numbered in first level headings. -.nr Np 0 -.\" Format of figure,table,exhibit,equation titles. -.\" 0= ". ", 1=" - " -.nr Of 0 -.\" Table of contents page numbering style -.nr Oc 0 -.\" Page-number, normally same as %. -.nr P 0 -.\" paragraph indent -.nr Pi 5 -.\" paragraph spacing -.nr Ps 1 -.\" paragraph type -.\" 0 == left-justified -.\" 1 == indented .P -.\" 2 == indented .P except after .H, .DE or .LE. -.nr Pt 0 -.\" Reference title -.ds Rp REFERENCES -.\" Display indent -.nr Si 5 -.\" -.\" Current state of TOC, empty outside TC, inside -.\" it will be set to co,fg,tb,ec,ex or ap. -.ds Tcst -.\" -.ds Tm \(tm -.\" -.\"--------------------------------------------- -.\" Internal global variables -.\" -.\" This is for cover macro .MT -.\" .ds @language -.\" -.nr @copy_type 0 -.if r C .nr @copy_type \n[C] -.\" >0 if Subject/Date/From should be bold, roman otherwise -.ie n .ds @sdf_font R -.el .ds @sdf_font B -.if \n[@copy_type]=4 \{\ -. ls 2 -. nr Pi 10 -. nr Pt 1 -.\} -.\" -.\" -.if r E \{\ -. ie \n[E] .ds @sdf_font B -. el .ds @sdf_font R -.\} -.\" -.\" Current pointsize and vertical space, always in points. -.if !r S .nr S 10 -.ps \n[S] -.vs \n[S]+2 -.\" -.nr @ps \n[.ps] -.nr @vs \n[.v] -.if \n[D]>1 .tm @ps=\n[@ps], @vs=\n[@vs] -.if \n[D]>3 .tm INIT: l:\n[.l] p:\n[.p] o:\n[.o] -.\" -.\" Page length -.if r L \{\ -. ie n .pl \n[L]u -. el .pl \n[L]u -.\} -.nr @pl \n[.p] -.\" -.\" page width -.ie r W \{\ -. ie n .ll \n[W]u -. el .ll \n[W]u -.\} -.el .ll 6i -.nr @ll \n[.l] -.nr @cur-ll \n[@ll] -.lt \n[@ll]u -.\" -.\" page offset -.ie r O .po \n[O] -.el \{\ -. ie n .po .75i -. el .po .963i -.\} -.\" -.nr @po \n[.o] -.\" -.\" non-zero if escape mechanism is turned off. Used by VERBON/OFF -.nr @verbose-flag 0 -.\"--------------------------------------------- -.\" New variables -.\" -.\" Appendix name -.ds App APPENDIX -.\" print appendixheader, 0 == don't -.nr Aph 1 -.\" -.\" Current appendix text -.ds Apptext -.\" Controls the space before and after static displays if defined. -.\" Lsp is used otherwise -.\" .nr Dsp 1v -.\" -.\" Add a dot after level one heading number if >0 -.nr H1dot 1 -.\" -.\" header prespace level. If level <= Hps, then two lines will be printed -.\" before the header instead of one. -.nr Hps 1 -.\" -.\" These variables controls the number of lines preceding .H. -.\" Hps1 is the number of lines when level > Hps -.nr Hps1 0.5 -.if n .nr Hps1 1 -.\" -.\" Hps2 is the number of lines when level <= Hps -.nr Hps2 1 -.if n .nr Hps2 2 -.\" -.\" Hss is the number of lines (Lsp) after the header. -.nr Hss 1 -.\" -.\" H1txt will be updated by .H and .HU, containing the heading text. -.\" Will also be updated in table of contents & friends -.\" -.ds H1txt -.\" -.\" header text for the index -.ds Index INDEX -.\" command to sort the index -.ds Indcmd sort -.\" -.\" flag for mkindex -.if !r Idxf .nr Idxf 0 -.\" Change these in the national configuration file -.ds Lifg Figure -.ds Litb TABLE -.ds Liex Exhibit -.ds Liec Equation -.ds Licon CONTENTS -.\" Flag for space between mark and prefix 1==space, 0==no space -.\" Can also be controlled by using '.LI mark 2' -.nr Limsp 1 -.\" -.\" Lsp controls the height of an empty line. Normally 0.5v -.\" Normally used for nroff compatibility. -.nr Lsp 0.5v -.if n .nr Lsp 1v -.ds MO1 January -.ds MO2 February -.ds MO3 March -.ds MO4 April -.ds MO5 May -.ds MO6 June -.ds MO7 July -.ds MO8 August -.ds MO9 September -.ds MO10 October -.ds MO11 November -.ds MO12 December -.\" for GETR -.ds Qrf See chapter \\*[Qrfh], page \\*[Qrfp]. -.\" -.\" header- and footer-size will only change to the current -.\" if Pgps is > 0. -.nr Pgps 1 -.\" -.\" section-page if Sectp > 0 -.nr Sectp 0 -.if (\n[N]=3):(\n[N]=5) \{\ -. nr Sectp 1 -. nr Ej 1 -.\} -.\" section-figure if Sectf > 0 -.nr Sectf 0 -.if \n[N]=5 .nr Sectf 1 -.\" -.\" argument to .nm in .VERBON. -.ds Verbnm "1 -.\" indent for VERBON -.nr Verbin 5n -.\" -.\" Letter section -.\" Formal closing (.FC) -.ds Letfc Yours very truly, -.\" -.\" Approval line -.ds Letapp APPROVED: -.\" Approval date-string -.ds Letdate Date -.\" -.ds LetCN CONFIDENTIAL\" Confidential default -.ds LetSA To Whom It May Concern:\" Salutation default -.ds LetAT ATTENTION:\" Attention string -.ds LetSJ SUBJECT:\" Subject string -.ds LetRN In reference to:\" Reference string -.\" -.\" Copy to (.NS) -.ds Letnsdef 0 -.ds Letns!copy Copy \" space! -.ds Letns!to " to -.ds Letns!0 Copy to -.ds Letns!1 Copy (with att.) to -.ds Letns!2 Copy (without att.) to -.ds Letns!3 Att. -.ds Letns!4 Atts. -.ds Letns!5 Enc. -.ds Letns!6 Encs. -.ds Letns!7 Under separate cover -.ds Letns!8 Letter to -.ds Letns!9 Memorandum to -.ds Letns!10 Copy (with atts.) to -.ds Letns!11 Copy (without atts.) to -.ds Letns!12 Abstract Only to -.ds Letns!13 Complete Memorandum to -.ds Letns!14 CC: -.\" -.\" Text printed below the footer. Controlled by @copy_type (C). -.ds Pg_type!0 -.ds Pg_type!1 OFFICIAL FILE COPY -.ds Pg_type!2 DATE FILE COPY -.ds Pg_type!3 D\ R\ A\ F\ T -.ds Pg_type!4 D\ R\ A\ F\ T -.\" Max lines in return address -.nr Letwam 14 -.\"-------------------------- -.\" test for mgm macro. This can be used if the text must test -.\" what macros is used. -.nr .mgm 1 -.\" -.\" Due to security problems with groff I had to rewrite -.\" the reference system. It's not as elegant as before, you -.\" have to run groff with '-z -rRef=1' and put stderr into the filename -.\" for .INITR -.\" -.\" Output references to stderr if non-zero -.ie !r Ref \{\ -. nr Ref 0 -.\} -.el .warn 0 -.\" -.\"--------------------------------------------- -.\" set local variables. -.ie d @language .mso mm/\*[@language]_locale -.el .mso mm/locale -.\"--------------------------------------------- -.if \n[D] .tm Groff mm, version \*[RE]. -.\" ####### module init ###### -.\" reset all things -.de init@reset -.ie \\n[misc@adjust] 'ad -.el 'na -.ie \\n[Hy] 'hy 14 -.el 'nh -'in 0 -'ti 0 -.ps \\n[@ps]u -.vs \\n[@vs]u -.. -.de @warning -'tm WARNING:(\\n[.F]) input line \\n[.c]:\\$* -.if \\n[D] .backtrace -.. -.de @error -'tm ****************** -'tm ERROR:(\\n[.F]) input line \\n[.c]:\\$* -.if \\n[D] .backtrace -'tm ****************** -.ab "Input aborted, syntax error" -.. -.de misc@toupper -.tr aAbBcCdDeEfFgGhHiIjJkKlLmMnNoOpPqQrRsStTuUvVwWxXyYzZ -.br -\\$1 -.tr aabbccddeeffgghhiijjkkllmmnnooppqqrrssttuuvvwwxxyyzz -.br -.. -.\" ####### module debug ################################# -.de debug -'tm \\$1:\\n[.F]:\\n[c.] ll=\\n[.l] vs=\\n[.v] ps=\\n[.s],\\n[.ps] \ -in=\\n[.i] fi=\\n[.u] .d=\\n[.d] nl=\\n[nl] pg=\\n[%] -.. -.de debug-all -.nr debug*n 1n -.nr debug*m 1m -'tm \\$1:\\n[.F]:\\n[c.] ll=\\n[.l] vs=\\n[.v] ps=\\n[.s] in=\\n[.i]\ - ad=\\n[.j] fi=\\n[.u] pl=\\n[.p] page=\\n[%] .o=\\n[.o] -'tm _______ .d=\\n[.d] .f=\\n[.f] .h=\\n[.h] .k=\\n[.k] .n=\\n[.n]\ - .p=\\n[.p] .t=\\n[.t] .z=\\n[.z] nl=\\n[nl] dn=\\n[dn] n=\\n[debug*n] -.. -.\" ####### module par ################################# -.nr par@ind-flag 1 \" indent on following P if Pt=2 -.nr hd*last-pos -1 -.nr hd*last-hpos -1 -.nr par*number 0 1 -.af par*number 01 -.nr par*number2 0 1 -.af par*number2 01 -.nr par*num-count 0 1 -.af par*num-count 01 -.\" reset numbered paragraphs, arg1 = headerlevel -.de par@reset-num -.if \\$1<3 .nr par*num-count 0 -.if (\\$1=1)&(\\n[Np]=1) .nr par*number 0 -.. -.\"------------ -.\" paragraph -.de P -.\" skip P if previous heading -.ie !((\\n[nl]=\\n[hd*last-pos]):(\\n[nl]=(\\n[hd*last-pos]-.5v))) \{\ -. if \\n[D]>2 .tm Paragraph nl=\\n[nl] -. par@doit \\$* -. if \\n[Np] \\n[H1].\\n+[par*number]\ \ \c -.\} -.el .if !(\\n[hd*last-hpos]=\\n[.k]) \{\ -. if \\n[D]>2 .tm Paragraph nl=\\n[nl] -. par@doit \\$* -. if \\n[Np] \\n[H1].\\n+[par*number]\ \ \c -.\} -.nr par@ind-flag 1 -.. -.\"------------ -.de nP -.\" skip P if previous heading -.ie !((\\n[nl]=\\n[hd*last-pos]):(\\n[nl]=(\\n[hd*last-pos]-.5v))) \{\ -. if \\n[D]>2 .tm Paragraph nl=\\n[nl] -. par@doit \\$* -\\n[H2].\\n+[par*number2]\ \ \c -.\} -.el .if !(\\n[hd*last-hpos]=\\n[.k]) \{\ -. if \\n[D]>2 .tm Paragraph nl=\\n[nl] -. par@doit \\$* -\\n[H2].\\n+[par*number2]\ \ \c -.\} -.nr par@ind-flag 1 -.. -.\"------------ -.de par@doit -.SP (u;\\n[Ps]*\\n[Lsp]) -.ie \\n[.$] \{\ -. if \\$1=1 .ti +\\n[Pi]n -.\} -.el \{\ -. if \\n[Pt]=1 .ti +\\n[Pi]n -. if (\\n[Pt]=2)&\\n[par@ind-flag] .ti +\\n[Pi]n -.\} -.. -.\" ####### module line ####################################### -.de SP -.br -.if !r line*lp\\n[.z] .nr line*lp\\n[.z] 0 -.if !r line*ac\\n[.z] .nr line*ac\\n[.z] 0 -.ie \\n[.$] .nr line*temp (v;\\$1) -.el .nr line*temp 1v -.\" -.ie \\n[line*lp\\n[.z]]=\\n[.d] \{\ -. \" go here if no output since the last .SP -. nr line*output \\n[line*temp]-\\n[line*ac\\n[.z]] -. if \\n[line*output]<0 .nr line*output 0 -. nr line*ac\\n[.z] +\\n[line*output] -.\} -.el \{\ -. nr line*ac\\n[.z] \\n[line*temp] -. nr line*output \\n[line*temp] -. \" no extra space in the beginning of a page -. if (\\n[.d]<0):(\\n[pg*head-mark]=\\n[.d]) .nr line*output 0 -.\} -.if \\n[line*output] .sp \\n[line*output]u -.nr line*lp\\n[.z] \\n[.d] -.. -.\" ######## module misc ############### -.nr misc@adjust 14 -.de SA -.if \\n[.$] \{\ -. if \\$1-1 .@error "SA: bad arg: \\$1" -. nr misc@adjust 0\\$1 -.\} -.ie \\n[misc@adjust] 'ad -.el 'na -.. -.\"------------- -.\" switch environment, keep all important settings. -.de misc@ev-keep -.nr misc*ll \\n[.l] -.ev \\$1 -.ll \\n[misc*ll]u -.lt \\n[misc*ll]u -.. -.\"------------- -.\" .misc@push stackname value -.de misc@push -.ie d misc*st-\\$1 .ds misc*st-\\$1 \\$2 \\*[misc*st-\\$1] -.el .ds misc*st-\\$1 \\$2 -.. -.\"------------- -.\" .misc@pop stackname -.\" value returned in the string misc*pop -.de misc@pop -.misc@pop-set misc*st-\\$1 \\*[misc*st-\\$1] -.. -.\"------------- -.de misc@pop-set -.ds misc*st-name \\$1 -.shift -.if \\n[.$]<1 .@error "stack \\*[misc*st-name] empty" -.ds misc*pop \\$1 -.shift -.ds \\*[misc*st-name] \\$* -.. -.\"------------- -.\" .misc@pop-nr stackname varname -.de misc@pop-nr -.misc@pop \\$1 -.nr \\$2 \\*[misc*pop] -.. -.\"------------- -.\" .misc@pop-ds stackname varname -.de misc@pop-ds -.misc@pop \\$1 -.ds \\$2 \\*[misc*pop] -.. -.\"----------- -.\" reset tabs -.de TAB -.ta T 5n -.. -.\"------------- -.\" .PGFORM linelength [ pagelength [ pageoffset [1]]] -.de PGFORM -.\" Break here to avoid problems with new linesetting of the previous line. -.\" Hope this doesn't break anything else :-) -.\" Don't break if arg_4 is a '1'. -.if \\n[D]>2 .tm PGFORM: \\$* -.if ''\\$4' .br -.if \\n[D]>3 .tm PGFORM: IN l:\\n[.l] p:\\n[.p] o:\\n[.o] -.ie !''\\$1' \{\ -. ll \\$1 -. nr @ll \\n[.l] -. nr @cur-ll \\n[@ll] -. lt \\n[@ll]u -.\} -.el \{\ -. ll \\n[@ll]u -. lt \\n[@ll]u -.\} -.\" -.ie !''\\$2' \{\ -. pl \\$2 -. nr @pl \\n[.p] -.\} -.el .pl \\n[@pl]u -.\" -.ie !''\\$3' \{\ -. po \\$3 -. nr @po \\n[.o] -.\} -.el .po \\n[@po]u -.if \\n[D]>3 .tm PGFORM: OUT l:\\n[.l] p:\\n[.p] o:\\n[.o] -.if \\n[D]>2 .tm PGFORM: ll=\\n[@ll], pl=\\n[@pl], po=\\n[@po] -'in 0 -.pg@move-trap -.if \\n[D]>2 \{\ -. tm Traps: -. ptr -.\} -.. -.\"------------- -.\" .MOVE y [[x] linelength] -.\" move to line y, indent to x -.de MOVE -.if !\\n[.$] .@error "MOVE y [x]: no arguments" -.if \\n[nl]<0 \c -.\" move to Y-pos -.sp |(v;\\$1) -.\" calc linelength -.ie \\n[.$]>2 .nr pg*i (n;\\$3) -.el \{\ -. ie \\n[.$]>1 .nr pg*i (n;\\n[@ll]u-\\$2) -. el .nr pg*i \\n[@ll]u -.\} -.\" move to X-pos, if any -.if !''\\$2' .po \\$2 -.\" set linelength -.ll \\n[pg*i]u -.. -.\"------------- -.de SM -.if !\\n[.$] .@error "SM: no arguments" -.if \\n[.$]=1 \s-1\\$1\s0 -.if \\n[.$]=2 \s-1\\$1\s0\\$2 -.if \\n[.$]=3 \\$1\s-1\\$2\s0\\$3 -.. -.\"------------- -.nr misc*S-ps \n[@ps] -.nr misc*S-vs \n[@vs] -.nr misc*S-ps1 \n[@ps] -.nr misc*S-vs1 \n[@vs] -.ds misc*a -.ds misc*b -.de S -.ie !\\n[.$] \{\ -. ds misc*a P -. ds misc*b P -.\} -.el \{\ -. ie \\n[.$]=1 .ds misc*b D -. el \{\ -. ie \w@\\$2@=0 .ds misc*b C -. el .ds misc*b \\$2 -. \} -. ie \w@\\$1@=0 .ds misc*a C -. el .ds misc*a \\$1 -.\} -.\" -.\" set point size -.if !'\\*[misc*a]'C' \{\ -. ie '\\*[misc*a]'P' .ps \\n[misc*S-ps]u -. el \{\ -. ie '\\*[misc*a]'D' .ps \\n[@ps]u -. el .ps \\*[misc*a] -. if \\n[D]>2 .tm S: .ps \\*[misc*a] -. \} -.\} -.\" -.\" set vertical spacing -.if !'\\*[misc*b]'C' \{\ -. ie '\\*[misc*b]'P' .vs \\n[misc*S-vs]u -. el \{\ -. ie '\\*[misc*b]'D' .vs \\n[.ps]u+2p -. el .vs \\*[misc*b] -. if \\n[D]>2 .tm S: .vs \\*[misc*b] -. \} -.\} -.nr @ps \\n[.ps] -.nr @vs \\n[.v] -.\" -.if \\n[D]>1 .tm S(\\$*): ma:\\*[misc*a], mb:\\*[misc*b] => ps:\\n[@ps]u, vs:\\n[@vs]u -.nr misc*S-ps \\n[misc*S-ps1] -.nr misc*S-vs \\n[misc*S-vs1] -.nr misc*S-ps1 \\n[@ps] -.nr misc*S-vs1 \\n[@vs] -.pg@move-trap -.. -.\"------------ -.de HC -.ev 0 -.hc \\$1 -.ev -.ev 1 -.hc \\$1 -.ev -.ev 2 -.hc \\$1 -.ev -.. -.\"------------ -.de RD -.di misc*rd -'fl -.rd \\$1\t -.br -.di -.ie !''\\$3' \{\ -. di misc*rd2 -. ds \\$3 "\\*[misc*rd] -. br -. di -.\} -.if !''\\$2' .rn misc*rd \\$2 -.rm misc*rd misc*rd2 -.. -.\"------------ -.\" VERBON [flag [pointsize [font]]] -.\" flag -.\" bit function -.\" 0 escape on -.\" 1 add an empty line before verbose text -.\" 2 add an empty line after verbose text -.\" 3 numbered lines (controlled by the string Verbnm) -.\" 4 indent text by the numbervariable Verbin. -.de VERBON -.br -.nr misc*verb 0\\$1 -.if (0\\n[misc*verb]%4)/2 .SP \\n[Lsp]u -.misc@ev-keep misc*verb-ev -.nf -.if (0\\n[misc*verb]%16)/8 .nm \\*[Verbnm] -.ie !'\\$3'' .ft \\$3 -.el .ft CR -.ie 0\\$2 \{\ -. ss \\$2 -. ps \\$2 -. vs \\$2 -.\} -.el .ss 12 -.ta T 8u*\w@n@u -.if (0\\n[misc*verb]%32)/16 .in +\\n[Verbin]u -.if 0\\n[misc*verb]%2 \{\ -. eo -. nr @verbose-flag 1 \" tell pageheader to set ec/eo -.\} -.. -.de VERBOFF -.ec -.br -.if (0\\n[misc*verb]%8)/4 .SP \\n[Lsp]u -.if (0\\n[misc*verb]%16)/8 .nm -.if (0\\n[misc*verb]%32)/16 .in -.ev -.nr @verbose-flag 0 -.. -.\" ######## module pict ################# -.nr pict*width 0 -.nr pict*height 0 -.nr pict*mode 0 -.nr pict*ind 0 -.nr pict*id 0 1 -.\" I assume that the number variable pict*id is the same -.\" between two runs. -.de PIC -.br -.nr pict*ind 0 -.nr pict*box 0 -.while \\n[.$]>0 \{\ -. if '-B'\\$1' \{\ -. nr pict*box 1 -. shift -. continue -. \} -. if '-L'\\$1' \{\ -. nr pict*mode 0 -. shift -. continue -. \} -. if '-R'\\$1' \{\ -. nr pict*mode 1 -. shift -. continue -. \} -. if '-I'\\$1' \{\ -. nr pict*ind (m;\\$2) -. nr pict*mode 2 -. shift 2 -. continue -. \} -. if '-C'\\$1' \{\ -. nr pict*mode 3 -. shift -. continue -. \} -. ds pict*f \\$1 -. nr pict*id +1 -. shift -. if \\n[.$]>0 \{\ -. nr pict*width (i;\\$1) -. shift -. \} -. if \\n[.$]>0 \{\ -. nr pict*height (i;\\$1) -. shift -. \} -.\} -.if \\n[Ref]>0 \{\ -. tm .\\\\" PIC id \\n[pict*id] -. tm .\\\\" PIC file \\*[pict*f] -.\} -.if d pict*file!\\n[pict*id] \{\ -. ds pict*f \\*[pict*file!\\n[pict*id]] -. nr pict*llx \\n[pict*llx!\\n[pict*id]] -. nr pict*lly \\n[pict*lly!\\n[pict*id]] -. nr pict*urx \\n[pict*urx!\\n[pict*id]] -. nr pict*ury \\n[pict*ury!\\n[pict*id]] -. \" -. nr pict*w (p;\\n[pict*urx]-\\n[pict*llx]) -. if \\n[pict*w]<0 .nr pict*w 0-\\n[pict*w] -. nr pict*h (p;\\n[pict*ury]-\\n[pict*lly]) -. if \\n[pict*h]<0 .nr pict*h 0-\\n[pict*h] -. if \\n[pict*width]>0 \{\ -. nr pict*rs (u;1000*\\n[pict*width]/\\n[pict*w]) -. nr pict*w (u;\\n[pict*w]*\\n[pict*rs]/1000) -. nr pict*h (u;\\n[pict*h]*\\n[pict*rs]/1000) -. \} -. if \\n[pict*height]>0 \{\ -. nr pict*rs (u;1000*\\n[pict*height]/\\n[pict*h]) -. nr pict*h (u;\\n[pict*h]*\\n[pict*rs]/1000) -. \} -. if '0'\\n[pict*mode]' \{\ -. nr pict*in \\n[.i]u -. \} -. if '1'\\n[pict*mode]' \{\ -. nr pict*in (u;\\n[.l]-\\n[.i]-\\n[pict*w]) -. \} -. if '2'\\n[pict*mode]' \{\ -. nr pict*in \\n[pict*ind]u -. \} -. if '3'\\n[pict*mode]' \{\ -. nr pict*in (u;(\\n[.l]-\\n[.i]-\\n[pict*w])/2) -. \} -. ds pict*h " -. if \\n[pict*h]>0 .ds pict*h \\n[pict*h] -. \" -. ne \\n[pict*h]u -. \" -. \" these lines are copied and modified from tmac.pspic. -. \" Originally written by James Clark -. br -. ie \\n[pict*box]>0 \{\ -\h'\\n[pict*in]u'\ -\Z'\D'p 0 \\n[pict*h]u \\n[pict*w]u 0 0 -\\n[pict*h]u''\ -\v'\\n[pict*h]u'\X'ps: import \\*[pict*f] \ -\\n[pict*llx] \\n[pict*lly] \\n[pict*urx] \\n[pict*ury] \\n[pict*w] \\n[pict*h]' -.\} -. el \{\ -\h'\\n[pict*in]u'\ -\X'ps: invis'\ -\Z'\D'p 0 \\n[pict*h]u \\n[pict*w]u 0 0 -\\n[pict*h]u''\ -\X'ps: endinvis'\ -\v'\\n[pict*h]u'\X'ps: import \\*[pict*f] \ -\\n[pict*llx] \\n[pict*lly] \\n[pict*urx] \\n[pict*ury] \\n[pict*w] \\n[pict*h]' -. \} -. br -. sp \\n[pict*h]u -.\} -.. -.\" external picture -.de EPIC -.if \\n[.$]< 2 .@error "EPIC: Not enough arguments" -.nr pict*w \\$1 -.nr pict*h \\$2 -.ds pict*name "External picture -.if !''$3' .ds pict*name \\$3 -\& -.br -.ne \\n[pict*h]u -.sp \\n[pict*h]u -.nr pict*ind (u;(\\n[.l]-\\n[.i]-\\n[pict*w])/2) -.in +\\n[pict*ind]u -\D'l \\n[pict*w]u 0'\ -\D'l 0 -\\n[pict*h]u'\ -\D'l -\\n[pict*w]u 0'\ -\D'l 0 \\n[pict*h]u'\ -\v'-(u;\\n[pict*h]/2)'\ -\h'(u;(\\n[pict*w]-\w'\\*[pict*name]'/2))'\\*[pict*name] -.in -.. -.\" ######## module acc ################# -.\"----------- -.\" accents. These are copied from mgs, written by James Clark. -.de acc@over-def -.ds \\$1 \Z'\v'(u;\w'x'*0+\En[rst]-\En[.cht])'\ -\h'(u;-\En[skw]+(-\En[.w]-\w'\\$2'/2)+\En[.csk])'\\$2' -.. -.de acc@under-def -.ds \\$1 \Z'\v'\En[.cdp]u'\h'(u;-\En[.w]-\w'\\$2'/2)'\\$2' -.. -.acc@over-def ` \` -.acc@over-def ' \' -.acc@over-def ^ ^ -.acc@over-def ~ ~ -.acc@over-def : \(ad -.acc@over-def ; \(ad -.acc@under-def , \(ac -.\" ######## module uni ################# -.\" unimplemented macros -.de OK -'tm "OK: not implemented" -.. -.de PM -'tm "PM: not implemented" -.. -.\" ######## module hd ################# -.\" support for usermacro -.nr hd*h1-page 1 \" last page-number for level 1 header. -.nr hd*htype 0 -.ds hd*sect-pg -.ds hd*mark -.ds hd*suf-space -.nr hd*need 0 -.aln ;0 hd*htype -.als }0 hd*mark -.als }2 hd*suf-space -.aln ;3 hd*need -.\"------------- -.\" .hd@split varable index name val1 val2 ... -.de hd@split -.if \\$2>(\\n[.$]-3) .@error "\\$3 must have at least \\$2 values (\\*[\\$3]). -.nr hd*sp-tmp \\$2+3 -.ds \\$1 \\$[\\n[hd*sp-tmp]] -.. -.de HU -.H 0 "\\$1" -.. -.\"------------- -.de H -.if !r hd*cur-bline .nr hd*cur-bline \\n[nl] -.br -.df@print-float 2\" $$$ could be wrong... -.\" terminate all lists -.LC -.init@reset -.nr hd*level 0\\$1 -.nr hd*arg1 0\\$1 -.if !\\n[hd*level] .nr hd*level \\n[Hu] -.\" -.\" clear lower counters -.nr hd*i 1 1 -.while \\n+[hd*i]<8 .if \\n[hd*level]<\\n[hd*i] .nr H\\n[hd*i] 0 1 -.\" -.\" save last text for use in TP -.if \\n[hd*level]=1 .ds H1txt \\$2\\$3 -.\" -.\" This is a little fix to be able to get correct H1 heading number -.\" in page headers. Special attention was needed when other formats are used. -.ie !''\\g[H1]' \{\ -. ds hd*format \\g[H1] -. af H1 0 -. nr H1h \\n[H1] 1 -. af H1 \\*[hd*format] -.\} -.el .nr H1h \\n[H1] 1 -.if \\n[hd*level]=1 .nr H1h +1 -.\" -.\" Check if it's time for new page. Only if text has -.\" appeared before. -.if \\n[Ej]&(\\n[Ej]>=\\n[hd*level])&(\\n[nl]>\\n[hd*cur-bline]) .pg@next-page -.\" -.\" increment current counter -.nr H\\n[hd*level] +1 -.\" -.\" update pagenumber if section-page is used -.if (\\n[hd*level]=1)&(\\n[Sectp]>0) .hd@set-page 1 -.\" -.\" hd*mark is the text written to the left of the header. -.ds hd*mark \\n[H1]. -.\" -.if \\n[hd*level]>1 .as hd*mark \\n[H2] -.\" -.nr hd*i 2 1 -.while \\n+[hd*i]<8 .if \\n[hd*level]>(\\n[hd*i]-1) .as hd*mark .\\n[H\\n[hd*i]] -.if \\n[Ht] .ds hd*mark \\n[H\\n[hd*level]]. -.\" -.\" special case, no dot after level one heading if not H1dot true -.if (\\n[hd*level]=1)&(\\n[H1dot]=0) .ds hd*mark \\n[H1] -.\" -.as hd*mark \ \ \" add spaces between mark and heading -.if !\\n[hd*arg1] .ds hd*mark\" no mark for unnumbered -.\" -.if \\n[D]>1 .tm At header \\*[hd*mark] "\\$2" -.nr hd*htype 0 \" hd*htype = check break and space -. \" 0 = run-in, 1 = break only, 2 = space -.if \\n[hd*level]<=\\n[Hb] .nr hd*htype 1 -.if \\n[hd*level]<=\\n[Hs] .nr hd*htype 2 -. \" two spaces if hd*htype == 0 -.ie (\\n[hd*htype]=0)&(\w@\\$2@) .ds hd*suf-space " \" -.el .ds hd*suf-space -.nr hd*need 2v \" hd*need = header need space -.\"---------- user macro HX ------------ -.\" User exit macro to override numbering. -.\" May change hd*mark (}0), hd*suf-space (}2) and hd*need (;3) -.\" Can also change Hps1/2. -.if d HX .HX \\n[hd*level] \\n[hd*arg1] "\\$2\\$3" -.\"-------------------------------------- -.\" pre-space -.ie \\n[hd*level]<=\\n[Hps] .SP (u;\\n[Hps2]) -.el .SP (u;\\n[Hps1]) -.\" -.par@reset-num \\n[hd*level]\" reset numbered paragraph -.\" start diversion to measure size of header -.di hd*div -\\*[hd*mark]\\$2\\$3\\*[hd*suf-space] -.br -.di -.rm hd*div -.if \\n[hd*htype] .na \" no adjust if run-in -.if \\n[hd*htype]<2 .nr hd*need +\\n[Lsp]u \" add some extra space -.ne \\n[hd*need]u+\\n[dn]u+.5p-1v \" this is the needed space for a header -.\" -.\" size and font calculations -.hd@split hd*font \\n[hd*level] HF \\*[HF]\" get font for this level -.ft \\*[hd*font]\" set new font -.hd@split hd*new-ps \\n[hd*level] HP \\*[HP]\" get point size -.ie (\\*[hd*new-ps]=0):(\w@\\*[hd*new-ps]@=0) \{\ -. if \\n[hd*htype] \{\ -. if '\\*[hd*font]'3' \{\ -. ps -1 -. vs -1 -. \} -. if '\\*[hd*font]'B' \{\ -. ps -1 -. vs -1 -. \} -. \} -.\} -.el \{\ -. ps \\*[hd*new-ps] -. vs \\*[hd*new-ps]+2 -.\} -.\" -.\"---------- user macro HY ------------- -.\" user macro to reset indents -.if d HY .HY \\n[hd*level] \\n[hd*arg1] "\\$2\\$3" -.\"-------------------------------------- -.nr hd*mark-size \w@\\*[hd*mark]@ -.if (\\n[hd*level]<=\\n[Hc])&\\n[hd*htype] .ce\" center if level<=Hc -.\" -.\" finally, output the header -\\*[hd*mark]\&\c -.\" and the rest of the header -.ie \\n[hd*htype] \{\ -\\$2\\$3 -. br -.\} -.el \\$2\\$3\\*[hd*suf-space]\&\c -.ft 1 -.\" restore pointsize and vertical size. -.ps \\n[@ps]u -.vs \\n[@vs]u -.\" -.\" table of contents -.if (\\n[hd*level]<=\\n[Cl])&\w@\\$2@ .toc@entry \\n[hd*level] "\\$2" -.\" set adjust to previous value -.SA -.\" do break or space -.if \\n[hd*htype] .br -.if \\n[hd*htype]>1 .SP (u;\\n[Lsp]*\\n[Hss]) -.if \\n[hd*htype] \{\ -. \" indent if Hi=1 and Pt=1 -. if (\\n[Hi]=1)&(\\n[Pt]=1) .ti +\\n[Pi]n -. \" indent size of mark if Hi=2 -. if \\n[hd*htype]&(\\n[Hi]>1) .ti +\\n[hd*mark-size]u -.\} -.nr par@ind-flag 0 \" no indent on .P if Pt=2 -.\" -.\" check if it is time to reset footnotes -.if (\\n[hd*level]=1)&\\n[ft*clear-at-header] .nr ft*nr 0 1 -.\" -.\" check if it is time to reset indexes -.if (\\n[hd*level]=1)&\\n[Sectf] \{\ -. nr lix*fg-nr 0 1 -. nr lix*tb-nr 0 1 -. nr lix*ec-nr 0 1 -. nr lix*ex-nr 0 1 -.\} -.\"---------- user macro HZ ---------- -.if d HZ .HZ \\n[hd*level] \\n[hd*arg1] "\\$2\\$3" -.nr hd*last-pos \\n[nl] -.nr hd*last-hpos \\n[.k] -.nr par@ind-flag 0 -.. -.\"-------- -.de HM -.nr hd*i 0 1 -.while \\n+[hd*i]<8 .af H\\n[hd*i] \\$[\\n[hd*i]] 1 -.. -.\"---------------------- -.\" set page-nr, called from header -.\" -.de hd@set-page -.\" -.ie \\n[.$]>0 .nr P \\$1 -.el .nr P +1 -.\" Set section-page-string -.ds hd*sect-pg \\n[H1]-\\n[P] -.if \\n[Sectp]>1 .if '\\n[H1]'0' .ds hd*sect-pg " -.. -.\"########### module pg #################### -.\" set end of text trap -.wh 0 pg@header -.em pg@end-of-text -.\" -.ds pg*header ''- \\nP -'' -.ds pg*footer -.if \n[N]=4 .ds pg*header '''' -.if (\n[N]=3):(\n[N]=5) \{\ -. ds pg*header '''' -. ds pg*footer ''\\*[hd*sect-pg]'' -.\} -.ds pg*even-footer -.ds pg*odd-footer -.ds pg*even-header -.ds pg*odd-header -.\" -.nr pg*top-margin 0 -.nr pg*foot-margin 0 -.nr pg*block-size 0 -.nr pg*footer-size 5\" 1v+footer+even/odd footer+2v -.nr pg*header-size 7\" 3v+header+even/odd header+2v -.nr pg*extra-footer-size 0 -.nr pg*extra-header-size 0 -.nr ft*note-size 0 -.nr pg*cur-column 0 -.nr pg*cols-per-page 1 -.nr pg*cur-po \n[@po] -.nr pg*head-mark 0 -.\" -.nr pg*ps \n[@ps] -.nr pg*vs \n[@vs] -.\"------------------------- -.\" footer TRAPS: set, enable and disable -.de pg@set-new-trap -.nr pg*foot-trap \\n[@pl]u-(\\n[pg*block-size]u+\\n[ft*note-size]u+\\n[pg*foot-margin]u+\\n[pg*footer-size]v+\\n[pg*extra-footer-size]u) -.\" -.if \\n[D]>2 .tm pg*foot-trap \\n[@pl]u-(\\n[pg*block-size]u+\\n[ft*note-size]u+\\n[pg*foot-margin]u+\\n[pg*footer-size]v+\\n[pg*extra-footer-size]u) = \\n[pg*foot-trap] -.\" -.\" last-pos points to the position of the footer and bottom -.\" block below foot-notes. -.nr pg*last-pos \\n[@pl]u-(\\n[pg*block-size]u+\\n[pg*foot-margin]u+\\n[pg*footer-size]v) -.if \\n[D]>2 .tm pg*last-pos \\n[@pl]u-(\\n[pg*block-size]u+\\n[pg*foot-margin]u+\\n[pg*footer-size]v) = \\n[pg*last-pos] -.. -.de pg@enable-trap -.wh \\n[pg*foot-trap]u pg@footer -.if \\n[D]>2 .tm pg@enable-trap .t=\\n[.t] nl=\\n[nl] -.if \\n[D]>2 .ptr -.. -.de pg@disable-trap -.ch pg@footer -.. -.\" move to new trap (if changed). -.de pg@move-trap -.pg@disable-trap -.pg@set-new-trap -.pg@enable-trap -.. -.de pg@enable-top-trap -.\" set trap for pageheader. -.nr pg*top-enabled 1 -.. -.de pg@disable-top-trap -.\" remove trap for pageheader. -.nr pg*top-enabled 0 -.. -.\" no header on the next page -.de PGNH -.nr pg*top-enabled (-1) -.. -.\" set first trap for pagefooter -.pg@enable-top-trap -.pg@set-new-trap -.pg@enable-trap -.\"------------------------- -.\" stop output and begin on next page. Fix footnotes and all that. -.de pg@next-page -.\".debug next-page -.ne 999i \" activate trap -.\" .pg@footer -.. -.\"------------------------- -.\" support for PX, TP and EOP. -.als }t pg*header -.als }e pg*even-header -.als }o pg*odd-header -.als TPh pg*header -.als TPeh pg*even-header -.als TPoh pg*odd-header -.\" -.als EOPf pg*footer -.als EOPef pg*even-footer -.als EOPof pg*odd-footer -.\"------------------------------------------------------------ -.\" HEADER -.de pg@header -.if \\n[D]>1 .tm Page# \\n[%] (\\n[.F]:\\n[c.]) -.if \\n[Idxf] \{\ -.tl '''' -.\} -.\" assign current page-number to P -.hd@set-page -.\" reset spacing -.nr line*lp\\n[.z] 0 -.nr line*ac\\n[.z] 0 -.\" -.\" suppress pageheader if pagenumber == 1 and N == [124] -.if \\n[pg*top-enabled] \{\ -.\" must be fixed!! -.\". pg@disable-top-trap -. if \\n[pg*extra-header-size] 'sp \\n[pg*extra-header-size]u -. if \\n[pg*top-margin] 'sp \\n[pg*top-margin]u -. ev pg*tl-ev -. pg@set-env -. ie d let@header .let@header -. el \{\ -. ie d TP .TP -. el \{\ -' sp 3 -. ie ((\\n[%]=1)&((\\n[N]=1):(\\n[N]=2))) .sp -. el .tl \\*[pg*header] -. ie o .tl \\*[pg*odd-header] -. el .tl \\*[pg*even-header] -' sp 2 -. \} -. \} -. ev -. \" why no-space?? -. if d PX \{\ -. ns -. PX -. rs -. \} -. \" check for pending footnotes -. ft@check-old -. \" -. \" back to normal text processing -. pg@enable-trap -. \" mark for multicolumn -. nr pg*head-mark \\n[nl]u -. \" reset NCOL pointer at each new page. -. nr pg*last-ncol 0 -. \" set multicolumn -. \" -. pg@set-po -. \" print floating displays -. df@print-float 4 -. tbl@top-hook -. ns -.\} -.if \\n[pg*top-enabled]<0 .nr pg*top-enabled 1 -.nr hd*cur-bline \\n[nl] \" .H needs to know if output has occured -.. -.\"--------------------------------------------------------- -.\" FOOTER -.de pg@footer -.ec -.if \\n[D]>2 .tm Footer# \\n[%] (\\n[.F]:\\n[c.]) -.pg@disable-trap -.\".debug footer -.tbl@bottom-hook -.\" increment pageoffset for MC -.\" move to the exact start of footer. -'sp |\\n[pg*foot-trap]u+1v -.\" -.if \\n[D]>3 .tm FOOTER after .sp -.\" print footnotes -.if d ft*div .ft@print -.\" -.pg@inc-po -.if !\\n[pg*cur-column] .pg@print-footer -.\" next column -.pg@set-po -.pg@enable-trap -.if \\n[@verbose-flag] .eo \" to help VERBON/VERBOFF -.. -.\"------------------------- -.de pg@print-footer -.\" jump to the position just below the foot-notes. -'sp |\\n[pg*last-pos]u+1v -.\" check if there are any bottom block -.if d pg*block-div .pg@block -.\" -.\" print the footer and eject new page -.ev pg*tl-ev -.pg@set-env -.\" user defined end-of-page macro -.ie d EOP .EOP -.el \{\ -. ie o .tl \\*[pg*odd-footer] -. el .tl \\*[pg*even-footer] -. ie (\\n[%]=1)&(\\n[N]=1) .tl \\*[pg*header] -. el .tl \\*[pg*footer] -. tl ''\\*[Pg_type!\\n[@copy_type]]'' -.\} -.ev -.\" be sure that floating displays and footnotes will be -.\" printed at the end of the document. -.ie (\\n[df*fnr]>=\\n[df*o-fnr]):\\n[ft*exist] \{\ -. ev ne -' bp -. ev -.\} -.el 'bp -.. -.\"------------------------- -.\" -.\" Initialize the title environment -.de pg@set-env -'na -'nh -'in 0 -'ti 0 -.ie \\n[Pgps] \{\ -. ps \\n[@ps]u -. vs \\n[@vs]u -.\} -.el \{\ -. ps \\n[pg*ps]u -. vs \\n[pg*vs]u -.\} -.lt \\n[@ll]u -.. -.\"------------------------- -.de PH -.ds pg*header "\\$1 -.pg@set-new-size -.. -.de PF -.ds pg*footer "\\$1 -.pg@set-new-size -.. -.de OH -.ds pg*odd-header "\\$1 -.pg@set-new-size -.. -.de EH -.ds pg*even-header "\\$1 -.pg@set-new-size -.. -.de OF -.ds pg*odd-footer "\\$1 -.pg@set-new-size -.. -.de EF -.ds pg*even-footer "\\$1 -.pg@set-new-size -.. -.de pg@clear-hd -.ds pg*even-header -.ds pg*odd-header -.ds pg*header -.. -.de pg@clear-ft -.ds pg*even-footer -.ds pg*odd-footer -.ds pg*footer -.. -.de pg@set-new-size -.nr pg*ps \\n[@ps] -.nr pg*vs \\n[@vs] -.pg@move-trap -.. -.\"------------------------- -.\" end of page processing -.de pg@footnotes -.\".debug footnotes -.\" output footnotes. set trap for block -.\" -.. -.\"------------------------- -.\" print bottom block -.de pg@block -.ev pg*block-ev -'nf -'in 0 -.ll 100i -.pg*block-div -.br -.ev -.. -.\"------------------------- -.\" define bottom block -.de BS -.misc@ev-keep pg*block-ev -.init@reset -.br -.di pg*block-div -.. -.\"------------------------- -.de BE -.br -.di -.nr pg*block-size \\n[dn]u -.ev -.pg@move-trap -.. -.\"------------------------- -.\" print out all pending text -.de pg@end-of-text -.if \\n[D]>2 .tm ---------- End of text processing ---------------- -.df@eot-print -.ref@eot-print -.. -.\"------------------------- -.\" set top and bottom margins -.de VM -.if \\n[.$]=0 \{\ -. nr pg*extra-footer-size 0 -. nr pg*extra-header-size 0 -.\} -.if \\n[.$]>0 .nr pg*extra-header-size (v;\\$1) -.if \\n[.$]>1 .nr pg*extra-footer-size (v;\\$2) -.if \\n[D]>2 \{\ -. tm extra top \\n[pg*extra-footer-size] -. tm extra bottom \\n[pg*extra-header-size] -.\} -.pg@move-trap -.. -.\"--------------------- -.\" multicolumn output. -.de pg@set-po -.if \\n[pg*cols-per-page]>1 \{\ -. ll \\n[pg*column-size]u -.\} -.. -.de pg@inc-po -.if \\n[pg*cols-per-page]>1 \{\ -. ie \\n+[pg*cur-column]>=\\n[pg*cols-per-page] \{\ -. nr pg*cur-column 0 1 -. nr pg*cur-po \\n[@po]u -. po \\n[@po]u -. ll \\n[@ll]u -. \} -. el \{\ -. nr pg*cur-po +(\\n[pg*column-size]u+\\n[pg*column-sep]u) -. po \\n[pg*cur-po]u -' sp |\\n[pg*head-mark]u -. tbl@top-hook -. \} -.\} -.. -.\" An argument disables the page-break. -.de 1C -.br -.if \\n[pg*cols-per-page]<=1 .@error "1C: multicolumn mode not active" -.nr pg*cols-per-page 1 -.nr pg*column-sep 0 -.nr pg*column-size \\n[@ll] -.nr pg*ncol-i \\n[pg*cur-column]\" temp variable -.nr pg*cur-column 0 1 -.nr pg*cur-po \\n[@po]u -.PGFORM -.ie !'\\$1'1' .SK -.el \{\ -. if d ft*div \{\ -. if \\n[pg*ncol-i]>0 \{\ -. @warning 1C: footnotes will be messy -. \} -. \} -. if \\n[pg*last-ncol]>0 \{\ -. sp |\\n[pg*last-ncol]u -. nr pg*last-ncol 0 -. \} -.\} -.. -.de 2C -.br -.nr pg*head-mark \\n[nl]u -.if \\n[pg*cols-per-page]>1 .@error "2C: multicolumn mode already active" -.nr pg*cols-per-page 2 -.nr pg*column-sep \\n[@ll]/15 -.nr pg*column-size (\\n[@ll]u*7)/15 -.nr pg*cur-column 0 1 -.nr pg*cur-po \\n[@po]u -.ll \\n[pg*column-size]u -.\" .lt \\n[pg*column-size]u -.. -.\" MC column-size [ column-separation ] -.de MC -.br -.nr pg*head-mark \\n[nl]u -.if \\n[pg*cols-per-page]>1 .@error "MC: multicolumn mode already active" -.ie ''\\$1' .nr pg*column-size \\n[.l] -.el .nr pg*column-size (n;\\$1) -.ie ''\\$2' .nr pg*column-sep \\n[pg*column-size]/15 -.el .nr pg*column-sep (n;\\$2) -.\" -.nr pg*cols-per-page (u;\\n[.l]/(\\n[pg*column-size]+\\n[pg*column-sep]+1)) -.nr pg*cur-column 0 1 -.nr pg*cur-po \\n[@po]u -.ll \\n[pg*column-size]u -.\" .lt \\n[pg*column-size]u -.. -.\" begin a new column -.de NCOL -.br -.if \\n[nl]>\\n[pg*last-ncol] .nr pg*last-ncol \\n[nl] -.pg@footer -.. -.\" skip pages -.de SK -.br -.bp -.nr pg*i 0 1 -.\" force new page by writing something invisible. -.while \\n+[pg*i]<=(0\\$1) \{\ -\& -. bp -.\} -.. -.\"------------------------------- -.\" MULB width1 space1 width2 space2 width3 space3 ... -.de MULB -.br -.nr pg*i 0 1 -.nr pg*mul-x 0 1 -.nr pg*mul-ind 0 -.nr pg*mul-last 0 -.while \\n[.$] \{\ -. nr pg*mul!\\n+[pg*i] (n;0\\$1) -. nr pg*muls!\\n[pg*i] (n;0\\$2) -. shift 2 -.\} -.nr pg*mul-max-col \\n[pg*i] -.ds pg*mul-fam \\n[.fam] -.nr pg*mul-font \\n[.f] -.ev pg*mul-ev -.ps \\n[@ps]u -.vs \\n[@vs]u -.fam \\*[pg*mul-fam] -.ft \\n[pg*mul-font] -.fi -.hy 14 -.di pg*mul-div -.MULN -.. -.\"----------- -.de MULN -.if \\n[pg*mul-x]>=\\n[pg*mul-max-col] .@error "MULN: Undefined columnwidth" -.br -.if \\n[.d]>\\n[pg*mul-last] .nr pg*mul-last \\n[.d] -.rt +0 -.in \\n[pg*mul-ind]u -.ll (u;\\n[.i]+\\n[pg*mul!\\n+[pg*mul-x]])u -.nr pg*mul-ind +(u;\\n[pg*mul!\\n[pg*mul-x]]+\\n[pg*muls!\\n[pg*mul-x]]) -.. -.\"----------- -.\" MULE -.de MULE -.br -.if \\n[.d]>\\n[pg*mul-last] .nr pg*mul-last \\n[.d] -.di -.ev -.ne \\n[pg*mul-last]u -.nf -.mk -.pg*mul-div -.rt -.sp \\n[pg*mul-last]u -.fi -.. -.\"----------- -.de OP -.br -.ie o .if !\\n[pg*head-mark]=\\n[nl] \{\ -. bp +1 -. bp +1 -.\} -.el .bp -.. -.\"########### module footnotes ################### -.nr ft*note-size 0 -.nr ft*busy 0 -.nr ft*nr 0 1 -.nr ft*wide 0 -.nr ft*hyphen 0\" hyphenation value -.nr ft*adjust 1\" >0 if adjust true -.nr ft*indent 1\" >0 if text indent true (not imp. $$$) -.nr ft*just 0\" 0=left justification, 1=right (not imp. $$$) -.nr ft*exist 0\" not zero if there are any footnotes to be printed -.nr ft*clear-at-header 0\" >0 if footnotes should be reset at first level head. -.\" -.ds F \v'-.4m'\s-3\\n+[ft*nr]\s0\v'.4m' -.\" -.\"----------------- -.\" init footnote environment -.de ft@init -.\" indentcontrol not implemented $$$ -.\" label justification not implemented $$$ -'in 0 -'fi -.ie \\n[ft*adjust] 'ad -.el 'na -.ie \\n[ft*hyphen] 'hy 14 -.el 'hy 0 -.ll \\n[@cur-ll]u -.lt \\n[@cur-ll]u -.ps (p;\\n[@ps]u-2) -.vs (p;\\n[@vs]u-1) -.. -.\"----------------- -.\" set footnote format -.\" no support for two column processing (yet). $$$ -.de FD -.if \\n[.$]=0 .@error "FD: bad arg \\$1" -.ie \\n[.$]=2 .nr ft*clear-at-header 1 -.el .nr ft*clear-at-header 0 -.\" -.if !'\\$1'' \{\ -. ie \\$1>11 .nr ft*format 0 -. el .nr ft*format \\$1 -. \" -. nr ft*hyphen (\\n[ft*format]%2)*14 -. nr ft*format \\n[ft*format]/2 -. \" -. nr ft*adjust 1-(\\n[ft*format]%2) -. nr ft*format \\n[ft*format]/2 -. \" -. nr ft*indent 1-(\\n[ft*format]%2) -. nr ft*format \\n[ft*format]/2 -. \" -. nr ft*just \\n[ft*format]%2 -.\} -.. -.\"--------------- -.\" Footnote and display width control $$$ -.de WC -.nr ft*i 0 1 -.while \\n+[ft*i]<=\\n[.$] \{\ -. ds ft*x \\$[\\n[ft*i]] -. if '\\*[ft*x]'N' \{\ -. nr ft*wide 0 -. nr ft*first-fn 0 -. nr ds*wide 0 -. nr ds*float-break 1 -. \} -. if '\\*[ft*x]'-WF' .nr ft*wide 0 -. if '\\*[ft*x]'WF' .nr ft*wide 1 -. if '\\*[ft*x]'-FF' .nr ft*first-fn 0 -. if '\\*[ft*x]'FF' .nr ft*first-fn 1 -. if '\\*[ft*x]'-WD' \{\ -. nr ds*wide 0 -. if r ft*df-save \{\ -. nr Df \\n[ft*df-save] -. rm ft*df-save -. \} -. \} -. if '\\*[ft*x]'WD' \{\ -. nr ds*wide 1 -. nr ft*df-save \\n[Df] -. nr Df 4 -. \} -. if '\\*[ft*x]'-FB' .nr ds*float-break 0 -. if '\\*[ft*x]'FB' .nr ds*float-break 1 -. if \\n[D]>1 .tm WC WF=\\n[ft*wide] WD=\\n[ds*wide] -.\} -.. -.\"----------------- -.\" begin footnote -.\" Change environment, switch to diversion and print the foot-note mark. -.de FS -.if \\n[ft*busy] .@error "FS: missing FE" -.nr ft*busy 1 -.ev ft*ev -.ft@init -.if !\\n[ft*wide] .pg@set-po -.di ft*tmp-div -.nr ft*space (u;\\n[Fs]*\\n[Lsp]) -.sp \\n[ft*space]u -.\" print mark -.ie \\n[.$] .ds ft*mark \\$1 -.el .ds ft*mark \\n[ft*nr]. -\\*[ft*mark] -.in +.75c -.sp -1 -.nr ft*exist 1 -.. -.\"----------------- -.\" init footnote diversion -.de ft@init-footnote -.di ft*div -\l'20n' -.br -.di -.nr ft*note-size \\n[dn] -.. -.\"----------------- -.\" end footnote -.\" End the diversion, back to previous environment, and adjust -.\" the trap to the new foot-note size. -.de FE -.nr ft*busy 0 -.br -.di -'in 0 -'nf -.if \\n[@pl]u<\\n[dn]u .@error "FE: too big footnote" -.if !d ft*div .nr dn +1v -.if \\n[D]>3 .tm FE: foot-trap=\\n[pg*foot-trap] .d=\\n[.d] dn=\\n[dn] -.ie (\\n[pg*foot-trap]u-\\n[.d]u)<\\n[dn]u \{\ -. da ft*next-div -. ft*tmp-div -. br -. di -.\} -.el \{\ -. if !d ft*div .ft@init-footnote -. da ft*div -. ft*tmp-div -. di -. nr ft*note-size +\\n[dn] -.\} -.rm ft*tmp-div -.ev -.pg@move-trap -.. -.\"----------------- -.\" print footnotes, see pg@footer -.de ft@print -.ev ft*print-ev -'nf -'in 0 -.ll 100i -.ft*div -.br -.ev -.rm ft*div -.nr ft*note-size 0 -.pg@move-trap -.. -.\"----------------- -.\" check if any pending footnotes, see pg@header -.de ft@check-old -.if d ft*next-div \{\ -. ev ft*ev -. ft@init -. ft@init-footnote -. nf -. in 0 -. da ft*div -. ft*next-div -. di -. nr ft*note-size +\\n[dn] -. rm ft*next-div -. ev -. nr ft*exist 0 -. pg@move-trap -.\} -.. -.\"########### module display ################### -.nr ds*wide 0\" >0 if wide displays wanted -.nr df*fnr 0 1\" floating display counter -.nr df*o-fnr 1\" floating display counter, already printed -.nr ds*snr 0 1\" static display counter -.nr ds*lvl 0 1\" display level -.nr ds*float-busy 0\" >0 if printing float -.nr df*float 0 >0 if previous display was floating -.\"-------------------------------------------- -.de DE -.ie \\n[df*float] .df@end \\$@ -.el .ds@end \\$@ -.. -.\"-------------------------------------------- -.\" floating display start -.\" nested DF/DE is not allowed. -.de DF -.if \\n[df*float] .@error "DF:nested floating is not allowed. Use DS." -.ds@set-format \\$@ -.\" -.nr df*old-ll \\n[.l] -.nr ds*ftmp \\n[.f] -.misc@ev-keep df*ev -.ft \\n[ds*ftmp] -.\" -.init@reset -.di df*div -'in 0 -.\" -.ds@set-new-ev \\n[df*old-ll] -.SP \\n[Lsp]u -.nr df*float 1 -.. -.\"-------------------------------------------- -.de df@end -.br -.SP \\n[Lsp]u -.di -.nr df*width!\\n+[df*fnr] \\n[dl] -.nr df*height!\\n[df*fnr] \\n[dn] -.nr df*wide!\\n[df*fnr] \\n[ds*wide] -.nr df*format!\\n[df*fnr] \\n[ds*format] -.ev -.if \\n[D]>2 .tm DF:fnr=\\n[df*fnr] w=\\n[dl] h=\\n[dn] wide=\\n[ds*wide] \ - form=\\n[ds*format] -.\" move div to the floating display list -.rn df*div df*fdiv!\\n[df*fnr] -.\" -.nr par@ind-flag 0 -.\" print float if queue is empty and the display fits into -.\" the current page -.if ((\\n[df*fnr]>=\\n[df*o-fnr])&(\\n[dn]<\\n[.t])) .df@print-float 1 -.nr df*float 0 -.. -.\"------------- -.\" called by end-of-text -.de df@eot-print -.br -.if \\n[df*o-fnr]<=\\n[df*fnr] \{\ -. if \\n[D]>2 .tm Print remaining displays. -.\" still some floats left, make non-empty environment -. misc@ev-keep ne -. init@reset -\c -. df@print-float 3 -. ev -.\} -.. -.\"--------------- -.\" print according to Df and De. -.\" .df@print-float type -.\" type called from -.\" 1 .DE -.\" 2 end of section -.\" 3 end of document -.\" 4 beginning of new page -.\" -.de df@print-float -.if \\n[Df]>5 .@error "Df=\\n[Df], max value is 5" -.if !\\n[ds*float-busy] \{\ -. nr ds*float-busy 1 -.\" at .DE -. if \\n[D]>3 .tm print-float: .t=\\n[.t], h=\\n[df*height!\\n[df*o-fnr]] -. \" Df = 1 or 5 -. if (\\$1=1)&((\\n[Df]=1):(\\n[Df]=5)) \{\ -. if \\n[.t]>\\n[df*height!\\n[df*o-fnr]] \{\ -. \" Print only new displays. -. if \\n[df*o-fnr]=\\n[df*fnr] \{\ -. br -. ds@print-one-float -. \} -. \} -. \} -. \" Df = 3 -. if (\\$1=1)&(\\n[Df]=3) \{\ -. if \\n[.t]>\\n[df*height!\\n[df*o-fnr]] \{\ -. br -. ds@print-one-float -. \} -. \} -.\" print all if Df<2 and end of section -. if (\\$1=2)&(\\n[Sectp]>0)&(\\n[Df]<2) \{\ -. br -. ds@print-all-floats -. \} -.\" print all if end of document. Where should they go instead? -. if \\$1=3 \{\ -. br -. ds@print-all-floats -.\} -.\" new page -. if (\\$1=4)&(\\n[Df]>1) \{\ -. if \\n[Df]=2 .ds@print-one-float -. if \\n[Df]=3 .ds@print-one-float -. if \\n[Df]>3 \{\ -. ie \\n[De] .ds@print-all-floats -. el .ds@print-this-page -. \} -. \} -. nr ds*float-busy 0 -.\} -.. -.\"--------------- -.\" DF out -.\" print a floating diversion -.de ds@output-float -.nr df*old-ll \\n[.l] -.nr df*old-in \\n[.i] -.ev ds*fev -.nf -.nr df*i \\n[df*o-fnr] -.nr df*f \\n[df*format!\\n[df*i]] -.\" -.in \\n[df*old-in]u -.if \\n[df*f]=1 'in +\\n[Si]n -.if \\n[df*f]>=2 'in 0 -.if \\n[df*f]=2 'ce 9999 -.if \\n[df*f]=3 'in (u;(\\n[.l]-\\n[df*width!\\n[df*i]])/2) -.if \\n[df*f]=4 'rj 9999 -.if \\n[df*f]=5 'in (u;\\n[.l]-\\n[df*width!\\n[df*i]]) -.\" -.\" -.df*fdiv!\\n[df*o-fnr] -.\" -.if \\n[df*f]=2 'ce 0 -.if \\n[df*f]=4 'rj 0 -.ev -.rm df*fdiv!\\n[df*i] -.rm df*height!\\n[df*i] -.rm df*format!\\n[df*i] -.if \\n[df*wide!\\n[df*i]] .nr pg*head-mark \\n[nl]u -.nr df*o-fnr +1 -.. -.\"--------------- -.\" print one floating display if there is one. -.de ds@print-one-float -.if \\n[df*o-fnr]<=\\n[df*fnr] \{\ -. if \\n[D]>3 .tm print-one-float: .t=\\n[.t], h=\\n[df*height!\\n[df*o-fnr]] -. if \\n[.t]<\\n[df*height!\\n[df*o-fnr]] .pg@next-page -. ds@output-float -. if \\n[De] .pg@next-page -.\} -.. -.\"--------------- -.\" print all queued floats. -.\" if De>0 do a page eject between the floats. -.de ds@print-all-floats -.while \\n[df*o-fnr]<=\\n[df*fnr] \{\ -. if \\n[D]>3 .tm print-all-floats: .t=\\n[.t], h=\\n[df*height!\\n[df*o-fnr]] -. if \\n[.t]<\\n[df*height!\\n[df*o-fnr]] .pg@next-page -. br -\c -. ds@output-float -. if \\n[De] .pg@next-page -.\} -.. -.\"--------------- -.\" print as many floats as will fit on the current page -.de ds@print-this-page -.while \\n[df*o-fnr]<=\\n[df*fnr] \{\ -. if \\n[D]>3 .tm print-this-page: .t=\\n[.t], h=\\n[df*height!\\n[df*o-fnr]] -. if \\n[.t]<\\n[df*height!\\n[df*o-fnr]] .break -. ds@output-float -.\} -.. -.\"--------------------------------------------------- -.\" get format of the display -.de ds@set-format -.ie \\n[.$] \{\ -. ie r ds*format!\\$1 .nr ds*format \\n[ds*format!\\$1] -. el .@error "DS/DF:wrong format:\\$1" -.\} -.el .nr ds*format 0 -.if \\n[D]>2 .tm set format=\\n[ds*format] -.\" fill or not to fill, that is the... -.nr ds*fill 0 -.ie \\n[.$]>1 \{\ -. ie r ds*fill!\\$2 .nr ds*fill \\n[ds*fill!\\$2] -. el .@error "\\*[ds*type]:wrong fill:\\$2" -.\} -.if \\n[D]>2 .tm set fill=\\n[ds*fill] -.nr ds*rindent 0 -.if \\n[.$]>2 .nr ds*rindent \\$3 -.if \\n[D]>2 .tm set indent=\\n[ds*rindent] -.. -.\"----------------------------- -.\" .ds@set-new-ev previous-line-length -.de ds@set-new-ev -.ll \\$1u -.lt \\$1u -.if \\n[ds*rindent] \{\ -. ll -\\n[ds*rindent]n -. lt -\\n[ds*rindent]n -.\} -.if \\n[ds*wide] \{\ -. ll \\n[@ll]u -. lt \\n[@ll]u -.\} -.\" -.ie \\n[ds*fill] 'fi -.el 'nf -.. -.\"-------------------------------------------------------- -.nr ds*format 0\" dummy value for .En/.EQ -.nr ds*format! 0\" no indent -.nr ds*format!0 0\" no indent -.nr ds*format!L 0\" no indent -.nr ds*format!I 1\" indent -.nr ds*format!1 1\" indent -.nr ds*format!C 2\" center each line -.nr ds*format!2 2\" center each line -.nr ds*format!CB 3\" center as block -.nr ds*format!3 3\" center as block -.nr ds*format!R 4\" right justify each line -.nr ds*format!4 4\" right justify each line -.nr ds*format!RB 5\" right justify as block -.nr ds*format!5 5\" right justify as block -.\"--------------- -.nr ds*fill! 0\" no fill -.nr ds*fill!N 0\" no fill -.nr ds*fill!0 0\" no fill -.nr ds*fill!F 1\" fill on -.nr ds*fill!1 1\" fill on -.\"-------------------------------------------- -.\" static display start -.\" nested DS/DE is allowed. No limit on depth. -.de DS -.br -.nr ds*lvl +1 -.ds@set-format \\$@ -.\" -.nr ds*old-ll \\n[.l] -.nr ds*old-in \\n[.i] -.misc@push ds-ll \\n[.l] -.misc@push ds-form \\n[ds*format] -.nr ds*i \\n[.i] -.nr ds*ftmp \\n[.f] -.misc@ev-keep ds*ev!\\n+[ds*snr] -.ft \\n[ds*ftmp] -.\" -.init@reset -.\" indent in a diversion doesn't seem like a good idea. -'in 0 -.di ds*div!\\n[ds*snr] -.\" -.ds@set-new-ev \\n[ds*old-ll] -.nr df*float 0 -.. -.\"-------------------------------------------- -.de ds@end -.if \\n-[ds*lvl]<0 .@error "DE: no corresponding DS" -.br -.di -.\" ********** -.nr ds*width \\n[dl] -.nr ds*height \\n[dn] -.misc@pop-nr ds-ll ds*old-ll -.misc@pop-nr ds-form ds*format -.\" -.\" ********** -'nf -.\" calculate needed space -.nr ds*need \\n[ds*height] -.nr ds*i \\n[pg*foot-trap]-\\n[pg*header-size]v-\\n[pg*extra-header-size]v -.if (\\n[ds*height]>\\n[ds*i])&(\\n[.t]<(\\n[ds*i]/2)) .nr ds*need \\n[.t]u+1v -.if (\\n[ds*height]<\\n[ds*i])&(\\n[.t]<(\\n[ds*height])) .nr ds*need \\n[.t]u+1v -.\" Eject page if display will fit one page and -.\" there are less than half of the page left. -.if \\n[ds*need] .ne \\n[ds*need]u -.\" -.\" check if pending equation label -.eq@check \\n[ds*need] -'in \\n[ds*old-in]u -.if \\n[ds*format]=1 'in \\n[ds*old-in]u+\\n[Si]n -.if \\n[ds*format]>=2 'in 0 -.if \\n[ds*format]=2 'ce 9999 -.if \\n[ds*format]=3 'in (u;(\\n[.l]-\\n[ds*width])/2) -.if \\n[ds*format]=4 'rj 9999 -.if \\n[ds*format]=5 'in (u;\\n[.l]-\\n[ds*width]) -.\" ********** -.\" -.\" Print static display -.nr ds*i \\n[Lsp] -.if r Dsp .nr ds*i \\n[Dsp] -.\" -.if \\n[Ds] .SP \\n[ds*i]u -.ds*div!\\n[ds*snr] -.if \\n[Ds] .SP \\n[ds*i]u -.\" -.if \\n[ds*format]=2 'ce 0 -.if \\n[ds*format]=4 'rj 0 -.rm ds*div!\\n[ds*snr] -.nr ds*snr -1 -.nr par@ind-flag 0 -.ev -.. -.\"########### module list ################### -.\" .LI text-indent mark-indent pad type [mark [LI-space [LB-space] ] ] -.\" -.nr li*tind 0 -.nr li*mind 0 -.nr li*pad 0 -.nr li*type 0 -.ds li*mark 0 -.nr li*li-spc 0 -.nr li*lvl 0 1 -.aln :g li*lvl -.nr li*cur-vpos 0 -.\"-------------------------- -.\" the major list-begin macro. -.\" If type == -1 a 'break' will occur. -.de LB -.if \\n[.$]<4 .@error "LB: not enough arguments, min 4" -.misc@push cind \\n[.i] -.misc@push tind \\n[li*tind] -.misc@push mind \\n[li*mind] -.misc@push pad \\n[li*pad] -.misc@push type \\n[li*type] -.misc@push li-spc \\n[li*li-spc] -.ds li*mark-list!\\n[li*lvl] \\*[li*mark] -.nr li*lvl +1 -.\" -.nr li*tind (n;0\\$1)\" text-indent -.nr li*mind (n;0\\$2)\" mark-indent -.nr li*pad (n;0\\$3)\" pad -.nr li*type 0\\$4\" type -.ds li*mark \\$5\" mark -.ie !'\\$6'' .nr li*li-spc \\$6\" LI-space -.el .nr li*li-spc 1 -.ie !'\\$7'' .nr li*lb-spc \\$6\" LB-space -.el .nr li*lb-spc 0 -.\" init listcounter -.nr li*cnt!\\n[li*lvl] 0 1 -.\" assign format -.af li*cnt!\\n[li*lvl] 1 -.if \\n[li*type] .if !'\\*[li*mark]'' .af li*cnt!\\n[li*lvl] \\*[li*mark] -.\" -.if \\n[li*lb-spc] .SP (u;\\n[li*lb-spc]*\\n[Lsp]) -.in +\\n[li*tind]u -.. -.\"--------------- -.de LI -.if \\n[li*lvl]<1 .@error "LI:no lists active" -.if \\n[li*li-spc]&(\\n[Ls]>=\\n[li*lvl]) .SP (u;\\n[li*li-spc]*\\n[Lsp]) -.ne 2v -.\" -.ds li*c-mark \\*[li*mark] -.nr li*cnt!\\n[li*lvl] +1 -.if \\n[li*type]=1 .ds li*c-mark \\n[li*cnt!\\n[li*lvl]]. -.if \\n[li*type]=2 .ds li*c-mark \\n[li*cnt!\\n[li*lvl]]) -.if \\n[li*type]=3 .ds li*c-mark (\\n[li*cnt!\\n[li*lvl]]) -.if \\n[li*type]=4 .ds li*c-mark [\\n[li*cnt!\\n[li*lvl]]] -.if \\n[li*type]=5 .ds li*c-mark <\\n[li*cnt!\\n[li*lvl]]> -.if \\n[li*type]=6 .ds li*c-mark {\\n[li*cnt!\\n[li*lvl]]} -.if \\n[.$]=1 .ds li*c-mark \\$1 -.ie \\n[.$]=2 \{\ -. ie (\\$2=2):(\\n[Limsp]=0) .ds li*c-mark \\$1\\*[li*c-mark] -. el .ds li*c-mark \\$1\ \\*[li*c-mark] -.\} -.\" -.\" determine where the text begins -.nr li*text-begin \\n[li*tind]>?\w@\\*[li*c-mark]\ @ -.nr x \w@\\*[li*c-mark]\ @ -.\" -.\" determine where the mark begin -.ie !\\n[li*pad] .nr li*in \\n[li*mind] -.el .nr li*in \\n[li*text-begin]-\\n[li*pad]-\w@\\*[li*c-mark]@ -.if !\\n[li*in] .nr li*in 0 -.\" -.ti -\\n[li*tind]u -.\" no indentation if hanging indent -.if (\w@\\*[li*c-mark]@=0)&((\\n[.$]=0):(\w@\\$1@=0)) .nr li*text-begin 0 -\Z'\&\h'\\n[li*in]u'\\*[li*c-mark]'\h'\\n[li*text-begin]u'\&\c -.if \\n[li*type]=-1 .br -.. -.\" -.\"------------- -.de li@pop -.nr li*lvl -1 -.misc@pop-nr cind li*tmp -.in \\n[li*tmp]u -.misc@pop-nr tind li*tind -.misc@pop-nr mind li*mind -.misc@pop-nr pad li*pad -.misc@pop-nr type li*type -.misc@pop-nr li-spc li*li-spc -.ds li*mark \\*[li*mark-list!\\n[li*lvl]] -.. -.de LE -.if \\n[li*lvl]<1 .@error "LE:mismatched" -.li@pop -.if '\\$1'1' .SP \\n[Lsp]u -.. -.\"------------- -.\" list status clear. -.\" terminate all lists to level i -.de LC -.ie \\n[.$]<1 .nr li*i 0 -.el .nr li*i \\$1 -.if \\n[li*i]>\\n[li*lvl] .@error "LC: incorrect argument: \\n[li*i] (too big)" -.while \\n[li*lvl]>\\n[li*i] .li@pop -.nr par@ind-flag 0 -.. -.\"------------- -.de AL -.if \\n[.$]>3 .@error "AL: too many arguments" -.if \\n[D]>2 .tm AL $* -.ie \\n[.$]<=1 .LB \\n[Li] 0 2 1 "\\$1" -.el \{\ -. ie \\n[.$]=2 .LB 0\\$2 0 2 1 "\\$1" -. el \{\ -. ie !'\\$2'' .LB \\$2 0 2 1 "\\$1" 0 1 -. el .LB \\n[Li] 0 2 1 "\\$1" 0 1 -. \} -.\} -.. -.de ML -.if \\n[.$]>3 .@error "ML: too many arguments" -.if \\n[D]>2 .tm ML $* -.nr li*ml-width \w@\\$1@u+1n -.if \\n[.$]<2 .LB \\n[li*ml-width]u 0 1 0 "\\$1" -.if \\n[.$]=2 .LB 0\\$2 0 1 0 "\\$1" -.if \\n[.$]=3 \{\ -. ie '\\$2'' .LB \\n[li*ml-width]u 0 1 0 "\\$1" 0 1 -. el .LB \\n[Li] 0 1 0 "\\$1" 0 1 -.\} -.. -.de VL -.if \\n[D]>2 .tm VL $* -.if \\n[.$]>3 .@error "VL: too many arguments" -.if \\n[.$]<1 .@error "VL: missing text-indent" -.ie \\n[.$]<3 .LB 0\\$1 0\\$2 0 0 -.el .LB 0\\$1 0\\$2 0 0 \& 0 1 -.. -.\" Bullet (for .BL) -.de BL -.if \\n[D]>2 .tm BL $* -.ds BU \s-2\(bu\s0 -.if \\n[.$]>2 .@error "BL: too many arguments" -.if \\n[.$]<1 .LB \\n[Pi] 0 1 0 \\*[BU] -.if \\n[.$]=1 .LB 0\\$1 0 1 0 \\*[BU] -.if \\n[.$]=2 \{\ -. ie '\\$1'' .LB \\n[Pi] 0 1 0 \\*[BU] 0 1 -. el .LB 0\\$1 0 1 0 \\*[BU] 0 1 -.\} -.. -.de DL -.if \\n[D]>2 .tm DL $* -.if \\n[.$]>2 .@error "DL: too many arguments" -.if \\n[.$]<1 .LB \\n[Pi] 0 1 0 \(em -.if \\n[.$]=1 .LB 0\\$1 0 1 0 \(em -.if \\n[.$]=2 \{\ -. ie '\\$1'' .LB \\n[Pi] 0 1 0 \(em 0 1 -. el .LB 0\\$1 0 1 0 \(em 0 1 -.\} -.. -.de RL -.if \\n[D]>2 .tm RL $* -.if \\n[.$]>2 .@error "RL: too many arguments" -.if \\n[.$]<1 .LB 6 0 2 4 -.if \\n[.$]=1 .LB 0\\$1 0 2 4 -.if \\n[.$]=2 \{\ -. ie '\\$1'' .LB 6 0 2 4 1 0 1 -. el .LB 0\\$1 0 2 4 1 0 1 -.\} -.. -.\" Broken Variable List. As .VL but text begin on the next line -.de BVL -.if \\n[D]>2 .tm BVL $* -.if \\n[.$]>3 .@error "BVL: too many arguments" -.if \\n[.$]<1 .@error "BVL: missing text-indent" -.ie \\n[.$]<3 .LB 0\\$1 0\\$2 0 -1 -.el .LB 0\\$1 0\\$2 0 -1 \& 0 1 -.. -.\" ####### module tbl ####################################### -.\" This module is copied from groff_ms and modified for mgm. -.\" Yes, it does not resemble the original anymore :-). -.\" Don't know if I missed something important. -.\" Groff_ms is written by James Clark. -.nr tbl*have-header 0 -.nr tbl*header-written 0 -.de TS -.br -.if ''\\n[.z]' .SP -.if '\\$1'H' .di tbl*header-div -.. -.de tbl@top-hook -.if \\n[tbl*have-header] \{\ -. ie \\n[.t]-\\n[tbl*header-ht]-1v .tbl@print-header -. el .sp \\n[.t]u -.\} -.. -.de tbl@bottom-hook -.if \\n[tbl*have-header] \{\ -. nr T. 1 -.\" draw bottom and side lines of boxed tables. -. T# -.\} -.nr tbl*header-written 0 -.. -.de tbl@print-header -.ev tbl*ev -'nf -.tbl*header-div -.ev -.mk #T -.nr tbl*header-written 1 -.. -.de TH -.if '\\$1'N' @error TH: N not implemented yet. Sorry. -.ie '\\n[.z]'tbl*header-div' \{\ -. nr T. 0 -. T# -. br -. di -. nr tbl*header-ht \\n[dn] -. ne \\n[dn]u+1v -. nr tbl*have-header 1 -. ie '\\$1'N' .if !\\n[tbl*header-written] .tbl@print-header -. el .tbl@print-header -.\} -.el .@error ".TH without .TS H" -.. -.de TE -.ie '\\n(.z'tbl*header-div' .@error ".TS H but no .TH before .TE" -.el \{\ -. nr tbl*have-header 0 -.\} -.\" reset tabs -.TAB -.. -.de T& -.. -.\" ####### module pic ####################################### -.de PS -.nr pic*in 0 -.br -.SP .5 -.ie \\n[.$]<2 .@error "PS: bad arguments. Probably not processed with pic." -.el \{\ -. if !\\n[ds*lvl] .ne (u;\\$1)+1v -.\" should be contained between .DS/.DE -.if r ds*format \{\ -. if \\n[ds*lvl]&((\\n[ds*format]=2):(\\n[ds*format]=3)) \{\ -. nr pic*in \\n[.i] -.\" . in +(u;\\n[.l]-\\n[.i]-\\$2/2) -. \} -. \} -.\} -.. -.de PE -.init@reset -.SP .5 -.. -.\" ####### module eq ####################################### -.\" -.nr eq*number 0 1 -.ds eq*label -.de EQ -.ds eq*label "\\$1 -.. -.de eq@check -.if !'\\*[eq*label]'' \{\ -. mk -' sp (u;\\$1/2-.45v) -. ie (\\n[Eq]%2) \{\ -. \" label to the left -\h'|0'\\*[eq*label]\c -. \} -. el \{\ -. \" label to the right -\h'|\\n[.l]u'\\*[eq*label] -. \} -. rt -.\} -.ds eq*label -.. -.de EN -.. -.\"########### module toc ################### -.\" table of contents -.nr toc*slevel 1 -.nr toc*spacing \n[Lsp]u -.nr toc*tlevel 2 -.nr toc*tab 0 -.\"----------- -.\" Table of contents with friends (module lix) -.de TC -.br -.\" print any pending displays and references -.df@print-float 3 -.if \\n[ref*flag] .RP 0 1 -.\" -.if \w@\\$1@>0 .nr toc*slevel \\$1 -.if \w@\\$2@>0 .nr toc*spacing (u;\\$2*\\n[Lsp]) -.if \w@\\$3@>0 .nr toc*tlevel \\$3 -.if \w@\\$4@>0 .nr toc*tab \\$4 -.if \\n[pg*cols-per-page]>1 .1C -.ds H1txt \\*[Licon] -.ds Tcst co -.pg@clear-hd -.EF "" -.OF "" -.pg@next-page -.\"------------- -.if d Ci .toc@read-Ci \\*[Ci] -.nf -.in 0 -.ie \\n[Oc] .hd@set-page 1 -.el \{\ -. nr toc*pn 1 1 -. af toc*pn i -. aln ;g toc*pn -. PF "''\\\\\\\\n[toc*pn]''" -. am pg@header -. nr toc*pn +1 -\\.. -.\} -.nr toc*i 4 1 -.while \\n+[toc*i]<10 \{\ -. if !'\\$\\n[toc*i]'' \{\ -. ce -\\$\\n[toc*i] -. br -. \} -.\} -.if \\n[.$]<=4 .if d TX .TX -.ie d TY .if \\n[.$]<=4 .TY -.el \{\ -. ce -\\*[Licon] -. br -. SP 3 -.\} -.if d toc*list .toc*list -.br -.\" print LIST OF XXX -.if d lix*dsfg .lix@print-ds fg FG "\\*[Lf]" \\n[.$] -.if d lix*dstb .lix@print-ds tb TB "\\*[Lt]" \\n[.$] -.if d lix*dsec .lix@print-ds ec EC "\\*[Le]" \\n[.$] -.if d lix*dsex .lix@print-ds ex EX "\\*[Lx]" \\n[.$] -.. -.\"----------- -.\" .toc@read-Ci lev1 lev2 lev3 lev4 ... lev7 -.de toc@read-Ci -.nr toc*i 0 1 -.while \\n+[toc*i]<8 \{\ -. nr toc*hl!\\n[toc*i] \\$\\n[toc*i] -.\} -.. -.\"----------- -.de toc@entry -.ie \\n[Sectp] \{\ -. toc@save \\$1 "\\*[hd*mark]" "\\$2" \\*[hd*sect-pg] -.\} -.el .toc@save \\$1 "\\*[hd*mark]" "\\$2" \\n[%] -.. -.als )E toc@entry -.\"----------- -.de toc@save -.\" collect maxsize of mark if string Ci don't exist. -.if !d Ci \{\ -. if !r toc*hl!\\$1 .nr toc*hl!\\$1 0 -. if \\n[toc*hl!\\$1]<=\w@\\$2@ \{\ -. nr toc*hl!\\$1 \w@\\$2@u -. \} -.\} -.am toc*list -.\" .toc@set level headernumber text pagenr -.toc@set \\$1 "\\$2" "\\$3" \\$4 -\\.. -.. -.\"----------- -.\" level mark text pagenumber -.de toc@set -.if \\$1<=\\n[toc*slevel] .SP \\n[toc*spacing]u -.na -.fi -.nr toc*ind 0 -.nr toc*i 0 1 -.ie d Ci \{\ -. nr toc*ind +\\n[toc*hl!\\$1]u -.\} -.el \{\ -. while \\n+[toc*i]<\\$1 \{\ -. nr toc*ind +\\n[toc*hl!\\n[toc*i]]u -. \} -.\} -.nr toc*text \\n[toc*ind]u+\\n[toc*hl!\\$1]u -.in \\n[toc*text]u -.ti -\\n[toc*hl!\\$1]u -.\" -.\" length of headernum space -.nr toc*i \\n[toc*hl!\\$1]-\w@\\$2@ -.\" -.ll \\n[@ll]u-\w@\\$4@u-2m -.ne 2v -.\" ragged right --------------------------------- -.ie \\$1>\\n[toc*tlevel] \{\ -\\$2 -. sp -1 -\\$3\ \ \ \\$4 -. br -.\} -.el \{\ -. \" unnumbered heading -------------------- -. ie '\\$2'' \{\ -. in \\n[toc*ind]u -\\$3\h'1m' -. \} -. \" normal heading ------------------------ -. el \{\ -\\$2 -. sp -1 -\\$3\h'1m' -. \} -. ll \\n[@ll]u -. sp -1 -. nr toc*sep (u;\\n[.l]-\\n[.n]-\\n[.i]-\w@\\$4@)-1m -\h'|\\n[.n]u'\l'\\n[toc*sep]u.'\h'1m'\\$4 -.\} -.ll \\n[@ll]u -.. -.\"########################### module lix ############################ -.\" LIST OF figures, tables, exhibits and equations -.nr lix*fg-nr 0 1 -.nr lix*tb-nr 0 1 -.nr lix*ec-nr 0 1 -.nr lix*ex-nr 0 1 -.aln Fg lix*fg-nr -.aln Tb lix*tb-nr -.aln Ec lix*ec-nr -.aln Ex lix*ex-nr -.\"------------ -.de FG -.lix@print-line fg Lf \\n+[lix*fg-nr] "\\$1" "\\$2" "\\$3" "\\$4" -.. -.de TB -.lix@print-line tb Lt \\n+[lix*tb-nr] "\\$1" "\\$2" "\\$3" "\\$4" -.. -.de EC -.lix@print-line ec Le \\n+[lix*ec-nr] "\\$1" "\\$2" "\\$3" "\\$4" -.. -.de EX -.lix@print-line ex Lx \\n+[lix*ex-nr] "\\$1" "\\$2" "\\$3" "\\$4" -.. -.\"------------ -.\" print line with 'figure' in the text -.\" type stringvar number text override flag refname -.de lix@print-line -.ds lix*text "\\$4 -.\" -.ie \\n[Sectf] .ds lix*numb \\n[H1]-\\$3 -.el .ds lix*numb \\$3 -.\" -.ie !\\n[Of] .ds lix*ds-form .\ \ \" -.el .ds lix*ds-form "\ \(em\ \" -.nr lix*in \\n[.i] -.ds lix*label \\*[Li\\$1]\ \\*[lix*numb]\\*[lix*ds-form] -.if !'\\$5'' \{\ -. if !0\\$6 .ds lix*label \\*[Li\\$1]\ \\$5\\*[lix*numb]\\*[lix*ds-form] -. if 0\\$6=1 .ds lix*label \\*[Li\\$1]\ \\*[lix*numb]\\$5\\*[lix*ds-form] -. if 0\\$6=2 .ds lix*label \\*[Li\\$1]\ \\$5\\*[lix*ds-form] -.\} -.\" print line if not between DS/DE -.ie \\n[ds*lvl]<1&\\n[df*float]=0 \{\ -. lix@print-text "\\*[lix*label]" "\\*[lix*text]" \\$1 \\$2 \\$7 -.\} -.el \{\ -. lix@embedded-text "\\*[lix*label]" "\\*[lix*text]" \\$1 \\$2 \\$7 -.\} -.\" -.. -.\"----------- -.\" label text type stringvar refname -.de lix@print-text -.ie \\n[Sectp] .ds lix*pgnr \\*[hd*sect-pg] -.el .ds lix*pgnr \\n[%] -.SP \\n[Lsp]u -.misc@ev-keep lix -.init@reset -.br -.ie (\w@\\$1\\$2@)>(\\n[.l]-\\n[.i]) \{\ -. in +\w@\\$1@u -. ti 0 -.\} -.el .ce 1 -\fB\\$1\fP\\$2 -.br -.ev -.\" save line for LIST OF XXX, wth is the width of the label -.if !r lix*wth\\$3 .nr lix*wth\\$3 0 -.\" find the maximum width -.if \w@\\*[lix*label]@>\\n[lix*wth\\$3] .nr lix*wth\\$3 \w@\\*[lix*label]@ -.if \\n[\\$4] .lix@ds-save \\$3 \\*[lix*pgnr] "\\*[lix*text]" "\\*[lix*label]" -.\" save reference to the figure -.if !'\\$5'' .SETR \\$5 \\*[lix*numb] -.. -.\" hide printout until diversion is evaluated -.de lix@embedded-text -\!.ie \\\\n[Sectp] .ds lix*pgnr \\\\*[hd*sect-pg] -\!.el .ds lix*pgnr \\\\n[%] -\!.SP \\\\n[Lsp]u -\!.misc@ev-keep lix -\!.ll \\n[.l]u -\!.init@reset -\!.fi -\!.ie (\w@\\$1\\$2@)>(\\\\n[.l]-\\\\n[.i]) \{\ -. in +\w@\\$1@u -\!. ti 0 -\!\fB\\$1\fP\\$2 -\!.\} -\!.el \{\ -. ce 1 -\!\fB\\$1\fP\\$2 -\!.\} -\!.br -\!.ev -.\" save line for LIST OF XXX, wth is the width of the label -\!.if !r lix*wth\\$3 .nr lix*wth\\$3 0 -.\" find the maximum width -\!.if \w@\\*[lix*label]@>\\\\n[lix*wth\\$3] .nr lix*wth\\$3 \w@\\*[lix*label]@ -\!.if \\\\n[\\$4] .lix@ds-save \\$3 \\\\*[lix*pgnr] "\\*[lix*text]" "\\*[lix*label]" -.\" save reference to the figure -\!.if !'\\$5'' .SETR \\$5 \\*[lix*numb] -.. -.\"------------ -.\" print complete list of XXXX -.de lix@print-ds -.\" arg: fg,tb,ec,ex text -.ds H1txt \\$3 -.ds Tcst \\$1 -.if !\\n[Cp] .pg@next-page -.\" print LIST OF XXXX -.\" execute user-defined macros -.if \\$4<=4 .if d TX\\$2 .TX\\$2 -.ie d TY\\$2 .if \\$4<=4 .TY\\$2 -.el \{\ -. ce -\\$3 -. SP 3 -.\} -.in \\n[lix*wth\\$1]u -.fi -.lix*ds\\$1 -.. -.\"------------ -.\" save line of list in macro -.de lix@ds-save -.\" type pagenumber text -.am lix*ds\\$1 -.lix@dsln \\$1 \\$2 "\\$3" "\\$4" \\$5 -\\.. -.. -.\"------------ -.\" print appended macro -.\" lix@dsln type pagenumber text headernr -.de lix@dsln -.nr lix*i \\n[lix*wth\\$1]-\w@\\$4@ -.ne 4v -.ll \\n[@ll]u-\w@\\$4@u-\w@\\$2@u-2m -.ti -\\n[lix*wth\\$1]u -\\$4 -.sp -1 -\\$3\h'1m' -.sp -1 -.ll -.nr lix*sep (u;\\n[.l]-\\n[.n]-\\n[.i]-\w@\\$2@)-1m -\h'|\\n[.n]u'\l'\\n[lix*sep]u.'\h'1m'\\$2 -.SP \\n[toc*spacing]u -.. -.\"########################### module fnt ############################ -.\" some font macros. -.de R -.ft R -.ul 0 -.. -.\"----------- -.de fnt@switch -.ul 0 -.ds fnt*tmp -.nr fnt*prev \\n[.f] -.nr fnt*i 2 1 -.while \\n+[fnt*i]<=\\n[.$] \{\ -. if \\n[fnt*i]>3 .as fnt*tmp \, -. ie (\\n[fnt*i]%2)=1 .as fnt*tmp \\$1\\$[\\n[fnt*i]] -. el .as fnt*tmp \\$2\\$[\\n[fnt*i]] -. if \\n[fnt*i]<\\n[.$] .as fnt*tmp \/ -.\} -\&\\*[fnt*tmp]\f[\\n[fnt*prev]] -.. -.\"----------- -.de B -.ie \\n[.$] .fnt@switch \fB \f[\\n[.f]] \\$@ -.el .ft B -.. -.de I -.ie \\n[.$] .fnt@switch \fI \f[\\n[.f]] \\$@ -.el .ft I -.. -.de IB -.if \\n[.$] .fnt@switch \fI \fB \\$@ -.. -.de BI -.if \\n[.$] .fnt@switch \fB \fI \\$@ -.. -.de IR -.if \\n[.$] .fnt@switch \fI \fR \\$@ -.. -.de RI -.if \\n[.$] .fnt@switch \fR \fI \\$@ -.. -.de RB -.if \\n[.$] .fnt@switch \fR \fB \\$@ -.. -.de BR -.if \\n[.$] .fnt@switch \fB \fR \\$@ -.. -.\"########################### module box ############################ -.\" draw a box around some text. Text will be kept on the same page. -.\" -.nr box*ll 0 -.\" .B1 and .B2 works like .DS -.de B1 -.if \\n[box*ll] .@error "B1: missing B2" -.nr box*ll \\n[.l] -.nr box*ind \\n[.i] -.nr box*hyp \\n[.hy] -.nr box*wid \\n[.l]-\\n[.i] -.\" -.\" jump to new environment. -.ev box*ev -.di box*div -.ps \\n[@ps]u -.vs \\n[@vs]u -.in 1n -.ll (u;\\n[box*wid]-1n) -.hy \\n[.hy] -.. -.de B2 -.if !\\n[box*ll] .@error "B2: missing B1" -.br -.di -.nr box*height \\n[dn] -.ne \\n[dn]u+1v -.ll \\n[box*ll]u -.in \\n[box*ind]u -.nr box*y-pos \\n[.d]u -.nf -.box*div -.fi -\v'-1v+.25m'\ -\D'l \\n[box*wid]u 0'\ -\D'l 0 -\\n[box*height]u'\ -\D'l -\\n[box*wid]u 0'\ -\D'l 0 \\n[box*height]u' -.br -.sp -1 -.ev -.sp .20v -.in \\n[box*ind]u -.ll \\n[box*ll]u -.rm box*div -.nr box*ll 0 -.. -.\"########################### module ref ############################ -.nr ref*nr 0 1 -.aln :R ref*nr -.nr ref*nr-width 5n -.nr ref*flag 0 \" for end-of-text -.ds Rf \v'-.4m'\s-3[\\n+[ref*nr]]\s0\v'.4m' -.\" -.\" start reference -.\"------------ -.de RS -.if !''\\$1' .ds \\$1 \v'-.4m'\s-3[\\n[ref*nr]]\s0\v'.4m' -.nr ref*flag 1 -.am ref*mac -.ref@start-print \\n[ref*nr] -\\.. -.eo -.am ref*mac RF -.. -.\"------------ -.de RF -.ec -.am ref*mac -.ref@stop-print -\\.. -.. -.\"------------ -.de ref@start-print -.di ref*div -.in \\n[ref*nr-width]u -.ti -(\w@\\$1.@u+1n) -\\$1. -.sp -1 -.. -.de ref@stop-print -.br -.di -.ne \\n[dn]u -.ev ref*ev2 -.nf -.ref*div -.ev -.rm ref*div -.if \\n[Ls] .SP \\n[Lsp]u -.. -.\"----------- -.de RP -.if !d ref*mac .@error "RP: No references!" -.nr ref*i 0\\$2 -.if \\n[ref*i]<2 .SK -.SP 2 -.ref@print-refs -.if 0\\$1<1 .nr ref*nr 0 1 -.if ((\\n[ref*i]=0):(\\n[ref*i]=2)) .SK -.. -.\"----------- -.\" called by end-of-text! -.de ref@eot-print -.\".if \\n[ref*flag] \{ -.if d ref*mac \{\ -. if \\n[D]>2 .tm Print references, called by eot -. nr ref*flag 0 -. br -. misc@ev-keep ne -. init@reset -\c -' bp -. ev -. ref@print-refs -.\} -.. -.\"----------- -.\" prints the references -.de ref@print-refs -.toc@save 1 "" "\\*[Rp]" \\n[%] -.ce -\fI\\*[Rp]\fP -.sp -.nr ref*ll \\n[.l] -.misc@ev-keep ref*ev -.ll \\n[ref*ll]u -.in 0 -.ref*mac -.in -.rm ref*mac -.ev -.nr ref*flag 0 1 -.. -.\"########################### module app ############################ -.\" -.nr app*nr 0 1 -.af app*nr A -.nr app*dnr 0 1 -.nr app*flag 0 -.\"------------ -.\" .APP name text -.\" name == "" -> autonumber -.de APP -.\" .if \\n[.$]<2 .@error "APP: too few arguments" -.app@set-ind "\\$1" -.\" -.ds Tcst ap -.ds Apptxt \\$2 -.\" -.ie \\n[Aph] .app@header \\*[app*ind] "\\$2" -.el .bp -.app@index "\\*[app*ind]" "\\$2" -.. -.\"------------ -.\" .APPSK name pages text -.\" name == "" -> autonumber -.de APPSK -.if \\n[.$]<2 .@error "APPSK: too few arguments" -.app@set-ind "\\$1" -.\" -.ds Tcst ap -.ds Apptxt \\$3 -.\" -.ie \\n[Aph] .app@header \\*[app*ind] "\\$3" -.el .bp -.app@index "\\*[app*ind]" "\\$3" -.pn +\\$2 -.. -.\"------------ -.de app@set-ind -.ie \w@\\$1@ .ds app*ind \\$1 -.el \{\ -. if !\\n[app*flag] \{\ -. nr H1 0 1 -. af H1 A -. af H1h A -. nr app*flag 1 -. \} -. ds app*ind \\n+[app*nr] -. nr H1 \\n+[app*dnr] -. nr H1h \\n[app*dnr] -.\} -.\" clear lower counters -.nr app*i 1 1 -.while \\n+[app*i]<8 .nr H\\n[app*i] 0 1 -.. -.\"------------ -.de app@index -.toc@save 1 "" "\\*[App] \\$1: \\$2" \\n[%] -.. -.\"------------ -.\" app@heaer name text -.de app@header -.bp -.SP (u;\\n[Lsp]*4) -.ce 1 -\s+4\fB\\*[App]\ \\$1\fP\s0 -.SP (u;\\n[Lsp]*2) -.if \w@\\$2@<\\n[.l] .ce 1 -\fB\s+2\\$2\s0\fP -.SP (u;\\n[Lsp]*4) -.. -.als APPX app@header -.\"########################### module cov ############################ -.\" title stored in diversion cov*title -.\" abstract stored in diversion cov*abstract -.\" arg to abstract stored in cov*abs-arg -.\" indent stored in cov*abs-ind -.\" number of authors stored in cov*au -.\" author(s) stored in cov*au!x!y -.\" author(s) title stored in cov*at!x!y -.\" x is the author-index [1-cov*au], y is the argument-index [1-9]. -.\" author(s) firm stored in cov*firm -.\" new date (if .ND exists) is stored in cov*new-date -.\" -.\" -.ds cov*abs-name ABSTRACT -.\" -.nr cov*au 0 -.de TL -.rm IA IE WA WE LO LT -.if \\n[.$]>0 .ds cov*title-charge-case \\$1 -.if \\n[.$]>1 .ds cov*title-file-case \\$2 -.pg@disable-top-trap -.eo -.de cov*title AU -.. -.\"------------------- -.de cov@title-end -.ec -.. -.\"------------------- -.\" .AU name [initials [loc [dept [ext [room [arg [arg [arg]]]]]]]] -.de AU -.cov@title-end -.pg@disable-top-trap -.nr cov*au +1 -.nr cov*i 0 1 -.ds cov*au!\\n[cov*au]!1 -.while \\n[.$]>=\\n+[cov*i] \{\ -. ds cov*au!\\n[cov*au]!\\n[cov*i] "\\$[\\n[cov*i]] -.\} -.if (\\n[.$]>=3)&(\w@\\$3@) \{\ -. if d cov*location-\\$3] \{\ -. ds cov*au!3!\\n[cov*au] \\*[cov*location-\\$3] -. \} -.\} -.. -.\"------------------- -.\" .AT title1 [title2 [... [title9] ]]]] -.\" Well, thats all that COVEND look for. -.\" Must appear directly after .AU -.de AT -.if \\n[.$]<1 .@error "AT: no arguments" -.nr cov*i 0 1 -.while \\n[.$]>=\\n+[cov*i] \{\ -. ds cov*at!\\n[cov*au]!\\n[cov*i] "\\$[\\n[cov*i]] -.\} -.. -.\"------------------- -.de AF -.cov@title-end -.ds cov*firm \\$1 -.. -.de AST -.ds cov*abs-name \\$1 -.. -.de AS -.pg@disable-top-trap -.if d cov*abstract .@error "AS: only one abstract allowed" -.if !''\\n[.z]' .@error "AS: no diversion allowed (previous .AS?)" -.nr cov*abs-arg 0\\$1 -.nr cov*abs-ind (n;0\\$2) -.de cov*abstract AE -.. -.de AE -.. -.\" fixed for 2000, now uses \n[year]. -.de ISODATE -. \" support for ISO-date -. nr cov*mm \\n[mo] -. nr cov*dd \\n[dy] -. af cov*mm 01 -. af cov*dd 01 -. ie '0'\\$1' \{\ -. ds cov*new-date \\*[MO\\n[mo]] \\n[dy], \\n[year] -. \} -. el \{\ -. ds cov*new-date \\n[year]-\\n[cov*mm]-\\n[cov*dd] -. \} -.. -.ISODATE 0 -.als DT cov*new-date -.de ND -.ds cov*new-date \\$1 -.. -.\" switch to ISO-date if register Iso exist: YYYY-MM-DD -.if r Iso .ISODATE 1 -.\"------------------- -.\" save technical numbers. -.de TM -.nr cov*i 0 1 -.while \\n[.$]>=\\n+[cov*i] .ds cov*mt-tm!\\n[cov*i] \\$[\\n[cov*i]] -.nr cov*mt-tm-max \\n[.$] -.. -.\"----------------------- -.\" cover sheet -.\" the file must have the following last lines (somewhere): -.\" .pg@enable-top-trap -.\" .bp 1 -.\" .pg@enable-trap -.ds cov*mt-file!0 0.MT -.ds cov*mt-file!1 0.MT -.ds cov*mt-file!2 0.MT -.ds cov*mt-file!3 0.MT -.ds cov*mt-file!4 4.MT -.ds cov*mt-file!5 5.MT -.ds cov*mt-file!6 0.MT -.\"------------ -.de MT -.ie \\n[.$] \{\ -. ie d cov*mt-file!\\$1 .ds cov*mt-type \\$1 -. el .ds cov*mt-type 6 -.\} -.el .ds cov*mt-type 1 -.ds cov*mt-addresse "\\$2 -.ds cov*mt-type-text "\\$1 -.ie d @language .ds cov*str mm/\\*[@language]_ -.el .ds cov*str mm/ -.mso \\*[cov*str]\\*[cov*mt-file!\\*[cov*mt-type]] -.. -.de COVER -.ie !\\n[.$] .ds cov*cov-type ms -.el .ds cov*cov-type \\$1 -.pg@disable-top-trap -.ie d @language .ds cov*str mm/\\*[@language]_\\*[cov*cov-type].cov -.el .ds cov*str mm/\\*[cov*cov-type].cov -.mso \\*[cov*str] -.. -.\"########################### module qrf ############################ -.\" forward and backward reference thru special files. -.\" -.\" check if stderr-method is wanted -.\" This was needed when I discovered that groff was considered unsafe -.\" and groff -U didn't work. It's a workaround like the original -.\" index method, but not in my view elegant enough. -.\" -.\" init reference system -.de INITR -.ds qrf*file \\$1.qrf -.nr qrf*pass 2 -.if \\n[D]>1 .tm INITR: source \\*[qrf*file] -.ie \\n[Ref] \{\ -. tm .\\\\" Rfilename: \\*[qrf*file] -.\} -.el 'so \\*[qrf*file] -.. -.\"--------------- -.\" set a reference. -.de SETR -.if \\n[.$]<1 .@error "SETR:reference name missing" -.if !r qrf*pass .tm "SETR: No .INITR in this file" -.if \\n[Ref] \{\ -. ds qrf*name qrf*ref-\\$1 -. if \\n[D]>2 .tm SETR: ref \\*[qrf*name]=\\*[hd*mark],\\n[%] -. \" heading-number -. ds \\*[qrf*name]-hn \\*[hd*mark] -. \" page-number -. ds \\*[qrf*name]-pn \\n[%] -. \" -. if \\n[Ref] \{\ -. tm .ds \\*[qrf*name]-hn \\*[hd*mark] -. tm .ds \\*[qrf*name]-pn \\n[%] -. if !'\\$2'' .tm .ds \\*[qrf*name]-xx \\$2 -. \} -.\} -.. -.\"--------------- -.\" get misc-string -.\" If two arg -> set var. arg to misc-string. -.de GETST -.if \\n[.$]<1 .@error "GETST:reference name missing" -.if !r qrf*pass .tm "GETST: No .INITR in this file" -.ds qrf*name qrf*ref-\\$1 -. if d \\*[qrf*name]-xx \{\ -. ie \\n[.$]>1 .ds \\$2 \\*[\\*[qrf*name]-xx] -. el \\*[\\*[qrf*name]-xx]\c -. \} -.\} -.. -.\"--------------- -.\" get header-number -.\" If two arg -> set var. arg to header-number. -.de GETHN -.if \\n[.$]<1 .@error "GETHN:reference name missing" -.if !r qrf*pass .tm "GETHN: No .INITR in this file" -.ds qrf*name qrf*ref-\\$1 -.if d \\*[qrf*name]-hn \{\ -. ie \\n[.$]>1 .ds \\$2 \\*[\\*[qrf*name]-hn] -. el \\*[\\*[qrf*name]-hn]\c -.\} -.. -.\"--------------- -.\" get page-number -.\" If two arg -> set var. arg to page-number. -.de GETPN -.if \\n[.$]<1 .@error "GETPN:reference name missing" -.if !r qrf*pass .tm "GETPN: No .INITR in this file" -.ds qrf*name qrf*ref-\\$1 -.if d \\*[qrf*name]-pn \{\ -. ie \\n[.$]>1 .ds \\$2 \\*[\\*[qrf*name]-pn] -. el \\*[\\*[qrf*name]-pn]\c -.\} -.. -.\"---------- -.de GETR -.if \\n[.$]<1 .@error "GETR:reference name missing" -.ie !r qrf*pass \{\ -. tm "GETR: No .INITR in this file" -.\} -.el \{\ -. GETHN \\$1 Qrfh -. GETPN \\$1 Qrfp -\\*[Qrf] -.\} -.. -.\"########################### module ind ############################ -.\" Support for mgs-style indexing, borrowed from mgs. -.de IX -.tm \\$1\t\\$2\t\\$3\t\\$4 ... \\n[%] -.. -.\"-------------------- -.\" Another type of index system -.\" INITI type filename [macro] -.de INITI -.if \\n[.$]<1 .@error "INITI:type missing" -.\" ignore if INITI has already been used -.if \\n[.$]>1 \{\ -. if d ind*file .@error "INITI:file already set" -. ds ind*file \\$2.ind -. if \\n[D]>1 .tm INITI: source \\*[ind*file] -.\} -.if !d ind*file .@error "INITI:file not specified" -.ds ind*type \\$1 -.if \\n[Ref] \{\ -. if \\n[.$]>2 .tm .\\\\" Imacro: \\$3 -.\} -.. -.\"--------------- -.de IND -.if !d ind*file .@error "IND: No active INITI" -.if \\n[D]>1 .tm IND: type=\\*[ind*type] -.ds ind*ref -.if '\\*[ind*type]'N' .ds ind*ref \\n[%] -.if '\\*[ind*type]'H' .ds ind*ref \\*[hd*mark] -.if '\\*[ind*type]'B' .ds ind*ref \\*[hd*mark]\t\\n[%] -.if '\\*[ind*ref]'' .@error "IND:wrong index type: \\*[ind*ref]" -.\" -.ds ind*line \\$1 -.while \\n[.$]>0 \{\ -. shift -. as ind*line \t\\$1 -.\} -.as ind*line \\*[ind*ref] -.if \\n[Ref] .tm .\\\\" IND \\*[ind*line] -.. -.\" print index -.de INDP -.ie \\n[Ref] .tm .\\\\" Index: \\*[ind*file] -.el \{\ -. if !\\n[Cp] .pg@next-page -. \" print INDEX -. \" execute user-defined macros -. if d TXIND .TXIND -. ie d TYIND .TYIND -. el \{\ -. SK -. ce -\\*[Index] -. SP 3 -. 2C -. nf -. \} -' so \\*[ind*file] -. ie d TZIND .TZIND -. el \{\ -. fi -. 1C -. \} -.\} -.rm ind*file -.. -.\"########################### module let ############################ -.\" Letter macros -.\"------------------------ -.\" Formal closing -.de FC -.df@print-float 3 -.ie \\n[.$] .ds let*i \\$1 -.el .ds let*i \\*[Letfc] -.ie d let*type .let@fc_\\*[let*type] "\\*[let*i]" \\$@ -.el .let@mt-closing "\\*[let*i]" \\$@ -.. -.\"------- -.de let@mt-closing -.ne 5v -.in (u;\\n[.l]/2) -.sp -\\$1 -.in -.. -.\"------------------------ -.\" Signature line -.de SG -.ie d let*type .let*lt-sign \\$@ -.el .let*mt-sign \\$@ -.. -.\"------------------------ -.de let*lt-sign -.if !d let@sg_\\*[let*type] .@error "SG: letter type \\*[let*type] undefined" -.df@print-float 3 -.nr let*i 0 1 -.nr let*j 0 -.while \\n+[let*i]<=\\n[let*wa-n] \{\ -.if \\n[let*i]=\\n[let*wa-n] .nr let*j 1 -.let@sg_\\*[let*type] "\\*[let*wa-name!\\n[let*i]]" "\\*[let*wa-title!\\n[let*i]]" \\n[let*i] \\n[let*j] \\$@ -.\} -.. -.\"------------------------ -.\" Memorandum signature -.de let*mt-sign -.df@print-float 3 -.ne \\n[cov*au]u*4v -.ie \\n[.$]>1 .nr let*k 1 -.el .nr let*k \\n[cov*au] -.ds let*tmp \\*[cov*au!\\n[let*k]!3]-\\*[cov*au!\\n[let*k]!4]- -.nr let*i 0 1 -.while \\n+[let*i]<=\\n[cov*au] \{\ -. if \\n[let*i]>1 .as let*tmp / -. as let*tmp \\*[cov*au!\\n[let*k]!2] -.\} -.if !''\\$1' .as let*tmp -\\$1 -.in (u;\\n[.l]/2) -.nf -.nr let*i 0 1 -.while \\n+[let*i]<=\\n[cov*au] \{\ -. SP 3v -. if \\n[let*i]=\\n[let*k] \{\ -\Z'\h'-(u;\\n[.l]/2)'\\*[let*tmp]'\c -. \} -\\*[cov*au!\\n[let*i]!1] -.\} -.fi -.in -.. -.\"------------------------ -.\" Approval signature -.de AV -.ne 6v -.nf -.sp -.ie \\n[.$]<2 \\*[Letapp] -.el .sp -.sp 2 -.ie n ______________________________ ______________ -.el \D'l 25m 0'\h'4m'\D'l 12m 0' -\Z'\\$1'\h'29m'\f[\\*[@sdf_font]]\\*[Letdate]\fP -.fi -.. -.\"------------------------ -.\" Letter signature -.de AVL -.ne 6v -.nf -.sp 3 -.ie n ______________________________ -.el \D'l 25m 0' -\Z'\\$1' -.fi -.. -.\"------------------------ -.\" Letter type -.\" let@header is called from the header. It is supposed -.\" to remove the alias itself. -.de LT -.rm AF AS AE AT AU CS OK TL MT -.ds let*type BL -.nr Pi 5 -.nr Pt 0 -.if !''\\$1' .ds let*type \\$1 -.if !d let@head_\\*[let*type] .@error "LT: unknown letter type \\$1" -.shift -.als let@header let@head_\\*[let*type] -.let@init_\\*[let*type] \\$@ -.if \n[D]>1 .tm Letter type \\*[let*type] -.. -.\"----------- -.\" Blocked letter -.de let@init_BL -.. -.de let@head_BL -.rm let@header -.let@print-head 1 -.. -.de let@sg_BL -.ne 5v -.nf -.in (u;\\n[.l]/2) -.sp 3v -\\$1 -\\$2 -.in -.if \\$4 .sp -.if \w'\\$5'&\\$4 \\$5 -.fi -.. -.als let@fc_BL let@mt-closing -.\"----------- -.\" Semiblocked letter -.de let@init_SB -.nr Pt 1 -.. -.de let@head_SB -.rm let@header -.let@print-head 1 -.. -.als let@sg_SB let@sg_BL -.als let@fc_SB let@mt-closing -.\"----------- -.\" Full-blocked letter -.de let@init_FB -.. -.de let@head_FB -.rm let@header -.let@print-head -.. -.de let@sg_FB -.ne 5v -.nf -.sp 3v -\\$1 -\\$2 -.if \\$4 .sp -.if \w'\\$5'&\\$4 \\$5 -.fi -.. -.de let@fc_FB -.ne 5v -.sp -\\$1 -.. -.\"----------- -.\" Simplified letter -.de let@init_SP -.. -.de let@head_SP -.rm let@header -.let@print-head -.. -.de let@sg_SP -.nf -.if \\$3=1 .sp -.sp -.misc@toupper "\\$1, \\$2" -.if \\$4 .sp -.if \w'\\$5'&\\$4 \\$5 -.fi -.. -.de let@fc_SP -.sp 2 -.. -.\"-------------------------------------- -.\" Print the letter-head -.de let@print-head -.nf -.sp |11 -.if '1'\\$1' .in (u;\\n[.l]/2) -.\" ---- WA -.ie d let@wa-div .let@wa-div -.el .sp 3 -.\" ---- datum -\\*[cov*new-date] -.sp -.if '1'\\$1' .if !d let*lo-CN .if !d let*lo-RN .sp 2 -.\" ---- Confidential -.if d let*lo-CN \{\ -. ti 0 -. ie !''\\*[let*lo-CN]' \\*[let*lo-CN] -. el \\*[LetCN] -. sp -.\} -.\" ---- Reference -.if d let*lo-RN \{\ -\\*[LetRN] \\*[let*lo-RN] -. sp -.\} -.\" ---- IA -.sp -.in 0 -.nr let*i 0 1 -.while \\n+[let*i]<=\\n[let*ia-n] \{\ -\\*[let*ia-name!\\n[let*i]] -\\*[let*ia-title!\\n[let*i]] -.\} -.if d let@ia-div .let@ia-div -.\" ---- Attention -.if d let*lo-AT \{\ -. sp -\\*[LetAT] \\*[let*lo-AT] -.\} -.\" ---- Salutation -.if !'\\*[let*type]'SP' .if d let*lo-SA \{\ -. sp -. ti 0 -. ie !''\\*[let*lo-SA]' \\*[let*lo-SA] -. el \\*[LetSA] -.\} -.\" ---- Subject -.if d let*lo-SJ \{\ -. ie '\\*[let*type]'SP' \{\ -. sp 2 -. misc@toupper \\*[let*lo-SJ] -. sp -. \} -. el \{\ -. sp -. if '\\*[let*type]'SB' .ti +5m -\\*[LetSJ] \f[\\*[@sdf_font]]\\*[let*lo-SJ]\fP -. \} -.\} -.. -.\"------------------- -.\" .IA [name [title]] -.nr let*ia-n 0 1 -.de IA -.if \\n[.$] .ds let*ia-name!\\n+[let*ia-n] \\$1 -.if \\n[.$]>1 .ds let*ia-title!\\n[let*ia-n] \\$2 -.ev let@ev -'nf -.di let@ia-div -.eo -.. -.de IE -.di -.ec -.ev -.. -.\"------------------- -.\" .WA [name [title]] -.nr let*wa-n 0 1 -.de WA -.if \\n[.$] .ds let*wa-name!\\n+[let*wa-n] \\$1 -.if \\n[.$]>1 .ds let*wa-title!\\n[let*wa-n] \\$2 -.ev let@ev -'nf -.di let@wa-div -.it \\n[Letwam] let@wa-drain -.eo -.. -.\"------ -.de let@wa-drain -.it -.di -.di let@wa-junk -.. -.\"------ -.de WE -.it -.ec -.di -.ev -.if d let@wa-junk .rm let@wa-junk -.. -.\"------------------- -.\" Copy to -.de NS -.sp -.ie !''\\$2' .ds let*str \\$1 -.el \{\ -. ie \\n[.$]>0 \{\ -. ie !\w'\\$1' .ds let*str \\*[Letns!\\*[Letnsdef]] -. el \{\ -. ie d Letns!\\$1 .ds let*str \\*[Letns!\\$1] -. el .ds let*str \\*[Letns!copy](\\$1)\\*[Letns!to] -. \} -. \} -. el .ds let*str \\*[Letns!\\*[Letnsdef]] -.\} -.ne 2 -.nf -\\*[let*str] -.. -.de NE -.fi -.. -.\"------------------- -.\" Letter options -.de LO -.rm AF AS AE AT AU CS OK TL MT -.if ''\\$1' .@error "LO: missing option" -.if !d Let\\$1 .@error "LO: unknown option (\\$1)" -.ds let*lo-\\$1 \\$2 -.if \n[D]>1 .tm Letter option \\$1 \\$2 -.. -.\"-------------------- -.\" Start with a clean slate -.init@reset diff -aruN groff-1.16.1/contrib/mm/tmac.mse groff-1.17/contrib/mm/tmac.mse --- groff-1.16.1/contrib/mm/tmac.mse Mon Feb 21 21:32:58 2000 +++ groff-1.17/contrib/mm/tmac.mse Thu Jan 1 01:00:00 1970 @@ -1,184 +0,0 @@ -.\" $Id: tmac.mse,v 1.2 2000/02/21 20:32:58 jhaegg Exp $ -.\" -.\" swedish version of mm -.\" See tmac.m for version-information. -.ds @language se -.mso tmac.m -.ISODATE -.\" -.ds App Bilaga -.ds Lf Figurer -.ds Lt Tabeller -.ds Lx Uppställningar -.ds Le Ekvationer -.\" Page length -.if !r L .nr @pl 28.5c -.\" page width -.if !r W .nr @ll 13c -.\" page offset -.if !r O .nr @po 3.5c -.\" set the above parameters -.ll \n[@ll]u -.po \n[@po]u -.pl \n[@pl]u -.ds Lifg Figur -.ds Litb Tabell -.ds Liex Uppställning -.ds Liec Ekvation -.ds Licon Innehållsförteckning -.ds Qrf Se kapitel \\*[Qrfh], sidan \\*[Qrfp]. -.ds Rp Referenser -.ds Letfc Vänliga hälsningar -.ds Letapp Godkänd av: -.ds Letdate datum -.ds Letconf KONFIDENTIELLT -.ds Letsal Till vederbörande: -.ds Letatt ATTENTION: -.ds Letsubj Innehåll: -.ds Letref Refererande till: -.\" -.ds Letns!copy Kopia \" space! -.ds Letns!to " till -.ds Letns!0 Kopia till -.ds Letns!1 Kopia (med att.) till -.ds Letns!2 Kopia (utan att.) till -.ds Letns!3 Att. -.ds Letns!4 Atts. -.ds Letns!5 Enc. -.ds Letns!6 Encs. -.ds Letns!7 Annat försättsblad -.ds Letns!8 Brev till -.ds Letns!9 Dokument till -.ds Letns!10 Kopia (med atts.) till -.ds Letns!11 Kopia (utan atts.) till -.ds Letns!12 Endast abstract till -.ds Letns!13 Hela dokumentet till -.ds Letns!14 CC: -.\" -.ds MO1 januari -.ds MO2 februari -.ds MO3 mars -.ds MO4 april -.ds MO5 maj -.ds MO6 juni -.ds MO7 juli -.ds MO8 augusti -.ds MO9 september -.ds MO10 oktober -.ds MO11 november -.ds MO12 december -.nr pg*footer-size 4\" 1v+footer+even/odd footer+1v -.\"------------------------------------------------ -.\" Dokumentnamn -.ds LetDNAMN -.\" Mottagarens datum -.ds LetMDAT Ert datum: -.\" Bilaga -.ds LetBIL Bilaga \" -.\" Kompletteringsuppgift -.ds LetKOMP -.\" Dokumentbeteckning eller dokumentnummer -.ds LetDBET -.\" Beteckning (ärendebeteckning i form av diarienummer e.d. -.ds LetBET Beteckning: -.\" Mottagarens beteckning. -.ds LetMBET Er beteckning: -.\" Antal sidor -.ds LetSIDOR -.\" Svensk standard med högerställd löptext. --------------------- -.de let@init_SVH -.in 4.57c -.ll 17.57c -.. -.de let@head_SVH -.rm let@header -.let@print_SV H -.. -.de let@sg_SVH -.. -.de let@fc_SVH -.. -.\" Svensk standard med vänsterställd löptext. --------------------- -.de let@init_SVV -.. -.de let@head_SVV -.rm let@header -.let@print_SV V -.. -.de let@sg_SVV -.. -.de let@fc_SVV -.. -.\"-------------------------------- -.de let@print_SV -.nf -.\" pos T0 ----------------------------------- -.in 0 -.sp |3 -.if d let@wa-div .let@wa-div -.\"----- addressat -.if '\\$1'V' .if d let@ia-div \{\ -. sp |10 -. let@ia-div -.\} -.\" pos T4 ----------------------------------- -.in 9.14c -.\"----- kompletteringsuppgift -.if d let*lo-KOMP \{\ -. sp |2 -\\*[let*lo-KOMP] -.\} -.\"----- dokumentnamn -.if d let*lo-DNAMN \{\ -. sp |3 -\\*[let*lo-DNAMN] -.\} -.\"----- datum -.if d cov*new-date \{\ -. sp |5 -Datum: -\\*[cov*new-date] -.\} -.\"----- mottagarens datum -.if d let*lo-MDAT \{\ -. sp |7 -\\*[LetMDAT] -\\*[let*lo-MDAT] -.\} -.\"----- addressat -.if '\\$1'H' .if d let@ia-div \{\ -. sp |10 -. let@ia-div -.\} -.\" pos T6 ----------------------------------- -.in 13.72c -.\"----- mottagarens beteck. -.if d let*lo-MBET \{\ -. sp |7 -\\*[LetMBET] -\\*[let*lo-MBET] -.\} -.\"----- dokumentbeteck. -.if d let*lo-BET \{\ -. sp |3 -\\*[LetBET] -\\*[let*lo-BET] -.\} -.\" pos T7 ----------------------------------- -.in 16c -.\"----- bilaga -.if d let*lo-BIL \{\ -. sp |2 -\\*[LetBIL]\\*[let*lo-BIL] -.\} -.\" -.\"----- sidnummer -.sp |3 -.ie d let*lo-SIDOR \\n[%] (\\*[let*lo-SIDOR]) -.el \\n[%] -.\" -.\" Ta hand om special -.if d TP .TP -.sp |17 -.. -.\" ----------------------------------- diff -aruN groff-1.16.1/doc/Makefile groff-1.17/doc/Makefile --- groff-1.16.1/doc/Makefile Mon May 22 22:46:20 2000 +++ groff-1.17/doc/Makefile Wed Jan 17 15:17:18 2001 @@ -26,7 +26,7 @@ SOELIM=../src/preproc/soelim/soelim version=`cat ../VERSION` -# No additional number for the groff archive if revision is zero +# No additional number if revision is zero revision=`sed -e 's/^0$$//' -e 's/^[1-9].*$$/.&/' ../REVISION` all: $(DOCS) @@ -54,13 +54,13 @@ GROFF_TMAC_PATH=../tmac; \ export GROFF_TMAC_PATH; \ sed -e "s;@VERSION@;$(version)$(revision);" $< \ - | $(GROFF) -Tascii $(FFLAG) -U -ms -markup >$@ + | $(GROFF) -Tascii $(FFLAG) -U -ms -mwww >$@ .ms.ps: GROFF_TMAC_PATH=../tmac; \ export GROFF_TMAC_PATH; \ sed -e "s;@VERSION@;$(version)$(revision);" $< \ - | $(GROFF) -Tps $(FFLAG) -U -ms -markup >$@ + | $(GROFF) -Tps $(FFLAG) -U -ms -mwww >$@ .texinfo.dvi: texi2dvi -e $< diff -aruN groff-1.16.1/doc/groff.texinfo groff-1.17/doc/groff.texinfo --- groff-1.16.1/doc/groff.texinfo Sun Jun 18 12:13:51 2000 +++ groff-1.17/doc/groff.texinfo Mon Apr 16 16:47:18 2001 @@ -1,9 +1,8 @@ \input texinfo @c -*-texinfo-*- @c -@c If you use texinfo.tex 1999-09-25.10 or earlier please convert this -@c manual with `texi2dvi -e groff.texinfo' due to a bug in expanding -@c user-defined macros. +@c Please convert this manual with `texi2dvi -e groff.texinfo' due to a bug +@c in texinfo regarding expansion of user-defined macros. @c @c %**start of header (This is for running Texinfo on a region.) @@ -17,54 +16,181 @@ @c We use the following indices: @c @c cindex: concepts -@c findex: requests, escapes, and functions +@c rqindex: requests +@c esindex: escapes @c vindex: registers @c kindex: commands in font files @c pindex: programs and files @c tindex: environment variables -@c maindex: macros and strings +@c maindex: macros +@c stindex: strings @c glindex: glyph names @c opindex: operators @c @c tindex and cindex are merged. +@defcodeindex rq +@defcodeindex es @defcodeindex ma +@defcodeindex st @defcodeindex gl @defcodeindex op @syncodeindex tp cp -@macro Deffn{category, name, arg} -@deffn \category\ @t{\name\} \arg\ +@c to avoid uppercasing in @deffn while converting to info, we define +@c our special @Var{} +@c +@c due to a (not officially documented) `feature' in makeinfo 4.0, +@c macros are not expanded in @deffn (but the macro definition is +@c properly removed), so we have to define @Var{} directly in TeX also + +@macro Var{arg} +\arg\ +@end macro +@tex +\gdef\Var#1{\var{#1}} +@end tex + + +@c definition of requests + +@macro Defreq{name, arg} +@rqindex \name\ +@deffn Request @t{.\name\} \arg\ +@end macro + +@macro Defreqx{name, arg} +@rqindex \name\ +@deffnx Request @t{.\name\} \arg\ +@end macro + +@macro endDefreq +@end deffn +@end macro + + +@c definition of escapes + +@macro Defesc{name, delimI, arg, delimII} +@esindex \name\ +@deffn Escape @t{\name\\delimI\}@var{\arg\}@t{\delimII\} +@end macro + +@macro Defescx{name, delimI, arg, delimII} +@esindex \name\ +@deffnx Escape @t{\name\\delimI\}@var{\arg\}@t{\delimII\} @end macro -@macro end_Deffn +@macro endDefesc @end deffn @end macro -@macro Deffnx{category, name, arg} -@deffnx \category\ @t{\name\} \arg\ + +@c definition of registers + +@macro Defreg{name} +@vindex \name\ +@deffn Register @t{\\n[\name\]} +@end macro + +@macro Defregx{name} +@vindex \name\ +@deffnx Register @t{\\n[\name\]} @end macro -@macro end_Deffnx -@end deffnx +@macro endDefreg +@end deffn @end macro + +@c definition of macros + @macro Defmac{name, arg} -@defmac @t{\name\} \arg\ +@maindex \name\ +@defmac @t{.\name\} \arg\ @end macro -@macro end_Defmac +@macro Defmacx{name, arg} +@maindex \name\ +@defmacx @t{.\name\} \arg\ +@end macro + +@macro endDefmac @end defmac @end macro -@macro Defmacx{name, arg} -@defmacx @t{\name\} \arg\ + +@c definition of strings + +@macro Defstr{name, arg} +@stindex \name\ +@deffn String @t{\name\} \arg\ +@end macro + +@macro Defstrx{name, arg} +@stindex \name\ +@deffnx String @t{\name\} \arg\ @end macro -@macro end_Defmacx -@end defmacx +@macro endDefstr +@end deffn +@end macro + + +@c our example macro + +@macro Example +@example +@group +@end macro + +@macro endExample +@end group +@end example +@end macro + + +@c We need special parentheses and brackets: +@c +@c . Real parentheses in @deffn produce an error while compiling with +@c TeX +@c . Real brackets use the wrong font in @deffn, overriding @t{}. +@c +@c This is true for texinfo 4.0. + +@ifnottex +@macro lparen +( +@end macro +@macro rparen +) +@end macro +@macro lbrack +[ +@end macro +@macro rbrack +] +@end macro +@end ifnottex + +@iftex +@macro lparen +@@lparen +@end macro +@macro rparen +@@rparen @end macro +@macro lbrack +@@lbrack +@end macro +@macro rbrack +@@rbrack +@end macro +@end iftex + + +@c Note: We say `Roman numerals' but `roman font'. @c XXX comment all examples @@ -186,24 +312,26 @@ @end ifinfo @menu -* Copying:: -* Introduction:: -* Invoking groff:: -* Tutorial for Macro Users:: -* Macro Packages:: -* Programming Tutorial:: -* Preprocessors:: -* Output Devices:: -* File formats:: -* Installation:: -* Request and Escape Index:: -* Operator Index:: -* Register Index:: -* Macro and String Index:: -* Glyph Name Index:: -* Font File Keyword Index:: -* Program and File Index:: -* Concept Index:: +* Copying:: +* Introduction:: +* Invoking groff:: +* Tutorial for Macro Users:: +* Macro Packages:: +* gtroff Reference:: +* Preprocessors:: +* Output Devices:: +* File formats:: +* Installation:: +* Request Index:: +* Escape Index:: +* Operator Index:: +* Register Index:: +* Macro Index:: +* String Index:: +* Glyph Name Index:: +* Font File Keyword Index:: +* Program and File Index:: +* Concept Index:: @end menu @@ -617,13 +745,13 @@ entrenched in the @acronym{UNIX} community. @menu -* What Is groff?:: -* History:: -* groff Capabilities:: -* Macro Package Intro:: -* Preprocessor Intro:: -* Output device intro:: -* Credits:: +* What Is groff?:: +* History:: +* groff Capabilities:: +* Macro Package Intro:: +* Preprocessor Intro:: +* Output device intro:: +* Credits:: @end menu @@ -644,17 +772,16 @@ variety of devices. Likewise, @code{groff} should not be confused with a @dfn{word -processor}, since that term connotes an integrated system which includes +processor}, since that term connotes an integrated system that includes an editor and a text formatter. Also, many word processors follow the -@acronym{WYSIWYG} paradigm which was discussed earlier. +@acronym{WYSIWYG} paradigm discussed earlier. Although @acronym{WYSIWYG} systems may be easier to use, they have a number of disadvantages compared to @code{troff}: @itemize @bullet @item -They must be used on a graphics display to do any operations on a -document. +They must be used on a graphics display to work on a document. @item Most of the @acronym{WYSIWYG} systems are either non-free or are not @@ -691,26 +818,26 @@ operating system in the mid-sixties. This name came from the common phrase of the time ``I'll run off a document.'' Bob Morris ported it to the 635 architecture and called the program @code{roff} (an abbreviation -of @code{runoff}). It has then been rewritten as @code{rf} for the -PDP-7 (before having @acronym{UNIX}), and at the same time (1969), Doug +of @code{runoff}). It was rewritten as @code{rf} for the @w{PDP-7} +(before having @acronym{UNIX}), and at the same time (1969), Doug McIllroy rewrote an extended and simplified version of @code{roff} in the @acronym{BCPL} programming language. @cindex @code{roff} -The first version of @acronym{UNIX} was developed on a PDP-7 which was -sitting around Bell Labs. In 1971 the developers wanted to get a PDP-11 -for further work on the operating system. In order to justify the cost -for this system, they proposed that they would implement a document -formatting system for the AT&T patents division. This first formatting -program was a reimplementation of McIllroy's @code{roff}, written by -J.@w{ }F.@w{ }Ossanna. +The first version of @acronym{UNIX} was developed on a @w{PDP-7} which +was sitting around Bell Labs. In 1971 the developers wanted to get a +@w{PDP-11} for further work on the operating system. In order to +justify the cost for this system, they proposed that they would +implement a document formatting system for the AT&T patents division. +This first formatting program was a reimplementation of McIllroy's +@code{roff}, written by J.@w{ }F.@w{ }Ossanna. @cindex @code{nroff} When they needed a more flexible language, a new version of @code{roff} called @code{nroff} (``Newer @code{roff}'') was written. It had a much more complicated syntax, but provided the basis for all future versions. When they got a Graphic Systems CAT Phototypesetter, Ossanna wrote a -version of @code{nroff} which would drive it. It was dubbed +version of @code{nroff} that would drive it. It was dubbed @code{troff}, for ``typesetter @code{roff}'', although many people have speculated that it actually means ``Times @code{roff}'' because of the use of the Times font family in @code{troff} by default. As such, the @@ -733,7 +860,7 @@ the similar program, @code{bib}) processes citations in a document according to a bibliographic database. -Unfortunately, Ossanna's @code{troff} was written in PDP-11 assembly +Unfortunately, Ossanna's @code{troff} was written in @w{PDP-11} assembly language and produced output specifically for the CAT phototypesetter. He rewrote it in C, although it was now 7000@w{ }lines of uncommented code and still dependent on the CAT. As the CAT became less common, and @@ -769,8 +896,8 @@ The @code{soelim}, @code{pic}, @code{tbl}, and @code{eqn} preprocessors. @item -Postprocessors for character devices, @acronym{PostScript}, @TeX{} DVI, -and X@w{ }windows. GNU @code{troff} also eliminated the need for a +Postprocessors for character devices, @sc{PostScript}, @TeX{} DVI, and +X@w{ }windows. GNU @code{troff} also eliminated the need for a separate @code{nroff} program with a postprocessor which would produce @acronym{ASCII} output. @@ -792,8 +919,8 @@ Beginning in@w{ }1999, @code{groff} has new maintainers (the package was an orphan for a few years). As a result, new features and programs like -@code{grn}, a preprocessor for gremlin images, and @code{grohtml}, an -output device to produce @acronym{HTML} output, have been added. +@code{grn}, a preprocessor for gremlin images, and an output device to +produce @acronym{HTML} output have been added. @c ===================================================================== @@ -929,11 +1056,11 @@ @cindex output devices @cindex devices for output -@code{groff} actually produces device independent code which may be fed -into a postprocessor which will produce output for a particular device. -Currently, @code{groff} has postprocessors for @acronym{PostScript} -devices, character terminals, X@w{ }Windows (for previewing), @TeX{} DVI -format, HP LaserJet@w{ }4 and Canon LBP printers (which use +@code{groff} actually produces device independent code which may be +fed into a postprocessor to produce output for a particular device. +Currently, @code{groff} has postprocessors for @sc{PostScript} +devices, character terminals, X@w{ }Windows (for previewing), @TeX{} +DVI format, HP LaserJet@w{ }4 and Canon LBP printers (which use @acronym{CAPSL}), and @acronym{HTML}. @@ -953,6 +1080,7 @@ + @c ===================================================================== @c ===================================================================== @@ -975,9 +1103,9 @@ @code{troff}. Exception: @code{groff} is never replaced by @code{roff}. @menu -* Groff Options:: -* Environment:: -* Invocation Examples:: +* Groff Options:: +* Environment:: +* Invocation Examples:: @end menu @@ -1013,26 +1141,26 @@ The command line format for @code{groff} is: -@example +@Example groff [ -abeghilpstvzCEGNRSUVXZ ] [ -F@var{dir} ] [ -m@var{name} ] [ -T@var{def} ] [ -f@var{fam} ] [ -w@var{name} ] [ -W@var{name} ] [ -M@var{dir} ] [ -d@var{cs} ] [ -r@var{cn} ] [ -n@var{num} ] [ -o@var{list} ] [ -P@var{arg} ] [ -L@var{arg} ] [ -I@var{dir} ] [ @var{files}@dots{} ] -@end example +@endExample The command line format for @code{gtroff} is as follows. -@example +@Example gtroff [ -abivzCERU ] [ -w@var{name} ] [ -W@var{name} ] [ -d@var{cs} ] [ -f@var{fam} ] [ -m@var{name} ] [ -n@var{num} ] [ -o@var{list} ] [ -r@var{cn} ] [ -T@var{name} ] [ -F@var{dir} ] [ -M@var{dir} ] [ @var{files}@dots{} ] -@end example +@endExample @noindent -Obviously, many of the options to @code{groff} are actually passed -on to @code{gtroff}. +Obviously, many of the options to @code{groff} are actually passed on to +@code{gtroff}. Options without an argument can be grouped behind a single @option{-}. A filename of @file{-} denotes the standard input. It is possible to @@ -1082,15 +1210,14 @@ Make programs run by @code{groff} print out their version number. @item -V -Print the pipeline on stdout instead of executing it. +Print the pipeline on @code{stdout} instead of executing it. @item -z -Suppress output from @code{gtroff}. Only error messages will be -printed. +Suppress output from @code{gtroff}. Only error messages are printed. @item -Z Do not postprocess the output of @code{gtroff}. Normally @code{groff} -will automatically run the appropriate postprocessor. +automatically runs the appropriate postprocessor. @item -P@var{arg} Pass @var{arg} to the postprocessor. Each argument should be passed @@ -1098,13 +1225,17 @@ prepend @samp{-} to @var{arg} before passing it to the postprocessor. @item -l -Send the output to a printer. The command used for this is specified by -the print command in the device description file. +Send the output to a spooler for printing. The command used for this is +specified by the @code{print} command in the device description file +(see @ref{Font Files}, for more info). If not present, @option{-l} is +ignored. @item -L@var{arg} Pass @var{arg} to the spooler. Each argument should be passed with a separate @option{-L} option. Note that @code{groff} does not prepend a -@samp{-} to @var{arg} before passing it to the postprocessor. +@samp{-} to @var{arg} before passing it to the postprocessor. If the +@code{print} keyword in the device description file is missing, +@option{-L} is ignored. @item -T@var{dev} Prepare output for device @var{dev}. The default device is @samp{ps}, @@ -1113,7 +1244,7 @@ @table @code @item ps -For @acronym{PostScript} printers and previewers. +For @sc{PostScript} printers and previewers. @item dvi For @TeX{} DVI format. @@ -1128,8 +1259,8 @@ For typewriter-like devices. @item latin1 -For typewriter-like devices that support the @w{Latin-1} (@w{ISO 8859-1}) -character set. +For typewriter-like devices that support the @w{Latin-1} (@w{ISO +8859-1}) character set. @item utf8 For typewriter-like devices which use the Unicode (@w{ISO 10646}) @@ -1149,12 +1280,17 @@ For Canon @acronym{CAPSL} printers (@w{LBP-4} and @w{LBP-8} series laser printers). +@pindex pre-grohtml +@pindex post-grohtml +@cindex @code{grohtml} @item html -To produce @acronym{HTML} output. +To produce @acronym{HTML} output. Note that the @acronym{HTML} driver +consists of two parts, a preprocessor (@code{pre-grohtml}) and a +postprocessor (@code{post-grohtml}). @end table @vindex .T -@maindex \*(.T +@stindex .T The predefined @code{gtroff} string register @code{.T} contains the current output device; the read-only number register @code{.T} is set to@w{ }1 if this option is used (which is always true if @code{groff} is @@ -1171,16 +1307,17 @@ Note that this is not the same as using @option{-TX75} or @option{-TX100} to view a document with @code{gxditview}: The former -will use the metrics of the specified device, whereas the latter will -use X-specific fonts and metrics. +uses the metrics of the specified device, whereas the latter uses +X-specific fonts and metrics. @item -N Don't allow newlines with @code{eqn} delimiters. This is the same as the @option{-N} option in @code{geqn}. @item -S -Safer mode. Pass the @option{-S} option to @code{gpic} and use the -@option{-msafer} macros with @code{gtroff} (enabled by default). +Safer mode. Pass the @option{-S} option to @code{gpic} and disable the +@code{open}, @code{opena}, @code{pso}, @code{sy}, and @code{pi} +requests. For security reasons, this is enabled by default. @item -U Unsafe mode. Reverts to the old unsafe behaviour. @@ -1189,7 +1326,16 @@ @vindex .A Generate an @acronym{ASCII} approximation of the typeset output. The read-only register @code{.A} is then set to@w{ }1. @xref{Built-in -Registers}. +Registers}. A typical example is + +@Example +groff -a -man -Tdvi troff.man | less +@endExample + +@noindent +which shows how lines are broken for the DVI device. Note that this +option is rather useless today since graphic output devices are +available virtually everywhere. @item -b Print a backtrace with each warning or error message. This backtrace @@ -1213,20 +1359,25 @@ @item -C Enable compatibility mode. @xref{Implementation Differences}, for the -list of incompatibilites between @code{groff} and traditional Unix +list of incompatibilities between @code{groff} and traditional Unix @code{troff}. @item -d@var{cs} @itemx -d@var{name}=s Define @var{c} or @var{name} to be a string @var{s}. @var{c} must be a -one-letter name; @var{name} can be of arbitrary length. +one-letter name; @var{name} can be of arbitrary length. All string +assignments happen before loading any macro file (including the start-up +file). @item -f@var{fam} -Use @var{fam} as the default font family. +Use @var{fam} as the default font family. @xref{Font Families}. @item -m@var{name} -Read in the file @file{tmac.@var{name}}. Normally this will be searched -for in the library directory of @code{groff}. +Read in the file @file{@var{name}.tmac}. Normally @code{groff} searches +for this in its macro directories. If it isn't found, it tries +@file{tmac.@var{name}} (and searches in the same directories). + +@c XXX document local and system macro dirs @item -n@var{num} Number the first page @var{num}. @@ -1237,26 +1388,32 @@ ranges; @samp{@var{n}} means print page @var{n}, @samp{@var{m}-@var{n}} means print every page between @var{m} and @var{n}, @samp{-@var{n}} means print every page up to @var{n}, @samp{@var{n}-} means print every -page beginning with @var{n}. @code{gtroff} will exit after printing the +page beginning with @var{n}. @code{gtroff} exits after printing the last page in the list. All the ranges are inclusive on both ends. Within @code{gtroff}, this information can be extracted with the @samp{.P} register. @xref{Built-in Registers}. +If your document restarts page numbering at the beginning of each +chapter, then @code{gtroff} prints the specified page range for each +chapter. + @item -r@var{cn} @itemx -r@var{name}=@var{n} Set number register @var{c} or @var{name} to the value @var{n}. @var{c} must be a one-letter name; @var{name} can be of arbitrary length. -@var{n} can be any @code{gtroff} numeric expression. +@var{n} can be any @code{gtroff} numeric expression. All register +assignments happen before loading any macro file (including the start-up +file). @item -F@var{dir} Search @file{@var{dir}} for subdirectories @file{dev@var{name}} (@var{name} is the name of the device), for the @file{DESC} file, and -for font files before looking in the standard directory. +for font files before looking in the standard directories. @item -M@var{dir} Search directory @file{@var{dir}} for macro files before the standard -directory. +directories. @item -I@var{dir} This option is as described in @ref{gsoelim}. It implies the @@ -1277,16 +1434,20 @@ @table @code @item GROFF_COMMAND_PREFIX @tindex GROFF_COMMAND_PREFIX, environment variable -If this is set to @var{X}, then @code{groff} will run -@code{@var{X}troff} instead of @code{gtroff}. This also applies to -@code{tbl}, @code{pic}, @code{eqn}, @code{grn}, @code{refer}, and -@code{soelim}. It does not apply to @code{grops}, @code{grodvi}, -@code{grotty}, @code{grohtml}, @code{grolj4}, and @code{gxditview}. +If this is set to @var{X}, then @code{groff} runs @code{@var{X}troff} +instead of @code{gtroff}. This also applies to @code{tbl}, @code{pic}, +@code{eqn}, @code{grn}, @code{refer}, and @code{soelim}. It does not +apply to @code{grops}, @code{grodvi}, @code{grotty}, @code{pre-grohtml}, +@code{post-grohtml}, @code{grolj4}, and @code{gxditview}. + +@c XXX document default values @item GROFF_TMAC_PATH @tindex GROFF_TMAC_PATH, environment variable -A colon-separated list of directories in which to search for macro -files. +A colon-separated list of directories in which to search for macro files +(before the default directories are tried). + +@c XXX document local and system macro dirs @item GROFF_TYPESETTER @tindex GROFF_TYPESETTER, environment variable @@ -1295,21 +1456,23 @@ @item GROFF_FONT_PATH @tindex GROFF_FONT_PATH, environment variable A colon-separated list of directories in which to search for the -@code{dev}@var{name} directory. +@code{dev}@var{name} directory (before the default directories are +tried). -@item PATH -@tindex PATH, environment variable -The search path for commands executed by @code{groff}. +@item GROFF_BIN_PATH +@tindex GROFF_BIN_PATH, environment variable +This search path, followed by @code{PATH}, is used for commands executed +by @code{groff}. @item GROFF_TMPDIR @tindex GROFF_TMPDIR, environment variable @tindex TMPDIR, environment variable -The directory in which temporary files will be created. If this is not -set and @env{TMPDIR} is set, temporary files will be created in that -directory. Otherwise temporary files will be created in a -system-dependent default directory (on Unix and GNU/Linux systems, this -is usually @file{/tmp}). The @code{grops} and @code{grefer} commands -can create temporary files in this directory. +The directory in which @code{groff} creates temporary files. If this is +not set and @env{TMPDIR} is set, temporary files are created in that +directory. Otherwise temporary files are created in a system-dependent +default directory (on Unix and GNU/Linux systems, this is usually +@file{/tmp}). @code{grops}, @code{grefer}, @code{pre-grohtml}, and +@code{post-grohtml} can create temporary files in this directory. @end table Note that MS-DOS and MS-Windows ports of @code{groff} use semi-colons, @@ -1324,33 +1487,33 @@ @cindex invocation examples @cindex examples of invocation -This section will list several common uses of @code{groff} and the -command line which will accomplish it. +This section lists several common uses of @code{groff} and the +corresponding command lines. -@example +@Example groff file -@end example +@endExample @noindent This command processes @file{file} without a macro package or a preprocessor. The output device is the default, @samp{ps}, and the -output is sent to stdout. +output is sent to @code{stdout}. -@example +@Example groff -t -mandoc -Tascii file | less -@end example +@endExample @noindent -This is basically what a call to the @code{man} program does. The -manual page @file{file} is processed with the @file{mandoc} macros -(which in turn either calls the @file{man} or the @file{mdoc} macro -package), using the @code{tbl} preprocessor and the @acronym{ASCII} -output device. Finally, the result is displayed with the @code{less} -pager. +This is basically what a call to the @code{man} program does. +@code{gtroff} processes the manual page @file{file} with the +@file{mandoc} macro file (which in turn either calls the @file{man} or +the @file{mdoc} macro package), using the @code{tbl} preprocessor and +the @acronym{ASCII} output device. Finally, the @code{less} pager +displays the result. -@example +@Example groff -X -m me file -@end example +@endExample @noindent Preview @file{file} with @code{gxditview}, using the @file{me} macro @@ -1360,52 +1523,57 @@ @acronym{UNIX}.@footnote{The same is true for the other main macro packages that come with @code{groff}: @file{man}, @file{mdoc}, @file{ms}, @file{mm}, and @file{mandoc}. This won't work in general; -for example, to load @file{tmac.safer}, either @samp{-msafer} or -@w{@samp{-m safer}} must be used.} +for example, to load @file{trace.tmac}, either @samp{-mtrace} or +@w{@samp{-m trace}} must be used.} -@example +@Example groff -man -rD1 -z file -@end example +@endExample @noindent Check @file{file} with the @file{man} macro package, forcing double-sided printing -- don't produce any output. -@c --------------------------------------------------------------------- - @menu -* grog:: +* grog:: @end menu +@c --------------------------------------------------------------------- + @node grog, , Invocation Examples, Invocation Examples @subsection @code{grog} @pindex grog @code{grog} reads files, guesses which of the @code{groff} preprocessors and/or macro packages are required for formatting them, and prints the -@code{groff} command including those options on the standard output. -The options generated are one of @option{-e}, @option{-man}, -@option{-me}, @option{-mm}, @option{-ms}, @option{-p}, @option{-R}, -@option{-g}, @option{-G}, @option{-s}, and @option{-t}. - -A special file name @file{-} is taken to refer to the standard input. -If no files are specified the standard input will be read. Any -specified options will be included in the printed command. No space is -allowed between options and their arguments. For example, +@code{groff} command including those options on the standard output. It +generates one or more of the options @option{-e}, @option{-man}, +@option{-me}, @option{-mm}, @option{-ms}, @option{-mdoc}, +@option{-mdoc-old}, @option{-p}, @option{-R}, @option{-g}, @option{-G}, +@option{-s}, and @option{-t}. + +A special file name @file{-} refers to the standard input. Specifying +no files also means to read the standard input. Any specified options +are included in the printed command. No space is allowed between +options and their arguments. The only options recognized are +@option{-C} (which is also passed on) to enable compatibility mode, and +@option{-v} (if it is the only parameter) to print the version number. -@example +For example, + +@Example grog -Tdvi paper.ms -@end example +@endExample @noindent -will guess the appropriate command to print @file{paper.ms} and then -print it to the command line after adding the @option{-Tdvi} option. -For direct execution, enclose the call to @code{grog} in backquotes at -the @acronym{UNIX} shell prompt: +guesses the appropriate command to print @file{paper.ms} and then prints +it to the command line after adding the @option{-Tdvi} option. For +direct execution, enclose the call to @code{grog} in backquotes at the +@acronym{UNIX} shell prompt: -@example +@Example `grog -Tdvi paper.ms` > paper.dvi -@end example +@endExample @noindent As seen in the example, it is still necessary to redirect the output to @@ -1430,8 +1598,8 @@ macro package. @menu -* Basics:: -* Common Features:: +* Basics:: +* Common Features:: @end menu @@ -1458,39 +1626,39 @@ which appears on the same line as a request, and which modifies the meaning of that request. For example, the request -@example +@Example .sp -@end example +@endExample @noindent spaces one line, but -@example +@Example .sp 4 -@end example +@endExample @noindent spaces four lines. The number@w{ }4 is an argument to the @code{sp} request which says to space four lines instead of one. Arguments are -separated from the request and from each other by spaces. More details -on this can be found in @ref{Request Arguments}. +separated from the request and from each other by spaces (@emph{no} +tabs). More details on this can be found in @ref{Request Arguments}. The primary function of @code{gtroff} is to collect words from input lines, fill output lines with those words, justify the right-hand margin by inserting extra spaces in the line, and output the result. For example, the input: -@example +@Example Now is the time for all good men to come to the aid of their party. Four score and seven years ago,... -@end example +@endExample @noindent -will be read, packed onto output lines, and justified to produce: +is read, packed onto output lines, and justified to produce: @quotation Now is the time for all good men to come to the aid of their party. @@ -1502,63 +1670,78 @@ Sometimes a new output line should be started even though the current line is not yet full; for example, at the end of a paragraph. To do this it is possible to cause a @dfn{break}, which starts a new output -line. Some requests cause a break automatically, as do blank input -lines and input lines beginning with a space. +line. Some requests cause a break automatically, as normally do blank +input lines and input lines beginning with a space. -Not all input lines are text to be formatted. Some of the input lines -are requests which describe how to format the text. Requests always -have a period (@samp{.}) or an apostrophe (@samp{'}) as the first -character of the input line. +Not all input lines are text to be formatted. Some input lines are +requests which describe how to format the text. Requests always have a +period (@samp{.}) or an apostrophe (@samp{'}) as the first character of +the input line. The text formatter also does more complex things, such as automatically numbering pages, skipping over page boundaries, putting footnotes in the correct place, and so forth. Here are a few hints for preparing text for input to @code{gtroff}. + +@itemize @bullet +@item First, keep the input lines short. Short input lines are easier to -edit, and @code{gtroff} will pack words onto longer lines anyhow. In -keeping with this, it is helpful to begin a new line after every period, -comma, or phrase, since common corrections are to add or delete -sentences or phrases. Secondly, do not hyphenate words at the end of -lines -- @code{gtroff} is smart enough to hyphenate words for the user -as needed, but is not smart enough to take hyphens out and join a word -back together. Also, words such as ``mother-in-law'' should not be -broken over a line, since then a space can occur where not wanted, such -as ``@w{mother- in}-law''. +edit, and @code{gtroff} packs words onto longer lines anyhow. + +@item +In keeping with this, it is helpful to begin a new line after every +comma or phrase, since common corrections are to add or delete sentences +or phrases. + +@item +End each sentence with two spaces -- or better, start each sentence on a +new line. @code{gtroff} recognizes characters that usually end a +sentence, and inserts sentence space accordingly. + +@item +Do not hyphenate words at the end of lines -- @code{gtroff} is smart +enough to hyphenate words as needed, but is not smart enough to take +hyphens out and join a word back together. Also, words such as +``mother-in-law'' should not be broken over a line, since then a space +can occur where not wanted, such as ``@w{mother- in}-law''. +@end itemize -@findex ls +@rqindex ls @cindex double spacing @cindex spacing -@code{gtroff} will double space output text automatically if you use the -request @w{@samp{.ls 2}}. Single spaced mode can be reactivated by -typing @w{@samp{.ls 1}}. - -A number of requests allow to change the way the output looks, sometimes -called the @dfn{layout} of the output page. Most of these requests -adjust the placing of @dfn{white space} (blank lines or spaces). +@code{gtroff} double spaces output text automatically if you use the +request @w{@samp{.ls 2}}. Reactivate single spaced mode by typing +@w{@samp{.ls 1}}. + +A number of requests allow to change the way the output looks, +sometimes called the @dfn{layout} of the output page. Most of these +requests adjust the placing of @dfn{white space} (blank lines or +spaces). @cindex new page The @samp{.bp} request starts a new page, causing a line break. -@cindex blank lines -@cindex empty lines -@cindex lines, empty +@cindex blank line +@cindex empty line +@cindex line, empty The request @w{@samp{.sp @var{N}}} leaves @var{N}@w{ }lines of blank space. @var{N}@w{ }can be omitted (meaning skip a single line) or can be of the form @var{N}i (for @var{N}@w{ }inches) or @var{N}c (for @var{N}@w{ }centimeters). For example, the input: -@example +@Example .sp 1.5i My thoughts on the subject .sp -@end example +@endExample @noindent leaves one and a half inches of space, followed by the line ``My -thoughts on the subject'', followed by a single blank line. +thoughts on the subject'', followed by a single blank line (more +measurement units are available, see @ref{Measurements}). -@findex ce +@rqindex ce @cindex centering lines @cindex lines, centering Text lines can be centered by using the @code{ce} request. The line @@ -1567,17 +1750,17 @@ of lines to center), followed by the @var{N}@w{ }lines. To center many lines without counting them, type: -@example +@Example .ce 1000 lines to center .ce 0 -@end example +@endExample @noindent The @w{@samp{.ce 0}} request tells @code{groff} to center zero more lines, in other words, stop centering. -@findex br +@rqindex br @cindex line break @cindex break All of these requests cause a break; that is, they always start a new @@ -1592,7 +1775,7 @@ @cindex common features @cindex features, common -@code{gtroff} provides very low level operations for formatting a +@code{gtroff} provides very low-level operations for formatting a document. There are many common routine operations which are done in all documents. These common operations are written into @dfn{macros} and collected into a @dfn{macro package}. @@ -1600,55 +1783,59 @@ All macro packages provide certain common capabilities which fall into the following categories. -@c --------------------------------------------------------------------- - @menu -* Paragraphs:: -* Sections and Chapters:: -* Headers and Footers:: -* Page Layout Adjustment:: -* Displays:: -* Footnotes and Annotations:: -* Table of Contents:: -* Indices:: -* Paper Formats:: -* Multiple Columns:: -* Font and Size Changes:: -* Predefined Strings:: -* Preprocessor Support:: -* Configuration and Customization:: +* Paragraphs:: +* Sections and Chapters:: +* Headers and Footers:: +* Page Layout Adjustment:: +* Displays:: +* Footnotes and Annotations:: +* Table of Contents:: +* Indices:: +* Paper Formats:: +* Multiple Columns:: +* Font and Size Changes:: +* Predefined Strings:: +* Preprocessor Support:: +* Configuration and Customization:: @end menu +@c --------------------------------------------------------------------- + @node Paragraphs, Sections and Chapters, Common Features, Common Features @subsection Paragraphs @cindex paragraphs -One of the most common and most used capability is starting a paragraph. -There are a number of different types of paragraphs, any of which can be -initiated with macros supplied by the macro package. Normally, -paragraphs start with a blank line and the first line indented, like the -text in this manual. There are also block style paragraphs, which omit -the indentation: +One of the most common and most used capability is starting a +paragraph. There are a number of different types of paragraphs, any +of which can be initiated with macros supplied by the macro package. +Normally, paragraphs start with a blank line and the first line +indented, like the text in this manual. There are also block style +paragraphs, which omit the indentation: -@example +@Example Some men look at constitutions with sanctimonious reverence, and deem them like the ark of the covenant, too sacred to be touched. -@end example +@endExample @noindent And there are also indented paragraphs which begin with a tag or label at the margin and the remaining text indented. @example +@group one This is the first paragraph. Notice how the first line of the resulting paragraph lines up with the other lines in the paragraph. +@end group +@group longlabel This paragraph had a long label. The first - character of text on the first line will not line up + character of text on the first line does not line up with the text on second and subsequent lines, - although they will line up with each other. + although they line up with each other. +@end group @end example A variation of this is a bulleted list. @@ -1671,10 +1858,9 @@ @node Headers and Footers, Page Layout Adjustment, Sections and Chapters, Common Features @subsection Headers and Footers -Every macro package gives some way to manipulate the headers and -footers (or @dfn{titles}) on each page. Some packages will allow for -different ones on the even and odd pages (for material printed in a book -form). +Every macro package gives some way to manipulate the headers and footers +(or @dfn{titles}) on each page. Some packages allow for different ones +on the even and odd pages (for material printed in a book form). The titles are called three-part titles, that is, there is a left-justified part, a centered part, and a right-justified part. An @@ -1713,17 +1899,16 @@ @cindex keep A @dfn{keep} is a display of lines which are kept on a single page if possible. An example for a keep might be a diagram. Keeps differ from -lists in that lists may be broken over a page boundary whereas keeps -will not. +lists in that lists may be broken over a page boundary whereas keeps are +not. @cindex keep, floating @cindex floating keep Floating keeps move relative to the text. Hence, they are good for -things which will be referred to by name, such as ``See figure@w{ }3''. -A floating keep will appear at the bottom of the current page if it will -fit; otherwise, it will appear at the top of the next page. Meanwhile, -the surrounding text will `flow' around the keep, thus leaving now blank -areas. +things which are referred to by name, such as ``See figure@w{ }3''. A +floating keep appears at the bottom of the current page if it fits; +otherwise, it appears at the top of the next page. Meanwhile, the +surrounding text `flows' around the keep, thus leaving no blank areas. @c --------------------------------------------------------------------- @@ -1755,9 +1940,9 @@ @dfn{Tables of contents} are a type of delayed text having a tag (usually the page number) attached to each entry after a row of dots. The table accumulates throughout the paper until printed, usually after -the paper has ended. Many macro packages will provide the ability to -have several tables of contents (i.e.@: one standard one, one for -tables, etc). +the paper has ended. Many macro packages provide the ability to have +several tables of contents (e.g.@: a standard table of contents, a list +of tables, etc). @c --------------------------------------------------------------------- @@ -1765,7 +1950,7 @@ @subsection Indices @cindex index, in macro package -While some macro packages will use the term @dfn{index}, none actually +While some macro packages use the term @dfn{index}, none actually provide that functionality. The facilities they call indices are actually more appropriate for tables of contents. @@ -1810,23 +1995,30 @@ @node Preprocessor Support, Configuration and Customization, Predefined Strings, Common Features @subsection Preprocessor Support -All macro packages provide support for the various preprocessors. +All macro packages provide support for the various preprocessors and may +extend their functionality. + +For example, all macro packages mark tables (which are processed with +@code{gtbl}) by placing them between @code{.TS} and @code{.TE} macros. +The @file{ms} macro package has an option, @code{.TS@w{}H}, that prints +a caption at the top of a new page (when the table is too long to fit on +a single page). @c --------------------------------------------------------------------- @node Configuration and Customization, , Preprocessor Support, Common Features @subsection Configuration and Customization -Some macro packages provide means of customizing many of the details of how -the package behaves. This ranges from setting the default type size to -changing the appearance of section headers. +Some macro packages provide means of customizing many of the details of +how the package behaves. This ranges from setting the default type size +to changing the appearance of section headers. @c ===================================================================== @c ===================================================================== -@node Macro Packages, Programming Tutorial, Tutorial for Macro Users, Top +@node Macro Packages, gtroff Reference, Tutorial for Macro Users, Top @chapter Macro Packages @cindex macro packages @cindex packages, macros @@ -1835,11 +2027,11 @@ @code{groff}. @menu -* man:: -* mdoc:: -* ms:: -* me:: -* mm:: +* man:: +* mdoc:: +* ms:: +* me:: +* mm:: @end menu @@ -1849,18 +2041,21 @@ @section @file{man} @cindex @file{man} @cindex manual pages -@pindex tmac.an -@pindex tmac.man +@pindex an.tmac +@pindex man.tmac +@pindex man-old.tmac This is the most popular and probably the most important macro package of @code{groff}. It is easy to use, and a vast majority of manual pages are based on it. @menu -* Man options:: -* Man usage:: -* Man font macros:: -* Miscellaneous man stuff:: +* Man options:: +* Man usage:: +* Man font macros:: +* Miscellaneous man macros:: +* Predefined man strings:: +* Preprocessors in man pages:: @end menu @c --------------------------------------------------------------------- @@ -1871,16 +2066,20 @@ The command line format for using the @file{man} macros with @code{groff} is: -@c XXX document @TMAC_AN_PREFIX@ - -@example -groff -m man [ -rC1 ] [ -rD1 ] [ -rP@var{nnn} ] [ -rS@var{xx} ] - [ -rX@var{nnn} ] [ @var{files}@dots{} ] -@end example +@Example +groff -m man [ -rcR=1 ] [ -rC1 ] [ -rD1 ] [ -rP@var{nnn} ] + [ -rS@var{xx} ] [ -rX@var{nnn} ] [ @var{files}@dots{} ] +@endExample +@noindent It is possible to use @samp{-man} instead of @w{@samp{-m man}}. @table @code +@item -rcR=1 +This option (the default if a tty output device is used) creates a +single, very long page instead of multiple pages. Use @code{-rcR=0} +to disable it. + @item -rC1 If more than one manual page is given on the command line, number the pages continuously, rather than starting each at@w{ }1. @@ -1890,7 +2089,7 @@ differently. @item -rP@var{nnn} -Enumeration of pages will start with @var{nnn} rather than with@w{ }1. +Page numbering starts with @var{nnn} rather than with@w{ }1. @item -rS@var{xx} Use @var{xx} (which can be 10, 11, or@w{ }12@dmn{pt}) as the base @@ -1898,7 +2097,7 @@ @item -rX@var{nnn} After page @var{nnn}, number pages as @var{nnn}a, @var{nnn}b, -@var{nnn}c, etc. For example, the option @option{-rX2} will produce the +@var{nnn}c, etc. For example, the option @option{-rX2} produces the following page numbers: 1, 2, 2a, 2b, 2c, etc. @end table @@ -1912,22 +2111,22 @@ @pindex man.local This section describes the available macros for manual pages. For further customization, put additional macros and requests into the file -@file{man.local} which will be loaded immediately after @file{tmac.an}. +@file{man.local} which is loaded immediately after the @file{man} +package. -@maindex TH -@Defmac{TH, title section [@var{extra1}] [@var{extra2}] [@var{extra3}]} -Sets the title of the man page to @var{title} and the section to +@Defmac {TH, title section [@Var{extra1}] [@Var{extra2}] [@Var{extra3}]} +Set the title of the man page to @var{title} and the section to @var{section}, which must have a value between 1 and@w{ }8. The value -of @var{section} may also have a string appended, e.g.@: @samp{.pm}, to -indicate a specific subsection of the man pages. +of @var{section} may also have a string appended, e.g.@: @samp{.pm}, +to indicate a specific subsection of the man pages. Both @var{title} and @var{section} are positioned at the left and right in the header line (with @var{section} in parentheses immediately -appended to @var{title}. @var{extra1} will be positioned in the middle -of the footer line. @var{extra2} will be positioned at the left in the -footer line (resp.@: at the left on even pages and at the right on odd -pages if double-sided printing is active). @var{extra3} is centered in -the header line. +appended to @var{title}. @var{extra1} is positioned in the middle of +the footer line. @var{extra2} is positioned at the left in the footer +line (or at the left on even pages and at the right on odd pages if +double-sided printing is active). @var{extra3} is centered in the +header line. For @acronym{HTML} output, headers and footers are completely suppressed. @@ -1936,100 +2135,91 @@ -- this feature is intended only for formatting multiple man pages; a single man page should contain exactly one @code{TH} macro at the beginning of the file. -@end_Defmac +@endDefmac -@maindex SH -@Defmac{SH, [@var{heading}]} -Sets up an unnumbered section heading sticking out to the left. Prints -out all the text following @code{SH} up to the end of the line (resp.@: -the text in the next line if there is no argument to @code{SH}) in bold +@Defmac {SH, [@Var{heading}]} +Set up an unnumbered section heading sticking out to the left. Prints +out all the text following @code{SH} up to the end of the line (or the +text in the next line if there is no argument to @code{SH}) in bold face, one size larger than the base document size. Additionally, the left margin for the following text is reset to its default value. -@end_Defmac +@endDefmac -@maindex SS -@Defmac{SS, [@var{heading}]} -Sets up an unnumbered section heading. Prints out all the text -following @code{SS} up to the end of the line (resp.@: the text in the -next line if there is no argument to @code{SS}) in bold face, at the -same size as the base document size. Additionally, the left margin for -the following text is reset to its default value. -@end_Defmac - -@maindex TP -@Defmac{TP, [@var{nnn}]} -Sets up an indented paragraph with label. The indentation is set to -@var{nnn} if that argument is supplied (the default unit is @samp{n} if -omitted), otherwise it is set to the default indentation value. +@Defmac {SS, [@Var{heading}]} +Set up an unnumbered (sub)section heading. Prints out all the text +following @code{SS} up to the end of the line (or the text in the next +line if there is no argument to @code{SS}) in bold face, at the same +size as the base document size. Additionally, the left margin for the +following text is reset to its default value. +@endDefmac + +@Defmac {TP, [@Var{nnn}]} +Set up an indented paragraph with label. The indentation is set to +@var{nnn} if that argument is supplied (the default unit is @samp{n} +if omitted), otherwise it is set to the default indentation value. The first line of text following this macro is interpreted as a string to be printed flush-left, as it is appropriate for a label. It is not interpreted as part of a paragraph, so there is no attempt to fill the first line with text from the following input lines. Nevertheless, if the label is not as wide as the indentation, then the paragraph starts -at the same line (but indented), continuing on the following lines. If -the label is wider than the indentation, then the descriptive part of -the paragraph begins on the line following the label, entirely indented. -Note that neither font shape nor font size of the label is set to a -default value; on the other hand, the rest of the text will have default -font settings. -@end_Defmac - -@maindex LP -@maindex PP -@maindex P -@Defmac{LP} -@Defmacx{PP} -@Defmacx{P} -These macros are mutual aliases. Any of them causes a line break at the -current position, followed by a vertical space downwards by the amount -specified by the @code{PD} macro. The font size and shape are reset to -the default value (10@dmn{pt} resp.@: Roman). Finally, the current left -margin is restored. -@end_Defmac - -@maindex IP -@Defmac{IP, [@var{designator}] [@var{nnn}]} -Sets up an indented paragraph, using @var{designator} as a tag to mark -its beginning. The indentation is set to @var{nnn} if that argument is -supplied (default unit is @samp{n}), otherwise the default indentation -value is used. Font size and face of the paragraph (but not the -designator) are reset to their default values. To start an indented -paragraph with a particular indentation but without a designator, use -@samp{""} (two double quotes) as the first argument of @code{IP}. +at the same line (but indented), continuing on the following lines. +If the label is wider than the indentation, then the descriptive part +of the paragraph begins on the line following the label, entirely +indented. Note that neither font shape nor font size of the label is +set to a default value; on the other hand, the rest of the text has +default font settings. +@endDefmac + +@Defmac {LP} +@Defmacx {PP} +@Defmacx {P} +These macros are mutual aliases. Any of them causes a line break at +the current position, followed by a vertical space downwards by the +amount specified by the @code{PD} macro. The font size and shape are +reset to the default value (10@dmn{pt} roman). Finally, the current +left margin is restored. +@endDefmac + +@Defmac {IP, [@Var{designator}] [@Var{nnn}]} +Set up an indented paragraph, using @var{designator} as a tag to mark +its beginning. The indentation is set to @var{nnn} if that argument +is supplied (default unit is @samp{n}), otherwise the default +indentation value is used. Font size and face of the paragraph (but +not the designator) are reset to their default values. To start an +indented paragraph with a particular indentation but without a +designator, use @samp{""} (two double quotes) as the first argument of +@code{IP}. For example, to start a paragraph with bullets as the designator and 4@dmn{en} indentation, write -@example +@Example .IP \(bu 4 -@end example -@end_Defmac +@endExample +@endDefmac -@maindex HP @cindex hanging indentation, in manual pages -@Defmac{HP, [@var{nnn}]} -Sets up a paragraph with hanging left indentation. The indentation is +@Defmac {HP, [@Var{nnn}]} +Set up a paragraph with hanging left indentation. The indentation is set to @var{nnn} if that argument is supplied (default unit is @samp{n}), otherwise the default indentation value is used. Font size and face are reset to their default values. -@end_Defmac +@endDefmac -@maindex RS @cindex left margin, how to move, in manual pages -@Defmac{RS, [@var{nnn}]} -This macro moves the left margin to the right by the value @var{nnn} if -specified (default unit is @samp{n}); otherwise the default indentation -value is used. Calls to the @code{RS} macro can be nested. -@end_Defmac - -@maindex RE -@Defmac{RE, [@var{nnn}]} -This macro moves the left margin back to level @var{nnn}; if no argument -is given, it moves one level back. The first level (i.e., no call to -@code{RS} yet) has number@w{ }1, and each call to @code{RS} increases -the level by@w{ }1. -@end_Defmac +@Defmac {RS, [@Var{nnn}]} +Move the left margin to the right by the value @var{nnn} if specified +(default unit is @samp{n}); otherwise the default indentation value is +used. Calls to the @code{RS} macro can be nested. +@endDefmac + +@Defmac {RE, [@Var{nnn}]} +Move the left margin back to level @var{nnn}; if no argument is given, +it moves one level back. The first level (i.e., no call to @code{RS} +yet) has number@w{ }1, and each call to @code{RS} increases the level +by@w{ }1. +@endDefmac @maindex SH @maindex SS @@ -2051,121 +2241,101 @@ @c --------------------------------------------------------------------- -@node Man font macros, Miscellaneous man stuff, Man usage, man +@node Man font macros, Miscellaneous man macros, Man usage, man @subsection Macros to set fonts @cindex fonts in manual pages @cindex @code{man}, how to set fonts -The standard font is Roman; the default text size is 10@w{ }point. +The standard font is roman; the default text size is 10@w{ }point. -@maindex SM -@Defmac{SM, [@var{text}]} -Causes the text on the same line or the text on the next line to appear -in a font that is one point size smaller than the default font. -@end_Defmac +@Defmac {SM, [@Var{text}]} +Set the text on the same line or the text on the next line in a font +that is one point size smaller than the default font. +@endDefmac -@maindex SB @cindex boldface, in manual pages -@Defmac{SB, [@var{text}]} -Causes the text on the same line or the text on the next line to appear -in boldface font, one point size smaller than the default font. -@end_Defmac - -@maindex BI -@Defmac{BI, text} -Causes text on the same line to appear alternately in bold face and -italic. The text must be on the same line as the macro call. Thus, +@Defmac {SB, [@Var{text}]} +Set the text on the same line or the text on the next line in boldface +font, one point size smaller than the default font. +@endDefmac -@example +@Defmac {BI, text} +Set its arguments alternately in bold face and italic. Thus, + +@Example .BI this "word and" that -@end example +@endExample @noindent -would cause ``this'' and ``that'' to appear in bold face, while ``word -and'' appears in italics. -@end_Defmac - -@maindex IB -@Defmac{IB, text} -Causes text to appear alternately in italic and bold face. The text -must be on the same line as the macro call. -@end_Defmac - -@maindex RI -@Defmac{RI, text} -Causes text on the same line to appear alternately in roman and italic. -The text must be on the same line as the macro call. -@end_Defmac - -@maindex IR -@Defmac{IR, text} -Causes text on the same line to appear alternately in italic and roman. -The text must be on the same line as the macro call. -@end_Defmac - -@maindex BR -@Defmac{BR, text} -Causes text on the same line to appear alternately in bold face and -roman. The text must be on the same line as the macro call. -@end_Defmac - -@maindex RB -@Defmac{RB, text} -Causes text on the same line to appear alternately in roman and bold -face. The text must be on the same line as the macro call. -@end_Defmac - -@maindex R -@Defmac{R, [@var{text}]} -Causes @var{text} to appear in roman font. If no text is present on the -line where the macro is called, then the text of the next line appears -in roman. This is the default font to which text is returned at the end -of processing of the other macros. -@end_Defmac - -@maindex B -@Defmac{B, [@var{text}]} -Causes @var{text} to appear in bold face. If no text is present on the -line where the macro is called, then the text of the next line appears -in bold face. -@end_Defmac +would set ``this'' and ``that'' in bold face, and ``word and'' in +italics. +@endDefmac + +@Defmac {IB, text} +Set its arguments alternately in italic and bold face. +@endDefmac + +@Defmac {RI, text} +Set its arguments alternately in roman and italic. +@endDefmac + +@Defmac {IR, text} +Set its arguments alternately in italic and roman. +@endDefmac + +@Defmac {BR, text} +Set its arguments alternately in bold face and roman. +@endDefmac + +@Defmac {RB, text} +Set its arguments alternately in roman and bold face. +@endDefmac + +@Defmac {R, [@Var{text}]} +Set @var{text} in roman font. If no text is present on the line where +the macro is called, then the text of the next line appears in roman. +This is the default font to which text is returned at the end of +processing of the other macros. +@endDefmac + +@Defmac {B, [@Var{text}]} +Set @var{text} in bold face. If no text is present on the line where +the macro is called, then the text of the next line appears in bold +face. +@endDefmac -@maindex I @cindex italic, in manual pages -@Defmac{I, [@var{text}]} -Causes @var{text} to appear in italic. If no text is present on the -line where the macro is called, then the text of the next line appears -in italic. -@end_Defmac +@Defmac {I, [@Var{text}]} +Set @var{text} in italic. If no text is present on the line where the +macro is called, then the text of the next line appears in italic. +@endDefmac @c --------------------------------------------------------------------- -@node Miscellaneous man stuff, , Man font macros, man -@subsection Miscellaneous +@node Miscellaneous man macros, Predefined man strings, Man font macros, man +@subsection Miscellaneous macros @pindex grohtml @cindex @file{man}, default indentation @cindex default indentation, @file{man} The default indentation is 7.2@dmn{n} for all output devices except for -@code{grohtml} which uses 1.2@dmn{i} instead. +@code{grohtml} which ignores indentation. -@maindex DT @maindex TH @cindex tab stops, in manual pages -@Defmac{DT} -Sets tabs every 0.5@w{ }inches. Since this macro is always called +@Defmac {DT} +Set tabs every 0.5@w{ }inches. Since this macro is always called during a @code{TH} request, it makes sense to call it only if the tab positions have been changed. -@end_Defmac +@endDefmac -@maindex PD @cindex empty space before a paragraph, in manual pages -@Defmac{PD, [@var{nnn}]} -Adjusts the empty space before a new paragraph (resp.@: section). The -optional argument gives the amount of space (default units are +@Defmac {PD, [@Var{nnn}]} +Adjust the empty space before a new paragraph (or section). The +optional argument gives the amount of space (default unit is @samp{v}); without parameter, the value is reset to its default value (1@w{ }line for tty devices, 0.4@dmn{v}@w{ }otherwise). -@end_Defmac +@endDefmac @maindex SH @maindex SS @@ -2175,35 +2345,40 @@ @maindex P @maindex IP @maindex HP -This affects the macros @code{SH}, @code{SS}, @code{TP}, @code{LP} -(resp.@: @code{PP} and @code{P}), @code{IP}, and @code{HP}. +This affects the macros @code{SH}, @code{SS}, @code{TP}, @code{LP} (as +well as @code{PP} and @code{P}), @code{IP}, and @code{HP}. + +@c --------------------------------------------------------------------- + +@node Predefined man strings, Preprocessors in man pages, Miscellaneous man macros, man +@subsection Predefined strings The following strings are defined: -@maindex \*S -@Defmac{\\*S} +@Defstr {*S} Switch back to the default font size. -@end_Defmac +@endDefstr -@maindex \*R -@Defmac{\\*R} +@Defstr {*R} The `registered' sign. -@end_Defmac +@endDefstr -@maindex \*(Tm -@Defmac{\\*(Tm} +@Defstr {Tm} The `trademark' sign. -@end_Defmac +@endDefstr -@maindex \*(lq -@maindex \*(rq @glindex lq @glindex rq -@Defmac{\\*(lq} -@Defmacx{\\*(rq} -Left and right quote. -This is equal to @code{\(lq} and @code{\(rq}, respectively. -@end_Defmac +@Defstr {lq} +@Defstrx {rq} +Left and right quote. This is equal to @code{\(lq} and @code{\(rq}, +respectively. +@endDefstr + +@c --------------------------------------------------------------------- + +@node Preprocessors in man pages, , Predefined man strings, man +@subsection Preprocessors in @file{man} pages @cindex preprocessor, calling convention @cindex calling convention of preprocessors @@ -2211,14 +2386,15 @@ become common usage to make the first line of the man page look like this: -@example +@Example .\" @var{word} -@end example +@endExample @pindex geqn@r{, invocation in manual pages} @pindex grefer@r{, invocation in manual pages} @pindex gtbl@r{, invocation in manual pages} @pindex man@r{, invocation of preprocessors} +@noindent Note the single space character after the double quote. @var{word} consists of letters for the needed preprocessors: @samp{e} for @code{geqn}, @samp{r} for @code{grefer}, @samp{t} for @code{gtbl}. @@ -2266,69 +2442,83 @@ @c ===================================================================== @c ===================================================================== -@node Programming Tutorial, Preprocessors, Macro Packages, Top -@chapter Programming Tutorial -@cindex programming tutorial -@cindex tutorial for programming +@node gtroff Reference, Preprocessors, Macro Packages, Top +@chapter @code{gtroff} Reference +@cindex reference, @code{gtroff} +@cindex @code{gtroff} reference This chapter covers @strong{all} of the facilities of @code{gtroff}. Users of macro packages may skip it if not interested in details. @menu -* Text:: -* Input Conventions:: -* Measurements:: -* Expressions:: -* Identifiers:: -* Embedded Commands:: -* Registers:: -* Manipulating Filling and Adjusting:: -* Manipulating Hyphenation:: -* Manipulating Spacing:: -* Tabs and Fields:: -* Character Translations:: -* Troff and Nroff Mode:: -* Line Layout:: -* Page Layout:: -* Page Control:: -* Fonts:: -* Sizes:: -* Strings:: -* Conditionals and Loops:: -* Writing Macros:: -* Page Motions:: -* Drawing Requests:: -* Traps:: -* Diversions:: -* Environments:: -* I/O:: -* Postprocessor Access:: -* Miscellaneous:: -* Debugging:: -* Implementation Differences:: -* Summary:: +* Text:: +* Input Conventions:: +* Measurements:: +* Expressions:: +* Identifiers:: +* Embedded Commands:: +* Registers:: +* Manipulating Filling and Adjusting:: +* Manipulating Hyphenation:: +* Manipulating Spacing:: +* Tabs and Fields:: +* Character Translations:: +* Troff and Nroff Mode:: +* Line Layout:: +* Page Layout:: +* Page Control:: +* Fonts:: +* Sizes:: +* Strings:: +* Conditionals and Loops:: +* Writing Macros:: +* Page Motions:: +* Drawing Requests:: +* Traps:: +* Diversions:: +* Environments:: +* Suppressing output:: +* I/O:: +* Postprocessor Access:: +* Miscellaneous:: +* Gtroff Internals:: +* Debugging:: +* Implementation Differences:: +* Summary:: @end menu @c ===================================================================== -@node Text, Input Conventions, Programming Tutorial, Programming Tutorial +@node Text, Input Conventions, gtroff Reference, gtroff Reference @section Text @cindex text, @code{gtroff} processing @code{gtroff} input files contain text with control commands interspersed throughout. But, even without control codes, @code{gtroff} -will still do several things with the input text: filling and adjusting, -adding additional space after sentences, hyphenating and inserting -implicit line breaks. +still does several things with the input text: + +@itemize @bullet +@item +filling and adjusting + +@item +adding additional space after sentences + +@item +hyphenating + +@item +inserting implicit line breaks +@end itemize @menu -* Filling and Adjusting:: -* Hyphenation:: -* Sentences:: -* Tab Stops:: -* Implicit Line Breaks:: +* Filling and Adjusting:: +* Hyphenation:: +* Sentences:: +* Tab Stops:: +* Implicit Line Breaks:: @end menu @c --------------------------------------------------------------------- @@ -2338,7 +2528,7 @@ @cindex filling @cindex adjusting -When @code{gtroff} reads in text it collects words from input and fits +When @code{gtroff} reads text, it collects words from the input and fits as many of them together on one output line as it can. This is known as @dfn{filling}. @@ -2346,11 +2536,11 @@ @cindex spaces, leading and trailing @cindex extra spaces @cindex trailing spaces -Once @code{gtroff} has a @dfn{filled} line it will try to @dfn{adjust} -it. This means it will widen the spacing between words until the text +Once @code{gtroff} has a @dfn{filled} line, it tries to @dfn{adjust} +it. This means it widens the spacing between words until the text reaches the right margin (in the default adjustment mode). Extra spaces between words are preserved, but spaces at the end of lines are ignored. -Spaces at the front of a line will cause a @dfn{break} (breaks will be +Spaces at the front of a line cause a @dfn{break} (breaks are explained in @ref{Implicit Line Breaks}) @xref{Manipulating Filling and Adjusting}. @@ -2362,14 +2552,14 @@ @cindex hyphenation Since the odds are not great for finding a set of words, for every -output line, which will fit nicely on a line without inserting excessive -amounts of space between words, @code{gtroff} will hyphenate words so -that lines can be justified without there being too much space between +output line, which fit nicely on a line without inserting excessive +amounts of space between words, @code{gtroff} hyphenates words so +that it can justify lines without inserting too much space between words. It uses an internal hyphenation algorithm (a simplified version of the algorithm used within @TeX{}) to indicate which words can be -hyphenated and how to do so. When a word is hyphenated the first part -of the word will be added to the current filled line being output (with -an attached hyphen), and the other portion will be added to the next +hyphenated and how to do so. When a word is hyphenated, the first part +of the word is added to the current filled line being output (with +an attached hyphen), and the other portion is added to the next line to be filled. @xref{Manipulating Hyphenation}. @@ -2392,11 +2582,11 @@ @cindex space between sentences @cindex french-spacing @code{gtroff} does this by flagging certain characters (normally -@samp{!}, @samp{?} and @samp{.}) as @dfn{end of sentence} characters. +@samp{!}, @samp{?}, and @samp{.}) as @dfn{end of sentence} characters. When @code{gtroff} encounters one of these characters at the end of a -line it will append two @dfn{sentence spaces} in the formatted output. -(This justifies one of the conventions mentioned in @ref{Input -Conventions}.) +line, it appends a normal space followed by a @dfn{sentence space} in +the formatted output. (This justifies one of the conventions mentioned +in @ref{Input Conventions}.) @cindex transparent characters @cindex character, transparent @@ -2407,13 +2597,13 @@ @cindex ) @cindex ] @cindex * -In addition, the following characters resp.@: glyphs are treated +In addition, the following characters or glyphs are treated transparently while handling end of sentence characters: @samp{"}, @samp{'}, @samp{)}, @samp{]}, @samp{*}, @code{dg}, and @code{rq}. See the @code{cflags} request in @ref{Using Symbols}, for more details. -@findex \& +@esindex \& To prevent the insertion of extra space after an end of sentence character (at the end of a line), append @code{\&}. @@ -2428,15 +2618,15 @@ @cindex @acronym{EBCDIC} encoding @code{gtroff} translates @dfn{tabulator characters}, also called -@dfn{tabs} (normally code point @acronym{ASCII} @code{0x09} resp.@: +@dfn{tabs} (normally code point @acronym{ASCII} @code{0x09} or @acronym{EBCDIC} @code{0x05}), in the input into movements to the next tabulator stop. These tab stops are initially located every half inch -across the page. Using this, simple tables can easily be made. +across the page. Using this, simple tables can be made easily. However, it can often be deceptive as the appearance (and width) of the text on a terminal and the results from @code{gtroff} can vary greatly. Also, a possible sticking point is that lines beginning with tab -characters will still be filled, again producing unexpected results. +characters are still filled, again producing unexpected results. For example, the following input @multitable {12345678} {12345678} {12345678} {12345678} @@ -2447,7 +2637,7 @@ @end multitable @noindent -will produce +produces @multitable {12345678} {12345678} {12345678} {12345678} {12345678} {12345678} {12345678} @item @@ -2467,33 +2657,38 @@ @cindex line break An important concept in @code{gtroff} is the @dfn{break}. When a break -occurs, @code{gtroff} will output the partially filled line -(unjustified), and resume collecting and filling text on the next output +occurs, @code{gtroff} outputs the partially filled line +(unjustified), and resumes collecting and filling text on the next output line. @cindex blank line @cindex empty line @cindex line, blank -There are several ways to cause a break in @code{gtroff}. A blank line -will not only cause a break, but it will also cause a one line vertical -space (effectively a blank line) to be output. +@cindex blank line macro +@rqindex blm +There are several ways to cause a break in @code{gtroff}. A blank +line not only causes a break, but it also outputs a one line vertical +space (effectively a blank line). Note that this behaviour can be +modified with the blank line macro request @code{blm}. + +@c XXX xref for blm @cindex fill mode @cindex mode, fill -A line which begins with a space will cause a break and the space will -be output at the beginning of the next line. Note that this space isn't +A line that begins with a space causes a break and the space is +output at the beginning of the next line. Note that this space isn't adjusted, even in fill mode. -The end of file will also cause a break -- otherwise the last line of +The end of file also causes a break -- otherwise the last line of the document may vanish! -Certain requests also cause breaks, implicitly or explicitly. This will -be discussed in @ref{Manipulating Filling and Adjusting}. +Certain requests also cause breaks, implicitly or explicitly. This is +discussed in @ref{Manipulating Filling and Adjusting}. @c ===================================================================== -@node Input Conventions, Measurements, Text, Programming Tutorial +@node Input Conventions, Measurements, Text, gtroff Reference @section Input Conventions @cindex input conventions @cindex conventions for input @@ -2505,7 +2700,7 @@ @itemize @bullet @item -Break lines after punctuation, particularly at the end of a sentence, +Break lines after punctuation, particularly at the end of a sentence and in other logical places. Keep separate phrases on lines by themselves, as entire phrases are often added or deleted when editing. @@ -2515,13 +2710,13 @@ @item Do not try to do any formatting in a @acronym{WYSIWYG} manner (i.e., -don't try and use spaces to get proper indentation). +don't try using spaces to get proper indentation). @end itemize @c ===================================================================== -@node Measurements, Expressions, Input Conventions, Programming Tutorial +@node Measurements, Expressions, Input Conventions, gtroff Reference @section Measurements @cindex measurements @@ -2531,7 +2726,7 @@ @cindex measurement units @cindex @code{u} unit @cindex unit, @code{u} -@code{gtroff} (like any other programs) requires numeric parameters to +@code{gtroff} (like many other programs) requires numeric parameters to specify various measurements. Most numeric parameters@footnote{those that specify vertical or horizontal motion or a type size} may have a @dfn{measurement unit} attached. These units are specified as a single @@ -2540,9 +2735,9 @@ @dfn{basic unit}. So, whenever a different measurement unit is specified @code{gtroff} converts this into its @dfn{basic units}. This basic unit, represented by a @samp{u}, is a device dependent measurement -which is quite small, ranging from 1/75th to 1/72000th of an inch. The -values may be given as fractional numbers; however, fractional basic -units are always rounded to integers. +which is quite small, ranging from 1/75@dmn{th} to 1/72000@dmn{th} of an +inch. The values may be given as fractional numbers; however, +fractional basic units are always rounded to integers. Some of the measurement units are completely independent of any of the current settings (e.g.@: type size) of @code{gtroff}. @@ -2553,7 +2748,8 @@ @cindex @code{i} unit @cindex unit, @code{i} Inches. An antiquated measurement unit still in use in certain -backwards countries. One inch is equal to@w{ }2.54@dmn{cm}. +backwards countries with incredibly low-cost computer equipment. One +inch is equal to@w{ }2.54@dmn{cm}. @item c @cindex centimeter @@ -2584,7 +2780,7 @@ @xref{Fractional Type Sizes}, for a discussion of these units. @end table -The other measurements understood by @code{gtroff} are dependent on +The other measurements understood by @code{gtroff} depend on settings currently in effect in @code{gtroff}. These are very useful for specifying measurements which should look proper with any size of text. @@ -2619,7 +2815,7 @@ @end table @menu -* Default Units:: +* Default Units:: @end menu @c --------------------------------------------------------------------- @@ -2634,34 +2830,35 @@ length request expects em units. Here are several attempts to get a line length of 3.5@w{ }inches and their results: -@example +@Example 3.5i @result{} 3.5i 7/2 @result{} 0i 7/2i @result{} 0i 7i/2 @result{} 0.1i 7i/2u @result{} 3.5i -@end example +@endExample @noindent -Everything will be converted to basic units first. In the above example -it is assumed that 1@dmn{i} equals@w{ }240@dmn{u}, and 1@dmn{m} -equals@w{ }10@dmn{p} (thus 1@dmn{m} equals@w{ }33@dmn{u}). The value -7i/2 will be first handled as 7i/2m, then converted to 1680u/66u which -is 25@dmn{u}, and this is approximately 0.1@dmn{i}. +Everything is converted to basic units first. In the above example it +is assumed that 1@dmn{i} equals@w{ }240@dmn{u}, and 1@dmn{m} equals@w{ +}10@dmn{p} (thus 1@dmn{m} equals@w{ }33@dmn{u}). The value 7@dmn{i}/2 +is first handled as 7@dmn{i}/2@dmn{m}, then converted to +1680@dmn{u}/66@dmn{u} which is 25@dmn{u}, and this is approximately +0.1@dmn{i}. @cindex measurements, specifying safely -As a conclusion, the safest way to specify measurements is to always +Thus, the safest way to specify measurements is to always attach a scaling indicator. If you want to multiply or divide by a certain scalar value, use @samp{u} as the unit for that value. @c ===================================================================== -@node Expressions, Identifiers, Measurements, Programming Tutorial +@node Expressions, Identifiers, Measurements, gtroff Reference @section Expressions @cindex expressions -@code{gtroff} has most of operators common to other languages: +@code{gtroff} has most arithmetic operators common to other languages: @c XXX more details; examples @@ -2707,8 +2904,10 @@ @opindex - @opindex + @opindex ! -@findex if@r{, and the @samp{!} operator} -@findex while@r{, and the @samp{!} operator} +@rqindex if +@rqindex while +@cindex @code{if}, and the @samp{!} operator +@cindex @code{while}, and the @samp{!} operator Unary operators: @samp{-} (negating, i.e.@: changing the sign), @samp{+} (just for completeness; does nothing in expressions), @samp{!} (logical not; this works only within @code{if} and @code{while} requests). See @@ -2740,7 +2939,7 @@ Parentheses may be used as in any other language. However, in @code{gtroff} they are necessary to ensure order of evaluation. @code{gtroff} has no operator precedence; expressions are evaluated left -to right. This means that @samp{3+5*4} is evaluated as if it were +to right. This means that @code{gtroff} evaluates @samp{3+5*4} as if it were parenthesized like @samp{(3+5)*4}, not as @samp{3+(5*4)}, as might be expected. @@ -2759,7 +2958,7 @@ requests and escapes: @code{bp}, @code{in}, @code{ll}, @code{lt}, @code{nm}, @code{nr}, @code{pl}, @code{pn}, @code{po}, @code{ps}, @code{rt}, @code{ti}, @code{\R}, and @code{\s}. Here the plus and minus -signs indicate increments resp.@: decrements. +signs indicate increments and decrements. @c XXX add more xref @xref{Setting Registers}. @@ -2774,7 +2973,7 @@ @c ===================================================================== -@node Identifiers, Embedded Commands, Expressions, Programming Tutorial +@node Identifiers, Embedded Commands, Expressions, gtroff Reference @section Identifiers @cindex identifiers @@ -2788,13 +2987,13 @@ @cindex whitespace characters @cindex newline character @cindex character, whitespace -Whitespace characters (space, tabs, and newlines). +Whitespace characters (spaces, tabs, and newlines). @item @cindex character, backspace @cindex backspace character @cindex @acronym{EBCDIC} encoding of backspace -Backspace (@acronym{ASCII}@w{ }@code{0x08} resp.@: @acronym{EBCDIC}@w{ +Backspace (@acronym{ASCII}@w{ }@code{0x08} or @acronym{EBCDIC}@w{ }@code{0x16}) and character code @code{0x01}. @item @@ -2802,7 +3001,7 @@ @cindex input characters, invalid @cindex characters, invalid input @cindex unicode -The following input characters are invalid and will be ignored if +The following input characters are invalid and are ignored if @code{groff} runs on a machine based on @acronym{ASCII}, causing a warning message of type @samp{input} (see @ref{Debugging}, for more details): @code{0x00}, @code{0x0B}, @code{0x0D}-@code{0x1F}, @@ -2815,46 +3014,46 @@ Currently, some of these reserved codepoints are used internally, thus making it non-trivial to extend @code{gtroff} to cover Unicode or other -character sets resp.@: encodings which use characters of these ranges. +character sets and encodings which use characters of these ranges. -Note that invalid characters will be removed before parsing; an +Note that invalid characters are removed before parsing; an identifier @code{foo}, followed by an invalid character, followed by -@code{bar} will be treated as @code{foobar}. +@code{bar} is treated as @code{foobar}. @end itemize For example, any of the following is valid. -@example +@Example br PP (l end-list @@_ -@end example +@endExample -@findex ] +@rqindex ] +@noindent Note that identifiers longer than two characters with a closing bracket (@samp{]}) in its name can't be accessed with escape sequences which -expect an identifier as a parameter. For example, @samp{\[foo]]} will -access the glyph @samp{foo}, followed by @samp{]}, whereas +expect an identifier as a parameter. For example, @samp{\[foo]]} +accesses the glyph @samp{foo}, followed by @samp{]}, whereas @samp{\C'foo]'} really asks for glyph @samp{foo]}. @c XXX xref -@Deffn{Escape, \\A, ident} -Whether an identifier @var{ident} is valid in @code{gtroff} can be -tested with the @code{\A} escape. It expands to the character@w{ }1 -or@w{ }0 according to whether its argument (usually delimited by quotes) -is or is not acceptable as the name of a string, macro, diversion, -number register, environment, or font. It will return@w{ }0 if no -argument is given. This is useful for looking up user input in some -sort of associative table. +@Defesc {\\A, ', ident, '} +Test whether an identifier @var{ident} is valid in @code{gtroff}. It +expands to the character@w{ }1 or@w{ }0 according to whether its +argument (usually delimited by quotes) is or is not acceptable as the +name of a string, macro, diversion, number register, environment, or +font. It returns@w{ }0 if no argument is given. This is useful for +looking up user input in some sort of associative table. -@example +@Example \A'end-list' @result{} 1 -@end example -@end_Deffn +@endExample +@endDefesc @xref{Escapes}, for details on parameter delimiting characters. @@ -2864,9 +3063,9 @@ @code{gtroff} needs to be told where identifiers end and text begins (and in different ways depending on their length): -@findex ( -@findex [ -@findex ] +@rqindex ( +@rqindex [ +@rqindex ] @itemize @bullet @item Single character. @@ -2884,15 +3083,29 @@ @cindex indentifiers, undefined Unlike many other programming languages, undefined identifiers are silently ignored or expanded to nothing. +When @code{gtroff} finds an undefined identifier, it emits a +warning then: + +@itemize @bullet +@item +If the identifier is a string, macro, or diversion, +@code{gtroff} defines it as empty. + +@item +If the identifier is a number register, @code{gtroff} +defines it with a value of@w{ }0. +@end itemize + +@xref{Warnings}. -@c XXX add info about -ww command line option. +@c XXX info about common identifier pool for strings and macros. @xref{Interpolating Registers}, and @ref{Strings}. @c ===================================================================== -@node Embedded Commands, Registers, Identifiers, Programming Tutorial +@node Embedded Commands, Registers, Identifiers, gtroff Reference @section Embedded Commands @cindex embedded commands @cindex commands, embedded @@ -2902,7 +3115,7 @@ @code{gtroff} allows commands to be embedded into the text, in two ways. The first is a @dfn{request} which takes up an entire line, and does -some large scale operation (e.g.@: break lines, start new pages). +some large-scale operation (e.g.@: break lines, start new pages). The other is an @dfn{escape} which can be embedded anywhere in the text, or even as an argument to a request. @@ -2911,9 +3124,9 @@ print a symbol, etc. @menu -* Requests:: -* Macros:: -* Escapes:: +* Requests:: +* Macros:: +* Escapes:: @end menu @c --------------------------------------------------------------------- @@ -2927,30 +3140,74 @@ @cindex no-break control character @cindex character, no-break control @cindex control character, no-break -@findex ' -@findex . +@rqindex ' +@rqindex . A request line begins with a control character, which is either a single quote (@samp{'}, the @dfn{no-break control character}) or a period (@samp{.}, the normal @dfn{control character}). These can be changed; see @ref{Character Translations}, for details. After this there may be optional tabs or spaces followed by an identifier which is the name of the request. This may be followed by any number of space-separated -arguments. +arguments (@emph{no} tabs here). + +@cindex structuring source code of documents or macro packages +@cindex documents, structuring the source code +@cindex macro packages, strucuring the source code +Since a control character followed by whitespace only is ignored, it +is common practice to use this feature for structuring the source code +of documents or macro packages. + +@Example +.de foo +. tm This is foo. +.. +. +. +.de bar +. tm This is bar. +.. +@endExample + +@cindex blank line +@cindex blank line macro +@rqindex blm +Another possibility is to use the blank line macro request @code{blm} +by assigning an empty macro to it. + +@Example +.de do-nothing +.. +.blm do-nothing \" activate blank line macro + +.de foo +. tm This is foo. +.. + + +.de bar +. tm This is bar. +.. + +.blm \" deactivate blank line macro +@endExample + +@c XXX xref to blm @cindex zero width space character @cindex character, zero width space @cindex space character, zero width -@findex \&@r{, escaping control characters} +@esindex \& +@cindex @code{\&}, escaping control characters To begin a line with a control character without it being interpreted, precede it with @code{\&}. This represents a zero width space, which -means it will not affect the output. +means it does not affect the output. In most cases the period is used as a control character. Several -requests will cause a break implicitly; using the single quote control -character will prevent this. +requests cause a break implicitly; using the single quote control +character prevents this. @menu -* Request Arguments:: +* Request Arguments:: @end menu @node Request Arguments, , Requests, Requests @@ -2959,24 +3216,24 @@ @cindex arguments to requests Arguments to requests (and macros) are processed much like the shell: -The line is split into arguments according to spaces. An argument which -is intended to contain spaces can either be enclosed in quotes (single -or double), or have the spaces @dfn{escaped} with backslashes. +The line is split into arguments according to spaces. An argument +which is intended to contain spaces can either be enclosed in double +quotes, or have the spaces @dfn{escaped} with backslashes. Here are a few examples: -@example +@Example .uh The Mouse Problem .uh "The Mouse Problem" .uh The\ Mouse\ Problem -@end example +@endExample -@findex \~ -@findex \@key{SP} +@esindex \~ +@esindex \@key{SP} @noindent The first line is the @code{uh} macro being called with 3 arguments, @samp{The}, @samp{Mouse}, and @samp{Problem}. The latter two have the -same effect or calling the @code{uh} macro with one argument, @samp{The +same effect of calling the @code{uh} macro with one argument, @samp{The Mouse Problem}.@footnote{The last solution, i.e., using escaped spaces, is ``classical'' in the sense that it can be found in most @code{troff} documents. Nevertheless, it is not optimal in all situations, since @@ -2984,8 +3241,22 @@ can't stretch. @code{gtroff} provides a different command @code{\~} to insert a stretchable, non-breaking space.} -@findex ds -Note, however, that the @code{ds} request works differently. +@cindex @code{"}, as a macro argument +@cindex double quote, as a macro argument +A double quote which isn't preceded by a space doesn't start a macro +argument. If not closing a string, it is printed literally. + +For example, + +@Example +.xxx a" "b c" "de"fg" +@endExample + +@noindent +has the arguments @samp{a"}, @w{@samp{b c}}, @samp{de}, and @samp{fg"}. + +@rqindex ds +Duoble quotes in the @code{ds} request are handled differently. @xref{Strings}, for more details. @c --------------------------------------------------------------------- @@ -3011,9 +3282,9 @@ indicates the function to be performed. The escape character can be changed; see @ref{Character Translations}. -@findex ( -@findex [ -@findex ] +@rqindex ( +@rqindex [ +@rqindex ] Escape sequences which require an identifier as a parameter accept three possible syntax forms. @@ -3034,13 +3305,13 @@ @noindent Examples: -@example +@Example \fB \n(XX \*[TeX] -@end example +@endExample -@findex ' +@rqindex ' @cindex argument delimiting characters @cindex characters, argument delimiting @cindex delimiting characters for arguments @@ -3050,19 +3321,19 @@ sequences). The enclosed text is then processed according to what that escape expects. Example: -@example +@Example \l'1.5i\(bu' -@end example +@endExample -@findex \o -@findex \b -@findex \X +@esindex \o +@esindex \b +@esindex \X Note that the quote character can be replaced with any other character which does not occur in the argument (even a newline or a space character) in the following escapes: @code{\o}, @code{\b}, and @code{\X}. This makes e.g. -@example +@Example A caf \o e\' @@ -3070,39 +3341,39 @@ in Paris @result{} A caf@'e in Paris -@end example +@endExample @noindent possible, but it is better not to use this feature to avoid confusion. -@findex \% -@findex \@key{SP} -@findex \| -@findex \^ -@findex \@{ -@findex \@} -@findex \' -@findex \` -@findex \- -@findex \_ -@findex \! -@findex \? -@findex \@@ -@findex \) -@findex \/ -@findex \, -@findex \& -@findex \~ -@findex \0 -@findex \a -@findex \c -@findex \d -@findex \e -@findex \E -@findex \p -@findex \r -@findex \t -@findex \u +@esindex \% +@esindex \@key{SP} +@esindex \| +@esindex \^ +@esindex \@{ +@esindex \@} +@esindex \' +@esindex \` +@esindex \- +@esindex \_ +@esindex \! +@esindex \? +@esindex \@@ +@esindex \) +@esindex \/ +@esindex \, +@esindex \& +@esindex \~ +@esindex \0 +@esindex \a +@esindex \c +@esindex \d +@esindex \e +@esindex \E +@esindex \p +@esindex \r +@esindex \t +@esindex \u The following escapes sequences (which are handled similarly to characters since they don't take a parameter) are also allowed as delimiters: @code{\%}, @w{@samp{\ }}, @code{\|}, @code{\^}, @code{\@{}, @@ -3112,24 +3383,24 @@ @code{\E}, @code{\p}, @code{\r}, @code{\t}, and @code{\u}. Again, don't use these if possible. -@findex \A -@findex \Z -@findex \C -@findex \w +@esindex \A +@esindex \Z +@esindex \C +@esindex \w No newline characters as delimiters are allowed in the following escapes: @code{\A}, @code{\Z}, @code{\C}, and @code{\w}. -@findex \D -@findex \h -@findex \H -@findex \l -@findex \L -@findex \N -@findex \R -@findex \s -@findex \S -@findex \v -@findex \x +@esindex \D +@esindex \h +@esindex \H +@esindex \l +@esindex \L +@esindex \N +@esindex \R +@esindex \s +@esindex \S +@esindex \v +@esindex \x Finally, the escapes @code{\D}, @code{\h}, @code{\H}, @code{\l}, @code{\L}, @code{\N}, @code{\R}, @code{\s}, @code{\S}, @code{\v}, and @code{\x} can't use the following characters as delimiters: @@ -3167,28 +3438,28 @@ The space, tab, and newline characters. @item -@findex \% -@findex \@{ -@findex \@} -@findex \' -@findex \` -@findex \- -@findex \_ -@findex \! -@findex \@@ -@findex \/ -@findex \c -@findex \e -@findex \p +@esindex \% +@esindex \@{ +@esindex \@} +@esindex \' +@esindex \` +@esindex \- +@esindex \_ +@esindex \! +@esindex \@@ +@esindex \/ +@esindex \c +@esindex \e +@esindex \p All escape sequences except @code{\%}, @code{\@{}, @code{\@}}, @code{\'}, @code{\`}, @code{\-}, @code{\_}, @code{\!}, @code{\@@}, @code{\/}, @code{\c}, @code{\e}, and @code{\p}. @end itemize -@findex \\ -@findex \e -@findex \E -To have a backslash (resp.@: the current escape character) appear in the +@esindex \\ +@esindex \e +@esindex \E +To have a backslash (actually, the current escape character) appear in the output several escapes are defined: @code{\\}, @code{\e} or @code{\E}. These are very similar, and only differ with respect to being used in macros or diversions. @xref{Copy-in Mode}, and @ref{Diversions}, for @@ -3199,7 +3470,7 @@ @xref{Identifiers}, and @ref{Character Translations}. @menu -* Comments:: +* Comments:: @end menu @node Comments, , Escapes, Escapes @@ -3210,17 +3481,18 @@ hopefully future @code{gtroff} hackers will believe it @code{:-)}} common forms of escapes is the comment. -@Deffn{Escape, \\"} +@Defesc {\\", , , } Start a comment. Everything to the end of the input line is ignored. This may sound simple, but it can be tricky to keep the comments from interfering with the appearance of the final output. -@findex ds -If the escape is to the right of some text or a request, that portion of -the line will be ignored, but the space leading up to it will be noticed -by @code{gtroff}. This only affects the @code{.ds} request. -@c XXX (any others?) +@rqindex ds +@rqindex as +If the escape is to the right of some text or a request, that portion +of the line is ignored, but the space leading up to it is noticed by +@code{gtroff}. This only affects the @code{.ds} and @code{.as} +request. @cindex tabs before comments @cindex comments, lining up with tabs @@ -3230,69 +3502,95 @@ @cindex undefined request @cindex request, undefined -A comment on a line by itself will be treated as a blank line, because +A comment on a line by itself is treated as a blank line, because after eliminating the comment, that is all that remains: -@example +@Example Test \" comment Test -@end example +@endExample @noindent -will produce +produces -@example +@Example Test Test -@end example +@endExample -As a consequence, it is common to start the line with @code{.\"} which -will cause the line to be treated as an undefined request and thus -ignored completely. +To avoid this, it is common to start the line with @code{.\"} which +causes the line to be treated as an undefined request and thus ignored +completely. -@findex ' +@rqindex ' Another commenting scheme seen sometimes is three consecutive single quotes (@code{'''}) at the beginning of a line. This works, but -@code{gtroff} will give a warning about an undefined macro (namely +@code{gtroff} gives a warning about an undefined macro (namely @code{''}), which is harmless, but irritating. -@end_Deffn +@endDefesc -@Deffn{Escape, \\#} -To avoid all this, @code{gtroff} has a new comment mechanism using -the @code{\#} escape. This escape works the same as @code{\"} except -that the newline is also ignored: +@Defesc {\\#, , , } +To avoid all this, @code{gtroff} has a new comment mechanism using the +@code{\#} escape. This escape works the same as @code{\"} except that +the newline is also ignored: -@example +@Example Test \# comment Test -@end example +@endExample @noindent -will produce +produces -@example +@Example Test Test -@end example +@endExample @noindent as expected. -@end_Deffn +@endDefesc + +@Defreq {ig, yy} +Ignore all input until @code{gtroff} encounters the macro named +@code{.}@var{yy} on a line by itself (or @code{..} if @var{yy} is not +specified). This is useful for commenting out large blocks of text: + +@Example +text text text... +.ig +This is part of a large block +of text that has been +temporarily(?) commented out. + +We can restore it simply by removing +the .ig request and the ".." at the +end of the block. +.. +More text text text... +@endExample + +@noindent +produces -@findex ig -For commenting away large blocks of text, the @code{ig} request may be -useful. +@Example +text text text@dots{} More text text text@dots{} +@endExample -@c XXX definition of .ig +@noindent +Note that the commented-out block of text does not +cause a break. -@xref{Strings}. +The input is read in copy-mode; auto-incremented registers @emph{are} +affected (@pxref{Auto-increment}). +@endDefreq @c ===================================================================== -@node Registers, Manipulating Filling and Adjusting, Embedded Commands, Programming Tutorial +@node Registers, Manipulating Filling and Adjusting, Embedded Commands, gtroff Reference @section Registers @cindex registers @@ -3303,11 +3601,11 @@ @xref{Identifiers}, for details on register identifiers. @menu -* Setting Registers:: -* Interpolating Registers:: -* Auto-increment:: -* Assigning Formats:: -* Built-in Registers:: +* Setting Registers:: +* Interpolating Registers:: +* Auto-increment:: +* Assigning Formats:: +* Built-in Registers:: @end menu @c --------------------------------------------------------------------- @@ -3317,46 +3615,46 @@ @cindex setting registers @cindex registers, setting -Registers are defined resp.@: set via the @code{nr} request or the +Define or set registers using the @code{nr} request or the @code{\R} escape. -@Deffn{Request, nr, ident value} -@Deffnx{Escape, \\R, ident value} -Set number register @var{ident} to @var{value}. If @var{ident} doesn't -exist, it will be created. +@Defreq {nr, ident value} +@Defescx {\\R, ', ident value, '} +Set number register @var{ident} to @var{value}. If @var{ident} +doesn't exist, @code{gtroff} creates it. -The argument to @code{\R} has to be enclosed in quotes usually. +The argument to @code{\R} usually has to be enclosed in quotes. @xref{Escapes}, for details on parameter delimiting characters. -@end_Deffn +@endDefreq For example, the following two lines are equivalent: -@example +@Example .nr a 1 \R'a 1' -@end example +@endExample Both @code{nr} and @code{\R} have two additional special forms to -increment resp.@: decrement a register. +increment or decrement a register. -@Deffn{Request, nr, ident +value} -@Deffnx{Request, nr, ident -value} -@Deffnx{Escape, \\R, ident +value} -@Deffnx{Escape, \\R, ident -value} +@Defreq {nr, ident @t{+}@Var{value}} +@Defreqx {nr, ident @t{-}@Var{value}} +@Defescx {\\R, ', ident @t{+}@Var{value}, '} +@Defescx {\\R, ', ident @t{-}@Var{value}, '} Increment (decrement) register @var{ident} by @var{value}. -@example +@Example .nr a 1 .nr a +1 \na @result{} 2 -@end example +@endExample @cindex negating register values To assign the negated value of a register to another register, some care must be taken to get the desired result: -@example +@Example .nr a 7 .nr b 3 .nr a -\nb @@ -3365,14 +3663,14 @@ .nr a (-\nb) \na @result{} -3 -@end example +@endExample @noindent The surrounding parentheses prevent the interpretation of the minus sign as a decrementing operator. An alternative is to start the assignment with a @samp{0}: -@example +@Example .nr a 7 .nr b -3 .nr a \nb @@ -3381,26 +3679,25 @@ .nr a 0\nb \na @result{} -3 -@end example -@end_Deffn +@endExample +@endDefreq -@Deffn{Request, rr, ident} +@Defreq {rr, ident} Remove number register @var{ident}. If @var{ident} doesn't exist, the request is ignored. -@end_Deffn +@endDefreq -@Deffn{Request, rnn, ident1 ident2} +@Defreq {rnn, ident1 ident2} Rename number register @var{ident1} to @var{ident2}. If either @var{ident1} or @var{ident2} doesn't exist, the request is ignored. -@end_Deffn +@endDefreq -@Deffn{Request, aln, ident1 ident2} -This request creates an alias @var{ident1} for a number register -@var{ident2}. The new name and the old name will be exactly equivalent. -If @var{ident1} is undefined, a warning of type @samp{reg} will be -generated, and the request will be ignored. @xref{Debugging}, for -information about warnings. -@end_Deffn +@Defreq {aln, ident1 ident2} +Create an alias @var{ident1} for a number register @var{ident2}. The +new name and the old name are exactly equivalent. If @var{ident1} is +undefined, a warning of type @samp{reg} is generated, and the request +is ignored. @xref{Debugging}, for information about warnings. +@endDefreq @c --------------------------------------------------------------------- @@ -3411,19 +3708,37 @@ Numeric registers can be accessed via the @code{\n} escape. -@Deffn{Escape, \\n, ident} -@c XXX is the following correct? -Interpolate number register @var{ident}. This means that the value of +@cindex nested assignments +@cindex assignments, nested +@cindex indirect assignments +@cindex assignments, indirect +@Defesc {\\n, , i, } +@Defescx {\\n, @lparen{}, id, } +@Defescx {\\n, @lbrack{}, ident, @rbrack} +Interpolate number register with name @var{ident} (one-character name +@var{i}, two-character name @var{id}). This means that the value of the register is expanded in-place while @code{gtroff} is parsing the -input line. +input line. Nested assignments (also called indirect assignments) are +possible. -@example +@Example .nr a 5 .nr as \na+\na \n(as @result{} 10 -@end example -@end_Deffn +@endExample + +@Example +.nr a1 5 +.nr ab 6 +.ds str b +.ds num 1 +\n[a\n[num]] + @result{} 5 +\n[a\*[str]] + @result{} 6 +@endExample +@endDefesc @c --------------------------------------------------------------------- @@ -3432,31 +3747,40 @@ @cindex auto-increment @cindex increment, automatic -Number registers can also be auto-incremented and auto-decremented. The -increment resp.@: decrement factor can be specified with a third +Number registers can also be auto-incremented and auto-decremented. +The increment or decrement value can be specified with a third argument to the @code{nr} request or @code{\R} escape. -@findex \R -@Deffn{Request, nr, ident value incr} +@esindex \R +@Defreq {nr, ident value incr} Set number register @var{ident} to @var{value}; the increment for -auto-incrementing is set to @var{incr}. Note that the @code{\R} escape -doesn't support this notation. -@end_Deffn - -To activate auto-incrementing, the escape @code{\n} has a special syntax -form. - -@Deffn{Escape, \\n, +ident} -@Deffnx{Escape, \\n, -ident} -Before interpolating, increment resp.@: decrement @var{ident} by the +auto-incrementing is set to @var{incr}. Note that the @code{\R} +escape doesn't support this notation. +@endDefreq + +To activate auto-incrementing, the escape @code{\n} has a special +syntax form. + +@Defesc {\\n, +, i, } +@Defescx {\\n, -, i, } +@Defescx {\\n, @lparen{}+, id, } +@Defescx {\\n, @lparen{}-, id, } +@Defescx {\\n, +@lparen{}, id, } +@Defescx {\\n, -@lparen{}, id, } +@Defescx {\\n, @lbrack{}+, ident, @rbrack{}} +@Defescx {\\n, @lbrack{}-, ident, @rbrack{}} +@Defescx {\\n, +@lbrack{}, ident, @rbrack{}} +@Defescx {\\n, -@lbrack{}, ident, @rbrack{}} +Before interpolating, increment or decrement @var{ident} +(one-character name @var{i}, two-character name @var{id}) by the auto-increment value as specified with the @code{nr} request (or the -@code{\R} escape). If no auto-increment value has been specified, both -syntax forms are identical to @code{\n}. -@end_Deffn +@code{\R} escape). If no auto-increment value has been specified, +these syntax forms are identical to @code{\n}. +@endDefesc For example, -@example +@Example .nr a 0 1 .nr xx 0 5 .nr foo 0 -2 @@ -3465,24 +3789,24 @@ \n-(xx, \n-(xx, \n-(xx, \n-(xx, \n-(xx .br \n+[foo], \n+[foo], \n+[foo], \n+[foo], \n+[foo] -@end example +@endExample @noindent produces -@example +@Example 1, 2, 3, 4, 5 -5, -10, -15, -20, -25 -2, -4, -6, -8, -10 -@end example +@endExample @cindex increment value without changing the register -To change the increment value without changing the value of a register, -the following can be used: +To change the increment value without changing the value of a register +(@var{a} in the example), the following can be used: -@example +@Example .nr a \na 10 -@end example +@endExample @c --------------------------------------------------------------------- @@ -3491,21 +3815,21 @@ @cindex assigning formats @cindex formats, assigning -When a register is used in the text of an input file (as opposed to part -of an expression), it is textually replaced (or interpolated) with a -representation of that number. This output format can be changed to a -variety of formats (numbers, Roman numerals, etc.). This is done using -the @code{af} request. +When a register is used in the text of an input file (as opposed to +part of an expression), it is textually replaced (or interpolated) +with a representation of that number. This output format can be +changed to a variety of formats (numbers, Roman numerals, etc.). This +is done using the @code{af} request. -@Deffn{Request, af, ident format} +@Defreq {af, ident format} Change the output format of a number register. The first argument @var{ident} is the name of the number register to be changed, and the -second argument @var{format} is the output format. The following output -formats are available: +second argument @var{format} is the output format. The following +output formats are available: @table @code @item 1 -Decimal arabic numbers. This is the default format: 1, 2, 3,@w{ +Decimal arabic numbers. This is the default format: 0, 1, 2, 3,@w{ }@enddots{} @item 0@dots{}0 @@ -3518,7 +3842,7 @@ returned by the @code{\g} escape, see below). @item I -@cindex roman numerals +@cindex Roman numerals @cindex numerals, Roman Upper-case Roman numerals: 0, I, II, III, IV,@w{ }@enddots{} @@ -3526,19 +3850,19 @@ Lower-case Roman numerals: 0, i, ii, iii, iv,@w{ }@enddots{} @item A -Upper-case letters: A, B, C, @dots{},@w{ }Z, AA, AB,@w{ }@enddots{} +Upper-case letters: 0, A, B, C, @dots{},@w{ }Z, AA, AB,@w{ }@enddots{} @item a -Lower-case letters: a, b, c, @dots{},@w{ }z, aa, ab,@w{ }@enddots{} +Lower-case letters: 0, a, b, c, @dots{},@w{ }z, aa, ab,@w{ }@enddots{} @end table -Omitting the number register format will cause a warning of type +Omitting the number register format causes a warning of type @samp{missing}. @xref{Debugging}, for more details. Specifying a nonexistent format causes an error. -The following example will produce @samp{10, X, j, 010}: +The following example produces @samp{10, X, j, 010}: -@example +@Example .nr a 10 .af a 1 \" the default format \na, @@ -3548,35 +3872,38 @@ \na, .af a 001 \na -@end example +@endExample -@cindex roman numerals, maximum and minimum +@cindex Roman numerals, maximum and minimum @cindex maximum values of Roman numerals @cindex minimum values of Roman numerals The largest number representable for the @samp{i} and @samp{I} formats -is 39999 (resp.@: -39999); @acronym{UNIX} @code{troff} uses @samp{z} and -@samp{w} to represent 10000 and 5000 in Roman numerals, and so does +is 39999 (or @minus{}39999); @acronym{UNIX} @code{troff} uses @samp{z} +and @samp{w} to represent 10000 and 5000 in Roman numerals, and so does @code{gtroff}. Currently, the correct glyphs of Roman numeral five thousand and Roman numeral ten thousand (Unicode code points @code{U+2182} and @code{U+2181}, respectively) are not available. -If @var{ident} doesn't exist, it will be created. +If @var{ident} doesn't exist, it is created. @cindex read-only register, changing format @cindex changing format, read-only register Changing the output format of a read-only register causes an error. It is necessary to first copy the register's value to a writeable register, then apply the @code{af} request to this other register. -@end_Deffn +@endDefreq @cindex format of register @cindex register, format -@Deffn{Escape, \\g, ident} -Return the current format of the specified register @var{ident}. For -example, @samp{\ga} after the previous example would produce the string -@samp{000}. If the register hasn't been defined yet, nothing is -returned. -@end_Deffn +@Defesc {\\g, , i, } +@Defescx {\\g, @lparen{}, id, } +@Defescx {\\g, @lbrack{}, ident, @rbrack{}} +Return the current format of the specified register @var{ident} +(one-character name @var{i}, two-character name @var{id}). For +example, @samp{\ga} after the previous example would produce the +string @samp{000}. If the register hasn't been defined yet, nothing +is returned. +@endDefesc @c --------------------------------------------------------------------- @@ -3635,25 +3962,25 @@ year. That claim has never been true of either traditional @code{troff} or GNU @code{troff}. Old @code{troff} input that looks like this: -@example +@Example '\" The following line stopped working after 1999 This document was formatted in 19\n(yr. -@end example +@endExample @noindent can be corrected as follows: -@example +@Example This document was formatted in \n[year]. -@end example +@endExample @noindent or, to be portable to older @code{troff} versions, as follows: -@example +@Example .nr y4 1900+\n(yr This document was formatted in \n(y4. -@end example +@endExample @item .c @vindex .c @@ -3667,27 +3994,27 @@ @item ln @vindex ln -@findex nm +@rqindex nm @cindex output line number register @cindex line number, output, register The current @emph{output} line number after a call to the @code{nm} request to activate line numbering. -@c XXX xref nm request +@xref{Miscellaneous}, for more information about line numbering. @item .x @vindex .x @cindex major version number register @cindex version number, major, register The major version number. For example, if the version number is@w{ -}1.03 then @code{.x} will contain@w{ }@samp{1}. +}1.03 then @code{.x} contains@w{ }@samp{1}. @item .y @vindex .y @cindex minor version number register @cindex version number, minor, register The minor version number. For example, if the version number is@w{ -}1.03 then @code{.y} will contain@w{ }@samp{03}. +}1.03 then @code{.y} contains@w{ }@samp{03}. @item .Y @vindex .Y @@ -3721,9 +4048,9 @@ number register @code{.T} is set to@w{ }1, and zero otherwise. @xref{Groff Options}. -@maindex \*(.T +@stindex .T @cindex output device register -Additionally, @code{gtroff} predefines a single (read/write) string +Additionally, @code{gtroff} predefines a single read-write string register @code{.T} which contains the current output device (for example, @samp{latin1} or @samp{ps}). @end table @@ -3731,7 +4058,7 @@ @c ===================================================================== -@node Manipulating Filling and Adjusting, Manipulating Hyphenation, Registers, Programming Tutorial +@node Manipulating Filling and Adjusting, Manipulating Hyphenation, Registers, gtroff Reference @section Manipulating Filling and Adjusting @cindex manipulating filling and adjusting @cindex filling and adjusting, manipulating @@ -3741,70 +4068,72 @@ @cindex break @cindex line break -@findex bp -@findex ce -@findex cf -@findex fi -@findex fl -@findex in -@findex nf -@findex rj -@findex sp -@findex ti -@findex trf +@rqindex bp +@rqindex ce +@rqindex cf +@rqindex fi +@rqindex fl +@rqindex in +@rqindex nf +@rqindex rj +@rqindex sp +@rqindex ti +@rqindex trf Various ways of causing @dfn{breaks} were given in @ref{Implicit Line -Breaks}. The @code{br} request will likewise cause a break. Several -other requests will also cause breaks, but implicitly. These are +Breaks}. The @code{br} request likewise causes a break. Several +other requests also cause breaks, but implicitly. These are @code{bp}, @code{ce}, @code{cf}, @code{fi}, @code{fl}, @code{in}, @code{nf}, @code{rj}, @code{sp}, @code{ti}, and @code{trf}. -@Deffn{Request, br, } -Break the current line, i.e., the input collected so far will be emitted +@Defreq {br, } +Break the current line, i.e., the input collected so far is emitted without adjustment. -If the no-break control character is used, no break will happen: +If the no-break control character is used, @code{gtroff} suppresses +the break: -@example +@Example a 'br b @result{} a b -@end example -@end_Deffn +@endExample +@endDefreq -Initially, @code{gtroff} will fill and adjust text to both margins. +Initially, @code{gtroff} fills and adjusts text to both margins. Filling can be disabled via the @code{nf} request and re-enabled with the @code{fi} request. @cindex fill mode @cindex mode, fill -@vindex .u -@Deffn{Request, fi, } +@Defreq {fi, } +@Defregx {.u} Activate fill mode (which is the default). This request implicitly -enables adjusting; it will also cause a break in the text currently -being filled. The number register @code{.u} is set to@w{ }1. +enables adjusting; it also inserts a break in the text currently being +filled. The read-only number register @code{.u} is set to@w{ }1. The fill mode status is associated with the current environment (@pxref{Environments}). -@end_Deffn +@endDefreq @cindex no-fill mode @cindex mode, no-fill -@Deffn{Request, nf, } +@Defreq {nf, } Activate no-fill mode. Input lines are output as-is, retaining line -breaks. The current line length will be ignored. This command -implicitly disables adjusting; it also causes a break. The number -register @code{.u} will be set to@w{ }0. +breaks and ignoring the current line length. This command implicitly +disables adjusting; it also causes a break. The number register +@code{.u} is set to@w{ }0. The fill mode status is associated with the current environment (@pxref{Environments}). -@end_Deffn +@endDefreq -@Deffn{Request, ad, [@var{mode}]} +@Defreq {ad, [@Var{mode}]} +@Defregx {.j} Set adjusting mode. -Activation and deactivation of adjusting will be implicitly done with -calls to the @code{fi} resp.@: @code{nf} requests. +Activation and deactivation of adjusting is done implicitly with +calls to the @code{fi} or @code{nf} requests. @var{mode} can have one of the following values: @@ -3820,7 +4149,7 @@ @item c @cindex centered text -@findex ce +@rqindex ce Center filled text. This is different to the @code{ce} request which only centers text without filling. @@ -3829,11 +4158,11 @@ Justify to both margins. This is the default used by @code{gtroff}. @end table -With no argument, @code{gtroff} will adjust lines in the same way it did -before adjusting has been deactivated (with a call to @code{na}, for +With no argument, @code{gtroff} adjusts lines in the same way it did +before adjusting was deactivated (with a call to @code{na}, for example). -@example +@Example text .ad r text @@ -3843,48 +4172,49 @@ text .ad \" back to centering text -@end example +@endExample -@vindex .j @cindex current adjustment mode register -The current adjustment mode is available in the number register -@code{.j}; it can be stored and subsequently used to set adjustment. +The current adjustment mode is available in the read-only number +register @code{.j}; it can be stored and subsequently used to set +adjustment. The adjustment mode status is associated with the current environment (@pxref{Environments}). -@end_Deffn +@endDefreq -@Deffn{Request, na, } +@Defreq {na, } Disable adjusting. This request won't change the current adjustment -mode: A call to @code{ad} afterwards will use the previous adjustment +mode: A subsequent call to @code{ad} uses the previous adjustment setting. The adjustment mode status is associated with the current environment (@pxref{Environments}). -@end_Deffn +@endDefreq -@Deffn{Escape, \\p, } +@Defesc {\\p, , , } Adjust the current line and cause a break. -In most cases this will produce very ugly results, since @code{gtroff} +In most cases this produces very ugly results, since @code{gtroff} doesn't have a sophisticated paragraph building algorithm (as @TeX{} -does, for example); instead, @code{gtroff} fills and adjusts a paragraph +have, for example); instead, @code{gtroff} fills and adjusts a paragraph line by line: -@example +@Example This is an uninteresting sentence. This is an uninteresting sentence.\p This is an uninteresting sentence. -@end example +@endExample +@noindent is formatted as -@example +@Example This is an uninteresting sentence. This is an uninteresting sentence. This is an uninteresting sentence. -@end example -@end_Deffn +@endExample +@endDefesc @cindex word space size @cindex size of word space @@ -3892,100 +4222,125 @@ @cindex sentence space size @cindex size of sentence space @cindex space between sentences -@Deffn{Request, ss, word_space_size [@var{sentence_space_size}]} +@Defreq {ss, word_space_size [@Var{sentence_space_size}]} +@Defregx {.ss} +@Defregx {.sss} Change the minimum size of a space between filled words. It takes its -units as one twelfth of the space width parameter for the current font. -Initially both the @var{word_space_size} and @var{sentence_space_size} -are@w{ }12. +units as one twelfth of the space width parameter for the current +font. Initially both the @var{word_space_size} and +@var{sentence_space_size} are@w{ }12. @cindex fill mode @cindex mode, fill -If two arguments are given to the @code{ss} request, the second argument -sets the sentence space size. If the second argument is not given, -sentence space size will be set to @var{word_space_size}. The sentence -space size is used in two circumstances: if the end of a sentence occurs -at the end of a line in fill mode, then both an inter-word space and a -sentence space will be added; if two spaces follow the end of a sentence -in the middle of a line, then the second space will be a sentence space. -Note that the behaviour of @acronym{UNIX} @code{troff} will be exactly -that exhibited by GNU @code{troff} if a second argument is never given -to the @code{ss} request. In GNU @code{troff}, as in @acronym{UNIX} -@code{troff}, a sentence should always be followed by either a newline -or two spaces. - -@vindex .ss -@vindex .sss -The number registers @code{.ss} and @code{.sss} hold the values of the -parameters set by the first and second arguments of the @code{ss} -request. +If two arguments are given to the @code{ss} request, the second +argument sets the sentence space size. If the second argument is not +given, sentence space size is set to @var{word_space_size}. The +sentence space size is used in two circumstances: If the end of a +sentence occurs at the end of a line in fill mode, then both an +inter-word space and a sentence space are added; if two spaces follow +the end of a sentence in the middle of a line, then the second space +is a sentence space. If a second argument is never given to the +@code{ss} request, the behaviour of @acronym{UNIX} @code{troff} is the +same as that exhibited by GNU @code{troff}. In GNU @code{troff}, as +in @acronym{UNIX} @code{troff}, a sentence should always be followed +by either a newline or two spaces. + +The read-only number registers @code{.ss} and @code{.sss} hold the +values of the parameters set by the first and second arguments of the +@code{ss} request. The word space and sentence space values are associated with the current environment (@pxref{Environments}). -This request is ignored in nroff mode; it is also ignored if there is no -parameter. -@end_Deffn +Contrary to traditional Unix @code{troff}, this request is @emph{not} +ignored if a tty output device is used; the given values are then +rounded down to a multiple of@w{ }12. + +@c XXX xref implementation differences + +The request is ignored if there is no parameter. +@endDefreq @cindex centering lines @cindex lines, centering -@Deffn{Request, ce, [@var{nnn}]} -Center text. While the @w{@samp{.ad c}} request will also center text, -it has the side effect of filling the text. @code{ce} will not fill the +@Defreq {ce, [@Var{nnn}]} +@Defregx {.ce} +Center text. While the @w{@samp{.ad c}} request also centers text, +it fills the text as well. @code{ce} does not fill the text it affects. This request causes a break. -With no arguments, @code{ce} will center the next line of text. -@var{nnn} specifies the number of lines to be centered. If -the argument is zero or negative, centering is disabled. - -@findex ll -@findex in -@findex ti -The basic length for centering text is the line length (as set with the -@code{ll} request) minus the indentation (as set with the @code{in} -request). Temporary indentation is ignored. +The following example demonstrates the differences. +Here the input: -A common idiom is to turn on centering for a large number of lines, and -to turn off centering after text to be centered. This is useful for any -request which takes a number of lines as an argument. - -@example +@Example +.ll 4i .ce 1000 -replace this -with -something -more interesting -@dots{} +This is a small text fragment which shows the differences +between the `.ce' and the `.ad c' request. .ce 0 -@end example -@vindex .ce -The @code{.ce} number register contains the number of lines remaining to -be centered, as set by the @code{ce} request. -@end_Deffn +.ad c +This is a small text fragment which shows the differences +between the `.ce' and the `.ad c' request. +@endExample + +@noindent +And here the result: + +@Example + This is a small text fragment which + shows the differences +between the `.ce' and the `.ad c' request. + + This is a small text fragment which +shows the differences between the `.ce' + and the `.ad c' request. +@endExample + +With no arguments, @code{ce} centers the next line of text. @var{nnn} +specifies the number of lines to be centered. If the argument is zero +or negative, centering is disabled. + +@rqindex ll +@rqindex in +@rqindex ti +The basic length for centering text is the line length (as set with the +@code{ll} request) minus the indentation (as set with the @code{in} +request). Temporary indentation is ignored. + +As can be seen in the previous example, it is a common idiom to turn +on centering for a large number of lines, and to turn off centering +after text to be centered. This is useful for any request which takes +a number of lines as an argument. + +The @code{.ce} read-only number register contains the number of lines +remaining to be centered, as set by the @code{ce} request. +@endDefreq @cindex justifying text @cindex text, justifying @cindex right-justifying -@vindex .rj -@Deffn{Request, rj, [@var{nnn}]} +@Defreq {rj, [@Var{nnn}]} +@Defregx {.rj} Justify unfilled text to the right margin. Arguments are identical to -the @code{ce} request. The @code{.rj} number register is the number of -lines to be right-justified as set by the @code{rj} request. This -request causes a line break. -@end_Deffn +the @code{ce} request. The @code{.rj} read-only number register is +the number of lines to be right-justified as set by the @code{rj} +request. This request causes a break. +@endDefreq @c ===================================================================== -@node Manipulating Hyphenation, Manipulating Spacing, Manipulating Filling and Adjusting, Programming Tutorial +@node Manipulating Hyphenation, Manipulating Spacing, Manipulating Filling and Adjusting, gtroff Reference @section Manipulating Hyphenation @cindex manipulating hyphenation @cindex hyphenation, manipulating -As discussed in @ref{Hyphenation}, @code{gtroff} will hyphenate words. +As discussed in @ref{Hyphenation}, @code{gtroff} hyphenates words. There are a number of ways to influence hyphenation. -@Deffn{Request, hy, [@var{mode}]} +@Defreq {hy, [@Var{mode}]} +@Defregx {.hy} Enable hyphenation. The request has an optional numeric argument, @var{mode}, to restrict hyphenation if necessary: @@ -4008,52 +4363,54 @@ }12 causes @code{gtroff} to neither hyphenate the last two nor the first two characters of a word. -@vindex .hy @cindex hyphenation restrictions register -The current hyphenation restrictions can be found in the number register -@samp{.hy}. +The current hyphenation restrictions can be found in the read-only +number register @samp{.hy}. The hyphenation mode is associated with the current environment (@pxref{Environments}). -@end_Deffn +@endDefreq -@Deffn{Request, nh, } -Disable hyphenation (i.e., set the hyphenation mode to zero). Note that -the hyphenation mode of the last call to @code{hy} is not remembered. +@Defreq {nh, } +Disable hyphenation (i.e., set the hyphenation mode to zero). Note +that the hyphenation mode of the last call to @code{hy} is not +remembered. The hyphenation mode is associated with the current environment (@pxref{Environments}). -@end_Deffn +@endDefreq -@vindex .hlc -@vindex .hlm -@findex \% +@esindex \% @cindex explicit hyphens @cindex hyphen, explicit @cindex consecutive hyphenated lines @cindex lines, consecutive hyphenated @cindex hyphenated lines, consecutive -@Deffn{Request, hlm, [@var{nnn}]} -Set the maximum number of consecutive hyphenated lines to @var{nnn}. If -this number is negative, there is no maximum. The default value is@w{ -}-1 if @var{nnn} is omitted. This value is associated with the current -environment (@pxref{Environments}). Only lines output from a given -environment count towards the maximum associated with that environment. -Hyphens resulting from @code{\%} are counted; explicit hyphens are not. +@Defreq {hlm, [@Var{nnn}]} +@Defregx {.hlm} +@Defregx {.hlc} +Set the maximum number of consecutive hyphenated lines to @var{nnn}. +If this number is negative, there is no maximum. The default value +is@w{ }@minus{}1 if @var{nnn} is omitted. This value is associated +with the current environment (@pxref{Environments}). Only lines +output from a given environment count towards the maximum associated +with that environment. Hyphens resulting from @code{\%} are counted; +explicit hyphens are not. The current setting of @code{hlm} is available in the @code{.hlm} -register. Also the number of immediately preceding consecutive -hyphenated lines are available in the number register @samp{.hlc}. -@end_Deffn +read-only number register. Also the number of immediately preceding +consecutive hyphenated lines are available in the read-only number +register @samp{.hlc}. +@endDefreq -@Deffn{Request, hw, word1 word2 @dots{}} +@Defreq {hw, word1 word2 @dots{}} Define how @var{word1}, @var{word2}, etc.@: are to be hyphenated. The words must be given with hyphens at the hyphenation points. For example: -@example +@Example .hw in-sa-lub-rious -@end example +@endExample @noindent Besides the space character, any character whose hyphenation code value @@ -4062,7 +4419,7 @@ In addition, this request can be used more than once. Hyphenation exceptions specified with the @code{hw} request are -associated with the current hyphenation language; it will cause an error +associated with the current hyphenation language; it causes an error if there is no current hyphenation language. This request is ignored if there is no parameter. @@ -4070,38 +4427,39 @@ In old versions of @code{troff} there was a limited amount of space to store such information; fortunately, with @code{gtroff}, this is no longer a restriction. -@end_Deffn +@endDefreq @cindex hyphenation character @cindex character, hyphenation @cindex disabling hyphenation @cindex hyphenation, disabling -@Deffn{Escape, \\%, } -To tell @code{gtroff} how to hyphenate words on the fly, the @code{\%} -escape, also known as the @dfn{hyphenation character}, can be used. -Preceding a word with this character will prevent it from being -hyphenated, putting it in a word will indicate to @code{gtroff} that the -word may be hyphenated at that point. Note that this mechanism will -only affect that one occurrence of the word; to change the hyphenation -of a word for the entire document, use the @code{hw} request. -@end_Deffn - -@Deffn{Request, hc, [@var{char}]} -Change the hyphenation character to @var{char}. This character will -then work the same as the @code{\%} escape, and thus, no longer appear -in the output. Without an argument, @code{hc} will reset the -hyphenation character to be @code{\%} (the default) only. +@Defesc {\\%, , , } +To tell @code{gtroff} how to hyphenate words on the fly, use the +@code{\%} escape, also known as the @dfn{hyphenation character}. +Preceding a word with this character prevents it from being +hyphenated; putting it inside a word indicates to @code{gtroff} that +the word may be hyphenated at that point. Note that this mechanism +only affects that one occurrence of the word; to change the +hyphenation of a word for the entire document, use the @code{hw} +request. +@endDefesc + +@Defreq {hc, [@Var{char}]} +Change the hyphenation character to @var{char}. This character then +works the same as the @code{\%} escape, and thus, no longer appears in +the output. Without an argument, @code{hc} resets the hyphenation +character to be @code{\%} (the default) only. The hyphenation character is associated with the current environment (@pxref{Environments}). -@end_Deffn +@endDefreq @cindex hyphenation patterns @cindex patterns for hyphenation -@Deffn{Request, hpf, pattern_file} -Read in a file of hyphenation patterns. This file will be searched for -in the same way as @file{tmac.@var{name}} is searched for if the -@option{-m@var{name}} option is specified. +@Defreq {hpf, pattern_file} +Read in a file of hyphenation patterns. This file is searched for in +the same way as @file{@var{name}.tmac} (or @file{tmac.@var{name}}) is +searched for if the @option{-m@var{name}} option is specified. It should have the same format as the argument to the @code{\patterns} primitive in @TeX{} (without using @TeX{}'s macro expansion); the @@ -4112,7 +4470,7 @@ If no @code{hpf} request is specified (either in the document or in a macro package), @code{gtroff} won't hyphenate at all. -@findex hla +@rqindex hla @pindex troffrc @pindex troffrc-end @pindex hyphen.us @@ -4122,85 +4480,90 @@ @file{troffrc} loads hyphenation patterns for American English (in file @file{hyphen.us}). -@code{hpf} will cause an error if there is no current hyphenation +Invoking @code{hpf} causes an error if there is no current hyphenation language. -@end_Deffn +@endDefreq @cindex hyphenation code @cindex code, hyphenation -@Deffn{Request, hcode, c1 code1 c2 code2 @dots{}} -Sets the hyphenation code of character @var{c1} to @var{code1}, that of -@var{c2} to @var{code2}, etc. A hyphenation code must be a single input -character (not a special character) other than a digit or a space. -Initially each lower-case letter (@samp{a}-@samp{z}) has its hyphenation -set to itself, and each upper-case letter (@samp{A}-@samp{Z}) has a -hyphenation code which is the lower-case version of itself. +@Defreq {hcode, c1 code1 c2 code2 @dots{}} +Set the hyphenation code of character @var{c1} to @var{code1}, that of +@var{c2} to @var{code2}, etc. A hyphenation code must be a single +input character (not a special character) other than a digit or a +space. Initially each lower-case letter (@samp{a}-@samp{z}) has its +hyphenation set to itself, and each upper-case letter +(@samp{A}-@samp{Z}) has a hyphenation code which is the lower-case +version of itself. -This request will be ignored if it has no parameter. -@end_Deffn +This request is ignored if it has no parameter. +@endDefreq @cindex hyphenation margin @cindex margin for hyphenation -@findex ad -@Deffn{Request, hym, [@var{length}]} +@rqindex ad +@Defreq {hym, [@Var{length}]} +@Defregx {.hym} Set the (right) hyphenation margin to @var{length}. If the current -adjustment mode is not@w{ }@samp{b}, the line will not be hyphenated if -it is shorter than @var{length}. Without argument, the hyphenation -margin will be reset to its default value, which is@w{ }0. The default -scaling indicator for this request is@w{ }@code{m}. The hyphenation -margin is associated with the current environment +adjustment mode is not @samp{b} or@w{ }@samp{n}, the line is not +hyphenated if it is shorter than @var{length}. Without an argument, +the hyphenation margin is reset to its default value, which is@w{ }0. +The default scaling indicator for this request is@w{ }@code{m}. The +hyphenation margin is associated with the current environment (@pxref{Environments}). -A negative argument will reset the hyphenation margin to zero, emitting +A negative argument resets the hyphenation margin to zero, emitting a warning of type @samp{range}. -@vindex .hym @cindex current hyphenation margin register -The current hyphenation margin is available in the @code{.hym} register. -@end_Deffn +The current hyphenation margin is available in the @code{.hym} read-only +number register. +@endDefreq @cindex hyphenation space -@findex ad -@Deffn{Request, hys, [@var{hyphenation_space}]} +@rqindex ad +@Defreq {hys, [@Var{hyphenation_space}]} +@Defregx {.hys} Set the hyphenation space to @var{hyphenation_space}. If the current -adjustment mode is@w{ }@samp{b}, don't hyphenate the line if it -can be justified by adding no more than @var{hyphenation_space} extra -space to each word space. Without argument, the hyphenation space is -set to its default value, which is@w{ }0. The default scaling indicator -for this request is@w{ }@code{m}. The hyphenation space is associated -with the current environment (@pxref{Environments}). +adjustment mode is @samp{b} or@w{ }@samp{n}, don't hyphenate the line +if it can be justified by adding no more than @var{hyphenation_space} +extra space to each word space. Without argument, the hyphenation +space is set to its default value, which is@w{ }0. The default +scaling indicator for this request is@w{ }@code{m}. The hyphenation +space is associated with the current environment +(@pxref{Environments}). -A negative argument will reset the hyphenation space to zero, emitting a +A negative argument resets the hyphenation space to zero, emitting a warning of type @samp{range}. -@vindex .hys @cindex current hyphenation space register -The current hyphenation space is available in the @code{.hys} register. -@end_Deffn +The current hyphenation space is available in the @code{.hys} read-only +number register. +@endDefreq @cindex soft hyphen character @cindex character, soft hyphen @glindex hy -@findex char -@findex tr -@Deffn{Request, shc, [@var{char}]} +@rqindex char +@rqindex tr +@Defreq {shc, [@Var{char}]} Set the soft hyphen character to @var{char}. If the argument is -omitted, the soft hyphen character will be set to the default character +omitted, the soft hyphen character is set to the default character @code{\(hy} (this is the start-up value of @code{gtroff} also). The -soft hyphen character is the character which will be inserted when a -word is hyphenated at a line break. If the soft hyphen character does -not exist in the font of the character immediately preceding a potential -break point, then the line will not be broken at that point. Neither +soft hyphen character is the character that is inserted when a word is +hyphenated at a line break. If the soft hyphen character does not +exist in the font of the character immediately preceding a potential +break point, then the line is not broken at that point. Neither definitions (specified with the @code{char} request) nor translations (specified with the @code{tr} request) are considered when finding the soft hyphen character. -@end_Deffn +@endDefreq -@findex hpf -@findex hw +@rqindex hpf +@rqindex hw @pindex troffrc @pindex troffrc-end -@Deffn{Request, hla, language} +@Defreq {hla, language} +@Defregx {.hla} Set the current hyphenation language to the string @var{language}. Hyphenation exceptions specified with the @code{hw} request and hyphenation patterns specified with the @code{hpf} request are both @@ -4209,111 +4572,120 @@ @file{troffrc-end} files; @file{troffrc} sets the default language to @samp{us}. -@vindex .hla @cindex current hyphenation language register The current hyphenation language is available as a string in the read-only number register @samp{.hla}. -@example +@Example .ds curr_language \n[.hla] \*[curr_language] @result{} us -@end example -@end_Deffn +@endExample +@endDefreq @c ===================================================================== -@node Manipulating Spacing, Tabs and Fields, Manipulating Hyphenation, Programming Tutorial +@node Manipulating Spacing, Tabs and Fields, Manipulating Hyphenation, gtroff Reference @section Manipulating Spacing @cindex manipulating spacing @cindex spacing, manipulating -@Deffn{Request, sp, [@var{distance}]} -Space downwards @var{distance}. With no argument it will advance 1@w{ -}line. A negative argument will cause @code{gtroff} to move up the page +@Defreq {sp, [@Var{distance}]} +Space downwards @var{distance}. With no argument it advances 1@w{ +}line. A negative argument causes @code{gtroff} to move up the page the specified distance. If the argument is preceded by a @samp{|} -@code{gtroff} will move that distance from the top of the page. This +then @code{gtroff} moves that distance from the top of the page. This request causes a line break. The default scaling indicator is@w{ }@code{v}. -@end_Deffn +@endDefreq @cindex double-spacing -@Deffn{Request, ls, [@var{nnn}]} -Output @w{@var{nnn}-1} blank lines after each line of text. With no -argument @code{gtroff} will use the previous value before the last -@code{ls} call. +@Defreq {ls, [@Var{nnn}]} +@Defregx {.L} +Output @w{@var{nnn}@minus{}1} blank lines after each line of text. +With no argument, @code{gtroff} uses the previous value before the +last @code{ls} call. -@example +@Example .ls 2 \" This causes double-spaced output .ls 3 \" This causes triple-spaced output .ls \" Again double spaced -@end example +@endExample The line spacing is associated with the current environment (@pxref{Environments}). -@vindex .L @cindex current line spacing register -The number register @code{.L} contains the current line spacing setting. -@end_Deffn - -@Deffn{Escape, \\x, spacing} -Sometimes, extra vertical spacing is only needed occasionally, e.g.@: to -allow space for a tall construct (like an equation). The @code{\x} -escape will do this. The escape is given a numerical argument, usually +The read-only number register @code{.L} contains the current line +spacing setting. +@endDefreq + +@c XXX document \n[nl] +@c XXX document \n[nl] == -1 if vertical position is zero + +@Defesc {\\x, ', spacing, '} +@Defregx {.a} +Sometimes, extra vertical spacing is only needed occasionally, e.g.@: +to allow space for a tall construct (like an equation). The @code{\x} +escape does this. The escape is given a numerical argument, usually enclosed in quotes (like @samp{\x'3p'}); the default scaling indicator -is@w{ }@code{v}. If this number is positive extra vertical space will -be inserted below the current line. A negative number will add space -above. If this escape is used multiple times on the same line, the -maximum of the values is used. +is@w{ }@code{v}. If this number is positive extra vertical space is +inserted below the current line. A negative number adds space above. +If this escape is used multiple times on the same line, the maximum of +the values is used. @xref{Escapes}, for details on parameter delimiting characters. -@vindex .a @cindex extra vertical line space register -The @code{.a} number register contains the most recent (nonnegative) -extra vertical line space. +The @code{.a} read-only number register contains the most recent +(nonnegative) extra vertical line space. @c XXX @ignore -@example +@Example ... example of inline equation ... -@end example +@endExample @end ignore -@end_Deffn +@endDefesc -@findex sp +@rqindex sp @cindex no-space mode @cindex mode, no-space @cindex blank lines, disabling @cindex lines, blank, disabling -@Deffn{Request, ns, } -Enable @dfn{no-space mode}. In this mode, spacing (either via @code{sp} -or via blank lines) is disabled. The @code{bp} request to advance to -the next page is also disabled, except if it is accompanied by a page -number (see @ref{Page Control}, for more information). This mode will -end when actual text is output or the @code{rs} request is encountered. +@Defreq {ns, } +Enable @dfn{no-space mode}. In this mode, spacing (either via +@code{sp} or via blank lines) is disabled. The @code{bp} request to +advance to the next page is also disabled, except if it is accompanied +by a page number (see @ref{Page Control}, for more information). This +mode ends when actual text is output or the @code{rs} request is +encountered. +@cindex top-level diversion +@cindex diversion, top-level This request is useful for macros which want to avoid that subsequent macros inadvertently insert some vertical space before the text starts (for example, to set up the first paragraph after a section header). It -is associated with the current diversion level. +has no effect if not called within the top-level diversion +(@pxref{Diversions}). @c XXX xref -@end_Deffn +@endDefreq -@Deffn{Request, rs, } -Disable no-space mode. This request is associated with the current -diversion level. +@cindex top-level diversion +@cindex diversion, top-level +@Defreq {rs, } +Disable no-space mode. It has no effect if not called within the +top-level diversion (@pxref{Diversions}). @c XXX xref -@end_Deffn +@endDefreq @c ===================================================================== -@node Tabs and Fields, Character Translations, Manipulating Spacing, Programming Tutorial +@node Tabs and Fields, Character Translations, Manipulating Spacing, gtroff Reference @section Tabs and Fields @cindex tabs and fields @cindex fields and tabs @@ -4323,33 +4695,34 @@ }5) causes a horizontal movement to the next tab stop (much like it did on a typewriter). -@Deffn{Escape, \\t, } +@Defesc {\\t, , , } This escape is a non-interpreted tab character. In copy mode (@pxref{Copy-in Mode}), @code{\t} is the same as a real tab character. -@end_Deffn +@endDefesc -@Deffn{Request, ta, [@var{n1} @var{n2} @dots{} @var{nn} @t{T} @var{r1} @var{r2} @dots{} @var{rn}]} +@Defreq {ta, [@Var{n1} @Var{n2} @dots{} @Var{nn} @t{T} @Var{r1} @Var{r2} @dots{} @Var{rn}]} +@Defregx {.tabs} Change tab stop positions. This request takes a series of tab specifiers as arguments (optionally divided into two groups with the -letter @samp{T}) which indicate where each tab stop is to be (overriding -any previous settings). +letter @samp{T}) which indicate where each tab stop is to be +(overriding any previous settings). Tab stops can be specified absolutely, i.e., as the distance from the -left margin. For example, the following will set 6@w{ }tab stops every +left margin. For example, the following sets 6@w{ }tab stops every one inch. -@example +@Example .ta 1i 2i 3i 4i 5i 6i -@end example +@endExample -Tab stops can also be specified relatively (using a leading @samp{+}) -which means that the specified tab stop will be set that distance from +Tab stops can also be specified using a leading @samp{+} +which means that the specified tab stop is set relative to the previous tab stop. For example, the following is equivalent to the previous example. -@example +@Example .ta 1i +1i +1i +1i +1i +1i -@end example +@endExample @code{gtroff} supports an extended syntax to specify repeat values after the @samp{T} mark (these values are always taken as relative) -- this is @@ -4357,9 +4730,9 @@ yet again, the same as the previous examples. It does even more since it defines an infinite number of tab stops separated by one inch. -@example +@Example .ta T 1i -@end example +@endExample Now we are ready to interpret the full syntax given at the beginning: Set tabs at positions @var{n1}, @var{n2}, @dots{}, @var{nn} and then set @@ -4375,9 +4748,9 @@ is specified by appending @samp{R}, @samp{L}, or @samp{C} to the tab specifier. The default justification is @samp{L}. Example: -@example +@Example .ta 1i 2iC 2iR -@end example +@endExample Some notes: @@ -4389,22 +4762,22 @@ A tab stop is converted into a non-breakable horizontal movement which can be neither stretched nor squeezed. For example, -@example +@Example .ds foo a\tb\tc .ta T 5i \*[foo] -@end example +@endExample @noindent creates a single line which is a bit longer than 10@w{ }inches (a string is used to show exactly where the tab characters are). Now consider the following: -@example +@Example .ds bar a\tb b\tc .ta T 5i \*[bar] -@end example +@endExample @noindent @code{gtroff} first converts the tab stops of the line into unbreakable @@ -4415,10 +4788,10 @@ @item Superfluous tabs (i.e., tab characters which do not correspond to a tab stop) are ignored except the first one which delimits the characters -belonging to the last tab stop for right-justifying resp.@: centering. +belonging to the last tab stop for right-justifying or centering. Consider the following example -@example +@Example .ds Z foo\tbar\tfoo .ds ZZ foo\tbar\tfoobar .ds ZZZ foo\tbar\tfoo\tbar @@ -4429,16 +4802,16 @@ .br \*[ZZZ] .br -@end example +@endExample @noindent which produces the following output: -@example +@Example foo bar foo foo bar foobar foo bar foobar -@end example +@endExample @noindent The first line right-justifies the second `foo' relative to the tab @@ -4451,41 +4824,42 @@ (@pxref{Environments}). @item -Calling @code{ta} without an argument will unset all tab stops. +Calling @code{ta} without an argument removes all tab stops. @item -@cindex tab stops, in nroff mode -The start-up value of @code{gtroff} is @w{@samp{T 0.5i}}. This value is -used even in nroff mode (contrary to @acronym{UNIX} @code{nroff} which -has tab stops preset every 0.8@dmn{i}). +@cindex tab stops, for tty output devices +The start-up value of @code{gtroff} is @w{@samp{T 0.5i}}. This value +is used even for tty output devices (contrary to @acronym{UNIX} +@code{nroff} which has tab stops preset every 0.8@dmn{i}). + +@c XXX xref implementation differences @end itemize -@vindex .tabs @cindex current tab settings register -The number register @code{.tabs} contains a string representation of the -current tab settings suitable for use as an argument to the @code{ta} -request. +The read-only number register @code{.tabs} contains a string +representation of the current tab settings suitable for use as an +argument to the @code{ta} request. -@example +@Example .ds tab-string \n[.tabs] \*[tab-string] @result{} T120u -@end example -@end_Deffn +@endExample +@endDefreq -@cindex tab repitition character -@cindex character, tab repitition -@Deffn{Request, tc, [@var{fill-char}]} -Normally @code{gtroff} will fill the space to the next tab stop with -space. This can be changed with the @code{tc} request. With no -argument @code{gtroff} will revert to using space, which is the default. -The value of this @dfn{tab repitition} character is associated with the -current environment (@pxref{Environments}). -@end_Deffn +@cindex tab repetition character +@cindex character, tab repetition +@Defreq {tc, [@Var{fill-char}]} +Normally @code{gtroff} fills the space to the next tab stop with +whitespace. This can be changed with the @code{tc} request. With no +argument @code{gtroff} reverts to using whitespace, which is the +default. The value of this @dfn{tab repetition} character is +associated with the current environment (@pxref{Environments}). +@endDefreq @menu -* Leaders:: -* Fields:: +* Leaders:: +* Fields:: @end menu @c --------------------------------------------------------------------- @@ -4498,7 +4872,7 @@ particular tab stop with a given character (for example dots in a table of contents), but also normal tab stops on the rest of the line. For this @code{gtroff} provides an alternate tab mechanism, called -@dfn{leaders} which will do just that. +@dfn{leaders} which does just that. @cindex leader character A leader character (character code@w{ }1) behaves similarly to a tab @@ -4506,21 +4880,21 @@ for this movement, the fill character defaults to a period character and not to space. -@Deffn{Escape, \\a, } +@Defesc {\\a, , , } This escape is a non-interpreted leader character. In copy mode (@pxref{Copy-in Mode}), @code{\a} is the same as a real leader character. -@end_Deffn +@endDefesc -@cindex leader repitition character -@cindex character, leader repitition -@Deffn{Request, lc, [@var{fill-char}]} -The character that will be repeated can be declared with the @code{lc} -request. Without an argument, leaders will act the same as tabs (i.e., -using space for filling). @code{gtroff}'s start-up value is @samp{.}. -The value of this @dfn{leader repitition} character is associated with -the current environment (@pxref{Environments}). -@end_Deffn +@cindex leader repetition character +@cindex character, leader repetition +@Defreq {lc, [@Var{fill-char}]} +Declare the leader character. Without an argument, leaders act the +same as tabs (i.e., using whitespace for filling). @code{gtroff}'s +start-up value is @samp{.}. The value of this @dfn{leader repetition} +character is associated with the current environment +(@pxref{Environments}). +@endDefreq @cindex table of contents @cindex contents, table of @@ -4529,19 +4903,19 @@ the remaining space being filled with a line of dots, and then the page number slightly separated from the dots. -@example +@Example .ds entry 1.1\tFoo\a\t12 .lc . .ta 1i 5i +.25i \*[entry] -@end example +@endExample @noindent This produces -@example +@Example 1.1 Foo.......................................... 12 -@end example +@endExample @c --------------------------------------------------------------------- @@ -4566,43 +4940,43 @@ than one padding character is inserted, the available space is evenly distributed among them. -@Deffn{Request, fc, [@var{delim-char} [@var{padding-char}]]} +@Defreq {fc, [@Var{delim-char} [@Var{padding-char}]]} Define a delimiting and a padding character for fields. If the latter is missing, the padding character defaults to a space character. If there is no argument at all, the field mechanism is disabled (which is -the default). Note that contrary to e.g.@: the tab repitition +the default). Note that contrary to e.g.@: the tab repetition character, delimiting and padding characters are not associated to the current environment (@pxref{Environments}). Example: -@example +@Example .fc # ^ .ta T 3i #foo^bar^smurf# .br #foo^^bar^smurf# -@end example +@endExample @noindent and here the result: -@example +@Example foo bar smurf foo bar smurf -@end example -@end_Deffn +@endExample +@endDefreq @c ===================================================================== -@node Character Translations, Troff and Nroff Mode, Tabs and Fields, Programming Tutorial +@node Character Translations, Troff and Nroff Mode, Tabs and Fields, gtroff Reference @section Character Translations @cindex character translations @cindex translations of characters -@findex . -@findex ' +@rqindex . +@rqindex ' @cindex control character @cindex character, control @cindex no-break control character @@ -4612,29 +4986,30 @@ (@samp{'}) can be changed with the @code{cc} and @code{c2} requests, respectively. -@Deffn{Request, cc, [@var{c}]} +@Defreq {cc, [@Var{c}]} Set the control character to @var{c}. With no argument the default control character @samp{.} is restored. The value of the control character is associated with the current environment (@pxref{Environments}). -@end_Deffn +@endDefreq -@Deffn{Request, c2, [@var{c}]} +@Defreq {c2, [@Var{c}]} Set the no-break control character to @var{c}. With no argument the default control character @samp{'} is restored. The value of the no-break control character is associated with the current environment (@pxref{Environments}). -@end_Deffn +@endDefreq -@findex \ -@Deffn{Request, eo, } -Disable the escape mechanism completely. After executing this request, -the backslash character @samp{\} no longer starts an escape sequence. +@esindex \\ +@Defreq {eo, } +Disable the escape mechanism completely. After executing this +request, the backslash character @samp{\} no longer starts an escape +sequence. This request can be very helpful in writing macros since it is not necessary then to double the escape character. Here an example: -@example +@Example .\" This is a simplified version of the .\" .BR request from the man macro package .eo @@ -4649,27 +5024,27 @@ . ft R .. .ec -@end example -@end_Deffn +@endExample +@endDefreq @cindex escape character @cindex character, escape -@Deffn{Request, ec, [@var{c}]} +@Defreq {ec, [@Var{c}]} Set the escape character to @var{c}. With no argument the default -escape character @samp{\} is restored. It can be also used to re-enable -the escape mechanism after an @code{eo} request. +escape character @samp{\} is restored. It can be also used to +re-enable the escape mechanism after an @code{eo} request. -Note that changing the escape character globally will likely break macro -packages since @code{gtroff} has no mechanism (like @TeX{}) to `intern' -macros, i.e., to convert a macro definition into an internal form which -is independent of its representation. If a macro is called, it will be -executed literally. -@end_Deffn +Note that changing the escape character globally will likely break +macro packages since @code{gtroff} has no mechanism (like @TeX{}) to +`intern' macros, i.e., to convert a macro definition into an internal +form which is independent of its representation. If a macro is +called, it is executed literally. +@endDefreq -@Deffn{Escape, \\e, } +@Defesc {\\e, , , } This escape sequence prints the current escape character (which is the backslash character @samp{\} by default). -@end_Deffn +@endDefesc A @dfn{translation} is a mapping of an input character to an output character. The default mappings are given in the font definition files @@ -4678,24 +5053,24 @@ i.e., the input character gets assigned the metric information of the mapped output character. -@Deffn{Request, tr, @var{a}@var{b}@var{c}@var{d}@dots{}} +@Defreq {tr, @Var{a}@Var{b}@Var{c}@Var{d}@dots{}} Translate character @var{a} to @var{b}, character @var{c} to @var{d}, -etc. If there is an odd number of arguments, the last one will be +etc. If there is an odd number of arguments, the last one is translated to the space character. Some notes: @itemize @bullet @item -@findex \( -@findex \[ -@findex \' -@findex \` -@findex \- -@findex \_ -@findex \C -@findex \N -@findex char +@esindex \( +@esindex \[ +@esindex \' +@esindex \` +@esindex \- +@esindex \_ +@esindex \C +@esindex \N +@rqindex char @cindex special character @cindex character, special @cindex numbered character @@ -4706,13 +5081,14 @@ (@code{\N'@var{xxx}'}) can be translated also. @item -@findex \e +@esindex \e The @code{\e} escape can be translated also. @item -@findex \% -Characters can be mapped onto the @code{\%} escape (but @code{\%} can't -be mapped onto another character). +@esindex \% +@esindex \~ +Characters can be mapped onto the @code{\%} and @code{\~} escapes (but +@code{\%} and @code{\~} can't be mapped onto another character). @item @cindex backspace character @@ -4723,45 +5099,45 @@ @cindex character, newline @cindex tab character @cindex character, tab -@findex \a -@findex \t +@esindex \a +@esindex \t The following characters can't be translated: space (with one exception, see below), backspace, newline, leader (and @code{\a}), tab (and @code{\t}). @item -@findex shc +@rqindex shc Translations are not considered for finding the soft hyphen character set with the @code{shc} request. @item -@findex \& +@esindex \& The character pair @samp{@var{c}\&} (this is an arbitrary character@w{ -}@var{c} followed by the zero width space character) will map this +}@var{c} followed by the zero width space character) maps this character to nothing. -@example +@Example .tr a\& foo bar @result{} foo br -@end example +@endExample @noindent It is even possible to map the space character to nothing: -@example +@Example .tr aa \& foo bar @result{} foobar -@end example +@endExample @noindent As shown in the example, the space character can't be the first character pair as an argument of @code{tr}. Additionally, it is not possible to map the space character to any other character; requests -like @w{@samp{.tr aa x}} will undo @w{@samp{.tr aa \&}} instead. +like @w{@samp{.tr aa x}} undo @w{@samp{.tr aa \&}} instead. -If justification is active, lines will be justified inspite of the +If justification is active, lines are justified in spite of the `empty' space character (but there is no minimal distance, i.e.@: the space character, between words). @@ -4776,33 +5152,35 @@ @item Without an argument, the @code{tr} request is ignored. @end itemize -@end_Deffn +@endDefreq -@findex \!@r{, and @code{trnt}} -@Deffn{Request, trnt, @var{a}@var{b}@var{c}@var{d}@dots{}} +@esindex \! +@cindex @code{\!}, and @code{trnt} +@Defreq {trnt, @Var{a}@Var{b}@Var{c}@Var{d}@dots{}} @code{trnt} is the same as the @code{tr} request except that the -translations do not apply to text that is transparently throughput into -a diversion with @code{\!}. @xref{Diversions}, for more information. +translations do not apply to text that is transparently throughput +into a diversion with @code{\!}. @xref{Diversions}, for more +information. For example, -@example +@Example .tr ab .di x \!.tm a .di .x -@end example +@endExample @noindent -will print @samp{b}; if @code{trnt} is used instead of @code{tr} it will -print @samp{a}. -@end_Deffn +prints @samp{b} to the standard error stream; if @code{trnt} is used +instead of @code{tr} it prints @samp{a}. +@endDefreq @c ===================================================================== -@node Troff and Nroff Mode, Line Layout, Character Translations, Programming Tutorial +@node Troff and Nroff Mode, Line Layout, Character Translations, gtroff Reference @section Troff and Nroff Mode @cindex troff mode @cindex mode, troff @@ -4811,43 +5189,67 @@ Originally, @code{nroff} and @code{troff} were two separate programs, the former for tty output, the latter for everything else. With GNU -@code{troff}, both programs are merged into one executable. - -Usually, a macro package can be used with both @code{nroff} and -@code{troff}. Nevertheless, it is sometimes necessary to make a -distinction between the two programs (resp.@: modes), and @code{gtroff} -provides two built-in conditions @samp{n} and @samp{t} for the -@code{if}, @code{ie}, and @code{while} requests to decide whether -@code{gtroff} shall behave like @code{nroff} or like @code{troff}. +@code{troff}, both programs are merged into one executable, sending +its output to a device driver (@code{grotty} for tty devices, +@code{grops} for @sc{PostScript}, etc.) which interprets the +intermediate output of @code{gtroff}. For @acronym{UNIX} @code{troff} +it makes sense to talk about @dfn{Nroff mode} and @dfn{Troff mode} +since the differences are hardcoded. For GNU @code{troff}, this +distinction is not appropriate because @code{gtroff} simply takes the +information given in the font files for a particular device without +handling requests specially if a tty output device is used. + +Usually, a macro package can be used with all output devices. +Nevertheless, it is sometimes necessary to make a distinction between +tty and non-tty devices: @code{gtroff} provides two built-in +conditions @samp{n} and @samp{t} for the @code{if}, @code{ie}, and +@code{while} requests to decide whether @code{gtroff} shall behave +like @code{nroff} or like @code{troff}. @pindex troffrc @pindex troffrc-end -@Deffn{Request, troff, } +@Defreq {troff, } Make the @samp{t} built-in condition true (and the @samp{n} built-in -condition false) for @code{if}, @code{ie}, and @code{while} conditional -requests. This is the default if @code{gtroff} (@emph{not} -@code{groff}) is started with the @option{-R} switch to avoid loading of -the start-up files @file{troffrc} and @file{troffrc-end}. Without -@option{-R}, @code{gtroff} stays in troff mode if the output device is -not a tty (e.g.@: `ps'). -@end_Deffn +condition false) for @code{if}, @code{ie}, and @code{while} +conditional requests. This is the default if @code{gtroff} +(@emph{not} @code{groff}) is started with the @option{-R} switch to +avoid loading of the start-up files @file{troffrc} and +@file{troffrc-end}. Without @option{-R}, @code{gtroff} stays in troff +mode if the output device is not a tty (e.g.@: `ps'). +@endDefreq -@pindex tmac.tty -@Deffn{Request, nroff, } +@pindex tty.tmac +@Defreq {nroff, } Make the @samp{n} built-in condition true (and the @samp{t} built-in -condition false) for @code{if}, @code{ie}, and @code{while} conditional -requests. This is the default if @code{gtroff} uses a tty output -device; the code for switching to nroff mode is in the file -@file{tmac.tty} which will be loaded by the start-up file -@code{troffrc}. -@end_Deffn - -@xref{Conditionals and Loops}, for more details on built-in conditions. - +condition false) for @code{if}, @code{ie}, and @code{while} +conditional requests. This is the default if @code{gtroff} uses a tty +output device; the code for switching to nroff mode is in the file +@file{tty.tmac} which is loaded by the start-up file @code{troffrc}. +@endDefreq + +@xref{Conditionals and Loops}, for more details on built-in +conditions. + +@c XXX move the following to grotty section + +@pindex less +@cindex Teletype +@cindex ISO 6249 SGR +@cindex terminal control sequences +@cindex control sequences, for terminals +For tty output devices, underlining is done by emitting sequences of +@samp{_} and @samp{\b} (the backspace character) before the actual +character. Literally, this is printing an underline character, then +moving back one character position, and printing the actual character +at the same position as the underline character (similar to a +typewriter). Usually, a modern terminal can't interpret this (and the +original Teletype machines for which this sequence was appropriate are +no longer in use). You need a pager program like @code{less} which +translates this into ISO 6429 SGR sequences to control terminals. @c ===================================================================== -@node Line Layout, Page Layout, Troff and Nroff Mode, Programming Tutorial +@node Line Layout, Page Layout, Troff and Nroff Mode, gtroff Reference @section Line Layout @cindex line layout @cindex layout, line @@ -4858,8 +5260,7 @@ placing a line of output onto the page. They are labeled with the request which manipulates each dimension. -@example -@group +@Example -->| in |<-- |<-----------ll------------>| +----+----+----------------------+----+ @@ -4867,8 +5268,7 @@ +----+----+----------------------+----+ -->| po |<-- |<--------paper width---------------->| -@end group -@end example +@endExample @noindent These dimensions are: @@ -4886,7 +5286,7 @@ @cindex indentation @cindex line indentation @dfn{Indentation} -- this is the distance from the left margin where -text will be printed. +text is printed. @item ll @cindex line length @@ -4897,7 +5297,7 @@ @c XXX improve example -@example +@Example .in +.5i .ll -.5i A bunch of really boring text which should @@ -4905,32 +5305,29 @@ Replace me with a better (and more) example! .in -.5i .ll +.5i -@end example +@endExample -@cindex troff mode -@cindex mode, troff -@cindex nroff mode -@cindex mode, nroff -@Deffn{Request, po, [@var{offset}]} -@Deffnx{Request, po, +offset} -@Deffnx{Request, po, -offset} -Set horizontal page offset to @var{offset} (resp.@: increment or -decrement the current value by @var{offset}). Note that this request -does not cause a break, so changing the page offset in the middle of -text being filled may not yield the expected result. The initial value -is 1@dmn{i} if in troff mode, and 0 if in nroff mode (@pxref{Troff and -Nroff Mode}); the default scaling indicator is@w{ }@code{m} (and not@w{ -}@code{v} as incorrectly documented in the original @acronym{UNIX} troff -manual). +@pindex troffrc +@Defreq {po, [@Var{offset}]} +@Defreqx {po, @t{+}@Var{offset}} +@Defreqx {po, @t{-}@Var{offset}} +@Defregx {.o} +Set horizontal page offset to @var{offset} (or increment or decrement +the current value by @var{offset}). Note that this request does not +cause a break, so changing the page offset in the middle of text being +filled may not yield the expected result. The initial value is +1@dmn{i}. For tty output devices, it is set to 0 in the startup file +@file{troffrc}; the default scaling indicator is@w{ }@code{m} (and +not@w{ }@code{v} as incorrectly documented in the original +@acronym{UNIX} troff manual). -@vindex .o -The current page offset can be found in the built-in number register +The current page offset can be found in the read-only number register @samp{.o}. If @code{po} is called without an argument, the page offset is reset to the previous value before the last call to @code{po}. -@example +@Example .po 3i \n[.o] @result{} 720 @@ -4940,13 +5337,14 @@ .po \n[.o] @result{} 720 -@end example -@end_Deffn +@endExample +@endDefreq -@Deffn{Request, in, [@var{indent}]} -@Deffnx{Request, in, +indent} -@Deffnx{Request, in, -indent} -Set indentation to @var{indent} (resp.@: increment or decrement the +@Defreq {in, [@Var{indent}]} +@Defreqx {in, @t{+}@Var{indent}} +@Defreqx {in, @t{-}@Var{indent}} +@Defregx {.i} +Set indentation to @var{indent} (or increment or decrement the current value by @var{indent}). This request causes a break. Initially, there is no indentation. @@ -4961,23 +5359,23 @@ indentation to zero. The effect of @code{in} is delayed until a partially collected line (if -it exists) is output. +it exists) is output. A temporary indent value is reset to zero also. -@vindex .i The current indentation (as set by @code{in}) can be found in the -built-in number register @samp{.i}. -@end_Deffn +read-only number register @samp{.i}. +@endDefreq -@Deffn{Request, ti, offset} -@Deffnx{Request, ti, +offset} -@Deffnx{Request, ti, -offset} +@Defreq {ti, offset} +@Defreqx {ti, @t{+}@Var{offset}} +@Defreqx {ti, @t{-}@Var{offset}} +@Defregx {.in} Temporarily indent the next output line by @var{offset}. If an increment or decrement value is specified, adjust the temporary indentation relative to the value set by the @code{in} request. This request causes a break; its value is associated with the current -environment. The default scaling indicator is@w{ }@code{m}. A call of -@code{ti} without an argument is ignored. +environment. The default scaling indicator is@w{ }@code{m}. A call +of @code{ti} without an argument is ignored. If the total indentation value is negative (which is not allowed), @code{gtroff} emits a warning of type @samp{range} and sets the @@ -4988,23 +5386,24 @@ The effect of @code{ti} is delayed until a partially collected line (if it exists) is output. -@vindex .in -The number register @code{.in} is the indentation that applies to the -current output line. +The read-only number register @code{.in} is the indentation that applies +to the current output line. The difference between @code{.i} and @code{.in} is that the latter takes into account whether a partially collected line still uses the old -indentation value resp.@: a temporary indentation value is active. -@end_Deffn +indentation value or a temporary indentation value is active. +@endDefreq -@Deffn{Request, ll, [@var{length}]} -@Deffnx{Request, ll, +length} -@Deffnx{Request, ll, -length} -Set the line length to @var{length} (resp.@: increment or decrement the +@Defreq {ll, [@Var{length}]} +@Defreqx {ll, @t{+}@Var{length}} +@Defreqx {ll, @t{-}@Var{length}} +@Defregx {.l} +@Defregx {.ll} +Set the line length to @var{length} (or increment or decrement the current value by @var{length}). Initially, the line length is set to 6.5@dmn{i}. The effect of @code{ll} is delayed until a partially -collected line (if it exists) is output. The default scaling indicator -is@w{ }@code{m}. +collected line (if it exists) is output. The default scaling +indicator is@w{ }@code{m}. If @code{ll} is called without an argument, the line length is reset to the previous value before the last call to @code{ll}. If a negative @@ -5013,22 +5412,20 @@ The line length is associated with the current environment. -@vindex .l -@vindex .ll @cindex current line length register The current line length (as set by @code{ll}) can be found in the -built-in number register @code{.l}. The number register @code{.ll} is -the line length that applies to the current output line. +read-only number register @samp{.l}. The read-only number register +@code{.ll} is the line length that applies to the current output line. Similar to @code{.i} and @code{.in}, the difference between @code{.l} and @code{.ll} is that the latter takes into account whether a partially collected line still uses the old line length value. -@end_Deffn +@endDefreq @c ===================================================================== -@node Page Layout, Page Control, Line Layout, Programming Tutorial +@node Page Layout, Page Control, Line Layout, gtroff Reference @section Page Layout @cindex page layout @cindex layout, page @@ -5038,16 +5435,16 @@ @cindex page length @cindex length of page -@Deffn{Request, pl, [@var{length}]} -@Deffnx{Request, pl, +length} -@Deffnx{Request, pl, -length} -Set the @dfn{page length} to @var{length} (resp.@: increment or -decrement the current value by @var{length}). This is the length of the +@Defreq {pl, [@Var{length}]} +@Defreqx {pl, @t{+}@Var{length}} +@Defreqx {pl, @t{-}@Var{length}} +@Defregx {.p} +Set the @dfn{page length} to @var{length} (or increment or decrement +the current value by @var{length}). This is the length of the physical output page. The default scaling indicator is@w{ }@code{v}. -@vindex .p @cindex current page length register -The current setting can be found in the built-in number register +The current setting can be found in the read-only number register @samp{.p}. @cindex top margin @@ -5055,13 +5452,16 @@ @cindex bottom margin @cindex margin, bottom Note that this only specifies the size of the page, not the top and -bottom margins. Those are not set by groff directly. @xref{Traps}, for -further information on how to do this. +bottom margins. Those are not set by @code{gtroff} directly. +@xref{Traps}, for further information on how to do this. Negative @code{pl} values are possible also, but not very useful: No trap is sprung, and each line is output on a single page (thus suppressing all vertical spacing). -@end_Deffn + +If no argument or an invalid argument is given, @code{pl} sets the page +length to 11@dmn{i}. +@endDefreq @cindex headers @cindex footers @@ -5071,132 +5471,184 @@ @cindex title line @cindex three-part title -@findex tl -@vindex % -The @code{tl} request will print a @dfn{title line}, which consists of -three parts: a left justified portion, a centered portion and a right -justified portion. The argument to @code{tl} is specified as -@code{'@var{left}'@var{center}'@var{right}'}. The @samp{%} character is -replaced with the current page number. This character can be changed -with the @code{pc} request (see below). +@cindex page number character +@Defreq {tl, @t{'}@Var{left}@t{'}@Var{center}@t{'}@Var{right}@t{'}} +Print a @dfn{title line}. It consists of three parts: a left +justified portion, a centered portion, and a right justified portion. +The argument separator @samp{'} can be replaced with any character not +occurring in the title line. The @samp{%} character is replaced with +the current page number. This character can be changed with the +@code{pc} request (see below). + +Without argument, @code{tl} is ignored. + +Some notes: + +@itemize @bullet +@item +A title line is not restricted to the top or bottom of a page. + +@item +@code{tl} prints the title line immediately, ignoring a partially filled +line (which stays untouched). + +@item +It is not an error to omit closing delimiters. For example, +@w{@samp{.tl /foo}} is equivalent to @w{@samp{.tl /foo///}}: It prints a +title line with the left justified word @samp{foo}; the centered and +right justfied parts are empty. + +@item +Any modifications to the current environment within @code{tl} (e.g.@: +changing the font or font size) are undone after processing @code{tl}. + +@item +@code{tl} accepts the same parameter delimiting characters as the +@code{\A} escape; see @ref{Escapes}. +@end itemize +@endDefreq @cindex length of title line @cindex title line, length -@findex lt -@vindex .lt @cindex current title line length register -The title line is printed using its own line length, which is specified -with the @code{lt} request. The current setting of this is available in -the @code{.lt} number register. +@Defreq {lt, [@Var{length}]} +@Defreqx {lt, @t{+}@Var{length}} +@Defreqx {lt, @t{-}@Var{length}} +@Defregx {.lt} +The title line is printed using its own line length, which is +specified (or incremented or decremented) with the @code{lt} request. +Initially, the title line length is set to 6.5@dmn{i}. If a negative +line length is specified (which is not allowed), @code{gtroff} emits a +warning of type @samp{range} and sets the title line length to zero. +The default scaling indicator is@w{ }@code{m}. If @code{lt} is called +without an argument, the title length is reset to the previous value +before the last call to @code{lt}. + +The current setting of this is available in the @code{.lt} read-only +number register; it is associated with the current environment +(@pxref{Environments}). + +@endDefreq @cindex page number @cindex number, page -@findex pn -The @code{pn} request will change the page number of the @emph{next} -page. The only argument is the page number. +@Defreq {pn, page} +@Defreqx {pn, @t{+}@Var{page}} +@Defreqx {pn, @t{-}@Var{page}} +@Defregx {.pn} +Change (increase or decrease) the page number of the @emph{next} page. +The only argument is the page number; the request is ignored without a +parameter. + +The read-only number register @code{.pn} contains the number of the next +page: either the value set by a @code{pn} request, or the number of the +current page plus@w{ }1. +@endDefreq -@vindex % -@vindex .pn @cindex current page number register -The current page number is stored in the number register @code{%}. The -number register @code{.pn} contains the number of the next page: either -the value set by a @code{pn} request, or the number of the current page -plus@w{ }1. +@Defreg {%} +A read-write register holding the current page number. +@endDefreg @cindex changing the page number character @cindex page number character, changing -@findex pc -The @code{pc} request will change the page number character (used by the -@code{tl} request) to a different character. With no argument, this -mechanism is disabled. +@vindex % +@Defreq {pc, [@Var{char}]} +Change the page number character (used by the @code{tl} request) to a +different character. With no argument, this mechanism is disabled. +Note that this doesn't affect the number register @code{%}. +@endDefreq @xref{Traps}. @c ===================================================================== -@node Page Control, Fonts, Page Layout, Programming Tutorial +@node Page Control, Fonts, Page Layout, gtroff Reference @section Page Control @cindex page control @cindex control, page -@findex bp -@findex pn +@rqindex pn @cindex new page -To stop processing the current page, and move to the next page, invoke -the @code{bp} request. This request will also cause a break. It can -also take an argument of what the next page should be numbered. The -only difference between @code{bp} and @code{pn} is that @code{pn} does -not cause a break or actually eject a page. - -@example -.de newpage -'bp -'sp .5i -.tl 'left top'center top'right top' -'sp .3i -.. -@end example +@Defreq {bp, [@Var{page}]} +@Defreqx {bp, @t{+}@Var{page}} +@Defreqx {bp, @t{-}@Var{page}} +Stop processing the current page and move to the next page. This +request causes a break. It can also take an argument to set +(increase, decrease) the page number of the next page. The only +difference between @code{bp} and @code{pn} is that @code{pn} does not +cause a break or actually eject a page. + +@Example +.de newpage \" define macro +'bp \" begin page +'sp .5i \" vertical space +.tl 'left top'center top'right top' \" title +'sp .3i \" vertical space +.. \" end macro +@endExample + +@cindex top-level diversion +@cindex diversion, top-level +@code{bp} has no effect if not called within the top-level diversion +(@pxref{Diversions}). +@endDefreq -@cindex orphan -@findex ne +@cindex orphan line +@Defreq {ne, [@Var{space}]} It is often necessary to force a certain amount of space before a new page occurs. This is most useful to make sure that there is not a single @dfn{orphan} line left at the bottom of a page. The @code{ne} -request will ensure that there is a certain distance, specified by the -first argument, before the next page is triggered (see @ref{Traps}, for -further information). The default unit for @code{ne} is @code{v} and -the default argument is@w{ }1@dmn{v}. +request ensures that there is a certain distance, specified by the +first argument, before the next page is triggered (see @ref{Traps}, +for further information). The default unit for @code{ne} is @samp{v}; +the default value of @var{space} is@w{ }1@dmn{v} if no argument is +given. For example, to make sure that no fewer than 2@w{ }lines get orphaned, do the following before each paragraph: -@example +@Example .ne 2 -.ti +5n -text -@end example - -@findex sv -@findex os -@findex ne -@code{sv} is similar to the @code{ne} request; it reserves the specified -amount of vertical space. If the desired amount of space exists before -the next trap (bottom page boundary), the space will be output -immediately. If there is not enough space, it is stored for later -output via the @code{os} request. The default argument is@w{ }1@dmn{v} -and the default unit is @code{v}. +text text text +@endExample +@endDefreq + +@rqindex os +@rqindex ne +@Defreq {sv, [@Var{space}]} +@code{sv} is similar to the @code{ne} request; it reserves the +specified amount of vertical space. If the desired amount of space +exists before the next trap (bottom page boundary), the space is +output immediately (ignoring a partial filled line which stays +untouched). If there is not enough space, it is stored for later +output via the @code{os} request. The default value is@w{ }1@dmn{v} +if no argument is given; the default unit is @samp{v}. +@endDefreq @c ===================================================================== -@node Fonts, Sizes, Page Control, Programming Tutorial +@node Fonts, Sizes, Page Control, gtroff Reference @section Fonts @cindex fonts -@findex ft -@findex \f -@code{gtroff} has the ability to switch fonts at any point in the text. -There are two ways to do this, via the @code{ft} request and the -@code{\f} escape. - -Fonts are generally specified as upper-case strings, which are usually -1@w{ }to 4 characters representing an abbreviation or acronym of the font -name. +@code{gtroff} can switch fonts at any point in the text. -The basic set of fonts are @samp{R}, @samp{I}, @samp{B}, and @samp{BI}. -These are Times Roman, Italic, Bold, and Bold Italic. There is also at -least one symbol font which contains various special symbols (Greek, -mathematics). Such symbols fonts cannot be used directly, but should be -used via an escape. +The basic set of fonts is @samp{R}, @samp{I}, @samp{B}, and @samp{BI}. +These are Times Roman, Italic, Bold, and Bold Italic. For non-tty +devices, there is also at least one symbol font which contains various +special symbols (Greek, mathematics). @menu -* Changing Fonts:: -* Font Families:: -* Font Positions:: -* Using Symbols:: -* Artificial Fonts:: -* Ligatures and Kerning:: +* Changing Fonts:: +* Font Families:: +* Font Positions:: +* Using Symbols:: +* Special Fonts:: +* Artificial Fonts:: +* Ligatures and Kerning:: @end menu @c --------------------------------------------------------------------- @@ -5206,93 +5658,67 @@ @cindex changing fonts @cindex fonts, changing -@findex ft +@rqindex sty +@rqindex fam +@kindex styles +@kindex family +@pindex DESC +@Defreq {ft, [@Var{font}]} +@Defescx {\\f, , f, } +@Defescx {\\f, @lparen{}, fn, } +@Defescx {\\f, @lbrack{}, font, @rbrack} +The @code{ft} request and the @code{\f} escape change the current font +to @var{font} (one-character name @var{f}, two-character name +@var{fn}). + +If @var{font} is a style name (as set with the @code{sty} request or +with the @code{styles} command in the @file{DESC} file), use it within +the current font family (as set with the @code{fam} request or with +the @code{family} command in the @file{DESC} file). + @cindex previous font @cindex font, previous -Font changes can be done either with the @code{ft} request or the -@code{\f} request. With no arguments, it will switch to the previous -font (also known as @samp{P}). +With no argument or using @samp{P} as an argument, @code{.ft} switches +to the previous font. Use @code{\fP} or @code{\f[P]} to do this with +the escape. -@example +Fonts are generally specified as upper-case strings, which are usually +1@w{ }to 4 characters representing an abbreviation or acronym of the +font name. This is no limitation, just a convention. + +The example below produces two identical lines. + +@Example eggs, bacon, .ft B spam .ft and sausage. -@end example - -@findex \f -The @code{\f} escape is useful for changing fonts in the middle of -words: -@example eggs, bacon, \fBspam\fP and sausage. -@end example - -@noindent -Both of the above examples will produce the same output. Note the usage -of @samp{P} to indicate the previous font -- using @code{\f} it is not -possible to omit this parameter. +@endExample -Sometimes, when putting letters of different fonts, more or less space at -such boundaries are needed. There are two escapes to help with this. +@xref{Font Positions}, for an alternative syntax. +@endDefreq -@findex \/ -@cindex italic correction -@cindex correction, italic -The @code{\/} escape increases the width of the preceding character so -that the spacing between that character and the following character will -be correct if the following character is a Roman character. For -example, if an italic@w{ }f is immediately followed by a Roman right -parenthesis, then in many fonts the top right portion of the f will -overlap the top left of the right parenthesis. It is a good idea to use -this escape sequence whenever an italic character is immediately -followed by a Roman character without any intervening space. This small -amount of space is also called @dfn{italic correction}. - -@c XXX example -@c producing @i{f}), which is ugly. Inserting \/ produces f) and avoids -@c this problem. - -@findex \, -@cindex left italic correction -@cindex correction, left italic -The @code{\,} escape modifies the spacing of the following character so -that the spacing between that character and the preceding character will -be correct if the preceding character is a Roman character. It is a -good idea to use this escape sequence whenever a Roman character is -immediately followed by an italic character without any intervening -space. In analogy to above, this space could be called @dfn{left italic -correction}, but this term isn't used widely. - -@c XXX example -@c For example, inserting \, between the parenthesis and the f changes -@c (f to (f. - -@findex ftr -@findex ft -@findex ul -@findex bd -@findex \f -@findex cs -@findex tkf -@findex special -@findex fspecial -@findex fp -@findex code -The @code{ftr} request will translate fonts; its syntax is - -@example -.ftr @var{F} @var{G} -@end example - -@noindent -which translates font@w{ }@var{F} to font@w{ }@var{G}. Whenever a font -named @var{F} is referred to in a @code{\f} escape sequence, or in the -@code{ft}, @code{ul}, @code{bd}, @code{cs}, @code{tkf}, @code{special}, -@code{fspecial}, @code{fp}, or @code{code} requests, font@w{ }@var{G} -will be used. If @var{G} is missing, or equal to @var{F} then font@w{ -}@var{F} will not be translated. +@rqindex ft +@rqindex ul +@rqindex bd +@esindex \f +@rqindex cs +@rqindex tkf +@rqindex special +@rqindex fspecial +@rqindex fp +@rqindex code +@Defreq {ftr, f [@Var{g}]} +Translate font@w{ }@var{f} to font@w{ }@var{g}. Whenever a font named +@var{f} is referred to in a @code{\f} escape sequence, or in the +@code{ft}, @code{ul}, @code{bd}, @code{cs}, @code{tkf}, +@code{special}, @code{fspecial}, @code{fp}, or @code{code} requests, +font@w{ }@var{g} is used. If @var{g} is missing or equal to @var{f} +the translation is undone. +@endDefreq @c --------------------------------------------------------------------- @@ -5300,38 +5726,120 @@ @subsection Font Families @cindex font families @cindex families, font +@cindex font styles +@cindex styles, font Due to the variety of fonts available, @code{gtroff} has added the -concept of font families. Each of these families has four styles -(@samp{R}, @samp{I}, @samp{B} and @samp{BI}). - -The fonts are specified as the concatenation of the font family and -style. Specifying a font without the family part will cause -@code{gtroff} to use that style of the current family. By default, -@code{gtroff} uses the Times family. +concept of @dfn{font families} and @dfn{font styles}. The fonts are +specified as the concatenation of the font family and style. Specifying +a font without the family part causes @code{gtroff} to use that style of +the current family. + +@cindex postscript fonts +@cindex fonts, postscript +Currently, only @sc{PostScript} fonts are set up to this mechanism. +By default, @code{gtroff} uses the Times family with the four styles +@samp{R}, @samp{I}, @samp{B}, and @samp{BI}. This way, it is possible to use the basic four fonts and to select a -different font family on the command line. +different font family on the command line (@pxref{Groff Options}). -@findex fam -@vindex .fam -Font families can be switched with the @code{fam} request. The current -font family is available in the number register @code{.fam}. This is a -string-valued register. +@Defreq {fam, [@Var{family}]} +@Defregx {.fam} +Switch font family to @var{family}. If no argument is given, switch +back to the previous font family. The current font family is available +in the read-only number register @samp{.fam} (this is a string-valued +register); it is associated with the current environment. -@example -spam, -.fam H -spam, -.ft B +@Example spam, -.fam T +.fam H \" helvetica family +spam, \" used font is family H + style R = HR +.ft B \" family H + style B = font HB spam, -.ft AR +.fam T \" times family +spam, \" used font is family T + style B = TB +.ft AR \" font AR (not a style) baked beans, -.ft R +.ft R \" family T + style R = font TR and spam. -@end example +@endExample +@endDefreq + +@rqindex cs +@rqindex bd +@rqindex tkf +@rqindex uf +@rqindex fspecial +@Defreq {sty, n style} +Associate @var{style} with font position@w{ }@var{n}. A font position +can be associated either with a font or with a style. The current +font is the index of a font position and so is also either a font or a +style. When it is a style, the font that is actually used is the font +the name of which is the concatenation of the name of the current +family and the name of the current style. For example, if the current +font is@w{ }1 and font position@w{ }1 is associated with style@w{ +}@samp{R} and the current font family is@w{ }@samp{T}, then font +@samp{TR} will be used. If the current font is not a style, then the +current family is ignored. When the requests @code{cs}, @code{bd}, +@code{tkf}, @code{uf}, or @code{fspecial} are applied to a style, then +they will instead be applied to the member of the current family +corresponding to that style. + +@var{n} must be a non-negative integer value. + +@pindex DESC +@kindex styles +The default family can be set with the @option{-f} option +(@pxref{Groff Options}). The @code{styles} command in the @file{DESC} +file controls which font positions (if any) are initially associated +with styles rather than fonts. For example, the default setting for +@sc{PostScript} fonts + +@Example +styles R I B BI +@endExample + +@noindent +is equivalent to + +@Example +.sty 1 R +.sty 2 I +.sty 3 B +.sty 4 BI +@endExample + +@code{.fam} always checks whether the current font position is valid; +this can give surprising results if the current font position is +associated with a style. + +In the following example, we want to access the @sc{PostScript} font +@code{FooBar} from the font family @code{Foo}: + +@Example +.sty \n[.fp] Bar +.fam Foo + @result{} warning: can't find font `FooR' +@endExample + +@noindent +The default font position at start-up is@w{ }1; for the +@sc{PostScript} device, this is associated with style @samp{R}, so +@code{gtroff} tries to open @code{FooR}. + +A solution to this problem is to use a dummy font like the following: + +@Example +.fp 0 dummy TR \" set up dummy font at position 0 +.sty \n[.fp] Bar \" register style `Bar' +.ft 0 \" switch to font at position 0 +.fam Foo \" activate family `Foo' +.ft Bar \" switch to font `FooBar' +@endExample + +@xref{Font Positions}. +@endDefreq @c --------------------------------------------------------------------- @@ -5340,132 +5848,199 @@ @cindex font positions @cindex positions, font -For the sake of old phototypesetters and compatability with old versions +For the sake of old phototypesetters and compatibility with old versions of @code{troff}, @code{gtroff} has the concept of font @dfn{positions}, -on which various fonts are mounted. The last one or two are reserved -for the symbol font(s). +on which various fonts are mounted. -@findex fp -New fonts can be mounted with the @code{fp} request. These numeric -positions can then be referred to with font changing commands. When -@code{gtroff} starts it is using font number one. +@Defreq {fp, pos font [@Var{external-name}]} +@Defregx {.f} +@Defregx {.fp} +Mount font @var{font} at position @var{pos} (which must be a +non-negative integer). This numeric position can then be referred to +with font changing commands. When @code{gtroff} starts it is using +font position@w{ }1 (which must exist; position@w{ }0 is unused +usually at start-up). -@example -.fp 1 H -.fp 2 HI -.fp 3 HB -wink, wink, -.ft 2 -nudge, nudge, -.ft -.ft 3 -say no more! -.ft -@end example - -@noindent -Note that after these font changes have taken place, the original font -is restored. - -@vindex .f @cindex current font position register -The current font in use, as a font position, is available in number -register @code{.f}. This can be useful to remember the current font, -for later recall. +The current font in use, as a font position, is available in the +read-only number register @samp{.f}. This can be useful to remember the +current font for later recall. It is associated with the current +environment (@pxref{Environments}). -@example -.nr save-font \n(.f -... lots 'o text ... +@Example +.nr save-font \n[.f] +.ft B +... text text text ... .ft \n[save-font] -@end example +@endExample -@vindex .fp @cindex next free font position register -The number of the next free font position is available in the number -register @code{.fp}. This is useful when mounting a new font, like so: +The number of the next free font position is available in the read-only +number register @samp{.fp}. This is useful when mounting a new font, +like so: -@example +@Example .fp \n[.fp] NEATOFONT -@end example +@endExample @pindex DESC@r{, and font mounting} Fonts not listed in the @file{DESC} file are automatically mounted on -the next available font position when they are referenced. If a font is -to be mounted explicitly with the @code{fp} request on an unused font -position, it should be mounted on the first unused font position, which -can be found in the @code{.fp} register. Although @code{gtroff} does -not enforce this strictly, it will not allow a font to be mounted at a -position whose number is much greater than that of any currently used -position. +the next available font position when they are referenced. If a font +is to be mounted explicitly with the @code{fp} request on an unused +font position, it should be mounted on the first unused font position, +which can be found in the @code{.fp} register. Although @code{gtroff} +does not enforce this strictly, it is not allowed to mount a font at a +position whose number is much greater (approx.@: 1000 positions) than +that of any currently used position. -@findex fp The @code{fp} request has an optional third argument. This argument gives the external name of the font, which is used for finding the font description file. The second argument gives the internal name of the font which is used to refer to the font in @code{gtroff} after it has -been mounted. If there is no third argument then the internal name will -be used as the external name. This feature make it possible to use +been mounted. If there is no third argument then the internal name is +used as the external name. This feature makes it possible to use fonts with long names in compatibility mode. +@endDefreq + +Both the @code{ft} request and the @code{\f} escape have alternative +syntax forms to access font positions. + +@rqindex sty +@rqindex fam +@kindex styles +@kindex family +@pindex DESC +@Defreq {ft, nnn} +@Defescx {\\f, , n, } +@Defescx {\\f, @lparen{}, nn, } +@Defescx {\\f, @lbrack{}, nnn, @rbrack} +Change the current font position to @var{nnn} (one-digit position +@var{n}, two-digit position @var{nn}), which must be a non-negative +integer. + +If @var{nnn} is associated with a style (as set with the @code{sty} +request or with the @code{styles} command in the @file{DESC} file), use +it within the current font family (as set with the @code{fam} request or +with the @code{family} command in the @file{DESC} file). + +@Example +this is font 1 +.ft 2 +this is font 2 +.ft \" switch back to font 1 +.ft 3 +this is font 3 +.ft +this is font 1 again +@endExample + +@xref{Changing Fonts}, for the standard syntax form. +@endDefreq @c --------------------------------------------------------------------- -@node Using Symbols, Artificial Fonts, Font Positions, Fonts +@node Using Symbols, Special Fonts, Font Positions, Fonts @subsection Using Symbols @cindex using symbols @cindex symbols, using -@findex \( -@findex \[ -Symbols can be inserted by using a special escape sequence. This escape -is simply the escape character (usually a backslash) followed by an -identifier. The symbol identifiers have to be two or more characters, -since single characters conflict with all the other escapes. The -identifier can be either preceded by a parenthesis if it is two -characters long, or surrounded by square brackets. So, the symbol for -the mathematical Greek letter `pi' can be produced either by @code{\(*p} -or @code{\[*p]}. +@cindex glyph +@cindex character +@cindex ligature +A @dfn{glyph} is a graphical representation of a @dfn{character}. +While a character is an abstract entity containing semantic +information, a glyph is something which can be actually seen on screen +or paper. It is possible that a character has multiple glyph +representation forms (for example, the character `A' can be either +written in a roman or an italic font, yielding two different glyphs); +sometimes more than one character maps to a single glyph (this is a +@dfn{ligature} -- the most common is `fi'). -@example -area = \(*p\fIr\fP\u2\d -@end example +@c XXX -@findex \C -The escape @code{\C'@var{xxx}'} will typeset the character named -@var{xxx}. Normally it is more convenient to use @code{\[@var{xxx}]}. -But @code{\C} has the advantage that it is compatible with recent -versions of @code{ditroff} and is available in compatibility mode. - -@findex \N -@findex char -The escape @code{\N'@var{n}'} will typeset the character with code@w{ -}@var{n} in the current font. @var{n} can be any integer. Most devices -only have characters with codes between 0 and@w{ }255. If the current -font does not contain a character with that code, special fonts will -@emph{not} be searched. The @code{\N} escape sequence can be -conveniently used on conjunction with the @code{char} request: +Please note that currently the distinction between glyphs and +characters in this reference is not clearly carried out. This will be +improved eventually in the next revision. -@example -.char \[phone] \f(ZD\N'37' -@end example +@cindex symbol +@cindex special fonts +@kindex fonts +@pindex DESC +@rqindex fspecial +A @dfn{symbol} is simply a named glyph. Within @code{gtroff}, all +glyph names of a particular font are defined in its font file. If the +user requests a glyph not available in this font, @code{gtroff} looks +up an ordered list of @dfn{special fonts}. By default, the +@sc{PostScript} output device supports the two special fonts @samp{SS} +(slanted symbols) and @samp{S} (symbols) (the former is looked up +before the latter). Other output devices use different names for +special fonts. Fonts mounted with the @code{fonts} keyword in the +@file{DESC} file are globally available. To install additional +special fonts locally (i.e.@: for a particular font), use the +@code{fspecial} request. + +@xref{Font Files}, and @ref{Special Fonts}, for more details. + +@Defesc {\\, @lparen{}, nm, } +@Defescx {\\, @lbrack{}, name, @rbrack} +Insert a symbol @var{name} (two-character name @var{nm}). There is no +special syntax for one-character names -- the natural form +@samp{\@var{n}} would collide with escapes. + +If @var{name} is undefined, a warning of type @samp{char} is generated, +and the escape is ignored. @xref{Debugging}, for information about +warnings. + +The list of available symbols is device dependent; see @ref{Glyph Name +Index} for some of them discussed in this reference. + +@c XXX list of common symbols +@endDefesc + +@Defesc {\\C, ', xxx, '} +Typeset the character named @var{xxx}. Normally it is more convenient +to use @code{\[@var{xxx}]}, but @code{\C} has the advantage that it is +compatible with newer versions of @code{ditroff} and is available in +compatibility mode. +@endDefesc + +@rqindex char +@cindex unicode +@Defesc {\\N, ', n, '} +Typeset the character with code@w{ }@var{n} in the current font (this +is @strong{not} the input character code). @var{n} can be any +integer. Most devices only have characters with codes between 0 +and@w{ }255; the Unicode output device uses codes in the range +0--65535. If the current font does not contain a character with that +code, special fonts are @emph{not} searched. The @code{\N} escape +sequence can be conveniently used in conjunction with the @code{char} +request: + +@Example +.char \[phone] \f[ZD]\N'37' +@endExample @noindent @pindex DESC @cindex unnamed characters @cindex characters, unnamed The code of each character is given in the fourth column in the font -description file after the charset command. It is possible to include -unnamed characters in the font description file by using a name of -@samp{---}; the @code{\N} escape sequence is the only way to use these. +description file after the @code{charset} command. It is possible to +include unnamed characters in the font description file by using a +name of @samp{---}; the @code{\N} escape sequence is the only way to +use these. +@endDefesc @c XXX should be `glyph', not `character' -@findex cflags @cindex character properties @cindex properties of characters +@Defreq {cflags, n c1 c2 @dots{}} Each character has certain properties associated with it. These properties can be modified with the @code{cflags} request. The first -argument is the the sum of the desired flags and the remaining arguments -are the characters to have those properties. +argument is the the sum of the desired flags and the remaining +arguments are the characters to have those properties. It is possible +to omit the spaces between the characters. @table @code @item 1 @@ -5511,98 +6086,185 @@ @glindex dg @glindex rq an end of sentence character followed by any number of characters with -this property will be treated as the end of a sentence if followed by a -newline or two spaces; in other words the character is @dfn{transparent} -for the purposes of end of sentence recognition -- this is the same as -having a zero space factor in @TeX{} (initially characters -@samp{"')]*\(dg\(rq} have this property). +this property is treated as the end of a sentence if followed by a +newline or two spaces; in other words the character is +@dfn{transparent} for the purposes of end of sentence recognition -- +this is the same as having a zero space factor in @TeX{} (initially +characters @samp{"')]*\(dg\(rq} have this property). @end table +@endDefreq -@findex char @cindex defining characters @cindex characters, defining @cindex creating new characters -New characters can be created with the @code{char} request. It is -called as - -@example -.char @var{c} @var{string} -@end example - -@findex tr -@findex lc -@findex \l -@findex \L -@findex hcode -@noindent -This defines character@w{ }@var{c} to be @var{string}. Every time -character@w{ }@var{c} needs to be printed, @var{string} will be -processed in a temporary environment and the result will be wrapped up -into a single object. Compatibility mode will be turned off and the -escape character will be set to @samp{\} while @var{string} is being -processed. Any emboldening, constant spacing or track kerning will be +@cindex escape character +@cindex character, escape +@rqindex tr +@rqindex cp +@rqindex rc +@rqindex lc +@esindex \l +@esindex \L +@esindex \& +@esindex \e +@rqindex hcode +@Defreq {char, c [@Var{string}]} +Define a new character@w{ }@var{c} to be @var{string} (which can be +empty). Every time character@w{ }@var{c} needs to be printed, +@var{string} is processed in a temporary environment and the result is +wrapped up into a single object. Compatibility mode is turned off and +the escape character is set to @samp{\} while @var{string} is being +processed. Any emboldening, constant spacing or track kerning is applied to this object rather than to individual characters in -@var{string}. A character defined by this request can be used just like -a normal character provided by the output device. In particular other -characters can be translated to it with the @code{tr} request; it can be -made the leader character by the @code{lc} request; repeated patterns -can be drawn with the character using the @code{\l} and @code{\L} escape -sequences; words containing the character can be hyphenated correctly, -if the @code{hcode} request is used to give the character a hyphenation -code. There is a special anti-recursion feature: use of character -within the character's definition will be handled like normal characters -not defined with @code{char}. +@var{string}. A character defined by this request can be used just +like a normal character provided by the output device. In particular, +other characters can be translated to it with the @code{tr} request; +it can be made the leader character by the @code{lc} request; repeated +patterns can be drawn with the character using the @code{\l} and +@code{\L} escape sequences; words containing the character can be +hyphenated correctly, if the @code{hcode} request is used to give the +character a hyphenation code. There is a special anti-recursion +feature: Use of character within the character's definition is handled +like normal characters not defined with @code{char}. +@endDefreq -@findex rchar @cindex removing character definition @cindex character, removing definition -A character definition can be removed with the @code{rchar} request. -Its arguments are the characters to be removed. This undoes the effect -of a @code{char} request. +@Defreq {rchar, c1 c2 @dots{}} +Remove the definitions of characters @var{c1}, @var{c2},@w{ +}@enddots{} This undoes the effect of a @code{char} request. + +It is possible to omit the whitespace between arguments. +@endDefreq @xref{Special Characters}. @c --------------------------------------------------------------------- -@node Artificial Fonts, Ligatures and Kerning, Using Symbols, Fonts +@node Special Fonts, Artificial Fonts, Using Symbols, Fonts +@subsection Special Fonts +@cindex special fonts +@cindex fonts, special + +@c XXX + +To be written. + +@c --------------------------------------------------------------------- + +@node Artificial Fonts, Ligatures and Kerning, Special Fonts, Fonts @subsection Artificial Fonts @cindex artificial fonts @cindex fonts, artificial There are a number of requests for artificially creating fonts. These -are largely vestigial remains from the days when output devices did not -have a wide variety of fonts, and when @code{nroff} and @code{troff} -were separate programs. These are no longer necessary in GNU -@code{troff}. +are largely vestiges of the days when output devices did not have a +wide variety of fonts, and when @code{nroff} and @code{troff} were +separate programs. These are no longer necessary in GNU +@code{troff}. Nevertheless, they are supported. -@findex ul @cindex underlining -The @code{ul} request will print subsequent lines in italics on a device -capable of it, or underline the text on a character output device. The -single argument is the number of lines to be ``underlined,'' with no -argument, the next line will be underlined. +@Defreq {ul, [@Var{lines}]} +The @code{ul} request normally underlines subsequent lines if a tty +output device is used. Otherwise, the lines are printed in italics +(only the term `underlined' is used in the following). The single +argument is the number of input lines to be underlined; with no +argument, the next line is underlined. If @var{lines} is zero or +negative, stop the effects of @code{ul} (if it was active). Requests +and empty lines do not count for computing the number of underlined +input lines, even if they produce some output like @code{tl}. Lines +inserted by macros (e.g.@: invoked by a trap) do count. + +At the beginning of @code{ul}, the current font is stored and the +underline font is activated. Within the span of a @code{ul} request, +it is possible to change fonts, but after the last line affected by +@code{ul} the saved font is restored. + +@cindex underline font +@cindex font, for underlining +@rqindex uf +This command is associated with the current environment. The +underline font can be changed with the @code{uf} request. + +@c XXX @xref should be changed to grotty + +@xref{Troff and Nroff Mode}, for a discussion how underlining is +implemented in for tty output devices, and which problems can arise. + +The @code{ul} request does not underline spaces. +@endDefreq -@findex cu @cindex continuous underlining @cindex underlining, continuous -The @code{cu} request is similar to @code{ul} ... +@Defreq {cu, [@Var{lines}]} +The @code{cu} request is similar to @code{ul} but underlines spaces as +well (if a tty output device is used). +@endDefreq -@c XXX more info - -@findex uf @cindex underline font @cindex font for underlining -The @code{uf} request will set the underline font used by @code{ul} and -@code{cu}. +@rqindex ul +@rqindex cu +@Defreq {uf, font} +Set the underline font (globally) used by @code{ul} and @code{cu}. By +default, this is the font at position@w{ }2. @var{font} can be either +a non-negative font position or the name of a font. +@endDefreq -@findex bd @cindex imitating bold face @cindex bold face, imitating -The @code{bd} request artificially creates a bold font by printing each -character twice, slightly offset. The first argument specifies the font -to embolden, and the second is the number of basic units, minus one, by -which the two characters will be offset. If the second argument is -missing, emboldening will be turned off. +@Defreq {bd, font [@Var{offset}]} +@Defreqx {bd, font1 font2 [@Var{offset}]} +@Defregx {.b} +Artificially create a bold font by printing each character twice, +slightly offset. + +Two syntax forms are available. + +@itemize @bullet +@item +Imitate a bold font unconditionally. The first argument specifies the +font to embolden, and the second is the number of basic units, minus +one, by which the two characters is offset. If the second argument is +missing, emboldening is turned off. + +@var{font} can be either a non-negative font position or the name of a +font. + +@var{offset} is available in the @code{.b} read-only register if a +special font is active; in the @code{bd} request, its default unit is +@samp{u}. + +@rqindex fspecial +@kindex special +@cindex embolding of special fonts +@cindex special fonts, emboldening +@item +Imitate a bold form conditionally. Embolden @var{font1} by +@var{offset} only if font @var{font2} is the current font. This +command can be issued repeatedly to set up different emboldening +values for different current fonts. If the second argument is +missing, emboldening is turned off for this particular current font. + +This affects special fonts only (either set up with the @code{special} +command in font files or with the @code{fspecial} request). +@end itemize +@endDefreq + +@cindex constant character space mode +@cindex mode for constant character space +@cindex character, constant space +@rqindex ps +@Defreq {cs, font [@Var{width} [@Var{em-size}]]} +Switch to and from constant character space mode. If activated, the +width of every character is @math{@var{width}/36} ems. The em size is +given absolutely by @var{em-size}; if this argument is missing, the em +value is taken from the current font size (as set with the @code{ps} +request) when the font is effectively in use. Without second and +third argument, constant character space mode is deactivated. + +Default unit for @var{em-size} is @samp{z}; @var{width} is an integer. +@endDefreq @c --------------------------------------------------------------------- @@ -5611,68 +6273,192 @@ @cindex ligatures and kerning @cindex kerning and ligatures -@c XXX What are ligatures? +Ligatures are groups of characters that are run together. For +example, the letters `f' and `i' can form a ligature `fi' as in the +word `file'. This produces a cleaner look (albeit subtle) to the +printed output. Usually, ligatures are not available in fonts for tty +output devices. + +Most @sc{PostScript} fonts support the fi and fl ligatures. The C/A/T +typesetter that was the target of AT&T @code{troff} also supported +`ff', `ffi', and `ffl' ligatures. Advanced typesetters or `expert' +fonts may include ligatures for `ft' and `ct', although GNU +@code{troff} does not support these (yet). -@c XXX more info - -@findex lg -@vindex .lg @cindex ligatures enabled register +@Defreq {lg, [@Var{flag}]} +@Defregx {.lg} The ligature mechanism can be switched on or off with the @code{lg} -request; if the parameter is non-zero or missing, ligatures are enabled, -otherwise disabled. Default is on. The current ligature mode can be -found in the number register @code{.lg} (set to@w{ }1 if ligatures are -enabled, 0@w{ }otherwise). - -@c XXX What is kerning? +request; if the parameter is non-zero or missing, ligatures are +enabled, otherwise disabled. Default is on. The current ligature +mode can be found in the read-only number register @code{.lg} (set to +1 or@w{ }2 if ligatures are enabled, 0@w{ }otherwise). + +Setting the ligature mode to@w{ }2 enables the two-character ligatures +(fi, fl, and ff) and disables the three-character ligatures (ffi and +ffl). +@endDefreq + +@dfn{Pairwise kerning} is another subtle typesetting mechanism that +modifies the distance between a character pair to improve readability. +In most cases (but not always) the distance is decreased. +@ifnotinfo +For example, compare the combination of the letters `V' and `A'. With +kerning, `VA' is printed. Without kerning it appears as `V@w{}A'. +@end ifnotinfo +Typewriter-like fonts and fonts for terminals where all characters +have the same width don't use kerning. -@c XXX more info +@cindex kerning enabled register +@Defreq {kern, [@Var{flag}]} +@Defregx {.kern} +Kerning can be activated with the @code{kern} request. If the +parameter is non-zero or missing, enable pairwise kerning, otherwise +disable it. The read-only number register @code{.kern} is set to@w{ +}1 if pairwise kerning is enabled, 0@w{ }otherwise. @cindex zero width space character @cindex character, zero width space @cindex space character, zero width If the font description file contains pairwise kerning information, -characters from that font will be kerned. Kerning between two -characters can be inhibited by placing @code{\&} between them. +characters from that font are kerned. Kerning between two characters +can be inhibited by placing @code{\&} between them: @samp{V\&A}. -@findex kern -@vindex .kern -@cindex kerning enabled register -Kerning can be activated with the @code{kern} request. If the parameter -is non-zero or missing, enable pairwise kerning, otherwise disable it. -The number register @code{.kern} is set to@w{ }1 if pairwise kerning is -enabled, 0@w{ }otherwise. +@xref{Font File Format}. +@endDefreq -@findex tkf @cindex track kerning @cindex kerning, track +@dfn{Track kerning} expands or reduces the space between characters. +This can be handy, for example, if you need to squeeze a long word +onto a single line or spread some text to fill a narrow column. It +must be used with great care since it is usually considered bad +typography if the reader notices the effect. -@c XXX What is track kerning? +@Defreq {tkf, f s1 n1 s2 n2} +Enable track kerning for font@w{ }@var{f}. If the current font is@w{ +}@var{f} the width of every character is increased by an amount +between @var{n1} and @var{n2} (@var{n1}, @var{n2} can be negative); if +the current point size is less than or equal to @var{s1} the width is +increased by @var{n1}; if it is greater than or equal to @var{s2} the +width is increased by @var{n2}; if the point size is greater than or +equal to @var{s1} and less than or equal to @var{s2} the increase in +width is a linear function of the point size. + +The default unit is @samp{z} for @var{s1} and @var{s2}, @samp{p} for +@var{n1} and @var{n2}. +@endDefreq + +Sometimes, when typesetting letters of different fonts, more or less +space at such boundaries are needed. There are two escapes to help +with this. -@c XXX more info +@cindex italic correction +@cindex correction, italic +@cindex correction between italic and roman character +@cindex roman character, correction after italic character +@cindex italic character, correction before roman character +@Defesc {\\/, , , } +Increase the width of the preceding character so that the spacing +between that character and the following character is correct if the +following character is a roman character. For example, if an +italic@w{ }@code{f} is immediately followed by a roman right +parenthesis, then in many fonts the top right portion of the @code{f} +overlaps the top left of the right parenthesis. Use this escape +sequence whenever an italic character is immediately followed by a +roman character without any intervening space. This small amount of +space is also called @dfn{italic correction}. -Track kerning must be used with great care since it is usually -considered bad typography if the reader notices the effect. The syntax -of the @code{tkf} request is like this: +@iftex +@example +@group +\f[I]f\f[R]) + @result{} {@it f}@r{)} +\f[I]f\/\f[R]) + @result{} @i{f}@r{)} +@end group +@end example +@end iftex +@endDefesc + +@cindex left italic correction +@cindex correction, left italic +@cindex roman character, correction before italic character +@cindex italic character, correction after roman character +@Defesc {\\\,, , , } +Modify the spacing of the following character so that the spacing +between that character and the preceding character is correct if the +preceding character is a roman character. Use this escape sequence +whenever a roman character is immediately followed by an italic +character without any intervening space. In analogy to above, this +space could be called @dfn{left italic correction}, but this term +isn't used widely. +@iftex @example -.tkf @var{f} @var{s1} @var{n1} @var{s2} @var{n2} +@group +q\f[I]f + @result{} @r{q}@i{f} +q\,\f[I]f + @result{} @r{q}@math{@ptexcomma}@i{f} +@end group @end example +@end iftex +@endDefesc -@noindent -Enable track kerning for font@w{ }@var{f}. If the current font is@w{ -}@var{f} the width of every character will be increased by an amount -between @var{n1} and @var{n2}; if the current point size is less than or -equal to @var{s1} the width will be increased by @var{n1}; if it is -greater than or equal to @var{s2} the width will be increased by -@var{n2}; if the point size is greater than or equal to @var{s1} and -less than or equal to @var{s2} the increase in width is a linear -function of the point size. +@Defesc {\\&, , , } +Insert a zero-width character, which is invisible. Its intended use +is to stop interaction of a character with its surrounding. + +@itemize @bullet +@item +It prevents the insertion of extra space after an end of sentence +character. + +@Example +Test. +Test. + @result{} Test. Test. +Test.\& +Test. + @result{} Test. Test. +@endExample + +@item +It prevents interpretation of a control character at the beginning of +an input line. + +@Example +.Test + @result{} warning: `Test' not defined +\&.Test + @result{} .Test +@endExample + +@item +It prevents kerning between two characters. + +@ifnotinfo +@example +@group +VA + @result{} @r{VA} +V\&A + @result{} @r{V@w{}A} +@end group +@end example +@end ifnotinfo + +@item +It is needed to map an arbitrary character to nothing in the @code{tr} +request (@pxref{Character Translations}). +@end itemize +@endDefesc @c ===================================================================== -@node Sizes, Strings, Fonts, Programming Tutorial +@node Sizes, Strings, Fonts, gtroff Reference @section Sizes @cindex sizes @@ -5681,23 +6467,29 @@ @cindex size of type @cindex vertical spacing @cindex spacing, vertical -@code{gtroff} uses two dimensions with each line of text, type size and -vertical spacing. The @dfn{type size} is the height from the text -@dfn{baseline} to the top of the tallest character (descenders may drop -below this baseline). @dfn{Vertical spacing} is the amount of space -@code{gtroff} allows for a line of text; normally, this is about 20%@w{ -}larger than the current type size. Ratios smaller than this can result -in hard-to-read text; larger that this, it will spread the text out more -vertically (useful for term papers). By default, @code{gtroff} uses -10@w{ }point type on 12@w{ }point spacing. +@code{gtroff} uses two dimensions with each line of text, type size +and vertical spacing. The @dfn{type size} is approximately the height +of the tallest character.@footnote{This is usually the parenthesis. +Note that in most cases the real dimensions of the glyphs in a font +are @emph{not} related to its type size! For example, the standard +@sc{PostScript} font families `Times Roman', `Helvetica', and +`Courier' can't be used together at 10@dmn{pt}; to get acceptable +output, the size of `Helvetica' has to be reduced by one point, and +the size of `Courier' must be increased by one point.} @dfn{Vertical +spacing} is the amount of space @code{gtroff} allows for a line of +text; normally, this is about 20%@w{ }larger than the current type +size. Ratios smaller than this can result in hard-to-read text; +larger than this, it spreads the text out more vertically (useful for +term papers). By default, @code{gtroff} uses 10@w{ }point type on +12@w{ }point spacing. @cindex leading The difference between type size and vertical spacing is known, by typesetters, as @dfn{leading}. @menu -* Changing Type Sizes:: -* Fractional Type Sizes:: +* Changing Type Sizes:: +* Fractional Type Sizes:: @end menu @c --------------------------------------------------------------------- @@ -5707,32 +6499,34 @@ @cindex changing type sizes @cindex type sizes, changing -@findex ps -@findex vs -@findex \s -@vindex .s -@vindex .v -@cindex current type size register -@cindex current vertical spacing register -Using the @code{ps} request and the @code{\s} escape the type size can -be changed. The @code{vs} request will change the vertical spacing. -The default unit for the @code{ps} and @code{vs} requests are points. -The number registers @code{.s} and @code{.v} contain the current type -size and vertical spacing. - -These requests take parameters in units of points. It is possible to -specify sizes as an absolute size, or as a relative change from the -current size. The size@w{ }0 means go back to the previous size. With -no argument it will also revert to the previous size. +@Defreq {ps, [@Var{size}]} +@Defreqx {ps, @t{+}@Var{size}} +@Defreqx {ps, @t{-}@Var{size}} +@Defescx {\\s, , size, } +@Defregx {.s} +Use the @code{ps} request or the @code{\s} escape to change (increase, +decrease) the type size (in points). Specify @var{size} as either an +absolute point size, or as a relative change from the current size. +The size@w{ }0, or no argument, goes back to the previous size. + +Default unit of @code{size} is @samp{z}. If @code{size} is zero or +negative, it is set to 1@dmn{u}. + +The read-only number register @code{.s} returns the point size in +points as a decimal fraction. This is a string. To get the point +size in scaled points, use the @code{.ps} register instead. -@example +@code{.s} is associated with the current environment +(@pxref{Environments}). + +@Example snap, snap, .ps +2 grin, grin, .ps +2 wink, wink, \s+2nudge, nudge,\s+8 say no more! .ps 10 -@end example +@endExample The @code{\s} escape may be called in a variety of ways. Much like other escapes there must be a way to determine where the argument ends @@ -5740,38 +6534,61 @@ @table @code @item \s@var{n} -Set the point size to @var{n}@w{ }points. @var{n}@w{ }must be either 0 -or in the range 4 to@w{ }39. +Set the point size to @var{n}@w{ }points. @var{n}@w{ }must be either +0 or in the range 4 to@w{ }39. @item \s+@var{n} @itemx \s-@var{n} -Increase resp.@: decrease the point size by @var{n}@w{ }points. -@var{n}@w{ }must be exactly one digit. +Increase or decrease the point size by @var{n}@w{ }points. @var{n}@w{ +}must be exactly one digit. @item \s(@var{nn} -Set the point size to @var{nn}@w{ }points. @var{nn} must be exactly two -digits. +Set the point size to @var{nn}@w{ }points. @var{nn} must be exactly +two digits. @item \s+(@var{nn} @itemx \s-(@var{nn} @itemx \s(+@var{nn} @itemx \s(-@var{nn} -Increase resp.@: decrease the point size by @var{nn}@w{ }points. -@var{nn} must be exactly two digits. +Increase or decrease the point size by @var{nn}@w{ }points. @var{nn} +must be exactly two digits. @end table -@xref{Fractional Type Sizes}, for yet another syntactical form of using -the @code{\s} escape. +@xref{Fractional Type Sizes}, for yet another syntactical form of +using the @code{\s} escape. Some devices may only have certain permissible sizes, in which case -@code{gtroff} will round to the nearest permissible size. +@code{gtroff} rounds to the nearest permissible size. +@endDefreq + +@cindex current type size register +@cindex current vertical spacing register +@Defreq {vs, [@Var{space}]} +@Defreqx {vs, @t{+}@Var{space}} +@Defreqx {vs, @t{-}@Var{space}} +@Defregx {.v} +Change (increase, decrease) the vertical spacing by @var{space}. The +default unit is @samp{p}. + +If @code{vs} is called without an argument, the vertical spacing is +reset to the previous value before the last call to @code{vs}. + +@vindex .V +@code{gtroff} creates a warning of type @samp{range} if @var{space} is +zero or negative; the vertical spacing is then set to the vertical +resolution (as given in the @code{.V} register). + +The read-only number register @code{.v} contains the current vertical +spacing; it is associated with the current environment +(@pxref{Environments}). +@endDefreq @c XXX example @ignore -@example +@Example ... .sz macro example?? ... -@end example +@endExample @end ignore @c --------------------------------------------------------------------- @@ -5785,32 +6602,33 @@ @cindex unit, @code{s} @cindex @code{z} unit @cindex unit, @code{z} -@findex ps -@findex cs -@findex tkf -@findex \H -@findex \s -A @dfn{scaled point} is equal to 1/@var{sizescale} points, where -@var{sizescale} is specified in the @file{DESC} file (1@w{ }by default.) -There is a new scale indicator @samp{z} which has the effect of -multiplying by @var{sizescale}. Requests and escape sequences in -@code{gtroff} interpret arguments that represent a point size as being -in units of scaled points, but they evaluate each such argument using a -default scale indicator of @samp{z}. Arguments treated in this way are -the argument to the @code{ps} request, the third argument to the -@code{cs} request, the second and fourth arguments to the @code{tkf} -request, the argument to the @code{\H} escape sequence, and those -variants of the @code{\s} escape sequence that take a numeric expression -as their argument (see below). +@rqindex ps +@rqindex cs +@rqindex tkf +@esindex \H +@esindex \s +A @dfn{scaled point} is equal to @math{1/@var{sizescale}} points, +where @var{sizescale} is specified in the @file{DESC} file (1@w{ }by +default). There is a new scale indicator @samp{z} which has the +effect of multiplying by @var{sizescale}. Requests and escape +sequences in @code{gtroff} interpret arguments that represent a point +size as being in units of scaled points, but they evaluate each such +argument using a default scale indicator of @samp{z}. Arguments +treated in this way are the argument to the @code{ps} request, the +third argument to the @code{cs} request, the second and fourth +arguments to the @code{tkf} request, the argument to the @code{\H} +escape sequence, and those variants of the @code{\s} escape sequence +that take a numeric expression as their argument (see below). For example, suppose @var{sizescale} is@w{ }1000; then a scaled point -will be equivalent to a millipoint; the request @w{@samp{.ps 10.25}} is +is equivalent to a millipoint; the request @w{@samp{.ps 10.25}} is equivalent to @w{@samp{.ps 10.25z}} and thus sets the point size to 10250@w{ }scaled points, which is equal to 10.25@w{ }points. -It would make no sense to use the @samp{z} scale indicator in a numeric +@code{gtroff} disallows the use of the @samp{z} scale indicator in +instances where it would make no sense, such as a numeric expression whose default scale indicator was neither @samp{u} nor -@samp{z}, and so @code{gtroff} disallows this. Similarly it would make +@samp{z}. Similarly it would make no sense to use a scaling indicator other than @samp{z} or @samp{u} in a numeric expression whose default scale indicator was @samp{z}, and so @code{gtroff} disallows this as well. @@ -5821,18 +6639,36 @@ scale indicators. @vindex .s -@vindex .ps -The number register @code{.s} returns the point size in points as decimal -fraction. There is also a new number register @code{.ps} that returns -the point size in scaled points. +@Defreg {.ps} +A read-only number register returning the point size in scaled points. + +@code{.ps} is associated with the current environment +(@pxref{Environments}). +@endDefreg -@vindex .psr -@vindex .sr @cindex last-requested point size register +@cindex point size, last-requested +@vindex .ps +@vindex .s +@Defreg {.psr} +@Defregx {.sr} The last-requested point size in scaled points is contained in the -@code{.psr} number register. The last requested point size in points as -a decimal fraction can be found in @code{.sr}. This is a string-valued -register. +@code{.psr} read-only number register. The last requested point size +in points as a decimal fraction can be found in @code{.sr}. This is a +string-valued read-only number register. + +Note that the requested point sizes are device-independent, whereas +the values returned by the @code{.ps} and @code{.s} registers are not. +For example, if a point size of 11@dmn{pt} is requested for a DVI +device, 10.95@dmn{pt} are actually used (as specified in the +@file{DESC} file). + +Both registers are associated with the current environment +(@pxref{Environments}). +@endDefreg + +The @code{\s} escape has the following syntax for working with +fractional type sizes: @table @code @item \s[@var{n}] @@ -5848,7 +6684,7 @@ @itemx \s'-@var{n}' @itemx \s+'@var{n}' @itemx \s-'@var{n}' -Increase or resp.@: decrease the point size by @var{n} scaled points; +Increase or or decrease the point size by @var{n} scaled points; @var{n} is a numeric expression with a default scale indicator of @samp{z}. @end table @@ -5858,32 +6694,44 @@ @c ===================================================================== -@node Strings, Conditionals and Loops, Sizes, Programming Tutorial +@node Strings, Conditionals and Loops, Sizes, gtroff Reference @section Strings @cindex strings -@findex ds @code{gtroff} has string variables, which are entirely for user -convenience (i.e.@: there are no built-in strings). They are defined -via the @code{ds} request. +convenience (i.e.@: there are no built-in strings exept @code{.T}, but +even this is a read-write string variable). -@example -.ds UX \s-1UNIX\s0\u\s-3tm\s0\d -@end example - -@findex \* @cindex string interpolation @cindex string expansion @cindex interpolation of strings @cindex expansion of strings -They are interpolated, or expanded in-place, via the @code{\*} escape: +@Defreq {ds, name [@Var{string}]} +@Defescx {\\*, , n, } +@Defescx {\\*, @lparen{}, nm, } +@Defescx {\\*, @lbrack{}, name, @rbrack{}} +Define and access a string variable @var{name} (one-character name +@var{n}, two-character name @var{nm}). If @var{name} already exists, +@code{ds} overwrites the previous definition. -@example +Example: + +@Example +.ds UX \s-1UNIX\s0\u\s-3tm\s0\d +. The \*(UX Operating System -@end example +@endExample -If the string named by the @code{\*} does not exist, the escape will be -replaced by nothing. +The @code{\*} escape @dfn{interpolates} (expands in-place) a +previously-defined string variable. To be more precise, the stored +string is pushed onto the input stack which is then parsed by +@code{gtroff}. Similar to number registers, it is possible to nest +strings, i.e. a string variables can be called within string +variables. + +If the string named by the @code{\*} does not exist, it is defined as +empty, and a warning of type @samp{mac} is emitted (see +@ref{Debugging}, for more details). @cindex comments, with @code{ds} @strong{Caution:} Unlike other requests, the second argument to the @@ -5891,125 +6739,240 @@ This means that comments on a line with such a request can introduce unwanted space into a string. -@example +@Example .ds UX \s-1UNIX\s0\u\s-3tm\s0\d \" UNIX trademark -@end example +@endExample @noindent Instead the comment should be put on another line or have the comment escape adjacent with the end of the string. -@example +@Example .ds UX \s-1UNIX\s0\u\s-3tm\s0\d\" UNIX trademark -@end example +@endExample @cindex trailing quotes @cindex quotes, trailing @cindex leading spaces with @code{ds} @cindex spaces with @code{ds} -To produce leading space the string can be started with a double quote. -No trailing quote is needed; in fact, any trailing quote is included in -your string. +To produce leading space the string can be started with a double +quote. No trailing quote is needed; in fact, any trailing quote is +included in your string. -@example +@Example .ds sign " Yours in a white wine sauce, -@end example +@endExample -@findex as -@cindex appending to strings -@cindex strings, appending -The @code{as} request will append a string to another string. It works -similar to the @code{ds} request except that it appends the second -argument onto the string named by the first argument. - -@example -.as sign " with shallots, onions and garlic, -@end example - -@findex \@key{RET} +@esindex \@key{RET} @cindex multi-line strings @cindex strings, multi-line @cindex newline character in strings, escaping @cindex escaping newline characters in strings Strings are not limited to a single line of text. A string can span -several lines by escaping the newlines with a backslash. The resulting -string will be stored @emph{without} the newlines. +several lines by escaping the newlines with a backslash. The +resulting string is stored @emph{without} the newlines. -@example +@Example .ds foo lots and lots \ of text are on these \ next several lines -@end example - -@findex substring -@cindex substrings -Rudimentary string manipulation routines are given with the -@code{substring} and @code{length} requests. The former has the -following syntax: - -@example -.substring @var{xx} @var{n1} [@var{n2}] -@end example +@endExample -@noindent -It replaces the string in register@w{ }@var{xx} with the substring -defined by the indices @var{n1} and@w{ }@var{n2}. The first character -in the string has index one. If @var{n2} is omitted, it is taken to be -equal to the string's length. If the index value @var{n1} or @var{n2} -is negative or zero, it will be counted from the end of the string, -going backwards: The last character has index@w{ }0, the character -before the last character has index@w{ }-1, etc. - -@findex length -@cindex length of a string -@cindex string, length of -Here the syntax of the @code{length} request: - -@example -.length @var{xx} @var{string} -@end example - -@noindent -It computes the length of @var{string} and returns it in the number -register@w{ }@var{xx} (which is not necessarily defined before). - -@ignore -@findex rn -@code{rn} +It is not possible to have real newlines in a string. -@c XXX +@cindex name space of macros and strings +@cindex macros, shared name space with strings +@cindex strings, shared name space with macros +Strings, macros, and diversions (and boxes) share the same name space. +Internally, even the same mechanism is used to store them. This has +some interesting consequences. For example, it is possible to call a +macro with string syntax and vice versa. + +@Example +.de xxx +a funny test. +.. +This is \*[xxx] + @result{} This is a funny test. -@findex rm -@code{rm} +.ds yyy a funny test +This is +.yyy + @result{} This is a funny test. +@endExample + +Diversions and boxes can be also called with string syntax. It is not +possible to pass arguments to a macro if called with @code{\*}. + +Another consequence is that you can copy one-line diversions or boxes +to a string. + +@Example +.di xxx +a \fItest\fR +.br +.di +.ds yyy This is \*[xxx]\c +\*[yyy]. + @result{} @r{This is a }@i{test}. +@endExample + +@noindent +As the previous example shows, it is possible to store formatted +output in strings. The @code{\c} escape prevents the insertion of an +additional blank line in the output. + +Copying diversions longer than a single output line produces +unexpected results. + +@Example +.di xxx +a funny +.br +test +.br +.di +.ds yyy This is \*[xxx]\c +\*[yyy]. + @result{} test This is a funny. +@endExample + +Usually, it is not predictable whether a diversion contains one or +more output lines, so this mechanism should be avoided. With +@acronym{UNIX} @code{troff}, this was the only solution to strip off a +final newline from a diversion. Another disadvantage is that the +spaces in the copied string are already formatted, making them +unstretchable. This can cause ugly results. + +@rqindex chop +@rqindex unformat +A clean solution to this problem is available in GNU @code{troff}, +using the requests @code{chop} to remove the final newline of a +diversion, and @code{unformat} to make the horizontal spaces +stretchable again. + +@Example +.box xxx +a funny +.br +test +.br +.box +.chop xxx +.unformat xxx +This is \*[xxx]. + @result{} This is a funny test. +@endExample -@c XXX +@xref{Gtroff Internals}, for more information. +@endDefreq -@findex als -@code{als} +@cindex appending to strings +@cindex strings, appending +@Defreq {as, name [@Var{string}]} +The @code{as} request is similar to @code{ds} but appends @var{string} +to the string stored as @var{name} instead of redefining it. If +@var{name} doesn't exist yet, it is created. -@c XXX +@Example +.as sign " with shallots, onions and garlic, +@endExample +@endDefreq -@findex chop -@code{chop} +Rudimentary string manipulation routines are given with the next two +requests. -@c XXX -@end ignore +@cindex substring +@Defreq {substring, str n1 [@Var{n2}]} +Replace the string in register@w{ }@var{str} with the substring +defined by the indices @var{n1} and@w{ }@var{n2}. The first character +in the string has index one. If @var{n2} is omitted, it is taken to +be equal to the string's length. If the index value @var{n1} or +@var{n2} is negative or zero, it is counted from the end of the +string, going backwards: The last character has index@w{ }0, the +character before the last character has index@w{ }@minus{}1, etc. + +@Example +.ds xxx abcdefgh +.substring xxx 2 -3 +\*[xxx] + @result{} bcde +@endExample +@endDefreq +@cindex length of a string +@cindex string, length of +@Defreq {length, reg str} +Compute the length of @var{str} and returns it in the number +register@w{ }@var{reg}. If @var{reg} doesn't exist, it is created. + +@Example +.ds xxx abcdefgh +.length yyy xxx +\n[yyy] + @result{} 8 +@endExample +@endDefreq + +@cindex rename request +@cindex rename macro +@cindex rename string +@Defreq {rn, xx yy} +Rename the request, macro, or string @var{xx} to @var{yy}. +@endDefreq + +@cindex remove request +@cindex remove macro +@cindex remove string +@Defreq {rm, xx} +Remove the request, macro, or string @var{xx}. @code{gtroff} treats +subsequent invocations as if the object had never been defined. +@endDefreq + +@cindex alias +@Defreq {als, new old} +Create an alias named @var{new} for the request, string, macro, or +diversion object named @var{old}. The new name and the old name are +exactly equivalent (it is similar to a hard rather than a soft +link). If @var{old} is undefined, @code{gtroff} generates a warning of +type @samp{mac} and ignores the request. +@endDefreq + +@Defreq {chop, xx} +Remove (chop) the last character from the macro, string, or diversion +named @var{xx}. This is useful for removing the newline from the end +of diversions that are to be interpolated as strings. This command +can be used repeatedly; see @ref{Gtroff Internals}, for details on +nodes inserted by @code{gtroff} automatically. +@endDefreq @xref{Identifiers}, and @ref{Comments}. @c ===================================================================== -@node Conditionals and Loops, Writing Macros, Strings, Programming Tutorial +@node Conditionals and Loops, Writing Macros, Strings, gtroff Reference @section Conditionals and Loops @cindex conditionals and loops @cindex loops and conditionals -@findex if@r{, operators to use with it} -@findex while@r{, operators to use with it} -In @code{if} and @code{while} requests, there are several more operators -available: +@menu +* Operators in Conditionals:: +* if-else:: +* while:: +@end menu + +@c --------------------------------------------------------------------- + +@node Operators in Conditionals, if-else, Conditionals and Loops, Conditionals and Loops +@subsection Operators in Conditionals + +@rqindex if +@rqindex while +@cindex @code{if}, operators to use with it +@cindex @code{while}, operators to use with it +In @code{if} and @code{while} requests, there are several more +operators available: @table @code @item e @@ -6017,88 +6980,138 @@ True if the current page is even or odd numbered (respectively). @item n -@findex nroff -True if the document is being processed in nroff mode. +@rqindex nroff +True if the document is being processed in nroff mode (i.e., the +@code{.nroff} command has been issued). @item t -@findex troff -True if the document is being processed in troff mode. +@rqindex troff +True if the document is being processed in troff mode (i.e., the +@code{.troff} command has been issued). + +@item v +Always false. @item '@var{xxx}'@var{yyy}' True if the string @var{xxx} is equal to the string @var{yyy}. Other -characters can be used in place of the single quotes. -@c XXX (Which?) -The strings are ``formatted'' before being compared. -@c XXX (?) +characters can be used in place of the single quotes; the same set of +delimiters as for the @code{\D} escape is used (@pxref{Escapes}). +@code{gtroff} formats the strings before being compared: + +@Example +.ie "|"\fR|\fP" \ +true +.el \ +false + @result{} true +@endExample + +@noindent +The resulting motions, character sizes, and fonts have to +match,@footnote{The created output nodes must be identical. +@xref{Gtroff Internals}.} and not the individual motion, size, and +font requests. In the previous example, @samp{|} and @samp{\fR|\fP} +both result in a roman @samp{|} character with the same point size and +at the same location on the page, so the strings are equal. If +@samp{.ft@w{ }I} had been added before the @samp{.ie}, the result +would be ``false'' because (the first) @samp{|} produces an italic +@samp{|} rather than a roman one. -@item r@var{xxx} +@item r @var{xxx} True if there is a number register named @var{xxx}. -@item d@var{xxx} +@item d @var{xxx} True if there is a string, macro, diversion, or request named @var{xxx}. -@item c@var{ch} -@findex char +@item c @var{ch} +@rqindex char True if there is a character @var{ch} available; @var{ch} is either an @acronym{ASCII} character or a special character (@code{\(@var{ch}} or -@code{\[@var{ch}]}); the condition will also be true if @var{ch} has -been defined by the @code{char} request. +@code{\[@var{ch}]}); the condition is also true if @var{ch} has been +defined by the @code{char} request. @end table -@menu -* if-else:: -* while:: -@end menu +Note that these operators can't be combined with other operators like +@samp{:} or @samp{&}; only a leading @samp{!} (without whitespace +between the exclamation mark and the operator) can be used to negate +the result. + +@Example +.nr xxx 1 +.ie !r xxx \ +true +.el \ +false + @result{} false +@endExample + +A whitespace after @samp{!} always evaluates to zero (this bizarre +behaviour is due to compatibility with @acronym{UNIX} @code{troff}). + +@Example +.nr xxx 1 +.ie ! r xxx \ +true +.el \ +false + @result{} r xxx true +@endExample + +It is possible to omit the whitespace before the argument to the +@samp{r}, @samp{d}, and @samp{c} operators. + +@xref{Expressions}. @c --------------------------------------------------------------------- -@node if-else, while, Conditionals and Loops, Conditionals and Loops +@node if-else, while, Operators in Conditionals, Conditionals and Loops @subsection if-else @cindex if-else @code{gtroff} has if-then-else constructs like other languages, although -the formatting can be painful. - -@findex if -The @code{if} request has the following syntax: - -@example -.if @var{expr} @var{anything} -@end example - -@noindent -where @var{expr} is the expression to be evaluated; @var{anything} (the -remainder of the line) will be executed if @var{expr} evaluates to -non-zero (true). @var{anything} will be interpreted as though it was on -a line by itself. @xref{Expressions}, for more info. - -Here are some examples: - -@example -.if t .ls 2 \" double spacing in troff -.if 0 .ab how'd this happen? -@end example - -@findex ie -@findex el -An if-then-else is written using two requests @code{ie} and @code{el}. -The first request is the `if' part and the latter is the `else' part. - -@c XXX example +the formatting can be painful. -@example -.ie -.el -@end example +@Defreq {if, expr anything} +Evaluate the expression @var{expr}, and executes @var{anything} (the +remainder of the line) if @var{expr} evaluates to non-zero (true). +@var{anything} is interpreted as though it was on a line by itself +(except that leading spaces are swallowed). @xref{Expressions}, for +more info. + +@Example +.nr xxx 1 +.nr yyy 2 +.if ((\n[xxx] == 1) & (\n[yyy] == 2)) true + @result{} true +@endExample +@endDefreq + +@c XXX .nop request + +@Defreq {ie, expr anything} +@Defreqx {el, anything} +Use the @code{ie} and @code{el} requests to write an if-then-else. +The first request is the `if' part and the latter is the `else' part. -@findex \@{ -@findex \@} -In many cases more than one request is to be executed as a result of any -of these requests. This can be done using the @code{\@{} and @code{\@}} +@Example +.ie n .ls 2 \" double spacing in nroff +.el .ls 1 \" single spacing in troff +@endExample +@endDefreq + +@c this is a bug in makeinfo: you can't have `@{' as an argument +@c to deffn + +@esindex \@{ +@esindex \@} +@c @Defesc {\\@@@{, , , } +@c @Defescx {\\@@@}, , , } +In many cases, an if (or if-else) construct needs to execute more than +one request. This can be done using the @code{\@{} and @code{\@}} escapes. The following example shows the possible ways to use these escapes (note the position of the opening and closing braces). -@example +@Example .ie t \@{\ . ds lq `` . ds rq '' @@ -6107,8 +7120,8 @@ .\@{\ . ds lq " . ds rq "\@} -.ds qq " -@end example +@endExample +@c @endDefesc @xref{Expressions}. @@ -6118,94 +7131,179 @@ @subsection while @cindex while -@findex while @code{gtroff} provides a looping construct using the @code{while} request, which is used much like the @code{if} (and related) requests. -The first argument is an expression which will be evaluated. The -@code{while} request will interpret the remainder of the line until the -expression evaluates to 0 or false. -@example +@Defreq {while, expr anything} +Evaluate the expression @var{expr}, and repeatedly execute +@var{anything} (the remainder of the line) until @var{expr} evaluates +to@w{ }0. + +@Example .nr a 0 1 -.while (\na<9) \&\n+a, -\&\n+a -@end example +.while (\na < 9) \@{\ +\n+a, +.\@} +\n+a + @result{} 1, 2, 3, 4, 5, 6, 7, 8, 9, 10 +@endExample -@noindent -The preceding example produces: +Some remarks. -@example -1, 2, 3, 4, 5, 6, 7, 8, 9, 10 -@end example +@rqindex de +@itemize @bullet +@item +The body of a @code{while} request is treated like the body of a +@code{de} request: @code{gtroff} temporarily stores it in a macro +which is deleted after the loop has been exited. It can considerably +slow down a macro if the body of the @code{while} request (within the +macro) is large. Each time the macro is executed, the @code{while} +body is parsed and stored again as a temporary macro. + +@Example +.de xxx +. nr num 10 +. while (\\n[num] > 0) \@{\ +. \" many lines of code +. nr num -1 +. \@} +.. +@endExample + +@cindex recursive macros +@cindex macros, recursive +@noindent +The traditional and ofter better solution (@acronym{UNIX} @code{troff} +doesn't have the @code{while} request) is to use a recursive macro +instead which is parsed only once during its definition. + +@Example +.de yyy +. if (\\n[num] > 0) \@{\ +. \" many lines of code +. nr num -1 +. yyy +. \@} +.. +. +.de xxx +. nr num 10 +. yyy +.. +@endExample -@cindex zero width space character -@cindex character, zero width space -@cindex space character, zero width -@findex \& @noindent -Note the usage of the @code{\&} escape to avoid a control character at -the beginning of a line. +Note that the number of available recursion levels is set to@w{ }1000 +(this is a compile-time constant value of @code{gtroff}). + +@item +The closing brace of a @code{while} body must end a line. + +@Example +.if 1 \@{\ +. nr a 0 1 +. while (\n[a] < 10) \@{\ +. nop \n+[a] +.\@}\@} + @result{} unbalanced \@{ \@} +@endExample +@end itemize +@endDefreq -@findex break@r{, in a @code{while} loop} -@findex continue@r{, in a @code{while} loop} -The @code{break} request will @dfn{break} out of a while loop. Be sure -not to confuse this with the @code{br} request (causing a line break). -The @code{continue} request will finish the current iteration of a while -loop, immediately restarting the next iteration. +@rqindex while +@cindex @code{break}, in a @code{while} loop +@cindex @code{continue}, in a @code{while} loop +@Defreq {break, } +Break out of a @code{while} loop. Be sure not to confuse this with +the @code{br} request (causing a line break). +@endDefreq + +@Defreq {continue, } +Finishes the current iteration of a @code{while} loop, immediately +restarting the next iteration. +@endDefreq @xref{Expressions}. @c ===================================================================== -@node Writing Macros, Page Motions, Conditionals and Loops, Programming Tutorial +@node Writing Macros, Page Motions, Conditionals and Loops, gtroff Reference @section Writing Macros @cindex writing macros @cindex macros, writing -@findex de -A @dfn{macro} is a collection of text and embedded commands which can be -invoked multiple times. Macros are used for defining common operations. -Macros are defined using the @code{de} request. This request takes a -name for the macro as the first argument. Subsequent lines are copied -into an internal buffer until the line @code{..} is encountered. The -optional second argument to @code{de} can change this ending token. - -Here a small example macro called @samp{P} which will cause a break and -the insertion of some vertical space. It could be used to separate -paragraphs. +A @dfn{macro} is a collection of text and embedded commands which can +be invoked multiple times. Use macros to define common operations. -@example +@Defreq {de, name [@Var{end}]} +Define a new macro named @var{name}. @code{gtroff} copies subsequent +lines (starting with the next one) into an internal buffer until it +encounters the line @samp{..} (two dots). The optional second +argument to @code{de} changes this to a macro to @samp{.@var{end}}. + +Note that no leading whitespace is allowed in the line containing the +ending token (either @samp{..} or the macro @samp{.@var{end}}). + +Here a small example macro called @samp{P} which causes a break and +inserts some vertical space. It could be used to separate paragraphs. + +@Example .de P -.br -.sp .8v +. br +. sp .8v .. -@end example +@endExample + +@c XXX add info about macro definitions in macros. + +@c XXX give example for end macro. + +@c XXX add info about indirect macro calls: +@c +@c .de xxx +@c from yyy\c +@c .. +@c +@c test \*[xxx] test +@c => test from yyy test + +@c XXX info about common identifier pool for strings, macros, and +@c diversions. +@endDefreq -@findex am @cindex appending, to a macro -The @code{am} request works similarly to @code{de} except it appends -onto the macro named by the first argument. So, to make the previously -defined @samp{P} macro actually do indented instead of block paragraphs, -is is possible to add the necessary code to the existing macro like -this: +@Defreq {am, xx} +Works similarly to @code{de} except it appends onto the macro named +@var{xx}. So, to make the previously defined @samp{P} macro actually +do indented instead of block paragraphs, add the necessary code to the +existing macro like this: -@example +@Example .am P .ti +5n .. -@end example +@endExample +@endDefreq -@findex als -@cindex aliases, macro -@cindex macro aliases -Macros can be aliased with the @code{als} request. - -@c XXX example +@cindex alias +@Defreq {als, new old} +Create an alias named @var{new} for the request, string, macro, or +diversion object named @var{old}. The new name and the old name are +exactly equivalent (it is similar to a hard rather than a soft +link). If @var{old} is undefined, @code{gtroff} generates a warning of +type @samp{mac} and ignores the request. + +The @code{de}, @code{am}, @code{di}, @code{da}, @code{ds}, +and @code{as} requests only create a new object if the name +of the macro, diversion or string diversion is currently +undefined or if it is defined to be a request; normally +they modify the value of an existing object. +@endDefreq @menu -* Copy-in Mode:: -* Parameters:: +* Copy-in Mode:: +* Parameters:: @end menu @c --------------------------------------------------------------------- @@ -6215,14 +7313,19 @@ @cindex copy-in mode @cindex mode, copy-in -@findex \n@r{, when reading test for a macro} -@findex \$@r{, when reading test for a macro} -@findex \*@r{, when reading test for a macro} -@findex \\@r{, when reading test for a macro} -@findex \@key{RET}@r{, when reading test for a macro} -When @code{gtroff} reads in the text for a macro or diversion it copies +@esindex \n +@esindex \$ +@esindex \* +@esindex \\ +@esindex \@key{RET} +@cindex @code{\n}, when reading text for a macro +@cindex @code{\$}, when reading text for a macro +@cindex @code{\*}, when reading text for a macro +@cindex @code{\\}, when reading text for a macro +@cindex \@key{RET}, when reading text for a macro +When @code{gtroff} reads in the text for a macro or diversion, it copies the text (including request lines, but excluding escapes) into an -internal buffer. Escapes will be converted into an internal form, +internal buffer. Escapes are converted into an internal form, except for @code{\n}, @code{\$}, @code{\*}, @code{\\} and @code{\@key{RET}} which are evaluated and inserted into the text where the escape was located. This is known as @dfn{copy-in} mode or @@ -6233,10 +7336,9 @@ the escapes with an extra backslash. Compare this to the @code{\def} and @code{\edef} commands in @TeX{}. -For example, the following will result in the numbers 20 and@c{ }10 -being printed: +The following example prints the numbers 20 and@w{ }10: -@example +@Example .nr x 20 .de y .nr x 10 @@ -6244,7 +7346,7 @@ \&\\nx .. .y -@end example +@endExample @c --------------------------------------------------------------------- @@ -6252,7 +7354,6 @@ @subsection Parameters @cindex parameters -@findex \$ @vindex .$ The arguments to a macro can be examined using a variety of escapes. The number of arguments is available in the @code{.$} number register. @@ -6260,95 +7361,107 @@ escapes: @cindex copy-in mode, and macro arguments +@Defesc {\\$, n, , } +@Defescx {\\$, @lparen{}, nn, } +@Defescx {\\$, @lbrack{}, nnn, @rbrack{}} The escapes @code{\$@var{n}}, @code{\$(@var{nn}} and -@code{\$[@var{nnn}]} will result in the @var{n}th, @var{nn}th or -@var{nnn}th argument. As usual, the first form only accepts a single -number (larger than zero), the second only a two-digit number (larger or -equal to@w{ }10), and the third any positive integer value (larger than -zero). Macros can have an unlimited number of arguments. Note that due -to copy-in mode, two backslashes should be used on these in actual use -to prevent interpolation until the macro is actually invoked. +@code{\$[@var{nnn}]} retrieve the @var{n}@dmn{th}, @var{nn}@dmn{th} or +@var{nnn}@dmn{th} argument. As usual, the first form only accepts a +single number (larger than zero), the second a two-digit number (larger +or equal to@w{ }10), and the third any positive integer value (larger +than zero). Macros can have an unlimited number of arguments. Note +that due to copy-in mode, use two backslashes on these in actual use to +prevent interpolation until the macro is actually invoked. +@endDefesc -@findex shift -The request @code{shift} will shift the arguments 1@w{ }position, or as +@Defreq {shift, [@Var{n}]} +Shifts the arguments 1@w{ }position, or as many positions as specified by its argument. After executing this -request, argument@w{ }@var{i} will become argument @var{i}-@var{n}; -arguments 1 to@w{ }@var{n} will no longer be available. Shifting by +request, argument@w{ }@var{i} becomes argument @var{i}-@var{n}; +arguments 1 to@w{ }@var{n} are no longer available. Shifting by negative amounts is currently undefined. +@endDefreq -@findex \$* -@findex \$@@ +@Defesc {\\$*, , , } +@Defescx {\\$@@, , , } In some cases it is convenient to use all of the arguments at once (for example, to pass the arguments along to another macro). The @code{\$*} -escape is the concatenation of all the arguments separated by spaces. A -similar escape is @code{\$@@}, which is the concatenation of all the +escape concatenates all the arguments separated by spaces. A +similar escape is @code{\$@@}, which concatenates all the arguments with each surrounded by double quotes, and separated by spaces. +@endDefesc -@findex \$0 -@findex als@r{, use with @code{\$0}} -The @code{\$0} escape is the name by which the current macro was -invoked. The @code{als} request can make a macro have more than one -name. +@rqindex als +@cindex @code{als}, use with @code{\$0} +@Defesc {\\$0, , , } +The name used to invoke the current macro. +The @code{als} request can make a macro have more than one name. -@example +@Example .de vl .ie \\n(.$=1 .ds Vl Pre-Release Version .el .ds Vl Version \\$3, \\$4. .. -@end example +@endExample +@noindent This would be called as -@example -.vl $Id: groff.texinfo,v 1.40 2000/06/18 10:13:51 wlemb Exp $ -@end example +@Example +.vl $Id: groff.texinfo,v 1.74 2001/04/16 14:47:18 wlemb Exp $ +@endExample +@endDefesc @xref{Request Arguments}. @c ===================================================================== -@node Page Motions, Drawing Requests, Writing Macros, Programming Tutorial +@node Page Motions, Drawing Requests, Writing Macros, gtroff Reference @section Page Motions @cindex page motions @cindex motions, page -@findex sp@r{, as vertical page motion} +@cindex @code{sp}, as vertical page motion +@Defreq {sp, [@Var{len}]} Motions up and down the page can be done with the @code{sp} request. However, this causes a break so that the actual effect is to move to the left margin and then to the specified location. +@endDefreq -@findex mk -@findex rt +@Defreq {mk, [@Var{reg}]} +@Defreqx {rt, reg} The request @code{mk} can be used to mark a location on a page, for movement to later. This request takes a register name as an argument in -which to store the current page location. With no argument it will -store the location in an internal register. The results of this can be +which to store the current page location. With no argument it +stores the location in an internal register. The results of this can be used later by the @code{rt} or the @code{sp} request. The @code{rt} -request will return @emph{upwards} to the location given in the register -name given as an argument, with no argument it will return to the -location marked with the @code{mk} request +request returns @emph{upwards} to the location given in the register +name given as an argument; with no argument it returns to the +location marked with the @code{mk} request. @c XXX example @ignore -@example +@Example ... dual column example ... -@end example +@endExample @end ignore +@endDefreq The following escapes give fine control of movements about the page. -@findex \v @cindex vertical motion @cindex motion, vertical -The @code{\v'@var{e}'} enables arbitrary vertical motion from the +@Defesc {\\v, ', e, '} +The @code{\v'@var{e}'} escape enables arbitrary vertical motion from the current location on the page. The argument@w{ }@var{e} specifies the distance to move; positive is downwards and negative upwards. The -default unit for this escape is vertical spaces, @code{v}'s. Beware, -however, that @code{gtroff} will leave text processing to continue -wherever the motion ends, so to avoid interference with text processing, -motions should be balanced. +default unit for this escape @samp{v}. Beware, however, that +@code{gtroff} continues text processing at the point where the motion +ends, so you should always balance motions to avoid interference with +text processing. +@endDefesc There are some special case escapes for vertical motion. @@ -6363,33 +7476,37 @@ move down@w{ }.5@dmn{v}. @end ftable -@findex \h @cindex inserting horizontal space @cindex horizontal space @cindex space, horizontal -Horizontal motions can be done via the @code{\h'@var{e}'} escape. The +@Defesc {\\h, ', e, '} +The @code{\h'@var{e}'} escape provides horizontal motions. The expression@w{ }@var{e} indicates how far to move: positive is rightwards and negative leftwards. +@c XXX Is there a default unit for this? +@endDefesc There are a number of special case escapes for horizontal motion: @ftable @code @item \@key{SP} -an unbreakable and unpaddable (i.e.@: not expanded during filling) +An unbreakable and unpaddable (i.e.@: not expanded during filling) space. (Note: This is a backslash followed by a space.) @item \~ -an unbreakable space that stretches like a normal inter-word space when -a line is adjusted. +An unbreakable space that stretches like a normal inter-word space +when a line is adjusted. @item \| -a 1/6th em space. +A 1/6@dmn{th} em space. Ignored for tty output devices (rounded to +zero). @item \^ -a 1/12th em space. +A 1/12@dmn{th} em space. Ignored for tty output devices (rounded to +zero). @item \0 -a space the size of a digit. +A space the size of a digit. @item \& @cindex zero width space character @@ -6403,28 +7520,26 @@ sentence recognition. @end ftable -@c XXX example +The following string sets the @TeX{} logo: -@ignore -@example -... tex logo example ... -@end example -@end ignore +@Example +.ds TeX T\h'-.1667m'\v'.224m'E\v'-.224m'\h'-.125m'X +@endExample -@findex \w @cindex width escape @cindex escape, width -A frequent need is to do horizontal movement based on the width of some -arbitrary text (e.g.@: given as an argument to a macro). For that, -there is the escape @code{\w'@var{text}'} which will interpolate to the -width of the given @var{text} in basic units. +@Defesc {\\w, ', text, '} +Used as @code{\w'@var{text}'}, +returns the width of the specified @var{text} in basic units. +This allows horizontal movement based on the width of some +arbitrary text (e.g.@: given as an argument to a macro). @c XXX example @ignore -@example +@Example ... strlen example ... -@end example +@endExample @end ignore Font changes may occur in @var{text} which don't affect current @@ -6448,20 +7563,20 @@ @item ct @vindex ct -is set according to what kinds of characters occur in @var{text}: +Defines the kinds of characters occurring in @var{text}: @table @asis @item 0 only short characters, no descenders or tall characters. @item 1 -descender. +at least one descender. @item 2 -tall character. +at least one tall character. @item 3 -both a descender and a tall character. +at least one each of a descender and a tall character. @end table @item ssc @@ -6472,22 +7587,28 @@ @item skw @vindex skw How far to right of the center of the last character in the @code{\w} -argument, the center of an accent from a Roman font should be placed +argument, the center of an accent from a roman font should be placed over that character. @end table +@endDefesc -@findex \k -@vindex .k -@code{\k} +@Defesc {\\k, ', x, '} +Stores the current horizontal position in register @var{x}. +Use this, for example, to return to the beginning of a string +for highlighting or other decoration. +@endDefesc -@code{.k} +@Defreg {.k} +A read-only number register containing the current horizontal output +position. +@endDefreg @c XXX documentation @c ===================================================================== -@node Drawing Requests, Traps, Page Motions, Programming Tutorial +@node Drawing Requests, Traps, Page Motions, gtroff Reference @section Drawing Requests @cindex drawing requests @cindex requests for drawing @@ -6502,22 +7623,22 @@ All drawing is done via escapes. -@findex \l @cindex drawing horizontal lines @cindex horizontal line, drawing @cindex line, horizontal, drawing -The @code{\l} escape will draw a line rightwards from the current -location. The full syntax for this escape is like this: +@Defesc {\\l, ', l c, '} +Draws a line rightwards from the current +location. The full syntax for this escape is: -@example +@Example \l'@var{l}@var{c}' -@end example +@endExample @noindent where @var{l} is the length of the line to be drawn, starting at the -current location; positive numbers will draw to the right, and negative -will draw towards the left. This can also be specified absolutely -(i.e.@: with a leading @samp{|}) which will draw back to the beginning +current location; positive numbers draw to the right, and negative +numbers draw towards the left. This can also be specified absolutely +(i.e.@: with a leading @samp{|}) which draws back to the beginning of the line. @cindex underscore character @@ -6525,32 +7646,32 @@ @cindex line drawing character @cindex character for line drawing The optional second parameter @var{c} is a character to draw the line -with. If this second argument is not specified, @code{gtroff} will use +with. If this second argument is not specified, @code{gtroff} uses the underscore character. @cindex zero width space character @cindex character, zero width space @cindex space character, zero width -@findex \& +@esindex \& To separate the two arguments (to prevent @code{gtroff} from interpreting a drawing character as a scaling indicator) use @code{\&}. Here a small useful example: -@example +@Example .de box \(br\\$*\(br\l'|0\(rn'\l'|0\(ul' .. -@end example +@endExample -@noindent @opindex | +@noindent Note that this works by outputting a box rule (a vertical line), then the text given as an argument and then another box rule. Then the line drawing escapes both draw from the current location to the beginning of the @emph{input} line. +@endDefesc -@findex \L @cindex drawing vertical lines @cindex vertical line drawing @cindex line, vertical, drawing @@ -6558,25 +7679,28 @@ @cindex character for line drawing @cindex box rule character @cindex character, box rule -Vertical lines are drawn using the @code{\L} escape. Its parameters are -specified similar to the @code{\l} escape. If the length is positive, -the movement will be downwards, and upwards for negative values. The +@Defesc {\\L, ', l c, '} +Draws vertical lines. Its parameters are +similar to the @code{\l} escape. The +movement is downwards for positive values, +and upwards for negative values. The default character is the box rule character. As with the vertical -motion escapes, text processing will blindly continue where the line +motion escapes, text processing blindly continues where the line ends. @c XXX example @ignore -@example +@Example ...box macro... -@end example +@endExample @end ignore +@endDefesc -@findex \D -More flexible drawing functions are available via the @code{\D} escape. -While the previous escapes will work on a character device, these -escapes will not. +@Defesc {\\D, ', command arg @dots{}, '} +The @code{\D} escape provides a variety of drawing functions. +While the previous escapes work on a character device, these +escapes do not. @table @code @item \D'l @var{dx} @var{dy}' @@ -6586,9 +7710,9 @@ @c XXX example @ignore -@example +@Example ...revised box macro... -@end example +@endExample @end ignore @item \D'c @var{d}' @@ -6630,7 +7754,7 @@ corresponds solid white and 1000 to solid black, and values in between correspond to intermediate shades of gray. This applies only to solid circles, solid ellipses and solid polygons. By default, a level of@w{ -}1000 will be used. +}1000 is used. @item \D'p @var{dx1} @var{dy1} @var{dx2} @var{dy2} ...' @cindex drawing a polygon @@ -6642,9 +7766,9 @@ @c XXX example @ignore -@example +@Example ... box example (yes, again)... -@end example +@endExample @end ignore @item \D'P @var{dx1} @var{dy1} @var{dx2} @var{dy2} ...' @@ -6653,9 +7777,9 @@ @c XXX example @ignore -@example +@Example ... shaded box example ... -@end example +@endExample @end ignore @item \D't @var{n}' @@ -6666,37 +7790,39 @@ makes the line thickness proportional to the current point size (this is the default behaviour of @code{ditroff}). @end table +@endDefesc -@findex \b @cindex pile, character @cindex character pile -The @code{\b} escape will @dfn{pile} a sequence of characters -vertically, and center it vertically on the current line. This can be -used to build large brackets and braces. +@Defesc {\\b, ', string, '} +@dfn{Piles} a sequence of characters +vertically, and centers it vertically on the current line. Use it +to build large brackets and braces. -@example +@Example \b'\(lt\(bv\(lk\(bv\(lb' -@end example +@endExample +@endDefesc @xref{Drawing Functions}. @c ===================================================================== -@node Traps, Diversions, Drawing Requests, Programming Tutorial +@node Traps, Diversions, Drawing Requests, gtroff Reference @section Traps @cindex traps -@dfn{Traps} are locations, which, when reached, will call a specified +@dfn{Traps} are locations, which, when reached, call a specified macro. These traps can occur at a given location on the page, at a given location in the current diversion, after a certain number of input lines or at the end of input. @menu -* Page Location Traps:: -* Diversion Traps:: -* Input Line Traps:: -* End-of-input Traps:: +* Page Location Traps:: +* Diversion Traps:: +* Input Line Traps:: +* End-of-input Traps:: @end menu @c --------------------------------------------------------------------- @@ -6706,16 +7832,49 @@ @cindex page location traps @cindex traps, page location -@c XXX definition of wh request +@dfn{Page location traps} perform an action when @code{gtroff} +reaches a certain vertical location on the page. Page location +traps have a variety of purposes, including: + +@itemize +@item +setting headers and footers + +@item +setting body text in multiple columns + +@item +setting footnotes +@end itemize + +@cindex vertical position trap enable register +@Defreq {vpt, flag} +@Defregx {.vpt} +Enables vertical position traps if @var{flag} is non-zero, or disables +them otherwise. Vertical position traps are traps set by the @code{wh} +or @code{dt} requests. Traps set by the @code{it} request are not +vertical position traps. The parameter that controls whether vertical +position traps are enabled is global. Initially vertical position traps +are enabled. The current setting of this is available in the +@code{.vpt} read-only number register. +@endDefreq + +@Defreq {wh, dist macro} +Sets a page location trap. Positive values for @var{dist} set +the trap relative to the top of the page; negative values set +the trap relative to the bottom of the page. + +@var{macro} is the name of the macro to execute when the +trap is sprung. @cindex page headers @cindex page footers @cindex headers @cindex footers -Page location traps are frequently used for page headers and footers. -The following is a simple example of this. +The following is a simple example of how many macro packages +set headers and footers. -@example +@Example .de hd \" Page header 'sp .5i .tl 'Title''date' @@ -6728,57 +7887,52 @@ .. .wh 0 hd \" trap at top of the page .wh -1i fo \" trap one inch from bottom -@end example +@endExample +@endDefreq -@vindex .t @cindex distance to next trap @cindex trap, distance -The number register @code{.t} is the distance to the next trap. +@Defreg {.t} +A read-only number register holding the distance to the next trap. +@endDefreg -@findex ch @cindex changing trap location @cindex trap, changing location -The location of a trap can be changed later on with the @code{ch} -request. The first argument is the name of the macro to be invoked at -the trap, and the second argument is the new location for the trap. +@Defreq {ch, dist macro} +Changes the location of a trap. +The first argument is the name of the macro to be invoked at +the trap, and the second argument is the new location for the trap +(note that the parameters are specified the opposite of the @code{.wh} request). This is useful for building up footnotes in a diversion to allow more space at the bottom of the page for them. @c XXX @ignore -@example +@Example ... (simplified) footnote example ... -@end example +@endExample @end ignore +@endDefreq -@findex vpt -@findex wh -@vindex .vpt -@cindex vertical position trap enable register -The @code{vpt} request will enable vertical position traps if the -argument is non-zero, disable them otherwise. Vertical position traps -are traps set by the @code{wh} or @code{dt} requests. Traps set by the -@code{it} request are not vertical position traps. The parameter that -controls whether vertical position traps are enabled is global. -Initially vertical position traps are enabled. The current setting of -this is available in the number register @code{.vpt}. - -@vindex .trunc -@findex ne@r{, and the @code{.trunc} register} -The number register @code{.trunc} contains the amount of vertical space -truncated by the most recently sprung vertical position trap, or, if the -trap was sprung by a @code{ne} request, minus the amount of vertical -motion produced by the @code{ne} request. In other words, at the point -a trap is sprung, it represents the difference of what the vertical -position would have been but for the trap, and what the vertical -position actually is. - -@vindex .ne -The number register @code{.ne} contains the amount of space that was -needed in the last @code{ne} request that caused a trap to be sprung. -Useful in conjunction with the @code{.trunc} register. @xref{Page -Control}, for more information. +@Defreg {.ne} +The read-only number register @code{.ne} contains the amount of space +that was needed in the last @code{ne} request that caused a trap to be +sprung. Useful in conjunction with the @code{.trunc} register. +@xref{Page Control}, for more information. +@endDefreg + +@rqindex ne +@cindex @code{ne}, and the @code{.trunc} register +@Defreg {.trunc} +A read-only register containing the amount of vertical space truncated +by the most recently sprung vertical position trap, or, if the trap was +sprung by an @code{ne} request, minus the amount of vertical motion +produced by the @code{ne} request. In other words, at the point a trap +is sprung, it represents the difference of what the vertical position +would have been but for the trap, and what the vertical position +actually is. +@endDefreg @c --------------------------------------------------------------------- @@ -6787,13 +7941,16 @@ @cindex diversion traps @cindex traps, diversion -@findex dt -@vindex .t@r{, and diversions} -Traps can also be set @emph{within} a diversion using the @code{dt} -request. Like @code{wh} the first argument is the location of the trap -and the second argument is the name of the macro to be invoked. The -number register @code{.t} will still work within diversions. +@vindex .t +@cindex @code{.t}, and diversions +@Defreq {dt, dist macro} +Sets a trap @emph{within} a diversion. +@var{dist} is the first argument is the location of the trap +(identical to the @code{.wh} request) +and @var{macro} is the name of the macro to be invoked. The +number register @code{.t} still works within diversions. @xref{Diversions}, for more information. +@endDefreq @c --------------------------------------------------------------------- @@ -6802,31 +7959,25 @@ @cindex input line traps @cindex traps, input line -@findex it -The @code{it} request will set an input line trap. The format for -calling this is - -@example -.it @var{n} @var{name} -@end example - -@noindent -where @var{n} is the number of lines of input which may be read before -@dfn{springing} the trap, @var{name} is the macro to be invoked. +@Defreq {it, n macro} +Sets an input line trap. +@var{n} is the number of lines of input which may be read before +@dfn{springing} the trap, @var{macro} is the macro to be invoked. Request lines are not counted as input lines. -For example, one possible use is to have a macro which will print the +For example, one possible use is to have a macro which prints the next @var{n}@w{ }lines in a bold font. -@example +@Example .de B -.it B-end \\$1 +.it \\$1 B-end .ft B .. .de B-end .ft R .. -@end example +@endExample +@endDefreq @c --------------------------------------------------------------------- @@ -6835,16 +7986,16 @@ @cindex end-of-input traps @cindex traps, end-of-input -@findex em -The @code{em} request will set a trap at the end of input. The macro -specified as an argument will be executed after the last line of the +@Defreq {em, macro} +Sets a trap at the end of input. The @var{macro} +specified is executed after the last line of the input file has been processed. For example, if the document had to have a section at the bottom of the last page for someone to approve it, the @code{em} request could be used. -@example +@Example .de approval .ne 5v .sp |(\\n(.t-6v) @@ -6856,12 +8007,13 @@ Date:\t\t\a .. .em approval -@end example +@endExample +@endDefreq @c ===================================================================== -@node Diversions, Environments, Traps, Programming Tutorial +@node Diversions, Environments, Traps, gtroff Reference @section Diversions @cindex diversions @@ -6871,49 +8023,62 @@ at a later time, which is useful for keeping blocks of text on the same page, footnotes, tables of contents and indices. -@findex di -@findex da -A diversion is initiated by the @code{di} request. Like the @code{de} +@c XXX describe top-level diversion +@c XXX index entry for top-level diversion + +@Defreq {di, macro} +@Defreqx {da, macro} +Begins a diversion. Like the @code{de} request, it takes an argument of a macro name to divert subsequent text -into. The @code{da} macro will append to an existing diversion. +into. The @code{da} macro appends to an existing diversion. -@code{di} (resp.@: @code{da}) without an argument ends the diversion. +@code{di} or @code{da} without an argument ends the diversion. @c XXX example @ignore -@example +@Example ... end-note example ... -@end example +@endExample @end ignore +@endDefreq -@vindex .z -@vindex .d @vindex nl @vindex .h @cindex nested diversions @cindex diversion, nested -Diversions may be nested. The number register @code{.z} contains the -name of the current diversion. The number register @code{.d} contains -the current vertical place in the diversion. If not in a diversion it -is the same as the register @code{nl}. +@Defreg {.z} +@Defregx {.d} +Diversions may be nested. The read-only number register @code{.z} +contains the name of the current diversion (this is a string-valued +register). The read-only number register @code{.d} contains the current +vertical place in the diversion. If not in a diversion it is the same +as the register @code{nl}. +@endDefreg @c XXX more info -@code{.h} +@Defreg {.h} +The @dfn{high-water mark} on the current page. It corresponds to the +text baseline of the lowest line on the page. This is a read-only +register. +@endDefreg -@vindex dn -@vindex dl -After completing a diversion, the built-in number registers @code{dn} +@Defreg {dn} +@Defregx {dl} +After completing a diversion, the read-write number registers @code{dn} and @code{dl} contain the vertical and horizontal size of the diversion. @example +@group .\" Center text both horizontally & vertically .de (c .br .nf .di @@c .. +@end group +@group .de )c .br .di @@ -6929,36 +8094,39 @@ .fi .rr @@s .. +@end group @end example +@endDefreg -@findex \! @cindex transparent output @cindex output, transparent -Requests, macros and escapes are interpreted when read into a diversion. -There are two ways to prevent this; either way will take the given text -and @dfn{transparently} embed it into the diversion. The first method -is to prefix the line with @code{\!}. This will cause the entire line -to be transparently inserted into the diversion. This is useful for +@Defesc {\\!, , , } +@Defescx {\\?, , @Var{anything}, \\?} +Prevents requests, macros and escapes from being +interpreted when read into a diversion. This takes the given text +and @dfn{transparently} embeds it into the diversion. This is useful for macros which shouldn't be invoked until the diverted text is actually output. @c XXX anything is read in copy mode. (what about \! ??) -@findex \? -The other way is to surround the text by the @code{\?} escape, i.e. +The @code{\!} escape transparently embeds text up to +and including the end of the line. +The @code{\?} escape transparently embeds text until the next +occurrence of the @code{\?} escape. For example: -@example +@Example \?@var{anything}\? -@end example +@endExample @noindent @var{anything} may not contain newlines; use @code{\!} to embed newlines in a diversion. The escape sequence @code{\?} is also recognized in copy mode and turned into a single internal code; it is -this code that terminates anything. Thus the following example will -print@w{ }4. +this code that terminates anything. Thus the following example +prints@w{ }4. -@example +@Example .nr x 1 .nf .di d @@ -6974,42 +8142,43 @@ .di .nr x 4 .f -@end example +@endExample +@endDefesc -@findex asciify @cindex unformatting diversions @cindex diversion, unformatting -The @code{asciify} request only exists in order to make certain gross -hacks work with GNU @code{troff}. It @dfn{unformats} the diversion -specified as an argument in such a way that @acronym{ASCII} characters -that were formatted and diverted will be treated like ordinary input -characters when the diversion is reread. For example, the following -will set register @code{n} to@w{ }1. +@Defreq {asciify, div} +@dfn{Unformats} the diversion specified by @var{div} +in such a way that @acronym{ASCII} and space characters that +were formatted and diverted are treated like ordinary input +characters when the diversion is reread. It can be also used for gross +hacks; for example, the following sets register @code{n} to@w{ }1. -@example +@Example .tr @@. .di x -@@nr\ n\ 1 +@@nr n 1 .br .di .tr @@@@ .asciify x .x -@end example +@endExample @xref{Copy-in Mode}. +@endDefreq @c ===================================================================== -@node Environments, I/O, Diversions, Programming Tutorial +@node Environments, Suppressing output, Diversions, gtroff Reference @section Environments @cindex environments It happens frequently that some text should be printed in a certain format regardless of what may be in effect at the time, for example, in a trap invoked macro to print headers and footers. To solve this -@code{gtroff} has @dfn{environments} in which text is processed. An +@code{gtroff} processes text in @dfn{environments}. An environment contains most of the parameters that control text processing. It is possible to switch amongst these environments; by default @code{gtroff} processes text in environment@w{ }0. The @@ -7039,121 +8208,177 @@ for more info). Old versions of @code{troff} only had environments named @samp{0}, @samp{1} and@w{ }@samp{2}. -@findex ev -@vindex .ev @cindex switch environments @cindex current environment number/name register -The @code{ev} request will switch to another environment. The single -argument is the name of the environment to switch to. With no argument -@code{gtroff} will switch back to the previous environment. There is no -limit on the number of named environments; they will be created the -first time that they are referenced. The @code{.ev} register contains -the name or number of the current environment. This is a string-valued -register. +@Defreq {ev, env} +@Defregx {.ev} +Switches to another environment. The argument @var{env} is the name of +the environment to switch to. With no argument, @code{gtroff} switches +back to the previous environment. There is no limit on the number of +named environments; they are created the first time that they are +referenced. The @code{.ev} read-only register contains the name or +number of the current environment. This is a string-valued register. -Note that a call to @code{ev} (with argument) will push the previously +Note that a call to @code{ev} (with argument) pushes the previously active environment onto a stack. If, say, environments @samp{foo}, @samp{bar}, and @samp{zap} are called (in that order), the first -@code{ev} request without parameter will switch back to environment -@samp{bar} (which will be popped off the stack), and a second call will -switch back to environment @samp{foo}. +@code{ev} request without parameter switches back to environment +@samp{bar} (which is popped off the stack), and a second call +switches back to environment @samp{foo}. @c XXX example @ignore -@example +@Example ... page break macro, revised ... -@end example +@endExample @end ignore -Here is another example: +Here is an example: -@example +@Example .ev footnote-env .fam N .ps 6 .vs 8 .ll -.5i .ev + ... + .ev footnote-env \(dg Note the large, friendly letters. .ev -@end example +@endExample +@endDefreq -@findex evc @cindex copy environment -To copy an environment into the current one, use the @code{evc} request, -which takes the name of the environment to copy from as an argument. +@Defreq {evc, env} +Copies the environment @var{env} into the current environment. +@endDefreq + + +@c ===================================================================== + +@node Suppressing output, I/O, Environments, gtroff Reference +@section Suppressing output +@cindex suppressing output + +@Defesc {\\O, , num, } +Disables or enables output depending on the value of @var{num}: + +@table @samp +@item \O0 +Disable any ditroff glyphs from being emitted to the device driver. + +@item \O1 +Enable output of glyphs. +@end table + +@vindex opminx +@vindex opminy +@vindex opmaxx +@vindex opmaxy +@code{\O0} and @code{\O1} also reset the four registers @samp{opminx}, +@samp{opminy}, @samp{opmaxx}, and @samp{opmaxy} to @minus{}1. +@xref{Register Index}. These four registers mark the top left and +bottom right hand corners of a box which encompasses all written glyphs. + +The following two forms of @code{\O} are specific to @code{grohtml}. + +@table @samp +@item \O2 +Disable any ditroff glyphs from being emitted to the device driver. Also +write out to @code{stderr} the page number and four registers encompassing +the glyphs previously written since the last call to @code{\O}. + +@item \O3 +Enable output of glyphs (the default). Also write out to @code{stderr} +the page number and four registers encompassing the glyphs previously +written since the last call to @code{\O}. +@end table +@endDefesc @c ===================================================================== -@node I/O, Postprocessor Access, Environments, Programming Tutorial +@node I/O, Postprocessor Access, Suppressing output, gtroff Reference @section I/O @cindex i/o @cindex input and output requests @cindex requests for input and output @cindex output and input requests -@findex so +@code{gtroff} has several requests for including files: + @cindex including a file @cindex file inclusion -The @code{so} request will read in the file given as an argument and -include it in place of the @code{so} request. This is quite useful for -large documents, i.e.@: keeping each chapter in a separate file. +@Defreq {so, file} +Reads in the specified @var{file} and +includes it in place of the @code{so} request. This is quite useful for +large documents, e.g.@: keeping each chapter in a separate file. @xref{gsoelim}, for more information. +@endDefreq -@findex mso -The @code{mso} request is the same as the @code{so} request except that -the file is searched for in the same directories as -@file{tmac.@var{name}} is searched for when the @option{-m@var{name}} -option is specified. +@Defreq {mso, file} +Identical to the @code{so} request except that @code{gtroff} +searches for the specified +@var{file} in the same directories as macro files for the +the @option{-m} command line option. If the file name to be included +has the form @file{@var{name}.tmac} and it isn't found, @code{mso} tries +to include @file{tmac.@var{name}} and vice versa. +@endDefreq -@findex cf @cindex transparent output @cindex output, transparent -The @code{cf} and @code{trf} requests are to include a file. It will -transparently output the contents of file filename. Each line is output +@Defreq {cf, file} +@Defreqx {trf, file} +Transparently outputs the contents of @var{file}. Each line is output as it were preceded by @code{\!}; however, the lines are not subject to copy mode interpretation. If the file does not end with a newline, then -a newline will be added. For example, to define a macro@w{ }@code{x} +a newline is added. For example, to define a macro@w{ }@code{x} containing the contents of file@w{ }@file{f}, use -@example +@Example .di x .trf f .di -@end example +@endExample The request @w{@code{.cf @var{filename}}}, when used in a diversion, -will embed in the diversion an object which, when reread, will cause the +embeds an object in the diversion which, when reread, causes the contents of @var{filename} to be transparently copied through to the -output. In @acronym{UNIX} @code{troff}, the contents of @var{filename} +output. + +In @acronym{UNIX} @code{troff}, the contents of @var{filename} is immediately copied through to the output regardless of whether there is a current diversion; this behaviour is so anomalous that it must be considered a bug. This request causes a line break. -@findex trf +@rqindex trf With @code{trf}, unlike @code{cf}, the file cannot contain characters such as NUL that are not valid @code{gtroff} input characters (@pxref{Identifiers}). This request causes a line break. +@endDefreq -@findex nx -The @code{nx} request will force @code{gtroff} to continue processing of +@Defreq {nx, } +Forces @code{gtroff} to continue processing of the file specified as an argument. +@endDefreq -@findex rd -The @code{rd} request will read from standard input, and include what is +@Defreq {rd, } +The @code{rd} request reads from standard input, and includes what is read as though it were part of the input file. Text is read until a blank line is encountered. +@endDefreq @cindex form letters @cindex letters, form -Using these two requests it is easy to set up form letters. The form +Using the @code{nx} and @code{rd} requests, +it is easy to set up form letters. The form letter template is constructed like this: -@example +@Example .ce \*(td .sp 2 @@ -7165,9 +8390,9 @@ Body of letter. .bp .nx repeat.let -@end example +@endExample -@findex ex +@rqindex ex @noindent When this is run, the following file should be redirected in. Note that requests included in this file are executed as though they were part of @@ -7175,7 +8400,7 @@ which tells groff to stop processing. If this was not there, groff would not know when to stop. -@example +@Example Trent A. Fisher 708 NW 19th Av., #202 Portland, OR 97209 @@ -7189,100 +8414,106 @@ Dear Mr. Adollar, .ex -@end example - -@findex pi -@code{pi} - -@c XXX documentation +@endExample -@findex sy -The @code{sy} request will allow arbitrary system commands to be -executed from within a @code{gtroff} document. The output is not saved -anyplace, so it is up to the user to do so. +@Defreq {pi, pipe} +Pipes the output of @code{gtroff} to the shell command(s) +specified by @var{pipe}. This request must occur before +@code{gtroff} has a chance to print anything. +@endDefreq + +@Defreq {sy, cmds} +@Defregx {systat} +In @dfn{unsafe} mode, executes the shell command(s) specified by +@var{cmds}. The output is not saved anyplace, so it is up to the user +to do so. @c XXX add info about safer and unsafe mode -For example, the following example will introduce the current time +For example, the following example introduces the current time into a document: @cindex time, current @cindex current time @pindex perl -@example +@Example .sy perl -e 'printf ".nr H %d\\n.nr M %d\\n.nr S %d\\n",\ (localtime(time))[2,1,0]' > /tmp/x\n[$$] .so /tmp/x\n[$$] .sy rm /tmp/x\n[$$] \nH:\nM:\nS -@end example +@endExample @noindent Note that this works by having the @code{perl} script (run by @code{sy}) -print out the @code{nr} requests which will set the number registers +print out the @code{nr} requests which set the number registers @samp{H}, @samp{M} and @samp{S}, and then reads those commands in with the @code{so} request. -@vindex systat @cindex @code{system()} return value register -The @code{systat} number register contains the return value of the -@code{system()} function executed by the last @code{sy} request. - -@findex open -The @code{open} request will open a file (specified as the second -argument) for writing and associate the stream (specified as the first -argument) with it. +The @code{systat} read-write number register contains the return value +of the @code{system()} function executed by the last @code{sy} request. +@endDefreq + +@Defreq {open, stream file} +@Defreqx {opena, stream file} +Opens the specified @var{file} for writing and +associates the specified @var{stream} with it. -@findex opena The @code{opena} is like @code{open}, but if the file exists, append to it instead of truncating it. +@endDefreq -@findex write @cindex copy-in mode, and @code{write} requests @cindex mode, copy-in, and @code{write} requests -The @code{write} request will write to the file associated with the -stream specified by the first argument. The stream must previously have +@Defreq {write, stream data} +Writes to the file associated with the specified @var{stream}. +The stream must previously have been the subject of an open request. The remainder of the line is interpreted as the @code{ds} request reads its second argument: A -leading @samp{"} will be stripped, and it will be read in copy-in mode. +leading @samp{"} is stripped, and it is read in copy-in mode. +@endDefreq -@findex close -The @code{close} request will close the stream specified by the first -argument; stream will no longer be an acceptable argument to the +@Defreq {close, stream} +Closes the specified @var{stream}; +the stream is no longer an acceptable argument to the @code{write} request. @c XXX example @ignore -@example +@Example ... example of open write &c... -@end example +@endExample @end ignore +@endDefreq -@findex \V -The @code{\V} escape will interpolate the contents of the specified -environment variable, as returned by the function @code{getenv}. The -argument to @code{\V} is specified as an identifier, i.e.@: +@Defesc {\\V, ', xxx, '} +Interpolates the contents of the specified +environment variable, as returned by the function @code{getenv}. +Specify the argument to @code{\V} as an identifier, i.e.@: @samp{\V@var{x}}, @samp{\V(@var{xx}} or @samp{\V[@var{xxx}]}. @code{\V} is interpreted in copy-in mode. +@endDefesc @c ===================================================================== -@node Postprocessor Access, Miscellaneous, I/O, Programming Tutorial +@node Postprocessor Access, Miscellaneous, I/O, gtroff Reference @section Postprocessor Access @cindex postprocessor access @cindex access of postprocessor -There are two escapes which will allow information to be directly given -to the postprocessor. This is particularly useful for embedding +There are two escapes which give information directly to the +postprocessor. This is particularly useful for embedding @sc{PostScript} into the final document. -@findex \X -The @code{\X} escape will embed its argument into the @code{gtroff} +@Defesc {\\X, ', xxx, '} +Embeds its argument into the @code{gtroff} output preceded with @w{@samp{x X}}. +@endDefesc -@findex \Y +@Defesc {\\Y, ', xxx, '} The @code{\Y} escape is called with an identifier (i.e.@: @code{\Y@var{x}}, @code{\Y(@var{xx}} or @code{\Y[@var{xxx}]}). This is approximately equivalent to @samp{\X'\*[@var{xxx}]'}. However, the @@ -7290,38 +8521,40 @@ is permitted for @var{xxx} to have been defined as a macro and thus contain newlines (it is not permitted for the argument to @code{\X} to contain newlines). The inclusion of newlines requires an extension to -the @acronym{UNIX} @code{troff} output format, and will confuse drivers +the @acronym{UNIX} @code{troff} output format, and confuses drivers that do not know about this extension. +@endDefesc @xref{Output Devices}. @c ===================================================================== -@node Miscellaneous, Debugging, Postprocessor Access, Programming Tutorial +@node Miscellaneous, Gtroff Internals, Postprocessor Access, gtroff Reference @section Miscellaneous @cindex miscellaneous This section documents parts of @code{gtroff} which cannot (yet) be categorized elsewhere in this manual. -@findex nm @cindex line numbers @cindex numbers, line -Line numbers can be printed in the left margin using the @code{nm} -request. The first argument is the line number of the @emph{next} -output line; this defaults to@w{ }1. The second argument indicates on -which lines numbers will be printed, i.e.@: 5 means put line numbers on -every 5@w{ }lines; this defaults to@w{ }1. The third argument is the +@Defreq {nm, start inc space indent} +Prints line numbers in the left margin. +@var{start} is the line number of the @emph{next} +output line; this defaults to@w{ }1. @var{inc} indicates on +which lines numbers are printed, i.e.@: 5 means put line numbers on +every 5@w{ }lines; this defaults to@w{ }1. @var{space} is the space to be left between the number and the text; this defaults to@w{ }1. The fourth argument is the indentation of the line numbers. Without arguments, line numbers are turned off. +@endDefreq @c XXX xref ln register -@findex nn -The @code{nn} request will temporarily turn off line numbering. The -first argument is the number of lines not to be numbered; this defaults +@Defreq {nn, [@Var{skip}]} +Temporarily turns off line numbering. The +argument is the number of lines not to be numbered; this defaults to@w{ }1. @c XXX (does this disable incrementing or display?) @@ -7329,19 +8562,20 @@ @c XXX example @ignore -@example +@Example ... line numbering example ... -@end example +@endExample @end ignore +@endDefreq -@findex mc @cindex margin characters @cindex characters for margins -Margin characters can be automatically printed to the right of the text -with the @code{mc} request. The first argument is the character to be +@Defreq {mc, char dist} +Prints margin characters to the right of the text. +The first argument is the character to be printed, and the second argument is the distance away from the main body text. With no arguments the margin characters are turned off. If this -occurs before a break, no margin character will be printed. +occurs before a break, no margin character is printed. @pindex nrchbar @pindex changebar @@ -7353,146 +8587,218 @@ @c XXX example @ignore -@example +@Example ... margin char example ... -@end example +@endExample @end ignore +@endDefreq -@findex lf @pindex soelim @cindex multi-file documents @cindex documents, multi-file -The primary reason for the existence of @code{lf} is to make debugging -documents which are split into many files, which are then put together -with @code{soelim} and other preprocessors. The first argument is the -name of the file and the second argument is the input line number in +@Defreq {lf, line filename} +A debugging aid for +documents which are split into many files, then put together +with @code{soelim} and other preprocessors. The second argument is the +name of the file and the first argument is the input line number in that file. This way @code{gtroff} can produce error messages which are intelligible to the user. @c XXX example @ignore -@example +@Example ... example of soelim'ed doc ... -@end example +@endExample @end ignore +@endDefreq + + +@c ===================================================================== + +@node Gtroff Internals, Debugging, Miscellaneous, gtroff Reference +@section @code{gtroff} Internals + +@cindex input token +@cindex token, input +@cindex output node +@cindex node, output +@code{gtroff} processes input in three steps. One or more input +characters are converted to an @dfn{input token}. Then, one or more +input tokens are converted to an @dfn{output node}. Finally, output +nodes are converted to the intermediate output language understood by +all output devices. + +For example, the input string @samp{fi\[:u]} is converted in a +character token @samp{f}, a character token @samp{i}, and a special +token @samp{:u} (representing u@w{ }umlaut). Later on, the character +tokens @samp{f} and @samp{i} are merged to a single output node +representing the ligature glyph @samp{fi}; the same happens with +@samp{:u}. All output glyph nodes are `processed' which means that +they are invariably associated with a given font, font size, advance +width, etc. During the formatting process, @code{gtroff} itself adds +various nodes to control the data flow. + +Macros, diversions, and strings collect elements in two chained lists: +a list of input tokens which have been passed unprocessed, and a list +of output nodes. Consider the following the diversion. + +@Example +.di xxx +a +\!b +c +.br +.di +@endExample + +@noindent +It contains these elements. + +@multitable {@i{vertical size node}} {token list} {element number} +@item node list @tab token list @tab element number + +@item @i{line start node} @tab --- @tab 1 +@item @i{glyph node @code{a}} @tab --- @tab 2 +@item @i{word space node} @tab --- @tab 3 +@item --- @tab @code{b} @tab 4 +@item --- @tab @code{\n} @tab 5 +@item @i{glyph node @code{c}} @tab --- @tab 6 +@item @i{vertical size node} @tab --- @tab 7 +@item @i{vertical size node} @tab --- @tab 8 +@item --- @tab @code{\n} @tab 9 +@end multitable + +@esindex \v +@rqindex unformat +@noindent +Elements 1, 7, and@w{ }8 are inserted by @code{gtroff}; the latter two +(which are always present) specify the vertical extent of the last +line, possibly modified by @code{\v}. The @code{br} request finishes +the current partial line, inserting a newline input token which is +subsequently converted to a space when the diversion is reread. Note +that the word space node has a fixed width which isn't stretchable +anymore. To convert horizontal space nodes back to input tokens, use +the @code{unformat} request. + +Macros only contain elements in the token list (and the node list is +empty); diversions and strings can contain elements in both lists. @c ===================================================================== -@node Debugging, Implementation Differences, Miscellaneous, Programming Tutorial +@node Debugging, Implementation Differences, Gtroff Internals, gtroff Reference @section Debugging @cindex debugging @code{gtroff} is not easy to debug, but there are some useful features and strategies for debugging. -@itemize @bullet -@item -@findex tm -The @code{tm} request will send output to the standard error stream; -this is very useful for printing debugging output. +@Defreq {tm, string} +Sends the @var{string} to the standard error stream; +this is very useful for printing debugging output among other things. +@endDefreq + +@cindex aborting +@Defreq {ab, [@Var{string}]} +Similar to the @code{tm} request, except that +it causes @code{gtroff} to stop processing. With no argument it +prints @samp{User Abort}. +@endDefreq + +@cindex @code{ex}, use in debugging +@cindex exiting +@Defreq {ex, } +The @code{ex} request also causes @code{gtroff} to stop processing +if encountered at the topmost level; see also @ref{I/O}. +@endDefreq -@item When doing something involved it is useful to leave the debugging statements in the code and have them turned on by a command line flag. -@example +@Example .if \n(DB .tm debugging output -@end example +@endExample @noindent To activate these statements say -@example +@Example groff -rDB=1 file -@end example - -@item -@findex ab -@cindex aborting -The @code{ab} request is similar to the @code{tm} request, except that -it will cause @code{gtroff} to stop processing. With no argument it -will print @samp{User Abort}. +@endExample -@item -@findex ex@r{, use in debugging} -@cindex exiting -The @code{ex} request will also cause @code{gtroff} to stop processing -if encountered at the topmost level; see also @ref{I/O}. +@c XXX .tm1, .tmc requests -@item If it is known in advance that there will be many errors and no useful output, @code{gtroff} can be forced to suppress formatted output with the @option{-z} flag. -@item -@findex pm @cindex dumping symbol table @cindex symbol table, dumping -The @code{pm} request will dump out the entire symbol table. +@Defreq {pm, } +The @code{pm} request prints out the entire symbol table on @code{stderr}. +@endDefreq -@item -@findex pnr @cindex dumping number registers @cindex number registers, dumping -The @code{pnr} request will print the names and contents of all -currently defined number registers on stderr. +@Defreq {pnr, } +Prints the names and contents of all +currently defined number registers on @code{stderr}. +@endDefreq -@item -@findex ptr @cindex dumping traps @cindex traps, dumping -The @code{ptr} request will print the names and positions of all traps -(not including input line traps and diversion traps) on stderr. Empty -slots in the page trap list are printed as well, because they can affect -the priority of subsequently planted traps. +@Defreq {ptr, } +Prints the names and positions of all traps +(not including input line traps and diversion traps) on @code{stderr}. +Empty slots in the page trap list are printed as well, because they can +affect the priority of subsequently planted traps. +@endDefreq -@item -@findex fl @cindex flush output @cindex output, flush @cindex interactive use of @code{gtroff} @cindex @code{gtroff}, interactive use -The @code{fl} request instructs @code{gtroff} to flush its output -immediately. The intention is that this be used when using -@code{gtroff} interactively. There is little other use for it. This +@Defreq {fl, } +Instructs @code{gtroff} to flush its output +immediately. The intent is for interactive use. +@code{gtroff}; there is little other use for it. This request causes a line break. +@endDefreq -@item -@findex backtrace @cindex backtrace of input stack @cindex input stack, backtrace -The @code{backtrace} request will print a backtrace of the input stack +@Defreq {backtrace, } +The @code{backtrace} request prints a backtrace of the input stack to the standard error stream. +@endDefreq -@item @cindex warnings @code{gtroff} has command line options for printing out more warnings (@option{-w}) and for printing backtraces (@option{-b}) when a warning or an error occurs. The most verbose level of warnings is @option{-ww}. -@item -@findex warn -@vindex .warn @cindex level of warnings @cindex warnings, level -The @code{warn} request controls the level of warnings checked for. The -only argument is the sum of the numbers associated with each warning -that is to be enabled; all other warnings will be disabled. The number -associated with each warning is listed below. For example, -@w{@code{.warn 0}} will disable all warnings, and @w{@code{.warn 1}} -will disable all warnings except that about missing characters. If an -argument is not given, all warnings will be enabled. The number -register @code{.warn} contains the current warning level. -@end itemize - -@c --------------------------------------------------------------------- +@Defreq {warn, [@Var{flags}]} +@Defregx {.warn} +Controls the level of warnings checked for. The @var{flags} are the sum +of the numbers associated with each warning that is to be enabled; all +other warnings are disabled. The number associated with each warning is +listed below. For example, @w{@code{.warn 0}} disables all warnings, +and @w{@code{.warn 1}} disables all warnings except that about missing +characters. If an argument is not given, all warnings are enabled. + +The read-only number register @code{.warn} contains the current warning +level. +@endDefreq @menu -* Warnings:: +* Warnings:: @end menu +@c --------------------------------------------------------------------- + @node Warnings, , Debugging, Debugging @subsection Warnings @cindex warnings @@ -7525,8 +8831,8 @@ @item el @itemx 16 -@findex ie -@findex el +@rqindex ie +@rqindex el Use of the @code{el} request with no matching @code{ie} request. @xref{if-else}. @@ -7544,28 +8850,30 @@ @item di @itemx 256 -@findex di@r{, debugging} -@findex da@r{, debugging} +@rqindex di +@rqindex da +@cindex @code{di}, debugging +@cindex @code{da}, debugging Use of @code{di} or @code{da} without an argument when there is no current diversion. @item mac @itemx 512 -@findex de -@c XXX more findex entries +@rqindex de +@c XXX more index entries Use of undefined strings, macros and diversions. When an undefined string, macro or diversion is used, that string is automatically defined -as empty. So, in most cases, at most one warning will be given for each +as empty. So, in most cases, at most one warning is given for each name. @item reg @itemx 1024 -@findex nr -@c XXX more findex entries +@rqindex nr +@c XXX more index entries Use of undefined number registers. When an undefined number register is used, that register is automatically defined to have a value of@w{ }0. A definition is automatically made with a value of@w{ }0. So, in most -cases, at most one warning will be given for use of a particular name. +cases, at most one warning is given for use of a particular name. @item tab @itemx 2048 @@ -7573,7 +8881,8 @@ @item right-brace @itemx 4096 -@findex \@}@r{, debugging} +@esindex \@} +@cindex @code{\@}}, debugging Use of @code{\@}} where a number was expected. @item missing @@ -7593,11 +8902,11 @@ @itemx 65536 @cindex compatibility mode Missing space between a request or macro and its argument. This warning -will be given when an undefined name longer than two characters is +is given when an undefined name longer than two characters is encountered, and the first two characters of the name make a defined -name. The request or macro will not be invoked. When this warning is +name. The request or macro is not invoked. When this warning is given, no macro is automatically defined. This is enabled by default. -This warning will never occur in compatibility mode. +This warning never occurs in compatibility mode. @item font @itemx 131072 @@ -7615,7 +8924,7 @@ @c ===================================================================== -@node Implementation Differences, Summary, Debugging, Programming Tutorial +@node Implementation Differences, Summary, Debugging, gtroff Reference @section Implementation Differences @cindex implementation differences @cindex differences in implementation @@ -7629,46 +8938,48 @@ @cindex long names @cindex names, long Long names cause some incompatibilities. @acronym{UNIX} @code{troff} -will interpret +interprets -@example +@Example .dsabcd -@end example +@endExample -@findex \*@r{, incompatibilities with Unix @code{troff}} -@findex \n@r{, incompatibilities with Unix @code{troff}} -@findex cp +@esindex \* +@esindex \n +@cindex @code{\*}, incompatibilities with Unix @code{troff} +@cindex @code{\n}, incompatibilities with Unix @code{troff} +@rqindex cp @vindex .C @noindent as defining a string @samp{ab} with contents @samp{cd}. Normally, GNU -@code{troff} will interpret this as a call of a macro named -@code{dsabcd}. Also @acronym{UNIX} @code{troff} will interpret +@code{troff} interprets this as a call of a macro named +@code{dsabcd}. Also @acronym{UNIX} @code{troff} interprets @code{\*[} or @code{\n[} as references to a string or number register -called @samp{[}. In GNU @code{troff}, however, this will normally be +called @samp{[}. In GNU @code{troff}, however, this is normally interpreted as the start of a long name. In compatibility mode GNU -@code{troff} will interpret these things in the traditional way. In -compatibility mode, however, long names are not recognized. +@code{troff} interprets long names in the traditional way +(which means that they are not recognized as names). Compatibility mode can be turned on with the @option{-C} command line option, and turned on or off with the @code{cp} request. The number register @code{.C} is@w{ }1 if compatibility mode is on, 0@w{ }otherwise. -@findex \A -@findex \| -@findex \^ -@findex \& -@findex \@} -@findex \@{ -@findex \@key{SP} -@findex \' -@findex \` -@findex \- -@findex \_ -@findex \! -@findex \% -@findex \c +@esindex \A +@esindex \| +@esindex \^ +@esindex \& +@esindex \@{ +@esindex \@} +@esindex \@key{SP} +@esindex \' +@esindex \` +@esindex \- +@esindex \_ +@esindex \! +@esindex \% +@esindex \c GNU @code{troff} does not allow the use of the escape sequences -@code{\|}, @code{\^}, @code{\&}, @code{\@}}, @code{\@{}, +@code{\|}, @code{\^}, @code{\&}, @code{\@{}, @code{\@}}, @code{\@key{SP}}, @code{\'}, @code{\`}, @code{\-}, @code{\_}, @code{\!}, @code{\%}, and @code{\c} in names of strings, macros, diversions, number registers, fonts or environments; @acronym{UNIX} @code{troff} does. The @@ -7677,31 +8988,37 @@ @cindex fractional point sizes @cindex point sizes, fractional -@findex ps@r{, incompatibilities with Unix @code{troff}} +@rqindex ps +@cindex @code{ps}, incompatibilities with Unix @code{troff} Fractional point sizes cause one noteworthy incompatibility. In @acronym{UNIX} @code{troff} the @code{ps} request ignores scale indicators and thus -@example +@Example .ps 10u -@end example +@endExample @noindent -will set the point size to 10@w{ }points, whereas in GNU @code{troff} it -will set the point size to 10@w{ }scaled points. @xref{Fractional Type +sets the point size to 10@w{ }points, whereas in GNU @code{troff} it +sets the point size to 10@w{ }scaled points. @xref{Fractional Type Sizes}, for more information. -@findex bd@r{, incompatibilities with Unix @code{troff}} -@findex cs@r{, incompatibilities with Unix @code{troff}} -@findex tkf@r{, incompatibilities with Unix @code{troff}} -@findex tr@r{, incompatibilities with Unix @code{troff}} -@findex fp@r{, incompatibilities with Unix @code{troff}} +@rqindex bd +@rqindex cs +@rqindex tkf +@rqindex tr +@rqindex fp +@cindex @code{bd}, incompatibilities with Unix @code{troff} +@cindex @code{cs}, incompatibilities with Unix @code{troff} +@cindex @code{tkf}, incompatibilities with Unix @code{troff} +@cindex @code{tr}, incompatibilities with Unix @code{troff} +@cindex @code{fp}, incompatibilities with Unix @code{troff} @cindex input and output characters, compatibility with Unix @cindex output characters, compatibility with Unix @cindex characters, input and output, compatibility with Unix In GNU @code{troff} there is a fundamental difference between unformatted, input characters, and formatted, output characters. -Everything that affects how an output character will be output is stored +Everything that affects how an output character is output is stored with the character; once an output character has been constructed it is unaffected by any subsequent requests that are executed, including @code{bd}, @code{cs}, @code{tkf}, @code{tr}, or @code{fp} requests. @@ -7714,40 +9031,46 @@ of the special properties that the input character from which it was constructed might have had. For example, -@example +@Example .di x \\\\ .br .di .x -@end example +@endExample -@findex \e@r{, incompatibilities with Unix @code{troff}} -@findex \!@r{, incompatibilities with Unix @code{troff}} -@findex \?@r{, incompatibilities with Unix @code{troff}} +@esindex \e +@esindex \! +@esindex \? +@cindex @code{\e}, incompatibilities with Unix @code{troff} +@cindex @code{\!}, incompatibilities with Unix @code{troff} +@cindex @code{\?}, incompatibilities with Unix @code{troff} @cindex transparent output, incompatibilities with Unix @code{troff} @cindex output, transparent, incompatibilities with Unix @code{troff} @noindent -will print @samp{\\} in GNU @code{troff}; each pair of input backslashes +prints @samp{\\} in GNU @code{troff}; each pair of input backslashes is turned into one output backslash and the resulting output backslashes are not interpreted as escape characters when they are reread. @acronym{UNIX} @code{troff} would interpret them as escape characters when they were reread and would end up printing one @samp{\}. The correct way to obtain a printable backslash is to use the @code{\e} -escape sequence: This will always print a single instance of the current +escape sequence: This always prints a single instance of the current escape character, regardless of whether or not it is used in a -diversion; it will also work in both GNU @code{troff} and @acronym{UNIX} +diversion; it also works in both GNU @code{troff} and @acronym{UNIX} @code{troff}. To store, for some reason, an escape sequence in a diversion that will be interpreted when the diversion is reread, either use the traditional @code{\!} transparent output facility, or, if this is unsuitable, the new @code{\?} escape sequence. +@c XXX .tl compatibility mode -> input stack level +@c XXX .if compatibility mode -> input stack level + @xref{Diversions}, for more information. @c ===================================================================== -@node Summary, , Implementation Differences, Programming Tutorial +@node Summary, , Implementation Differences, gtroff Reference @section Summary @cindex summary @@ -7758,7 +9081,7 @@ @c ===================================================================== @c ===================================================================== -@node Preprocessors, Output Devices, Programming Tutorial, Top +@node Preprocessors, Output Devices, gtroff Reference, Top @chapter Preprocessors @cindex preprocessors @@ -7766,13 +9089,13 @@ which are freely available. @menu -* geqn:: -* gtbl:: -* gpic:: -* ggrn:: -* grap:: -* grefer:: -* gsoelim:: +* geqn:: +* gtbl:: +* gpic:: +* ggrn:: +* grap:: +* grefer:: +* gsoelim:: @end menu @@ -7786,7 +9109,7 @@ @c XXX @menu -* Invoking geqn:: +* Invoking geqn:: @end menu @c --------------------------------------------------------------------- @@ -7809,7 +9132,7 @@ @c XXX @menu -* Invoking gtbl:: +* Invoking gtbl:: @end menu @c --------------------------------------------------------------------- @@ -7832,7 +9155,7 @@ @c XXX @menu -* Invoking gpic:: +* Invoking gpic:: @end menu @c --------------------------------------------------------------------- @@ -7855,7 +9178,7 @@ @c XXX @menu -* Invoking ggrn:: +* Invoking ggrn:: @end menu @c --------------------------------------------------------------------- @@ -7892,7 +9215,7 @@ @c XXX @menu -* Invoking grefer:: +* Invoking grefer:: @end menu @c --------------------------------------------------------------------- @@ -7915,7 +9238,7 @@ @c XXX @menu -* Invoking gsoelim:: +* Invoking gsoelim:: @end menu @c --------------------------------------------------------------------- @@ -7940,14 +9263,14 @@ @c XXX @menu -* Special Characters:: -* grotty:: -* grops:: -* grodvi:: -* grolj4:: -* grolbp:: -* grohtml:: -* gxditview:: +* Special Characters:: +* grotty:: +* grops:: +* grodvi:: +* grolj4:: +* grolbp:: +* grohtml:: +* gxditview:: @end menu @@ -7972,7 +9295,7 @@ @c XXX @menu -* Invoking grotty:: +* Invoking grotty:: @end menu @c --------------------------------------------------------------------- @@ -7994,8 +9317,8 @@ @c XXX @menu -* Invoking grops:: -* Embedding PostScript:: +* Invoking grops:: +* Embedding PostScript:: @end menu @c --------------------------------------------------------------------- @@ -8026,7 +9349,7 @@ @c XXX @menu -* Invoking grodvi:: +* Invoking grodvi:: @end menu @c --------------------------------------------------------------------- @@ -8048,7 +9371,7 @@ @c XXX @menu -* Invoking grolj4:: +* Invoking grolj4:: @end menu @c --------------------------------------------------------------------- @@ -8070,7 +9393,7 @@ @c XXX @menu -* Invoking grolbp:: +* Invoking grolbp:: @end menu @c --------------------------------------------------------------------- @@ -8092,7 +9415,7 @@ @c XXX @menu -* Invoking grohtml:: +* Invoking grohtml:: @end menu @c --------------------------------------------------------------------- @@ -8114,7 +9437,7 @@ @c XXX @menu -* Invoking gxditview:: +* Invoking gxditview:: @end menu @c --------------------------------------------------------------------- @@ -8140,8 +9463,8 @@ @c XXX @menu -* gtroff Output:: -* Font Files:: +* gtroff Output:: +* Font Files:: @end menu @@ -8153,14 +9476,15 @@ @cindex output, @code{gtroff} This section describes the format output of GNU @code{troff}. The -output format used by GNU @code{troff} is very similar to that used by +output format used by GNU @code{troff} is very similar -- but +not identical -- to that used by @acronym{UNIX} device-independent @code{troff} (@code{ditroff}). @menu -* Output Format:: -* Device Control:: -* Drawing Functions:: -* Line Continuation:: +* Output Format:: +* Device Control:: +* Drawing Functions:: +* Line Continuation:: @end menu @c --------------------------------------------------------------------- @@ -8182,10 +9506,10 @@ newline. The names of characters and fonts can be of arbitrary length; drivers -should not assume that they will be only two characters long (as +should not assume that they are only two characters long (as @code{ditroff} does). -When a character is to be printed, that character will always be in the +When a character is to be printed, that character is always in the current font. Unlike @code{ditroff}, it is not necessary for drivers to search special fonts to find a character. @@ -8286,28 +9610,28 @@ The first three output commands are guaranteed to be: -@example +@Example x T device x res n h v x init -@end example +@endExample @noindent For example, the input -@example +@Example crunchy \fH\s+2frog\s0\fP!? -@end example +@endExample @noindent -will produce +produces @c XXX example @ignore -@example +@Example ... sample output here ... -@end example +@endExample @end ignore @c --------------------------------------------------------------------- @@ -8318,8 +9642,8 @@ @cindex functions for drawing @pindex gpic -The @samp{D} drawing command has been extended. These extensions will -only be used by GNU @code{pic} if the @option{-x} option is given. +The @samp{D} drawing command has been extended. These extensions are +used by GNU @code{pic} only if the @option{-x} option is given. @xref{Drawing Requests}. @@ -8331,11 +9655,11 @@ corresponds solid white and 1000 to solid black, and values in between correspond to intermediate shades of gray. This applies only to solid circles, solid ellipses and solid polygons. By default, a level of@w{ -}1000 will be used. Whatever color a solid object has, it should +}1000 is used. Whatever color a solid object has, it should completely obscure everything beneath it. A value greater than@w{ }1000 or less than@w{ }0 can also be used: this means fill with the shade of gray that is currently being used for lines and text. Normally this -will be black, but some drivers may provide a way of changing this. +is black, but some drivers may provide a way of changing this. @item DC @var{d} Draw a solid circle with a diameter of@w{ }@var{d} with the leftmost @@ -8347,11 +9671,12 @@ position. @item Dp @var{dx1} @var{dy1} @var{dx2} @var{dy2} @dots{} @var{dxn} @var{dyn} -Draw a polygon with. The first vertex is at the current position, the -second vertex at an offset (@var{dx1},@var{dy1}) from the current -position, the second vertex at an offset (@var{dx2},@var{dy2}) from the -first vertex, and so on up to the @var{n}-th vertex. At the moment, GNU -@code{pic} only uses this command to generate triangles and rectangles. +Draw a polygon with automatic closure. The first vertex is at the +current position, the second vertex at an offset (@var{dx1},@var{dy1}) +from the current position, the second vertex at an offset +(@var{dx2},@var{dy2}) from the first vertex, and so on up to the +@var{n}@dmn{th} vertex. At the moment, GNU @code{pic} only uses this +command to generate triangles and rectangles. @item DP @var{dx1} @var{dy1} @var{dx2} @var{dy2} @dots{} @var{dxn} @var{dyn} Like @code{Dp} but draw a solid rather than outlined polygon. @@ -8367,24 +9692,24 @@ }@var{n} selects the smallest available line thickness. @end table -@findex \D +@esindex \D A difficulty arises in how the current position should be changed after the execution of these commands. This is not of great importance since the code generated by GNU @code{pic} does not depend on this. Given a drawing command of the form -@example +@Example \D'@var{c} @var{x1} @var{y1} @var{x2} @var{y2} @dots{} @var{xn} @var{yn}' -@end example +@endExample -@findex \w +@esindex \w @vindex st -@findex sb +@vindex sb @noindent where @var{c} is not one of @samp{c}, @samp{e}, @samp{l}, @samp{a} or -@samp{~}, @acronym{UNIX} @code{troff} will treat each of the x@w{ }value -as a horizontal quantity, and each of the y@w{ }values as a vertical -quantity and will assume that the width of the drawn object is sum if +@samp{~}, @acronym{UNIX} @code{troff} treats each x@w{ }value +as a horizontal quantity, and each y@w{ }value as a vertical +quantity; it assumes that the width of the drawn object is the sum of all x@w{ }values, and that the height is the sum of all y@w{ }values. (The assumption about the height can be seen by examining the @code{st} and @code{sb} registers after using such a @code{D}@w{ }command in a @@ -8395,9 +9720,9 @@ a lesser extent, @code{DE}@w{ }commands. Thus after executing a @code{D}@w{ }command of the form -@example +@Example D@var{c} @var{x1} @var{y1} @var{x2} @var{y2} @dots{} @var{xn} @var{yn} -@end example +@endExample @noindent the current position should be increased horizontally by the sum of all @@ -8412,8 +9737,8 @@ There is a continuation convention which permits the argument to the @w{@samp{x X}} command to contain newlines: When outputting the argument -to the @w{@samp{x X}} command, GNU @code{troff} will follow each newline -in the argument with a @samp{+} character (as usual, it will terminate +to the @w{@samp{x X}} command, GNU @code{troff} follows each newline +in the argument with a @samp{+} character (as usual, it terminates the entire argument with a newline); thus if the line after the line containing the @w{@samp{x X}} command starts with @samp{+}, then the newline ending the line containing the @w{@samp{x X}} command should be @@ -8439,14 +9764,14 @@ called@w{ }@file{@var{f}}. @menu -* DESC file format:: -* Font file format:: +* DESC File Format:: +* Font File Format:: @end menu @c --------------------------------------------------------------------- -@node DESC file format, Font file format, Font Files, Font Files -@subsection @file{DESC} file format +@node DESC File Format, Font File Format, Font Files, Font Files +@subsection @file{DESC} File Format @cindex @file{DESC} file format @cindex font description file format @cindex format of font description file @@ -8493,16 +9818,15 @@ @item styles @var{S1} @var{S2} @dots{} @var{Sm} @kindex styles -The first @var{m}@w{ }font positions will be associated with styles +The first @var{m}@w{ }font positions are associated with styles @var{S1} @dots{} @var{Sm}. @item fonts @var{n} @var{F1} @var{F2} @var{F3} @dots{} @var{Fn} @kindex fonts -Fonts @var{F1} @dots{} @var{Fn} will be mounted in the font positions +Fonts @var{F1} @dots{} @var{Fn} are mounted in the font positions @var{m}+1, @dots{}, @var{m}+@var{n} where @var{m} is the number of styles. This command may extend over more than one line. A font name -of@var{ }0 will cause no font to be mounted on the corresponding font -position. +of@var{ }0 means no font is mounted on the corresponding font position. @item family @var{fam} @kindex family @@ -8524,8 +9848,8 @@ @c --------------------------------------------------------------------- -@node Font file format, , DESC file format, Font Files -@subsection Font file format +@node Font File Format, , DESC File Format, Font Files +@subsection Font File Format @cindex font file format @cindex format of font files @@ -8558,7 +9882,7 @@ @item special @kindex special The font is special; this means that when a character is requested that -is not present in the current font, it will be searched for in any +is not present in the current font, it is searched for in any special fonts that are mounted. @end table @@ -8585,13 +9909,13 @@ @c XXX fix it for new HTML additions -@example +@Example @var{name} @var{metrics} @var{type} @var{code} @var{comment} -@end example +@endExample @cindex 8-bit input @cindex input, 8-bit -@findex \N +@esindex \N @kindex --- @noindent @var{name} identifies the character: If @var{name} is a single @@ -8628,18 +9952,18 @@ The @var{code} field gives the code which the postprocessor uses to print the character. The character can also be input to @code{gtroff} using this code by means of the @code{\N} escape sequence. The code can -be any integer. If it starts with @samp{0} it will be interpreted as -octal; if it starts with @samp{0x} or @samp{0X} it will be interpreted as +be any integer. If it starts with @samp{0} it is interpreted as +octal; if it starts with @samp{0x} or @samp{0X} it is interpreted as hexadecimal. -Anything on the line after the @var{code} field will be ignored. +Anything on the line after the @var{code} field is ignored. The @var{metrics} field has the form: -@example +@Example @var{width}[,@var{height}[,@var{depth}[,@var{italic_correction} [,@var{left_italic_correction}[,@var{subscript_correction}]]]]] -@end example +@endExample @noindent There must not be any spaces between these subfields (it has been split @@ -8657,19 +9981,19 @@ baseline, it should be given a zero depth, rather than a negative depth. The @var{italic_correction} subfield gives the amount of space that should be added after the character when it is immediately to be -followed by a character from a Roman font. The +followed by a character from a roman font. The @var{left_italic_correction} subfield gives the amount of space that should be added before the character when it is immediately to be -preceded by a character from a Roman font. The +preceded by a character from a roman font. The @var{subscript_correction} gives the amount of space that should be added after a character before adding a subscript. This should be less than the italic correction. A line in the @code{charset} section can also have the format -@example +@Example @var{name} " -@end example +@endExample @noindent This indicates that @var{name} is just another name for the character @@ -8679,13 +10003,14 @@ The word @code{kernpairs} starts the kernpairs section. This contains a sequence of lines of the form: -@example +@Example @var{c1} @var{c2} @var{n} -@end example +@endExample +@noindent This means that when character @var{c1} appears next to character @var{c2} the space between them should be increased by@w{ }@var{n}. -Most entries in kernpairs section will have a negative value for@w{ +Most entries in the kernpairs section have a negative value for@w{ }@var{n}. @@ -8693,7 +10018,7 @@ @c ===================================================================== @c ===================================================================== -@node Installation, Request and Escape Index, File formats, Top +@node Installation, Request Index, File formats, Top @chapter Installation @cindex installation @@ -8704,21 +10029,30 @@ @c ===================================================================== @c ===================================================================== -@node Request and Escape Index, Operator Index, Installation, Top -@chapter Request and Escape Index +@node Request Index, Escape Index, Installation, Top +@chapter Request Index + +Requests appear without the leading control character (normally either +@samp{.} or @samp{'}). + +@printindex rq + + + +@c ===================================================================== +@c ===================================================================== -In this index, escapes are listed with a leading backslash (@samp{\}) to -distinguish them from requests which appear without the leading control -character (normally either @samp{.} or @samp{'}). +@node Escape Index, Operator Index, Request Index, Top +@chapter Escape Index -@printindex fn +@printindex es @c ===================================================================== @c ===================================================================== -@node Operator Index, Register Index, Request and Escape Index, Top +@node Operator Index, Register Index, Escape Index, Top @chapter Operator Index @printindex op @@ -8728,7 +10062,7 @@ @c ===================================================================== @c ===================================================================== -@node Register Index, Macro and String Index, Operator Index, Top +@node Register Index, Macro Index, Operator Index, Top @chapter Register Index @printindex vr @@ -8738,12 +10072,8 @@ @c ===================================================================== @c ===================================================================== -@node Macro and String Index, Glyph Name Index, Register Index, Top -@chapter Macro and String Index - -In this index, strings are listed with the calling escape sequence -(@samp{\*}) to distinguish them from macros which appear without the -leading control character (normally either @samp{.} or @samp{'}). +@node Macro Index, String Index, Register Index, Top +@chapter Macro Index @printindex ma @@ -8752,7 +10082,17 @@ @c ===================================================================== @c ===================================================================== -@node Glyph Name Index, Font File Keyword Index, Macro and String Index, Top +@node String Index, Glyph Name Index, Macro Index, Top +@chapter String Index + +@printindex st + + + +@c ===================================================================== +@c ===================================================================== + +@node Glyph Name Index, Font File Keyword Index, String Index, Top @chapter Glyph Name Index A glyph name @code{xx} consisting of exactly two characters can be diff -aruN groff-1.16.1/doc/homepage.ms groff-1.17/doc/homepage.ms --- groff-1.16.1/doc/homepage.ms Sun Feb 6 10:39:39 2000 +++ groff-1.17/doc/homepage.ms Wed Jan 17 15:17:19 2001 @@ -2,9 +2,9 @@ .\" with groff. .\" .\" -.\" To make it work with other output devices also, we include tmac.arkup +.\" To make it work with other output devices also, we include arkup.tmac .\" directly. -.mso tmac.arkup +.mso arkup.tmac .\" .LP .\" @@ -139,16 +139,18 @@ groff@gnu.org for general discussion of groff groff-commit@ffii.org a read-only list showing logs of commitments to the CVS repository -\fR +\fP .fi .RE .sp .LP -Note that groff@gnu.org is an alias for groff@ffii.org; you must be -subscribed to the `groff' and `groff-commit' lists to send mails. +Note that groff@gnu.org is an alias for +.MAILTO groff@ffii.org groff@ffii.org ; +you must be subscribed to the `groff' and `groff-commit' lists to send mails. .LP To subscribe, send e-mail to [list]-request@[domain] (example: -groff-request@ffii.org) with the word `subscribe' in either the +.MAILTO groff-request@ffii.org groff-request@ffii.org ) +with the word `subscribe' in either the subject or body of the e-mail (don't include the quotes). .LP GNU groff was written by @@ -157,6 +159,6 @@ .MAILTO Ted.Harding@nessie.mcc.ac.uk "Ted Harding" and .MAILTO wl@gnu.org "Werner Lemberg" . -.LINE +.br . .\" EOF diff -aruN groff-1.16.1/doc/meref.me groff-1.17/doc/meref.me --- groff-1.16.1/doc/meref.me Sun Feb 20 21:58:14 2000 +++ groff-1.17/doc/meref.me Wed Feb 28 10:28:54 2001 @@ -1271,7 +1271,7 @@ In other words, it is safe in nofill mode only. .TL -.b sm +.b .sm .i W .i X .DE @@ -2021,7 +2021,7 @@ \e0 F\(sc unpaddable digit-width space \&.1c M revert to single column output \&.2c M begin two column output -\e*: S umlat +\e*: S umlaut \e*< S begin subscript \e*> S end subscript \&.EN M end equation diff -aruN groff-1.16.1/doc/pic.ms groff-1.17/doc/pic.ms --- groff-1.16.1/doc/pic.ms Sun Feb 6 10:39:20 2000 +++ groff-1.17/doc/pic.ms Fri Apr 13 19:11:32 2001 @@ -10,7 +10,7 @@ .\" This document was written for free use and redistribution by .\" Eric S. Raymond in August 1995. .\" -.\" $Id: pic.ms,v 1.1.1.1 2000/02/06 09:39:20 wlemb Exp $ +.\" $Id: pic.ms,v 1.3 2001/04/13 17:11:32 wlemb Exp $ .\" .\" Set a proper TeX .ie t .ds tx T\h'-.1667m'\v'.224m'E\v'-.224m'\h'-.125m'X @@ -806,7 +806,7 @@ You can say \fB2nd last box\fP to get the second-to-last box, or \fB3rd last ellipse\fP to get the third-to-last box. .PP -In places where \fIn\fBth\fP is allowed, \fB`\fIexpr\fB'th\fP is also allowed. +In places where \fIn\fBth\fR is allowed, \fB`\fIexpr\fB'th\fR is also allowed. Note that .B 'th is a single token: no space is allowed between the @@ -947,7 +947,7 @@ .PP The names \fBcenter\fP, \fBtop\fP, \fBbottom\fP, \fBleft\fP and \fBright\fP can also be used (without the leading dot) in a prefix -form marked by \fBof\fP; thus, \fPcenter of last circle\fB and +form marked by \fBof\fP; thus, \fBcenter of last circle\fP and \fBtop of 2nd last ellipse\fP are both valid object references. .PP Arc objects also have compass point; they are the compass points of @@ -1004,7 +1004,7 @@ \&\fInot\fP restricted to [0,1]). As an alternative to this verbose syntax, you can say `\fIfraction\fP \fB<\fP\fIposition1\fP \fB,\fP \fIposition2\fP\fB>\fP.'; thus, the example could also be written -\fB1/3\fP \fP. +\fB1/3 \fP. .KS .PS arrow up right; @@ -1048,9 +1048,9 @@ .KS .PS box invis wid 2 height 1; -dot(last box .ne); "\fB(B,A)\fB is here" ljust at last circle + (0.1, 0.1); +dot(last box .ne); "\fB(B,A)\fP is here" ljust at last circle + (0.1, 0.1); dot(last box .se); "B" ljust at last circle + (0.1, -0.1) -dot(last box .sw); "\fB(A,B)\fB is here" rjust at last circle + (-0.1, -0.1); +dot(last box .sw); "\fB(A,B)\fP is here" rjust at last circle + (-0.1, -0.1); dot(last box .nw); "A" ljust at last circle + (-0.1, 0.1) .PE .CE "5: Using (\fIx\fP, \fIy\fP) composition" @@ -1368,16 +1368,17 @@ operators to appear in expressions; ! (logical negation, not factorial), &&, ||, ==, !=, >=, <=, <, >. .PP -Various built-in functions are supported: \fBsin(\fIx\fP)\fP, -\fBcos(\fIx\fP)\fP, \fBlog(\fIx\fP)\fP, \fBexp(\fIx\fP)\fP, -\fBsqrt(\fIx\fP)\fP, \fBmax(\fIx\fP,\fIy\fP)\fP, -\fBatan2(\fIx\fP,\fIy\fP)\fP, \fBmin(\fIx\fP,\fIy\fP)\fP, -\fBint(\fIx\fP\fB)\fP, and \fBrand()\fP, Both \fBexp\fP and \fBlog\fP are +Various built-in functions are supported: \fBsin(\fIx\fB)\fR, +\fBcos(\fIx\fB)\fR, \fBlog(\fIx\fB)\fR, \fBexp(\fIx\fB)\fR, +\fBsqrt(\fIx\fB)\fR, \fBmax(\fIx\fB,\fIy\fB)\fR, +\fBatan2(\fIx\fB,\fIy\fB)\fR, \fBmin(\fIx\fB,\fIy\fB)\fR, +\fBint(\fIx\fB)\fR, and \fBrand()\fP. +Both \fBexp\fP and \fBlog\fP are base 10; \fBint\fP does integer truncation; and \fBrand()\fP returns a random number in [0-1). .PP GNU \fBgpic\fP also documents a one-argument form or rand, -\fBrand(\fIx\fP\fB)\fP, which returns a random number between 1 and +\fBrand(\fIx\fB)\fR, which returns a random number between 1 and \fIx\fP, but this is deprecated and may be removed in a future version. .PP @@ -1966,7 +1967,7 @@ \& \& line down from 1st box .s lineht; \& A: line down; -\& line down from 2nd box .s; filter "\\fBhtml2ms"; +\& line down from 2nd box .s; filter "\\fBhtml2ms\\fP"; \& B: line down; \& line down from 3rd box .s; filter "\\fBformat\\fP"; \& C: line down; @@ -2032,7 +2033,7 @@ line down from 1st box .s lineht; A: line down; - line down from 2nd box .s; filter "\fBhtml2ms"; + line down from 2nd box .s; filter "\fBhtml2ms\fP"; B: line down; line down from 3rd box .s; filter "\fBformat\fP"; C: line down; @@ -2238,8 +2239,6 @@ \f(CWwith\fP attribute fixes the specified feature of the given object to a specified location. .PP -The \f(CWsolid\fR primitive is not yet supported in GNU \fBgpic\fR. -.PP The \f(CWby\fR primitive is not documented in the tutorial portion of the Kernighan paper, and should probably be considered unreliable. .PP @@ -2295,7 +2294,7 @@ declaration; the \fBlast\fP modifier counts backwards. .PP The "'th" form (which allows you to select a previous object with an -expression, as opposed to a numeric literal) is bnot documented in DWB +expression, as opposed to a numeric literal) is not documented in DWB \fBpic\fR(1). .PP The following style variables control output: diff -aruN groff-1.16.1/font/devdvi/generate/Makefile groff-1.17/font/devdvi/generate/Makefile --- groff-1.16.1/font/devdvi/generate/Makefile Wed May 24 00:08:22 2000 +++ groff-1.17/font/devdvi/generate/Makefile Fri Aug 25 21:35:29 2000 @@ -102,6 +102,6 @@ -rm -f $(FONTS) extraclean: realclean - -rm -f core *~ \#* + -rm -f core *~ "#*" .PHONY: clean realclean extraclean all diff -aruN groff-1.16.1/font/devhtml/CB groff-1.17/font/devhtml/CB --- groff-1.16.1/font/devhtml/CB Fri May 19 07:05:49 2000 +++ groff-1.17/font/devhtml/CB Thu Jan 1 01:00:00 1970 @@ -1,308 +0,0 @@ -name CB -spacewidth 9 -charset ---- 9,1 0 040 -! 9,9 0 041 -" 9,10 0 042 " -dq " -# 9,10,1 0 043 -sh " -$ 9,11,1 0 044 -Do " -% 9,10 0 045 -& 9,8 0 046 & -' 9,10 0 047 -cq " -( 9,9,2 0 050 -) 9,9,2 0 051 -* 9,9 0 052 -+ 9,8 0 053 -, 9,2,2 0 054 -\- 9,5 0 055 -. 9,2 0 056 -/ 9,10,2 0 057 -sl " -0 9,10 0 060 -1 9,10 0 061 -2 9,10 0 062 -3 9,10 0 063 -4 9,10 0 064 -5 9,10 0 065 -6 9,10 0 066 -7 9,10 0 067 -8 9,10 0 070 -9 9,10 0 071 -: 9,7 0 072 -; 9,7,2 0 073 -< 9,8 0 074 < -= 9,6 0 075 -eq " -> 9,8 0 076 > -? 9,9 0 077 -@ 9,9 0 0100 -at " -A 9,9 0 0101 -B 9,9 0 0102 -C 9,9 0 0103 -D 9,9 0 0104 -E 9,9 0 0105 -F 9,9 0 0106 -G 9,9 0 0107 -H 9,9 0 0110 -I 9,9 0 0111 -J 9,9 0 0112 -K 9,9 0 0113 -L 9,9 0 0114 -M 9,9 0 0115 -N 9,9 0 0116 -O 9,9 0 0117 -P 9,9 0 0120 -Q 9,9,2 0 0121 -R 9,9 0 0122 -S 9,9 0 0123 -T 9,9 0 0124 -U 9,9 0 0125 -V 9,9 0 0126 -W 9,9 0 0127 -X 9,9 0 0130 -Y 9,9 0 0131 -Z 9,9 0 0132 -[ 9,9,2 0 0133 -lB " -\ 9,10,2 0 0134 -rs " -] 9,9,2 0 0135 -rB " -^ 9,9 0 0136 -a^ " -ha " -_ 9,0,2 0 0137 -` 9,10 0 0140 -oq " -a 9,7 0 0141 -b 9,10 0 0142 -c 9,7 0 0143 -d 9,10 0 0144 -e 9,7 0 0145 -f 9,10 0 0146 -g 9,7,3 0 0147 -h 9,10 0 0150 -i 9,10 0 0151 -j 9,10,3 0 0152 -k 9,10 0 0153 -l 9,10 0 0154 -m 9,7 0 0155 -n 9,7 0 0156 -o 9,7 0 0157 -p 9,7,3 0 0160 -q 9,7,3 0 0161 -r 9,7 0 0162 -s 9,7 0 0163 -t 9,9 0 0164 -u 9,7 0 0165 -v 9,7 0 0166 -w 9,7 0 0167 -x 9,7 0 0170 -y 9,7,3 0 0171 -z 9,7 0 0172 -{ 9,9,2 0 0173 -lC " -| 9,9,2 0 0174 -or " -ba " -} 9,9,2 0 0175 -rC " -~ 9,6 0 0176 -a~ " -ap " -ti " -r! 9,7,2 0 0241 ¡ -¡ " -ct 9,9,1 0 0242 ¢ -¢ " -Po 9,9 0 0243 £ -£ " -Cs 9,7 0 0244 ¤ -¤ " -Ye 9,9 0 0245 ¥ -¥ " -bb 9,9,2 0 0246 ¦ -¦ " -sc 9,10,1 0 0247 § -§ " -ad 9,10 0 0250 ¨ -¨ " -co 9,9 0 0251 © -© " -Of 9,9 0 0252 ª -ª " -Fo 9,6 0 0253 « -« " -no 9,5 0 0254 ¬ -¬ " -- 9,5 0 055 ­ -hy " ­ -­ " -rg 9,9 0 0256 ® -® " -a- 9,9 0 0257 ¯ -¯ " -de 9,9 0 0260 ° -° " -+- 9,8 0 0261 ± -± " -S2 9,10 0 0262 ² -² " -S3 9,10 0 0263 ³ -³ " -aa 9,9 0 0264 ´ -´ " -µ 9,7,3 0 0265 µ -ps 9,10,1 0 0266 ¶ -¶ " -pc 9,5 0 0267 · -· " -ac 9,1,3 0 0270 ¸ -¸ " -S1 9,10 0 0271 ¹ -¹ " -Om 9,9 0 0272 º -º " -Fc 9,6 0 0273 » -» " -14 9,10 0 0274 ¼ -¼ " -12 9,10 0 0275 ½ -½ " -34 9,10 0 0276 ¾ -¾ " -r? 9,7,2 0 0277 ¿ -¿ " -`A 9,12 0 0300 À -À " -'A 9,12 0 0301 Á -Á " -^A 9,12 0 0302 Â -Â " -~A 9,12 0 0303 Ã -Ã " -:A 9,12 0 0304 Ä -Ä " -oA 9,12 0 0305 Å -Å " -AE 9,9 0 0306 Æ -Æ " -,C 9,9,4 0 0307 Ç -Ç " -`E 9,12 0 0310 È -È " -'E 9,12 0 0311 É -É " -^E 9,12 0 0312 Ê -Ê " -:E 9,12 0 0313 Ë -Ë " -`I 9,12 0 0314 Ì -Ì " -'I 9,12 0 0315 Í -Í " -^I 9,12 0 0316 Î -Î " -:I 9,12 0 0317 Ï -Ï " --D 9,9 0 0320 Ð -Ð " -~N 9,12 0 0321 Ñ -Ñ " -`O 9,12 0 0322 Ò -Ò " -'O 9,12 0 0323 Ó -Ó " -^O 9,12 0 0324 Ô -Ô " -~O 9,12 0 0325 Õ -Õ " -:O 9,12 0 0326 Ö -Ö " -mu 9,8 0 0327 × -× " -/O 9,10 0 0330 Ø -Ø " -`U 9,12 0 0331 Ù -Ù " -'U 9,12 0 0332 Ú -Ú " -^U 9,12 0 0333 Û -Û " -:U 9,12 0 0334 Ü -Ü " -'Y 9,12 0 0335 Ý -Ý " -TP 9,9 0 0336 Þ -Þ " -ss 9,9 0 0337 ß -ß " -`a 9,10 0 0340 à -à " -'a 9,10 0 0341 á -á " -^a 9,10 0 0342 â -â " -~a 9,10 0 0343 ã -ã " -:a 9,10 0 0344 ä -ä " -oa 9,10 0 0345 å -å " -ae 9,7 0 0346 æ -æ " -,c 9,7,4 0 0347 ç -ç " -`e 9,10 0 0350 è -è " -'e 9,10 0 0351 é -é " -^e 9,10 0 0352 ê -ê " -:e 9,10 0 0353 ë -ë " -`i 9,10 0 0354 ì -ì " -'i 9,10 0 0355 í -í " -^i 9,10 0 0356 î -î " -:i 9,10 0 0357 ï -ï " -Sd 9,10 0 0360 ð -ð " -~n 9,10 0 0361 ñ -ñ " -`o 9,10 0 0362 ò -ò " -'o 9,10 0 0363 ó -ó " -^o 9,10 0 0364 ô -ô " -~o 9,10 0 0365 õ -õ " -:o 9,10 0 0366 ö -ö " -di 9,8 0 0367 ÷ -÷ " -/o 9,7 0 0370 ø -ø " -`u 9,10 0 0371 ù -ù " -'u 9,10 0 0372 ú -ú " -^u 9,10 0 0373 û -û " -:u 9,10 0 0374 ü -ü " -'y 9,10,3 0 0375 ý -ý " -Tp 9,9,3 0 0376 þ -þ " -:y 9,10,3 0 0377 ÿ -ÿ " diff -aruN groff-1.16.1/font/devhtml/CBI groff-1.17/font/devhtml/CBI --- groff-1.16.1/font/devhtml/CBI Fri May 19 07:05:49 2000 +++ groff-1.17/font/devhtml/CBI Thu Jan 1 01:00:00 1970 @@ -1,308 +0,0 @@ -name CBI -spacewidth 9 -charset ---- 9,1 0 040 -! 9,10 0 041 -" 9,9 0 042 " -dq " -# 9,11,1 0 043 -sh " -$ 9,11,1 0 044 -Do " -% 9,10 0 045 -& 9,8 0 046 & -' 9,9 0 047 -cq " -( 9,9,2 0 050 -) 9,9,2 0 051 -* 9,10 0 052 -+ 9,8 0 053 -, 9,2,2 0 054 -\- 9,5 0 055 -. 9,2 0 056 -/ 9,10,2 0 057 -sl " -0 9,10 0 060 -1 9,10 0 061 -2 9,10 0 062 -3 9,10 0 063 -4 9,10 0 064 -5 9,10 0 065 -6 9,10 0 066 -7 9,10 0 067 -8 9,10 0 070 -9 9,10 0 071 -: 9,7 0 072 -; 9,7,2 0 073 -< 9,8 0 074 < -= 9,6 0 075 -eq " -> 9,8 0 076 > -? 9,9 0 077 -@ 9,9 0 0100 -at " -A 9,9 0 0101 -B 9,9 0 0102 -C 9,9 0 0103 -D 9,9 0 0104 -E 9,9 0 0105 -F 9,9 0 0106 -G 9,9 0 0107 -H 9,9 0 0110 -I 9,9 0 0111 -J 9,9 0 0112 -K 9,9 0 0113 -L 9,9 0 0114 -M 9,9 0 0115 -N 9,9 0 0116 -O 9,9 0 0117 -P 9,9 0 0120 -Q 9,9,2 0 0121 -R 9,9 0 0122 -S 9,9 0 0123 -T 9,9 0 0124 -U 9,9 0 0125 -V 9,9 0 0126 -W 9,9 0 0127 -X 9,9 0 0130 -Y 9,9 0 0131 -Z 9,9 0 0132 -[ 9,9,2 0 0133 -lB " -\ 9,10,2 0 0134 -rs " -] 9,9,2 0 0135 -rB " -^ 9,9 0 0136 -a^ " -ha " -_ 9,0,3 0 0137 -` 9,9 0 0140 -oq " -a 9,7 0 0141 -b 9,10 0 0142 -c 9,7 0 0143 -d 9,10 0 0144 -e 9,7 0 0145 -f 9,10 0 0146 -g 9,7,3 0 0147 -h 9,10 0 0150 -i 9,10 0 0151 -j 9,10,3 0 0152 -k 9,10 0 0153 -l 9,10 0 0154 -m 9,7 0 0155 -n 9,7 0 0156 -o 9,7 0 0157 -p 9,7,3 0 0160 -q 9,7,3 0 0161 -r 9,7 0 0162 -s 9,7 0 0163 -t 9,9 0 0164 -u 9,7 0 0165 -v 9,7 0 0166 -w 9,7 0 0167 -x 9,7 0 0170 -y 9,7,3 0 0171 -z 9,7 0 0172 -{ 9,9,2 0 0173 -lC " -| 9,9,2 0 0174 -or " -ba " -} 9,9,2 0 0175 -rC " -~ 9,6 0 0176 -a~ " -ap " -ti " -r! 9,7,3 0 0241 ¡ -¡ " -ct 9,9,1 0 0242 ¢ -¢ " -Po 9,9 0 0243 £ -£ " -Cs 9,7 0 0244 ¤ -¤ " -Ye 9,9 0 0245 ¥ -¥ " -bb 9,10,2 0 0246 ¦ -¦ " -sc 9,10,1 0 0247 § -§ " -ad 9,10 0 0250 ¨ -¨ " -co 9,9 0 0251 © -© " -Of 9,9 0 0252 ª -ª " -Fo 9,6 0 0253 « -« " -no 9,6 0 0254 ¬ -¬ " -- 9,5 0 055 ­ -hy " ­ -­ " -rg 9,9 0 0256 ® -® " -a- 9,9 0 0257 ¯ -¯ " -de 9,10 0 0260 ° -° " -+- 9,8 0 0261 ± -± " -S2 9,10 0 0262 ² -² " -S3 9,10 0 0263 ³ -³ " -aa 9,10 0 0264 ´ -´ " -µ 9,7,3 0 0265 µ -ps 9,10,1 0 0266 ¶ -¶ " -pc 9,5 0 0267 · -· " -ac 9,1,3 0 0270 ¸ -¸ " -S1 9,10 0 0271 ¹ -¹ " -Om 9,9 0 0272 º -º " -Fc 9,6 0 0273 » -» " -14 9,10 0 0274 ¼ -¼ " -12 9,10 0 0275 ½ -½ " -34 9,10 0 0276 ¾ -¾ " -r? 9,7,2 0 0277 ¿ -¿ " -`A 9,12 0 0300 À -À " -'A 9,12 0 0301 Á -Á " -^A 9,12 0 0302 Â -Â " -~A 9,12 0 0303 Ã -Ã " -:A 9,12 0 0304 Ä -Ä " -oA 9,12 0 0305 Å -Å " -AE 9,9 0 0306 Æ -Æ " -,C 9,9,4 0 0307 Ç -Ç " -`E 9,12 0 0310 È -È " -'E 9,12 0 0311 É -É " -^E 9,12 0 0312 Ê -Ê " -:E 9,12 0 0313 Ë -Ë " -`I 9,12 0 0314 Ì -Ì " -'I 9,12 0 0315 Í -Í " -^I 9,12 0 0316 Î -Î " -:I 9,12 0 0317 Ï -Ï " --D 9,9 0 0320 Ð -Ð " -~N 9,12 0 0321 Ñ -Ñ " -`O 9,12 0 0322 Ò -Ò " -'O 9,12 0 0323 Ó -Ó " -^O 9,12 0 0324 Ô -Ô " -~O 9,12 0 0325 Õ -Õ " -:O 9,12 0 0326 Ö -Ö " -mu 9,8 0 0327 × -× " -/O 9,9 0 0330 Ø -Ø " -`U 9,12 0 0331 Ù -Ù " -'U 9,12 0 0332 Ú -Ú " -^U 9,12 0 0333 Û -Û " -:U 9,12 0 0334 Ü -Ü " -'Y 9,12 0 0335 Ý -Ý " -TP 9,9 0 0336 Þ -Þ " -ss 9,9 0 0337 ß -ß " -`a 9,10 0 0340 à -à " -'a 9,10 0 0341 á -á " -^a 9,10 0 0342 â -â " -~a 9,10 0 0343 ã -ã " -:a 9,10 0 0344 ä -ä " -oa 9,10 0 0345 å -å " -ae 9,7 0 0346 æ -æ " -,c 9,7,4 0 0347 ç -ç " -`e 9,10 0 0350 è -è " -'e 9,10 0 0351 é -é " -^e 9,10 0 0352 ê -ê " -:e 9,10 0 0353 ë -ë " -`i 9,10 0 0354 ì -ì " -'i 9,10 0 0355 í -í " -^i 9,10 0 0356 î -î " -:i 9,10 0 0357 ï -ï " -Sd 9,10 0 0360 ð -ð " -~n 9,10 0 0361 ñ -ñ " -`o 9,10 0 0362 ò -ò " -'o 9,10 0 0363 ó -ó " -^o 9,10 0 0364 ô -ô " -~o 9,10 0 0365 õ -õ " -:o 9,10 0 0366 ö -ö " -di 9,8 0 0367 ÷ -÷ " -/o 9,8 0 0370 ø -ø " -`u 9,10 0 0371 ù -ù " -'u 9,10 0 0372 ú -ú " -^u 9,10 0 0373 û -û " -:u 9,10 0 0374 ü -ü " -'y 9,10,3 0 0375 ý -ý " -Tp 9,9,3 0 0376 þ -þ " -:y 9,10,3 0 0377 ÿ -ÿ " diff -aruN groff-1.16.1/font/devhtml/CI groff-1.17/font/devhtml/CI --- groff-1.16.1/font/devhtml/CI Fri May 19 07:05:49 2000 +++ groff-1.17/font/devhtml/CI Thu Jan 1 01:00:00 1970 @@ -1,308 +0,0 @@ -name CI -spacewidth 9 -charset ---- 9,1 0 040 -! 9,9 0 041 -" 9,10 0 042 " -dq " -# 9,10,1 0 043 -sh " -$ 9,10,1 0 044 -Do " -% 9,10 0 045 -& 9,8 0 046 & -' 9,10 0 047 -cq " -( 9,10,3 0 050 -) 9,10,3 0 051 -* 9,9 0 052 -+ 9,8 0 053 -, 9,2,2 0 054 -\- 9,5 0 055 -. 9,2 0 056 -/ 9,10,2 0 057 -sl " -0 9,10 0 060 -1 9,10 0 061 -2 9,10 0 062 -3 9,10 0 063 -4 9,10 0 064 -5 9,10 0 065 -6 9,10 0 066 -7 9,10 0 067 -8 9,10 0 070 -9 9,10 0 071 -: 9,7 0 072 -; 9,7,2 0 073 -< 9,8 0 074 < -= 9,6 0 075 -eq " -> 9,8 0 076 > -? 9,9 0 077 -@ 9,9 0 0100 -at " -A 9,9 0 0101 -B 9,9 0 0102 -C 9,9 0 0103 -D 9,9 0 0104 -E 9,9 0 0105 -F 9,9 0 0106 -G 9,9 0 0107 -H 9,9 0 0110 -I 9,9 0 0111 -J 9,9 0 0112 -K 9,9 0 0113 -L 9,9 0 0114 -M 9,9 0 0115 -N 9,9 0 0116 -O 9,9 0 0117 -P 9,9 0 0120 -Q 9,9,2 0 0121 -R 9,9 0 0122 -S 9,9 0 0123 -T 9,9 0 0124 -U 9,9 0 0125 -V 9,9 0 0126 -W 9,9 0 0127 -X 9,9 0 0130 -Y 9,9 0 0131 -Z 9,9 0 0132 -[ 9,10,3 0 0133 -lB " -\ 9,10,2 0 0134 -rs " -] 9,10,3 0 0135 -rB " -^ 9,9 0 0136 -a^ " -ha " -_ 9,0,3 0 0137 -` 9,10 0 0140 -oq " -a 9,7 0 0141 -b 9,10 0 0142 -c 9,7 0 0143 -d 9,10 0 0144 -e 9,7 0 0145 -f 9,10 0 0146 -g 9,7,3 0 0147 -h 9,10 0 0150 -i 9,10 0 0151 -j 9,10,3 0 0152 -k 9,10 0 0153 -l 9,10 0 0154 -m 9,7 0 0155 -n 9,7 0 0156 -o 9,7 0 0157 -p 9,7,3 0 0160 -q 9,7,3 0 0161 -r 9,7 0 0162 -s 9,7 0 0163 -t 9,9 0 0164 -u 9,7 0 0165 -v 9,7 0 0166 -w 9,7 0 0167 -x 9,7 0 0170 -y 9,7,3 0 0171 -z 9,7 0 0172 -{ 9,10,3 0 0173 -lC " -| 9,9,2 0 0174 -or " -ba " -} 9,10,3 0 0175 -rC " -~ 9,5 0 0176 -a~ " -ap " -ti " -r! 9,7,2 0 0241 ¡ -¡ " -ct 9,10 0 0242 ¢ -¢ " -Po 9,9 0 0243 £ -£ " -Cs 9,7 0 0244 ¤ -¤ " -Ye 9,9 0 0245 ¥ -¥ " -bb 9,9,2 0 0246 ¦ -¦ " -sc 9,9,1 0 0247 § -§ " -ad 9,9 0 0250 ¨ -¨ " -co 9,9 0 0251 © -© " -Of 9,9 0 0252 ª -ª " -Fo 9,7 0 0253 « -« " -no 9,6 0 0254 ¬ -¬ " -- 9,5 0 055 ­ -hy " ­ -­ " -rg 9,9 0 0256 ® -® " -a- 9,9 0 0257 ¯ -¯ " -de 9,10 0 0260 ° -° " -+- 9,8 0 0261 ± -± " -S2 9,10 0 0262 ² -² " -S3 9,10 0 0263 ³ -³ " -aa 9,9 0 0264 ´ -´ " -µ 9,7,3 0 0265 µ -ps 9,9,1 0 0266 ¶ -¶ " -pc 9,5 0 0267 · -· " -ac 9,1,3 0 0270 ¸ -¸ " -S1 9,10 0 0271 ¹ -¹ " -Om 9,9 0 0272 º -º " -Fc 9,7 0 0273 » -» " -14 9,10 0 0274 ¼ -¼ " -12 9,10 0 0275 ½ -½ " -34 9,10 0 0276 ¾ -¾ " -r? 9,7,2 0 0277 ¿ -¿ " -`A 9,12 0 0300 À -À " -'A 9,12 0 0301 Á -Á " -^A 9,12 0 0302 Â -Â " -~A 9,12 0 0303 Ã -Ã " -:A 9,11 0 0304 Ä -Ä " -oA 9,12 0 0305 Å -Å " -AE 9,9 0 0306 Æ -Æ " -,C 9,9,3 0 0307 Ç -Ç " -`E 9,12 0 0310 È -È " -'E 9,12 0 0311 É -É " -^E 9,12 0 0312 Ê -Ê " -:E 9,11 0 0313 Ë -Ë " -`I 9,12 0 0314 Ì -Ì " -'I 9,12 0 0315 Í -Í " -^I 9,12 0 0316 Î -Î " -:I 9,11 0 0317 Ï -Ï " --D 9,9 0 0320 Ð -Ð " -~N 9,12 0 0321 Ñ -Ñ " -`O 9,12 0 0322 Ò -Ò " -'O 9,12 0 0323 Ó -Ó " -^O 9,12 0 0324 Ô -Ô " -~O 9,12 0 0325 Õ -Õ " -:O 9,11 0 0326 Ö -Ö " -mu 9,8 0 0327 × -× " -/O 9,9 0 0330 Ø -Ø " -`U 9,12 0 0331 Ù -Ù " -'U 9,12 0 0332 Ú -Ú " -^U 9,12 0 0333 Û -Û " -:U 9,11 0 0334 Ü -Ü " -'Y 9,12 0 0335 Ý -Ý " -TP 9,9 0 0336 Þ -Þ " -ss 9,9 0 0337 ß -ß " -`a 9,10 0 0340 à -à " -'a 9,10 0 0341 á -á " -^a 9,10 0 0342 â -â " -~a 9,10 0 0343 ã -ã " -:a 9,9 0 0344 ä -ä " -oa 9,11 0 0345 å -å " -ae 9,7 0 0346 æ -æ " -,c 9,7,3 0 0347 ç -ç " -`e 9,10 0 0350 è -è " -'e 9,10 0 0351 é -é " -^e 9,10 0 0352 ê -ê " -:e 9,9 0 0353 ë -ë " -`i 9,10 0 0354 ì -ì " -'i 9,10 0 0355 í -í " -^i 9,10 0 0356 î -î " -:i 9,9 0 0357 ï -ï " -Sd 9,10 0 0360 ð -ð " -~n 9,10 0 0361 ñ -ñ " -`o 9,10 0 0362 ò -ò " -'o 9,10 0 0363 ó -ó " -^o 9,10 0 0364 ô -ô " -~o 9,10 0 0365 õ -õ " -:o 9,9 0 0366 ö -ö " -di 9,8 0 0367 ÷ -÷ " -/o 9,7 0 0370 ø -ø " -`u 9,10 0 0371 ù -ù " -'u 9,10 0 0372 ú -ú " -^u 9,10 0 0373 û -û " -:u 9,9 0 0374 ü -ü " -'y 9,10,3 0 0375 ý -ý " -Tp 9,9,3 0 0376 þ -þ " -:y 9,9,3 0 0377 ÿ -ÿ " diff -aruN groff-1.16.1/font/devhtml/CR groff-1.17/font/devhtml/CR --- groff-1.16.1/font/devhtml/CR Fri May 19 07:05:49 2000 +++ groff-1.17/font/devhtml/CR Thu Jan 1 01:00:00 1970 @@ -1,308 +0,0 @@ -name CR -spacewidth 9 -charset ---- 9,1 0 040 -! 9,9 0 041 -" 9,10 0 042 " -dq " -# 9,9,1 0 043 -sh " -$ 9,11,2 0 044 -Do " -% 9,10 0 045 -& 9,8 0 046 & -' 9,10 0 047 -cq " -( 9,10,2 0 050 -) 9,10,2 0 051 -* 9,9 0 052 -+ 9,8 0 053 -, 9,2,2 0 054 -\- 9,5 0 055 -. 9,2 0 056 -/ 9,10,1 0 057 -sl " -0 9,10 0 060 -1 9,10 0 061 -2 9,10 0 062 -3 9,10 0 063 -4 9,10 0 064 -5 9,10 0 065 -6 9,10 0 066 -7 9,10 0 067 -8 9,10 0 070 -9 9,10 0 071 -: 9,7 0 072 -; 9,7,2 0 073 -< 9,8 0 074 < -= 9,6 0 075 -eq " -> 9,8 0 076 > -? 9,9 0 077 -@ 9,9,1 0 0100 -at " -A 9,9 0 0101 -B 9,9 0 0102 -C 9,9 0 0103 -D 9,9 0 0104 -E 9,9 0 0105 -F 9,9 0 0106 -G 9,9 0 0107 -H 9,9 0 0110 -I 9,9 0 0111 -J 9,9 0 0112 -K 9,9 0 0113 -L 9,9 0 0114 -M 9,9 0 0115 -N 9,9 0 0116 -O 9,9 0 0117 -P 9,9 0 0120 -Q 9,9,2 0 0121 -R 9,9 0 0122 -S 9,9 0 0123 -T 9,9 0 0124 -U 9,9 0 0125 -V 9,9 0 0126 -W 9,9 0 0127 -X 9,9 0 0130 -Y 9,9 0 0131 -Z 9,9 0 0132 -[ 9,10,2 0 0133 -lB " -\ 9,10,1 0 0134 -rs " -] 9,10,2 0 0135 -rB " -^ 9,9 0 0136 -a^ " -ha " -_ 9,0,3 0 0137 -` 9,10 0 0140 -oq " -a 9,7 0 0141 -b 9,10 0 0142 -c 9,7 0 0143 -d 9,10 0 0144 -e 9,7 0 0145 -f 9,10 0 0146 -g 9,7,3 0 0147 -h 9,10 0 0150 -i 9,10 0 0151 -j 9,10,3 0 0152 -k 9,10 0 0153 -l 9,10 0 0154 -m 9,7 0 0155 -n 9,7 0 0156 -o 9,7 0 0157 -p 9,7,3 0 0160 -q 9,7,3 0 0161 -r 9,7 0 0162 -s 9,7 0 0163 -t 9,9 0 0164 -u 9,7 0 0165 -v 9,7 0 0166 -w 9,7 0 0167 -x 9,7 0 0170 -y 9,7,3 0 0171 -z 9,7 0 0172 -{ 9,10,2 0 0173 -lC " -| 9,9,2 0 0174 -or " -ba " -} 9,10,2 0 0175 -rC " -~ 9,5 0 0176 -a~ " -ap " -ti " -r! 9,7,2 0 0241 ¡ -¡ " -ct 9,9 0 0242 ¢ -¢ " -Po 9,9 0 0243 £ -£ " -Cs 9,7 0 0244 ¤ -¤ " -Ye 9,9 0 0245 ¥ -¥ " -bb 9,9,2 0 0246 ¦ -¦ " -sc 9,9,1 0 0247 § -§ " -ad 9,9 0 0250 ¨ -¨ " -co 9,9 0 0251 © -© " -Of 9,9 0 0252 ª -ª " -Fo 9,7 0 0253 « -« " -no 9,6 0 0254 ¬ -¬ " -- 9,5 0 055 ­ -hy " ­ -­ " -rg 9,9 0 0256 ® -® " -a- 9,9 0 0257 ¯ -¯ " -de 9,10 0 0260 ° -° " -+- 9,8 0 0261 ± -± " -S2 9,10 0 0262 ² -² " -S3 9,10 0 0263 ³ -³ " -aa 9,10 0 0264 ´ -´ " -µ 9,7,3 0 0265 µ -ps 9,9,1 0 0266 ¶ -¶ " -pc 9,5 0 0267 · -· " -ac 9,0,3 0 0270 ¸ -¸ " -S1 9,10 0 0271 ¹ -¹ " -Om 9,9 0 0272 º -º " -Fc 9,7 0 0273 » -» " -14 9,10 0 0274 ¼ -¼ " -12 9,10 0 0275 ½ -½ " -34 9,10 0 0276 ¾ -¾ " -r? 9,7,2 0 0277 ¿ -¿ " -`A 9,12 0 0300 À -À " -'A 9,12 0 0301 Á -Á " -^A 9,12 0 0302 Â -Â " -~A 9,12 0 0303 Ã -Ã " -:A 9,11 0 0304 Ä -Ä " -oA 9,12 0 0305 Å -Å " -AE 9,9 0 0306 Æ -Æ " -,C 9,9,3 0 0307 Ç -Ç " -`E 9,12 0 0310 È -È " -'E 9,12 0 0311 É -É " -^E 9,12 0 0312 Ê -Ê " -:E 9,11 0 0313 Ë -Ë " -`I 9,12 0 0314 Ì -Ì " -'I 9,12 0 0315 Í -Í " -^I 9,12 0 0316 Î -Î " -:I 9,11 0 0317 Ï -Ï " --D 9,9 0 0320 Ð -Ð " -~N 9,12 0 0321 Ñ -Ñ " -`O 9,12 0 0322 Ò -Ò " -'O 9,12 0 0323 Ó -Ó " -^O 9,12 0 0324 Ô -Ô " -~O 9,12 0 0325 Õ -Õ " -:O 9,11 0 0326 Ö -Ö " -mu 9,8 0 0327 × -× " -/O 9,9 0 0330 Ø -Ø " -`U 9,12 0 0331 Ù -Ù " -'U 9,12 0 0332 Ú -Ú " -^U 9,12 0 0333 Û -Û " -:U 9,11 0 0334 Ü -Ü " -'Y 9,12 0 0335 Ý -Ý " -TP 9,9 0 0336 Þ -Þ " -ss 9,9 0 0337 ß -ß " -`a 9,10 0 0340 à -à " -'a 9,10 0 0341 á -á " -^a 9,10 0 0342 â -â " -~a 9,10 0 0343 ã -ã " -:a 9,9 0 0344 ä -ä " -oa 9,10 0 0345 å -å " -ae 9,7 0 0346 æ -æ " -,c 9,7,3 0 0347 ç -ç " -`e 9,10 0 0350 è -è " -'e 9,10 0 0351 é -é " -^e 9,10 0 0352 ê -ê " -:e 9,9 0 0353 ë -ë " -`i 9,10 0 0354 ì -ì " -'i 9,10 0 0355 í -í " -^i 9,10 0 0356 î -î " -:i 9,9 0 0357 ï -ï " -Sd 9,12 0 0360 ð -ð " -~n 9,10 0 0361 ñ -ñ " -`o 9,10 0 0362 ò -ò " -'o 9,10 0 0363 ó -ó " -^o 9,10 0 0364 ô -ô " -~o 9,10 0 0365 õ -õ " -:o 9,9 0 0366 ö -ö " -di 9,8 0 0367 ÷ -÷ " -/o 9,7 0 0370 ø -ø " -`u 9,10 0 0371 ù -ù " -'u 9,10 0 0372 ú -ú " -^u 9,10 0 0373 û -û " -:u 9,9 0 0374 ü -ü " -'y 9,10,3 0 0375 ý -ý " -Tp 9,9,3 0 0376 þ -þ " -:y 9,9,3 0 0377 ÿ -ÿ " diff -aruN groff-1.16.1/font/devhtml/DESC groff-1.17/font/devhtml/DESC --- groff-1.16.1/font/devhtml/DESC Sun Feb 6 10:35:20 2000 +++ groff-1.17/font/devhtml/DESC Thu Jan 1 01:00:00 1970 @@ -1,12 +0,0 @@ -styles R I B BI -fonts 6 0 0 0 0 0 S -sizes 8 10 12 14 18 24 0 -res 100 -tcommand -html -hor 1 -vert 1 -unitwidth 10 -postpro grohtml -use_charnames_in_special -pass_filenames diff -aruN groff-1.16.1/font/devhtml/DESC.proto groff-1.17/font/devhtml/DESC.proto --- groff-1.16.1/font/devhtml/DESC.proto Thu Jan 1 01:00:00 1970 +++ groff-1.17/font/devhtml/DESC.proto Wed Jan 17 15:53:36 2001 @@ -0,0 +1,12 @@ +res 240 +hor 24 +vert 40 +unitwidth 10 +sizes 6 8 10 12 14 16 18 0 +fonts 6 R I B BI C S +tcommand +html +postpro post-grohtml +prepro pre-grohtml +use_charnames_in_special +pass_filenames diff -aruN groff-1.16.1/font/devhtml/HB groff-1.17/font/devhtml/HB --- groff-1.16.1/font/devhtml/HB Fri May 19 07:05:49 2000 +++ groff-1.17/font/devhtml/HB Thu Jan 1 01:00:00 1970 @@ -1,308 +0,0 @@ -name HB -spacewidth 4 -charset ---- 4,1 0 040 -! 4,11 0 041 -" 7,11 0 042 " -dq " -# 9,10 0 043 -sh " -$ 8,12,2 0 044 -Do " -% 13,11 0 045 -& 11,10 0 046 & -' 5,11 0 047 -cq " -( 5,11,3 0 050 -) 5,11,3 0 051 -* 6,11 0 052 -+ 9,8 0 053 -, 4,2,1 0 054 -\- 9,5 0 055 -. 4,2 0 056 -/ 4,11 0 057 -sl " -0 8,11 0 060 -1 8,11 0 061 -2 8,11 0 062 -3 8,11 0 063 -4 8,11 0 064 -5 8,11 0 065 -6 8,11 0 066 -7 8,11 0 067 -8 8,11 0 070 -9 8,11 0 071 -: 5,8 0 072 -; 5,8,1 0 073 -< 8,7 0 074 < -= 9,6 0 075 -eq " -> 8,7 0 076 > -? 9,11 0 077 -@ 14,11,1 0 0100 -at " -A 10,11 0 0101 -B 10,11 0 0102 -C 11,11 0 0103 -D 11,11 0 0104 -E 9,11 0 0105 -F 9,11 0 0106 -G 11,11 0 0107 -H 10,11 0 0110 -I 4,11 0 0111 -J 8,11 0 0112 -K 10,11 0 0113 -L 8,11 0 0114 -M 13,11 0 0115 -N 11,11 0 0116 -O 12,11 0 0117 -P 10,11 0 0120 -Q 12,11 0 0121 -R 11,11 0 0122 -S 10,11 0 0123 -T 8,11 0 0124 -U 11,11 0 0125 -V 10,11 0 0126 -W 14,11 0 0127 -X 9,11 0 0130 -Y 10,11 0 0131 -Z 9,11 0 0132 -[ 5,11,3 0 0133 -lB " -\ 4,11 0 0134 -rs " -] 5,11,3 0 0135 -rB " -^ 8,11 0 0136 -a^ " -ha " -_ 8,0,3 0 0137 -` 5,11 0 0140 -oq " -a 8,8 0 0141 -b 9,11 0 0142 -c 8,8 0 0143 -d 9,11 0 0144 -e 8,8 0 0145 -f 4,11 0 0146 -g 9,8,3 0 0147 -h 9,11 0 0150 -i 4,11 0 0151 -j 4,11,3 0 0152 -k 8,11 0 0153 -l 4,11 0 0154 -m 12,8 0 0155 -n 9,8 0 0156 -o 9,8 0 0157 -p 9,8,3 0 0160 -q 9,8,3 0 0161 -r 6,8 0 0162 -s 8,8 0 0163 -t 5,10 0 0164 -u 9,8 0 0165 -v 8,8 0 0166 -w 10,8 0 0167 -x 7,8 0 0170 -y 8,8,3 0 0171 -z 6,8 0 0172 -{ 6,11,3 0 0173 -lC " -| 4,11,3 0 0174 -or " -ba " -} 6,11,3 0 0175 -rC " -~ 9,6 0 0176 -a~ " -ap " -ti " -r! 4,8,3 0 0241 ¡ -¡ " -ct 8,9,1 0 0242 ¢ -¢ " -Po 8,11 0 0243 £ -£ " -Cs 8,9 0 0244 ¤ -¤ " -Ye 9,11 0 0245 ¥ -¥ " -bb 4,11,3 0 0246 ¦ -¦ " -sc 8,11,3 0 0247 § -§ " -ad 5,11 0 0250 ¨ -¨ " -co 12,11 0 0251 © -© " -Of 6,11 0 0252 ª -ª " -Fo 9,7 0 0253 « -« " -no 9,6 0 0254 ¬ -¬ " -- 4,5 0 055 ­ -hy " ­ -­ " -rg 12,11 0 0256 ® -® " -a- 5,10 0 0257 ¯ -¯ " -de 6,11 0 0260 ° -° " -+- 9,9 0 0261 ± -± " -S2 5,11 0 0262 ² -² " -S3 5,11 0 0263 ³ -³ " -aa 5,11 0 0264 ´ -´ " -µ 9,8,3 0 0265 µ -ps 8,11,3 0 0266 ¶ -¶ " -pc 4,5 0 0267 · -· " -ac 5,0,3 0 0270 ¸ -¸ " -S1 4,11 0 0271 ¹ -¹ " -Om 6,11 0 0272 º -º " -Fc 9,7 0 0273 » -» " -14 12,11 0 0274 ¼ -¼ " -12 12,11 0 0275 ½ -½ " -34 12,11 0 0276 ¾ -¾ " -r? 9,8,3 0 0277 ¿ -¿ " -`A 10,14 0 0300 À -À " -'A 10,14 0 0301 Á -Á " -^A 10,14 0 0302 Â -Â " -~A 10,14 0 0303 Ã -Ã " -:A 10,14 0 0304 Ä -Ä " -oA 10,14 0 0305 Å -Å " -AE 15,11 0 0306 Æ -Æ " -,C 11,11,3 0 0307 Ç -Ç " -`E 9,14 0 0310 È -È " -'E 9,14 0 0311 É -É " -^E 9,14 0 0312 Ê -Ê " -:E 9,14 0 0313 Ë -Ë " -`I 4,14 0 0314 Ì -Ì " -'I 4,14 0 0315 Í -Í " -^I 4,14 0 0316 Î -Î " -:I 4,14 0 0317 Ï -Ï " --D 11,11 0 0320 Ð -Ð " -~N 11,14 0 0321 Ñ -Ñ " -`O 12,14 0 0322 Ò -Ò " -'O 12,14 0 0323 Ó -Ó " -^O 12,14 0 0324 Ô -Ô " -~O 12,14 0 0325 Õ -Õ " -:O 12,14 0 0326 Ö -Ö " -mu 9,8 0 0327 × -× " -/O 12,11 0 0330 Ø -Ø " -`U 11,14 0 0331 Ù -Ù " -'U 11,14 0 0332 Ú -Ú " -^U 11,14 0 0333 Û -Û " -:U 11,14 0 0334 Ü -Ü " -'Y 10,14 0 0335 Ý -Ý " -TP 10,11 0 0336 Þ -Þ " -ss 8,11 0 0337 ß -ß " -`a 8,11 0 0340 à -à " -'a 8,11 0 0341 á -á " -^a 8,11 0 0342 â -â " -~a 8,11 0 0343 ã -ã " -:a 8,11 0 0344 ä -ä " -oa 8,11 0 0345 å -å " -ae 13,8 0 0346 æ -æ " -,c 9,8,3 0 0347 ç -ç " -`e 8,11 0 0350 è -è " -'e 8,11 0 0351 é -é " -^e 8,11 0 0352 ê -ê " -:e 8,11 0 0353 ë -ë " -`i 4,11 0 0354 ì -ì " -'i 4,11 0 0355 í -í " -^i 4,11 0 0356 î -î " -:i 4,11 0 0357 ï -ï " -Sd 9,11 0 0360 ð -ð " -~n 9,11 0 0361 ñ -ñ " -`o 9,11 0 0362 ò -ò " -'o 9,11 0 0363 ó -ó " -^o 9,11 0 0364 ô -ô " -~o 9,11 0 0365 õ -õ " -:o 9,11 0 0366 ö -ö " -di 9,8 0 0367 ÷ -÷ " -/o 9,8 0 0370 ø -ø " -`u 9,11 0 0371 ù -ù " -'u 9,11 0 0372 ú -ú " -^u 9,11 0 0373 û -û " -:u 9,11 0 0374 ü -ü " -'y 8,11,3 0 0375 ý -ý " -Tp 9,11,3 0 0376 þ -þ " -:y 8,11,3 0 0377 ÿ -ÿ " diff -aruN groff-1.16.1/font/devhtml/HBI groff-1.17/font/devhtml/HBI --- groff-1.16.1/font/devhtml/HBI Fri May 19 07:05:49 2000 +++ groff-1.17/font/devhtml/HBI Thu Jan 1 01:00:00 1970 @@ -1,308 +0,0 @@ -name HBI -spacewidth 4 -charset ---- 4,1 0 040 -! 5,11 0 041 -" 7,11 0 042 " -dq " -# 10,10 0 043 -sh " -$ 8,12,1 0 044 -Do " -% 13,11 0 045 -& 11,10 0 046 & -' 5,11 0 047 -cq " -( 5,11,3 0 050 -) 6,11,3 0 051 -* 6,11 0 052 -+ 9,8 0 053 -, 4,2,2 0 054 -\- 9,5 0 055 -. 4,2 0 056 -/ 4,11 0 057 -sl " -0 8,11 0 060 -1 8,11 0 061 -2 8,11 0 062 -3 8,11 0 063 -4 8,11 0 064 -5 8,11 0 065 -6 8,11 0 066 -7 8,11 0 067 -8 8,11 0 070 -9 8,11 0 071 -: 5,8 0 072 -; 5,8,2 0 073 -< 8,7 0 074 < -= 9,6 0 075 -eq " -> 9,7 0 076 > -? 9,11 0 077 -@ 14,11,2 0 0100 -at " -A 9,11 0 0101 -B 10,11 0 0102 -C 11,11 0 0103 -D 11,11 0 0104 -E 9,11 0 0105 -F 8,11 0 0106 -G 11,11 0 0107 -H 10,11 0 0110 -I 4,11 0 0111 -J 8,11 0 0112 -K 10,11 0 0113 -L 8,11 0 0114 -M 13,11 0 0115 -N 11,11 0 0116 -O 12,11 0 0117 -P 10,11 0 0120 -Q 12,11 0 0121 -R 10,11 0 0122 -S 10,11 0 0123 -T 8,11 0 0124 -U 11,11 0 0125 -V 10,11 0 0126 -W 14,11 0 0127 -X 9,11 0 0130 -Y 10,11 0 0131 -Z 9,11 0 0132 -[ 5,11,3 0 0133 -lB " -\ 6,11 0 0134 -rs " -] 5,11,3 0 0135 -rB " -^ 8,11 0 0136 -a^ " -ha " -_ 8,0,3 0 0137 -` 5,11 0 0140 -oq " -a 8,8 0 0141 -b 9,11 0 0142 -c 8,8 0 0143 -d 9,11 0 0144 -e 8,8 0 0145 -f 5,11 0 0146 -g 9,8,3 0 0147 -h 9,11 0 0150 -i 4,11 0 0151 -j 4,11,3 0 0152 -k 8,11 0 0153 -l 4,11 0 0154 -m 12,8 0 0155 -n 9,8 0 0156 -o 8,8 0 0157 -p 9,8,3 0 0160 -q 9,8,3 0 0161 -r 6,8 0 0162 -s 8,8 0 0163 -t 5,10 0 0164 -u 9,8 0 0165 -v 8,8 0 0166 -w 11,8 0 0167 -x 7,8 0 0170 -y 7,8,3 0 0171 -z 6,8 0 0172 -{ 6,11,3 0 0173 -lC " -| 4,11,3 0 0174 -or " -ba " -} 6,11,3 0 0175 -rC " -~ 9,6 0 0176 -a~ " -ap " -ti " -r! 5,8,3 0 0241 ¡ -¡ " -ct 8,9,1 0 0242 ¢ -¢ " -Po 9,11 0 0243 £ -£ " -Cs 9,8 0 0244 ¤ -¤ " -Ye 9,11 0 0245 ¥ -¥ " -bb 4,11,3 0 0246 ¦ -¦ " -sc 9,11,3 0 0247 § -§ " -ad 5,11 0 0250 ¨ -¨ " -co 12,11 0 0251 © -© " -Of 6,11 0 0252 ª -ª " -Fo 11,7 0 0253 « -« " -no 9,6 0 0254 ¬ -¬ " -- 5,5 0 055 ­ -hy " ­ -­ " -rg 12,11 0 0256 ® -® " -a- 5,11 0 0257 ¯ -¯ " -de 6,11 0 0260 ° -° " -+- 9,9 0 0261 ± -± " -S2 5,11 0 0262 ² -² " -S3 5,11 0 0263 ³ -³ " -aa 5,11 0 0264 ´ -´ " -µ 9,8,3 0 0265 µ -ps 8,11,3 0 0266 ¶ -¶ " -pc 4,5 0 0267 · -· " -ac 5,1,3 0 0270 ¸ -¸ " -S1 5,11 0 0271 ¹ -¹ " -Om 6,11 0 0272 º -º " -Fc 11,7 0 0273 » -» " -14 12,11 0 0274 ¼ -¼ " -12 12,11 0 0275 ½ -½ " -34 13,11 0 0276 ¾ -¾ " -r? 8,8,3 0 0277 ¿ -¿ " -`A 9,14 0 0300 À -À " -'A 9,14 0 0301 Á -Á " -^A 9,14 0 0302 Â -Â " -~A 9,14 0 0303 Ã -Ã " -:A 9,14 0 0304 Ä -Ä " -oA 9,14 0 0305 Å -Å " -AE 14,11 0 0306 Æ -Æ " -,C 11,11,3 0 0307 Ç -Ç " -`E 9,14 0 0310 È -È " -'E 9,14 0 0311 É -É " -^E 9,14 0 0312 Ê -Ê " -:E 9,14 0 0313 Ë -Ë " -`I 4,14 0 0314 Ì -Ì " -'I 4,14 0 0315 Í -Í " -^I 4,14 0 0316 Î -Î " -:I 4,14 0 0317 Ï -Ï " --D 11,11 0 0320 Ð -Ð " -~N 11,14 0 0321 Ñ -Ñ " -`O 12,14 0 0322 Ò -Ò " -'O 12,14 0 0323 Ó -Ó " -^O 12,14 0 0324 Ô -Ô " -~O 12,14 0 0325 Õ -Õ " -:O 12,14 0 0326 Ö -Ö " -mu 9,8 0 0327 × -× " -/O 12,11 0 0330 Ø -Ø " -`U 11,14 0 0331 Ù -Ù " -'U 11,14 0 0332 Ú -Ú " -^U 11,14 0 0333 Û -Û " -:U 11,14 0 0334 Ü -Ü " -'Y 10,14 0 0335 Ý -Ý " -TP 10,11 0 0336 Þ -Þ " -ss 9,11 0 0337 ß -ß " -`a 8,11 0 0340 à -à " -'a 8,11 0 0341 á -á " -^a 8,11 0 0342 â -â " -~a 8,11 0 0343 ã -ã " -:a 8,11 0 0344 ä -ä " -oa 8,11 0 0345 å -å " -ae 13,8 0 0346 æ -æ " -,c 8,8,3 0 0347 ç -ç " -`e 8,11 0 0350 è -è " -'e 8,11 0 0351 é -é " -^e 8,11 0 0352 ê -ê " -:e 8,11 0 0353 ë -ë " -`i 4,11 0 0354 ì -ì " -'i 4,11 0 0355 í -í " -^i 4,11 0 0356 î -î " -:i 4,11 0 0357 ï -ï " -Sd 8,11 0 0360 ð -ð " -~n 9,11 0 0361 ñ -ñ " -`o 8,11 0 0362 ò -ò " -'o 8,11 0 0363 ó -ó " -^o 8,11 0 0364 ô -ô " -~o 8,11 0 0365 õ -õ " -:o 8,11 0 0366 ö -ö " -di 9,8 0 0367 ÷ -÷ " -/o 8,8 0 0370 ø -ø " -`u 9,11 0 0371 ù -ù " -'u 9,11 0 0372 ú -ú " -^u 9,11 0 0373 û -û " -:u 9,11 0 0374 ü -ü " -'y 7,11,3 0 0375 ý -ý " -Tp 9,11,3 0 0376 þ -þ " -:y 7,11,3 0 0377 ÿ -ÿ " diff -aruN groff-1.16.1/font/devhtml/HI groff-1.17/font/devhtml/HI --- groff-1.16.1/font/devhtml/HI Fri May 19 07:05:50 2000 +++ groff-1.17/font/devhtml/HI Thu Jan 1 01:00:00 1970 @@ -1,308 +0,0 @@ -name HI -spacewidth 4 -charset ---- 4,1 0 040 -! 4,11 0 041 -" 5,11 0 042 " -dq " -# 9,10 0 043 -sh " -$ 8,12,2 0 044 -Do " -% 12,11 0 045 -& 10,10 0 046 & -' 3,11 0 047 -cq " -( 5,11,3 0 050 -) 5,11,3 0 051 -* 8,11 0 052 -+ 9,8 0 053 -, 3,2,2 0 054 -\- 9,5 0 055 -. 3,2 0 056 -/ 4,11 0 057 -sl " -0 8,11 0 060 -1 8,11 0 061 -2 8,11 0 062 -3 8,11 0 063 -4 8,11 0 064 -5 8,11 0 065 -6 8,11 0 066 -7 8,11 0 067 -8 8,11 0 070 -9 8,11 0 071 -: 4,8 0 072 -; 4,8,2 0 073 -< 9,7 0 074 < -= 9,6 0 075 -eq " -> 9,7 0 076 > -? 8,11 0 077 -@ 13,11,1 0 0100 -at " -A 11,11 0 0101 -B 10,11 0 0102 -C 10,11 0 0103 -D 10,11 0 0104 -E 9,11 0 0105 -F 9,11 0 0106 -G 11,11 0 0107 -H 11,11 0 0110 -I 5,11 0 0111 -J 9,11 0 0112 -K 10,11 0 0113 -L 8,11 0 0114 -M 14,11 0 0115 -N 11,11 0 0116 -O 11,11 0 0117 -P 9,11 0 0120 -Q 11,11 0 0121 -R 10,11 0 0122 -S 9,11 0 0123 -T 8,11 0 0124 -U 11,11 0 0125 -V 11,11 0 0126 -W 14,11 0 0127 -X 10,11 0 0130 -Y 9,11 0 0131 -Z 9,11 0 0132 -[ 5,11,3 0 0133 -lB " -\ 6,11 0 0134 -rs " -] 5,11,3 0 0135 -rB " -^ 7,11 0 0136 -a^ " -ha " -_ 8,0,3 0 0137 -` 3,11 0 0140 -oq " -a 8,8 0 0141 -b 8,11 0 0142 -c 7,8 0 0143 -d 8,11 0 0144 -e 8,8 0 0145 -f 4,11 0 0146 -g 8,8,3 0 0147 -h 8,11 0 0150 -i 4,11 0 0151 -j 3,11,3 0 0152 -k 7,11 0 0153 -l 3,11 0 0154 -m 11,8 0 0155 -n 8,8 0 0156 -o 8,8 0 0157 -p 8,8,3 0 0160 -q 8,8,3 0 0161 -r 5,8 0 0162 -s 7,8 0 0163 -t 4,10 0 0164 -u 8,8 0 0165 -v 7,8 0 0166 -w 10,8 0 0167 -x 7,8 0 0170 -y 7,8,3 0 0171 -z 7,8 0 0172 -{ 5,11,3 0 0173 -lC " -| 4,11,3 0 0174 -or " -ba " -} 5,11,3 0 0175 -rC " -~ 8,6 0 0176 -a~ " -ap " -ti " -r! 4,8,3 0 0241 ¡ -¡ " -ct 8,9,1 0 0242 ¢ -¢ " -Po 9,11 0 0243 £ -£ " -Cs 8,8 0 0244 ¤ -¤ " -Ye 9,11 0 0245 ¥ -¥ " -bb 4,11,3 0 0246 ¦ -¦ " -sc 8,11,3 0 0247 § -§ " -ad 5,10 0 0250 ¨ -¨ " -co 12,11 0 0251 © -© " -Of 5,11 0 0252 ª -ª " -Fo 8,6 0 0253 « -« " -no 9,6 0 0254 ¬ -¬ " -- 5,5 0 055 ­ -hy " ­ -­ " -rg 12,11 0 0256 ® -® " -a- 4,10 0 0257 ¯ -¯ " -de 6,11 0 0260 ° -° " -+- 9,9 0 0261 ± -± " -S2 5,11 0 0262 ² -² " -S3 5,11 0 0263 ³ -³ " -aa 4,11 0 0264 ´ -´ " -µ 8,8,3 0 0265 µ -ps 8,11,3 0 0266 ¶ -¶ " -pc 4,5 0 0267 · -· " -ac 3,0,3 0 0270 ¸ -¸ " -S1 5,11 0 0271 ¹ -¹ " -Om 5,11 0 0272 º -º " -Fc 8,6 0 0273 » -» " -14 12,11 0 0274 ¼ -¼ " -12 12,11 0 0275 ½ -½ " -34 12,11 0 0276 ¾ -¾ " -r? 8,8,3 0 0277 ¿ -¿ " -`A 11,14 0 0300 À -À " -'A 11,14 0 0301 Á -Á " -^A 11,14 0 0302 Â -Â " -~A 11,14 0 0303 Ã -Ã " -:A 11,13 0 0304 Ä -Ä " -oA 11,14 0 0305 Å -Å " -AE 15,11 0 0306 Æ -Æ " -,C 10,11,3 0 0307 Ç -Ç " -`E 9,14 0 0310 È -È " -'E 9,14 0 0311 É -É " -^E 9,14 0 0312 Ê -Ê " -:E 9,13 0 0313 Ë -Ë " -`I 5,14 0 0314 Ì -Ì " -'I 5,14 0 0315 Í -Í " -^I 5,14 0 0316 Î -Î " -:I 5,13 0 0317 Ï -Ï " --D 10,11 0 0320 Ð -Ð " -~N 11,14 0 0321 Ñ -Ñ " -`O 11,14 0 0322 Ò -Ò " -'O 11,14 0 0323 Ó -Ó " -^O 11,14 0 0324 Ô -Ô " -~O 11,14 0 0325 Õ -Õ " -:O 11,13 0 0326 Ö -Ö " -mu 9,8 0 0327 × -× " -/O 11,11 0 0330 Ø -Ø " -`U 11,14 0 0331 Ù -Ù " -'U 11,14 0 0332 Ú -Ú " -^U 11,14 0 0333 Û -Û " -:U 11,13 0 0334 Ü -Ü " -'Y 9,14 0 0335 Ý -Ý " -TP 9,11 0 0336 Þ -Þ " -ss 8,11 0 0337 ß -ß " -`a 8,11 0 0340 à -à " -'a 8,11 0 0341 á -á " -^a 8,11 0 0342 â -â " -~a 8,11 0 0343 ã -ã " -:a 8,11 0 0344 ä -ä " -oa 8,11 0 0345 å -å " -ae 12,8 0 0346 æ -æ " -,c 7,8,3 0 0347 ç -ç " -`e 8,11 0 0350 è -è " -'e 8,11 0 0351 é -é " -^e 8,11 0 0352 ê -ê " -:e 8,11 0 0353 ë -ë " -`i 3,11 0 0354 ì -ì " -'i 3,11 0 0355 í -í " -^i 3,11 0 0356 î -î " -:i 3,11 0 0357 ï -ï " -Sd 8,11 0 0360 ð -ð " -~n 8,11 0 0361 ñ -ñ " -`o 8,11 0 0362 ò -ò " -'o 8,11 0 0363 ó -ó " -^o 8,11 0 0364 ô -ô " -~o 8,11 0 0365 õ -õ " -:o 8,11 0 0366 ö -ö " -di 9,8 0 0367 ÷ -÷ " -/o 8,9,1 0 0370 ø -ø " -`u 8,11 0 0371 ù -ù " -'u 8,11 0 0372 ú -ú " -^u 8,11 0 0373 û -û " -:u 8,11 0 0374 ü -ü " -'y 7,11,3 0 0375 ý -ý " -Tp 8,11,3 0 0376 þ -þ " -:y 7,11,3 0 0377 ÿ -ÿ " diff -aruN groff-1.16.1/font/devhtml/HR groff-1.17/font/devhtml/HR --- groff-1.16.1/font/devhtml/HR Fri May 19 07:05:50 2000 +++ groff-1.17/font/devhtml/HR Thu Jan 1 01:00:00 1970 @@ -1,308 +0,0 @@ -name HR -spacewidth 4 -charset ---- 4,1 0 040 -! 4,11 0 041 -" 5,11 0 042 " -dq " -# 8,10 0 043 -sh " -$ 8,12,2 0 044 -Do " -% 12,11 0 045 -& 10,10 0 046 & -' 3,11 0 047 -cq " -( 5,11,3 0 050 -) 5,11,3 0 051 -* 7,11 0 052 -+ 9,8 0 053 -, 3,2,2 0 054 -\- 9,5 0 055 -. 3,2 0 056 -/ 4,11 0 057 -sl " -0 8,11 0 060 -1 8,11 0 061 -2 8,11 0 062 -3 8,11 0 063 -4 8,11 0 064 -5 8,11 0 065 -6 8,11 0 066 -7 8,11 0 067 -8 8,11 0 070 -9 8,11 0 071 -: 3,8 0 072 -; 4,8,2 0 073 -< 8,7 0 074 < -= 9,6 0 075 -eq " -> 8,7 0 076 > -? 8,11 0 077 -@ 13,11,1 0 0100 -at " -A 9,11 0 0101 -B 9,11 0 0102 -C 10,11 0 0103 -D 10,11 0 0104 -E 9,11 0 0105 -F 8,11 0 0106 -G 11,11 0 0107 -H 10,11 0 0110 -I 4,11 0 0111 -J 7,11 0 0112 -K 9,11 0 0113 -L 8,11 0 0114 -M 12,11 0 0115 -N 10,11 0 0116 -O 11,11 0 0117 -P 9,11 0 0120 -Q 11,11 0 0121 -R 10,11 0 0122 -S 9,11 0 0123 -T 9,11 0 0124 -U 10,11 0 0125 -V 9,11 0 0126 -W 13,11 0 0127 -X 9,11 0 0130 -Y 9,11 0 0131 -Z 9,11 0 0132 -[ 4,11,3 0 0133 -lB " -\ 4,11 0 0134 -rs " -] 4,11,3 0 0135 -rB " -^ 7,11 0 0136 -a^ " -ha " -_ 8,0,3 0 0137 -` 3,11 0 0140 -oq " -a 8,8 0 0141 -b 7,11 0 0142 -c 7,8 0 0143 -d 8,11 0 0144 -e 8,8 0 0145 -f 4,11 0 0146 -g 8,8,3 0 0147 -h 8,11 0 0150 -i 3,11 0 0151 -j 3,11,3 0 0152 -k 7,11 0 0153 -l 3,11 0 0154 -m 11,8 0 0155 -n 8,8 0 0156 -o 8,8 0 0157 -p 8,8,3 0 0160 -q 8,8,3 0 0161 -r 5,8 0 0162 -s 7,8 0 0163 -t 4,10 0 0164 -u 7,8 0 0165 -v 7,8 0 0166 -w 10,8 0 0167 -x 7,8 0 0170 -y 7,8,3 0 0171 -z 7,8 0 0172 -{ 5,11,3 0 0173 -lC " -| 3,11,3 0 0174 -or " -ba " -} 5,11,3 0 0175 -rC " -~ 8,6 0 0176 -a~ " -ap " -ti " -r! 4,8,3 0 0241 ¡ -¡ " -ct 8,9,1 0 0242 ¢ -¢ " -Po 8,11 0 0243 £ -£ " -Cs 8,8 0 0244 ¤ -¤ " -Ye 7,11 0 0245 ¥ -¥ " -bb 3,11,3 0 0246 ¦ -¦ " -sc 8,11,3 0 0247 § -§ " -ad 5,10 0 0250 ¨ -¨ " -co 12,11 0 0251 © -© " -Of 6,11 0 0252 ª -ª " -Fo 8,7 0 0253 « -« " -no 9,6 0 0254 ¬ -¬ " -- 4,5 0 055 ­ -hy " ­ -­ " -rg 12,11 0 0256 ® -® " -a- 4,10 0 0257 ¯ -¯ " -de 6,11 0 0260 ° -° " -+- 9,9 0 0261 ± -± " -S2 5,11 0 0262 ² -² " -S3 5,11 0 0263 ³ -³ " -aa 5,11 0 0264 ´ -´ " -µ 8,8,3 0 0265 µ -ps 8,11,3 0 0266 ¶ -¶ " -pc 4,5 0 0267 · -· " -ac 5,0,3 0 0270 ¸ -¸ " -S1 5,11 0 0271 ¹ -¹ " -Om 6,11 0 0272 º -º " -Fc 8,7 0 0273 » -» " -14 12,11 0 0274 ¼ -¼ " -12 12,11 0 0275 ½ -½ " -34 12,11 0 0276 ¾ -¾ " -r? 8,8,3 0 0277 ¿ -¿ " -`A 9,14 0 0300 À -À " -'A 9,14 0 0301 Á -Á " -^A 9,14 0 0302 Â -Â " -~A 9,13 0 0303 Ã -Ã " -:A 9,14 0 0304 Ä -Ä " -oA 9,14 0 0305 Å -Å " -AE 14,11 0 0306 Æ -Æ " -,C 10,11,3 0 0307 Ç -Ç " -`E 9,14 0 0310 È -È " -'E 9,14 0 0311 É -É " -^E 9,14 0 0312 Ê -Ê " -:E 9,13 0 0313 Ë -Ë " -`I 4,14 0 0314 Ì -Ì " -'I 4,14 0 0315 Í -Í " -^I 4,14 0 0316 Î -Î " -:I 4,13 0 0317 Ï -Ï " --D 10,11 0 0320 Ð -Ð " -~N 10,14 0 0321 Ñ -Ñ " -`O 11,14 0 0322 Ò -Ò " -'O 11,14 0 0323 Ó -Ó " -^O 11,14 0 0324 Ô -Ô " -~O 11,14 0 0325 Õ -Õ " -:O 11,13 0 0326 Ö -Ö " -mu 9,8 0 0327 × -× " -/O 11,11 0 0330 Ø -Ø " -`U 10,14 0 0331 Ù -Ù " -'U 10,14 0 0332 Ú -Ú " -^U 10,14 0 0333 Û -Û " -:U 10,13 0 0334 Ü -Ü " -'Y 9,14 0 0335 Ý -Ý " -TP 9,11 0 0336 Þ -Þ " -ss 7,11 0 0337 ß -ß " -`a 8,11 0 0340 à -à " -'a 8,11 0 0341 á -á " -^a 8,11 0 0342 â -â " -~a 8,11 0 0343 ã -ã " -:a 8,11 0 0344 ä -ä " -oa 8,12 0 0345 å -å " -ae 13,8 0 0346 æ -æ " -,c 8,8,3 0 0347 ç -ç " -`e 8,11 0 0350 è -è " -'e 8,11 0 0351 é -é " -^e 8,11 0 0352 ê -ê " -:e 8,11 0 0353 ë -ë " -`i 3,11 0 0354 ì -ì " -'i 3,11 0 0355 í -í " -^i 3,11 0 0356 î -î " -:i 3,11 0 0357 ï -ï " -Sd 8,11 0 0360 ð -ð " -~n 8,11 0 0361 ñ -ñ " -`o 8,11 0 0362 ò -ò " -'o 8,11 0 0363 ó -ó " -^o 8,11 0 0364 ô -ô " -~o 8,11 0 0365 õ -õ " -:o 8,11 0 0366 ö -ö " -di 9,8 0 0367 ÷ -÷ " -/o 8,8 0 0370 ø -ø " -`u 8,11 0 0371 ù -ù " -'u 8,11 0 0372 ú -ú " -^u 8,11 0 0373 û -û " -:u 8,11 0 0374 ü -ü " -'y 7,11,3 0 0375 ý -ý " -Tp 8,11,3 0 0376 þ -þ " -:y 7,10,3 0 0377 ÿ -ÿ " diff -aruN groff-1.16.1/font/devhtml/Makefile.sub groff-1.17/font/devhtml/Makefile.sub --- groff-1.16.1/font/devhtml/Makefile.sub Sun Feb 6 10:35:22 2000 +++ groff-1.17/font/devhtml/Makefile.sub Wed Jan 17 15:54:42 2001 @@ -1,2 +1,34 @@ DEV=html -DEVFILES=DESC TR TI TB TBI CR CI CB CBI HR HI HB HBI NR NI NB NBI S +PROTOFONTS=R I B BI CR +FONTS=$(PROTOFONTS) S +DEVFILES=$(FONTS) DESC +CLEANADD=$(FONTS) DESC + +RES=240 +CPI=10 +LPI=6 + +$(FONTS): R.proto + @echo Making $@ + @-rm -f $@ + @(charwidth=`expr $(RES) / $(CPI)` ; \ + sed -e "s/^name [A-Z]*$$/name $@/" \ + -e "s/^\\([^ ]*\\) [0-9]+ /\\1 $$charwidth /" \ + -e "s/^spacewidth [0-9]+$$/spacewidth $$charwidth/" \ + -e "s/^internalname .*$$/internalname $@/" \ + -e "/^internalname/s/CR/4/" \ + -e "/^internalname/s/BI/3/" \ + -e "/^internalname/s/B/2/" \ + -e "/^internalname/s/I/1/" \ + -e "/^internalname .*[^ 0-9]/d" \ + $(srcdir)/R.proto >$@) + +DESC: DESC.proto + @echo Making $@ + @-rm -f $@ + @sed -e "s/^res .*$$/res $(RES)/" \ + -e "s/^hor .*$$/hor `expr $(RES) / $(CPI)`/" \ + -e "s/^vert .*$$/vert `expr $(RES) / $(LPI)`/" \ + -e "s/^fonts .*$$/fonts `set $(FONTS); echo $$#` $(FONTS)/" \ + $(srcdir)/DESC.proto >$@ + diff -aruN groff-1.16.1/font/devhtml/NB groff-1.17/font/devhtml/NB --- groff-1.16.1/font/devhtml/NB Fri May 19 07:05:50 2000 +++ groff-1.17/font/devhtml/NB Thu Jan 1 01:00:00 1970 @@ -1,308 +0,0 @@ -name NB -spacewidth 11 -charset ---- 11,1 0 040 -! 4,11 0 041 -" 5,11 0 042 " -dq " -# 8,10 0 043 -sh " -$ 8,12,1 0 044 -Do " -% 13,11 0 045 -& 13,11 0 046 & -' 4,11 0 047 -cq " -( 5,11,2 0 050 -) 5,11,2 0 051 -* 6,11 0 052 -+ 8,8 0 053 -, 4,3,2 0 054 -\- 8,5 0 055 -. 4,3 0 056 -/ 5,11 0 057 -sl " -0 8,11 0 060 -1 6,11 0 061 -2 8,11 0 062 -3 8,11 0 063 -4 8,11 0 064 -5 8,11 0 065 -6 8,11 0 066 -7 8,11 0 067 -8 8,11 0 070 -9 8,11 0 071 -: 4,7 0 072 -; 4,7,2 0 073 -< 8,8 0 074 < -= 8,6 0 075 -eq " -> 8,8 0 076 > -? 7,11 0 077 -@ 14,11 0 0100 -at " -A 11,11 0 0101 -B 10,11 0 0102 -C 11,11 0 0103 -D 12,11 0 0104 -E 10,11 0 0105 -F 10,11 0 0106 -G 12,11 0 0107 -H 12,11 0 0110 -I 7,11 0 0111 -J 9,11 0 0112 -K 12,11 0 0113 -L 10,11 0 0114 -M 14,11 0 0115 -N 12,11 0 0116 -O 12,11 0 0117 -P 10,11 0 0120 -Q 12,11,3 0 0121 -R 12,11 0 0122 -S 10,11 0 0123 -T 11,11 0 0124 -U 12,11 0 0125 -V 11,11 0 0126 -W 14,11 0 0127 -X 12,11 0 0130 -Y 11,11 0 0131 -Z 9,11 0 0132 -[ 5,11,2 0 0133 -lB " -\ 7,11 0 0134 -rs " -] 5,11,2 0 0135 -rB " -^ 8,11 0 0136 -a^ " -ha " -_ 7,0,2 0 0137 -` 4,11 0 0140 -oq " -a 9,7 0 0141 -b 10,11 0 0142 -c 8,7 0 0143 -d 10,11 0 0144 -e 9,7 0 0145 -f 6,11 0 0146 -g 8,8,3 0 0147 -h 10,11 0 0150 -i 5,10 0 0151 -j 5,10,3 0 0152 -k 9,11 0 0153 -l 5,11 0 0154 -m 15,7 0 0155 -n 10,7 0 0156 -o 9,7 0 0157 -p 10,7,3 0 0160 -q 9,7,3 0 0161 -r 7,7 0 0162 -s 7,7 0 0163 -t 6,10 0 0164 -u 10,7 0 0165 -v 7,7 0 0166 -w 12,7 0 0167 -x 9,7 0 0170 -y 7,7,3 0 0171 -z 7,7 0 0172 -{ 6,11,2 0 0173 -lC " -| 8,11 0 0174 -or " -ba " -} 6,11,2 0 0175 -rC " -~ 8,6 0 0176 -a~ " -ap " -ti " -r! 5,8,3 0 0241 ¡ -¡ " -ct 8,8,1 0 0242 ¢ -¢ " -Po 9,11 0 0243 £ -£ " -Cs 9,10 0 0244 ¤ -¤ " -Ye 11,11 0 0245 ¥ -¥ " -bb 8,11 0 0246 ¦ -¦ " -sc 7,11,2 0 0247 § -§ " -ad 7,10 0 0250 ¨ -¨ " -co 12,11 0 0251 © -© " -Of 6,11 0 0252 ª -ª " -Fo 8,6 0 0253 « -« " -no 8,6 0 0254 ¬ -¬ " -- 5,5 0 055 ­ -hy " ­ -­ " -rg 12,11 0 0256 ® -® " -a- 7,9 0 0257 ¯ -¯ " -de 6,11 0 0260 ° -° " -+- 8,8 0 0261 ± -± " -S2 5,11 0 0262 ² -² " -S3 5,11 0 0263 ³ -³ " -aa 6,11 0 0264 ´ -´ " -µ 10,7,3 0 0265 µ -ps 10,11 0 0266 ¶ -¶ " -pc 5,6 0 0267 · -· " -ac 5,0,3 0 0270 ¸ -¸ " -S1 5,11 0 0271 ¹ -¹ " -Om 6,11 0 0272 º -º " -Fc 8,6 0 0273 » -» " -14 12,11 0 0274 ¼ -¼ " -12 12,11 0 0275 ½ -½ " -34 12,11 0 0276 ¾ -¾ " -r? 7,8,3 0 0277 ¿ -¿ " -`A 11,15 0 0300 À -À " -'A 11,15 0 0301 Á -Á " -^A 11,15 0 0302 Â -Â " -~A 11,14 0 0303 Ã -Ã " -:A 11,14 0 0304 Ä -Ä " -oA 11,15 0 0305 Å -Å " -AE 15,11 0 0306 Æ -Æ " -,C 11,11,3 0 0307 Ç -Ç " -`E 10,15 0 0310 È -È " -'E 10,15 0 0311 É -É " -^E 10,15 0 0312 Ê -Ê " -:E 10,14 0 0313 Ë -Ë " -`I 7,15 0 0314 Ì -Ì " -'I 7,15 0 0315 Í -Í " -^I 7,15 0 0316 Î -Î " -:I 7,14 0 0317 Ï -Ï " --D 12,11 0 0320 Ð -Ð " -~N 12,14 0 0321 Ñ -Ñ " -`O 12,15 0 0322 Ò -Ò " -'O 12,15 0 0323 Ó -Ó " -^O 12,15 0 0324 Ô -Ô " -~O 12,14 0 0325 Õ -Õ " -:O 12,14 0 0326 Ö -Ö " -mu 8,8 0 0327 × -× " -/O 12,11 0 0330 Ø -Ø " -`U 12,15 0 0331 Ù -Ù " -'U 12,15 0 0332 Ú -Ú " -^U 12,15 0 0333 Û -Û " -:U 12,14 0 0334 Ü -Ü " -'Y 11,14 0 0335 Ý -Ý " -TP 10,11 0 0336 Þ -Þ " -ss 9,11 0 0337 ß -ß " -`a 9,11 0 0340 à -à " -'a 9,11 0 0341 á -á " -^a 9,11 0 0342 â -â " -~a 9,10 0 0343 ã -ã " -:a 9,10 0 0344 ä -ä " -oa 9,11 0 0345 å -å " -ae 14,7 0 0346 æ -æ " -,c 8,7,3 0 0347 ç -ç " -`e 9,11 0 0350 è -è " -'e 9,11 0 0351 é -é " -^e 9,11 0 0352 ê -ê " -:e 9,10 0 0353 ë -ë " -`i 5,11 0 0354 ì -ì " -'i 5,11 0 0355 í -í " -^i 5,11 0 0356 î -î " -:i 5,10 0 0357 ï -ï " -Sd 9,11 0 0360 ð -ð " -~n 10,10 0 0361 ñ -ñ " -`o 9,11 0 0362 ò -ò " -'o 9,11 0 0363 ó -ó " -^o 9,11 0 0364 ô -ô " -~o 9,10 0 0365 õ -õ " -:o 9,10 0 0366 ö -ö " -di 8,8 0 0367 ÷ -÷ " -/o 9,8,1 0 0370 ø -ø " -`u 10,11 0 0371 ù -ù " -'u 10,11 0 0372 ú -ú " -^u 10,11 0 0373 û -û " -:u 10,10 0 0374 ü -ü " -'y 7,11,3 0 0375 ý -ý " -Tp 10,11,3 0 0376 þ -þ " -:y 7,10,3 0 0377 ÿ -ÿ " diff -aruN groff-1.16.1/font/devhtml/NBI groff-1.17/font/devhtml/NBI --- groff-1.16.1/font/devhtml/NBI Fri May 19 07:05:50 2000 +++ groff-1.17/font/devhtml/NBI Thu Jan 1 01:00:00 1970 @@ -1,308 +0,0 @@ -name NBI -spacewidth 4 -charset ---- 4,1 0 040 -! 5,11 0 041 -" 6,11 0 042 " -dq " -# 8,10 0 043 -sh " -$ 8,12,1 0 044 -Do " -% 13,11,1 0 045 -& 13,11 0 046 & -' 4,11 0 047 -cq " -( 5,11,2 0 050 -) 6,11,2 0 051 -* 7,11 0 052 -+ 8,8 0 053 -, 4,2,3 0 054 -\- 8,5 0 055 -. 4,2 0 056 -/ 5,11 0 057 -sl " -0 8,11 0 060 -1 8,11 0 061 -2 8,11 0 062 -3 8,11 0 063 -4 8,11 0 064 -5 8,11 0 065 -6 8,11 0 066 -7 8,11 0 067 -8 8,11 0 070 -9 8,11 0 071 -: 4,7 0 072 -; 5,7,3 0 073 -< 9,9 0 074 < -= 9,7 0 075 -eq " -> 9,9 0 076 > -? 7,11 0 077 -@ 13,11 0 0100 -at " -A 11,11 0 0101 -B 10,11 0 0102 -C 11,11 0 0103 -D 12,11 0 0104 -E 10,11 0 0105 -F 10,11 0 0106 -G 11,11 0 0107 -H 12,11 0 0110 -I 6,11 0 0111 -J 8,11 0 0112 -K 12,11 0 0113 -L 10,11 0 0114 -M 15,11 0 0115 -N 13,11 0 0116 -O 12,11 0 0117 -P 11,11 0 0120 -Q 12,11,2 0 0121 -R 12,11 0 0122 -S 10,11 0 0123 -T 11,11 0 0124 -U 12,11 0 0125 -V 11,11 0 0126 -W 15,11 0 0127 -X 11,11 0 0130 -Y 9,11 0 0131 -Z 10,11 0 0132 -[ 7,11,2 0 0133 -lB " -\ 9,11 0 0134 -rs " -] 7,11,2 0 0135 -rB " -^ 8,11 0 0136 -a^ " -ha " -_ 9,0,2 0 0137 -` 4,11 0 0140 -oq " -a 10,7 0 0141 -b 8,11 0 0142 -c 8,7 0 0143 -d 10,11 0 0144 -e 8,7 0 0145 -f 5,11,3 0 0146 -g 8,9,3 0 0147 -h 10,11 0 0150 -i 5,10 0 0151 -j 4,10,3 0 0152 -k 9,11 0 0153 -l 5,11 0 0154 -m 15,7 0 0155 -n 10,7 0 0156 -o 8,7 0 0157 -p 8,7,3 0 0160 -q 9,7,3 0 0161 -r 7,7 0 0162 -s 8,7 0 0163 -t 5,9 0 0164 -u 10,7 0 0165 -v 8,7 0 0166 -w 13,7 0 0167 -x 9,7 0 0170 -y 9,7,3 0 0171 -z 9,7 0 0172 -{ 6,11,2 0 0173 -lC " -| 9,11 0 0174 -or " -ba " -} 6,11,2 0 0175 -rC " -~ 11,6 0 0176 -a~ " -ap " -ti " -r! 5,8,3 0 0241 ¡ -¡ " -ct 8,8,1 0 0242 ¢ -¢ " -Po 10,11 0 0243 £ -£ " -Cs 8,9 0 0244 ¤ -¤ " -Ye 10,11 0 0245 ¥ -¥ " -bb 8,11 0 0246 ¦ -¦ " -sc 9,11,2 0 0247 § -§ " -ad 6,10 0 0250 ¨ -¨ " -co 12,11 0 0251 © -© " -Of 8,11 0 0252 ª -ª " -Fo 10,7 0 0253 « -« " -no 9,7 0 0254 ¬ -¬ " -- 5,5 0 055 ­ -hy " ­ -­ " -rg 12,11 0 0256 ® -® " -a- 6,9 0 0257 ¯ -¯ " -de 6,11 0 0260 ° -° " -+- 8,8 0 0261 ± -± " -S2 5,11 0 0262 ² -² " -S3 5,11 0 0263 ³ -³ " -aa 5,11 0 0264 ´ -´ " -µ 10,7,3 0 0265 µ -ps 9,11 0 0266 ¶ -¶ " -pc 5,6 0 0267 · -· " -ac 5,0,3 0 0270 ¸ -¸ " -S1 5,11 0 0271 ¹ -¹ " -Om 8,11 0 0272 º -º " -Fc 10,7 0 0273 » -» " -14 12,11 0 0274 ¼ -¼ " -12 12,11 0 0275 ½ -½ " -34 12,11 0 0276 ¾ -¾ " -r? 7,8,3 0 0277 ¿ -¿ " -`A 11,15 0 0300 À -À " -'A 11,15 0 0301 Á -Á " -^A 11,15 0 0302 Â -Â " -~A 11,14 0 0303 Ã -Ã " -:A 11,14 0 0304 Ä -Ä " -oA 11,15 0 0305 Å -Å " -AE 14,11 0 0306 Æ -Æ " -,C 11,11,3 0 0307 Ç -Ç " -`E 10,15 0 0310 È -È " -'E 10,15 0 0311 É -É " -^E 10,15 0 0312 Ê -Ê " -:E 10,14 0 0313 Ë -Ë " -`I 6,15 0 0314 Ì -Ì " -'I 6,15 0 0315 Í -Í " -^I 6,15 0 0316 Î -Î " -:I 6,14 0 0317 Ï -Ï " --D 12,11 0 0320 Ð -Ð " -~N 13,14 0 0321 Ñ -Ñ " -`O 12,15 0 0322 Ò -Ò " -'O 12,15 0 0323 Ó -Ó " -^O 12,15 0 0324 Ô -Ô " -~O 12,14 0 0325 Õ -Õ " -:O 12,14 0 0326 Ö -Ö " -mu 8,8 0 0327 × -× " -/O 12,11 0 0330 Ø -Ø " -`U 12,15 0 0331 Ù -Ù " -'U 12,15 0 0332 Ú -Ú " -^U 12,15 0 0333 Û -Û " -:U 12,14 0 0334 Ü -Ü " -'Y 9,15 0 0335 Ý -Ý " -TP 11,11 0 0336 Þ -Þ " -ss 10,11,3 0 0337 ß -ß " -`a 10,11 0 0340 à -à " -'a 10,11 0 0341 á -á " -^a 10,11 0 0342 â -â " -~a 10,10 0 0343 ã -ã " -:a 10,10 0 0344 ä -ä " -oa 10,11 0 0345 å -å " -ae 13,7 0 0346 æ -æ " -,c 8,7,3 0 0347 ç -ç " -`e 8,11 0 0350 è -è " -'e 8,11 0 0351 é -é " -^e 8,11 0 0352 ê -ê " -:e 8,10 0 0353 ë -ë " -`i 5,11 0 0354 ì -ì " -'i 5,11 0 0355 í -í " -^i 5,11 0 0356 î -î " -:i 5,10 0 0357 ï -ï " -Sd 8,11 0 0360 ð -ð " -~n 10,10 0 0361 ñ -ñ " -`o 8,11 0 0362 ò -ò " -'o 8,11 0 0363 ó -ó " -^o 8,11 0 0364 ô -ô " -~o 8,10 0 0365 õ -õ " -:o 8,10 0 0366 ö -ö " -di 8,8 0 0367 ÷ -÷ " -/o 8,7 0 0370 ø -ø " -`u 10,11 0 0371 ù -ù " -'u 10,11 0 0372 ú -ú " -^u 10,11 0 0373 û -û " -:u 10,10 0 0374 ü -ü " -'y 9,11,3 0 0375 ý -ý " -Tp 8,11,3 0 0376 þ -þ " -:y 9,10,3 0 0377 ÿ -ÿ " diff -aruN groff-1.16.1/font/devhtml/NI groff-1.17/font/devhtml/NI --- groff-1.16.1/font/devhtml/NI Fri May 19 07:05:50 2000 +++ groff-1.17/font/devhtml/NI Thu Jan 1 01:00:00 1970 @@ -1,308 +0,0 @@ -name NI -spacewidth 4 -charset ---- 4,1 0 040 -! 5,11 0 041 -" 6,11 0 042 " -dq " -# 11,10 0 043 -sh " -$ 8,12,1 0 044 -Do " -% 12,11,1 0 045 -& 11,11 0 046 & -' 4,11 0 047 -cq " -( 5,11,2 0 050 -) 5,11,2 0 051 -* 6,11 0 052 -+ 8,8 0 053 -, 4,2,2 0 054 -\- 9,5 0 055 -. 4,2 0 056 -/ 9,11,3 0 057 -sl " -0 8,11 0 060 -1 8,11 0 061 -2 8,11 0 062 -3 8,11 0 063 -4 8,11 0 064 -5 8,11 0 065 -6 8,11 0 066 -7 8,11 0 067 -8 8,11 0 070 -9 8,11 0 071 -: 4,7 0 072 -; 4,7,2 0 073 -< 9,8 0 074 < -= 8,6 0 075 -eq " -> 9,8 0 076 > -? 6,11 0 077 -@ 12,11 0 0100 -at " -A 11,11 0 0101 -B 9,11 0 0102 -C 10,11 0 0103 -D 11,11 0 0104 -E 9,11 0 0105 -F 8,11 0 0106 -G 10,11 0 0107 -H 11,11 0 0110 -I 7,11 0 0111 -J 8,11 0 0112 -K 10,11 0 0113 -L 9,11 0 0114 -M 14,11 0 0115 -N 12,11 0 0116 -O 10,11 0 0117 -P 10,11 0 0120 -Q 10,11,2 0 0121 -R 11,11 0 0122 -S 10,11 0 0123 -T 10,11 0 0124 -U 12,11 0 0125 -V 10,11 0 0126 -W 13,11 0 0127 -X 10,11 0 0130 -Y 9,11 0 0131 -Z 10,11 0 0132 -[ 6,11,2 0 0133 -lB " -\ 8,11 0 0134 -rs " -] 6,11,2 0 0135 -rB " -^ 6,11 0 0136 -a^ " -ha " -_ 7,0,2 0 0137 -` 4,11 0 0140 -oq " -a 9,7 0 0141 -b 7,11 0 0142 -c 6,7 0 0143 -d 9,11 0 0144 -e 6,7 0 0145 -f 5,11,3 0 0146 -g 7,8,3 0 0147 -h 9,11 0 0150 -i 4,11 0 0151 -j 4,11,3 0 0152 -k 8,11 0 0153 -l 4,11 0 0154 -m 14,7 0 0155 -n 9,7 0 0156 -o 7,7 0 0157 -p 7,7,3 0 0160 -q 8,7,3 0 0161 -r 7,7 0 0162 -s 7,7 0 0163 -t 5,9 0 0164 -u 9,7 0 0165 -v 7,7 0 0166 -w 11,7 0 0167 -x 8,7 0 0170 -y 7,7,3 0 0171 -z 8,7 0 0172 -{ 6,11,2 0 0173 -lC " -| 9,11 0 0174 -or " -ba " -} 6,11,2 0 0175 -rC " -~ 9,6 0 0176 -a~ " -ap " -ti " -r! 4,8,3 0 0241 ¡ -¡ " -ct 8,9,2 0 0242 ¢ -¢ " -Po 9,11 0 0243 £ -£ " -Cs 8,9 0 0244 ¤ -¤ " -Ye 9,11 0 0245 ¥ -¥ " -bb 8,11 0 0246 ¦ -¦ " -sc 7,11,2 0 0247 § -§ " -ad 7,10 0 0250 ¨ -¨ " -co 13,11 0 0251 © -© " -Of 6,11 0 0252 ª -ª " -Fo 8,7 0 0253 « -« " -no 8,6 0 0254 ¬ -¬ " -- 5,5 0 055 ­ -hy " ­ -­ " -rg 13,11 0 0256 ® -® " -a- 6,9 0 0257 ¯ -¯ " -de 6,11 0 0260 ° -° " -+- 8,8 0 0261 ± -± " -S2 5,11 0 0262 ² -² " -S3 5,11 0 0263 ³ -³ " -aa 4,11 0 0264 ´ -´ " -µ 9,7,3 0 0265 µ -ps 9,11 0 0266 ¶ -¶ " -pc 5,6 0 0267 · -· " -ac 5,0,3 0 0270 ¸ -¸ " -S1 5,11 0 0271 ¹ -¹ " -Om 6,11 0 0272 º -º " -Fc 8,7 0 0273 » -» " -14 12,11 0 0274 ¼ -¼ " -12 12,11 0 0275 ½ -½ " -34 12,11 0 0276 ¾ -¾ " -r? 6,8,3 0 0277 ¿ -¿ " -`A 11,14 0 0300 À -À " -'A 11,14 0 0301 Á -Á " -^A 11,14 0 0302 Â -Â " -~A 11,14 0 0303 Ã -Ã " -:A 11,14 0 0304 Ä -Ä " -oA 11,14 0 0305 Å -Å " -AE 14,11 0 0306 Æ -Æ " -,C 10,11,3 0 0307 Ç -Ç " -`E 9,14 0 0310 È -È " -'E 9,14 0 0311 É -É " -^E 9,14 0 0312 Ê -Ê " -:E 9,14 0 0313 Ë -Ë " -`I 7,14 0 0314 Ì -Ì " -'I 7,14 0 0315 Í -Í " -^I 7,14 0 0316 Î -Î " -:I 7,14 0 0317 Ï -Ï " --D 11,11 0 0320 Ð -Ð " -~N 12,14 0 0321 Ñ -Ñ " -`O 10,14 0 0322 Ò -Ò " -'O 10,14 0 0323 Ó -Ó " -^O 10,14 0 0324 Ô -Ô " -~O 10,14 0 0325 Õ -Õ " -:O 10,14 0 0326 Ö -Ö " -mu 8,8 0 0327 × -× " -/O 10,11 0 0330 Ø -Ø " -`U 12,14 0 0331 Ù -Ù " -'U 12,14 0 0332 Ú -Ú " -^U 12,14 0 0333 Û -Û " -:U 12,14 0 0334 Ü -Ü " -'Y 9,14 0 0335 Ý -Ý " -TP 10,11 0 0336 Þ -Þ " -ss 8,11,3 0 0337 ß -ß " -`a 9,11 0 0340 à -à " -'a 9,11 0 0341 á -á " -^a 9,11 0 0342 â -â " -~a 9,10 0 0343 ã -ã " -:a 9,10 0 0344 ä -ä " -oa 9,11 0 0345 å -å " -ae 10,7 0 0346 æ -æ " -,c 6,7,3 0 0347 ç -ç " -`e 6,11 0 0350 è -è " -'e 6,11 0 0351 é -é " -^e 6,11 0 0352 ê -ê " -:e 6,10 0 0353 ë -ë " -`i 4,11 0 0354 ì -ì " -'i 4,11 0 0355 í -í " -^i 4,11 0 0356 î -î " -:i 4,10 0 0357 ï -ï " -Sd 7,11 0 0360 ð -ð " -~n 9,10 0 0361 ñ -ñ " -`o 7,11 0 0362 ò -ò " -'o 7,11 0 0363 ó -ó " -^o 7,11 0 0364 ô -ô " -~o 7,10 0 0365 õ -õ " -:o 7,10 0 0366 ö -ö " -di 8,8 0 0367 ÷ -÷ " -/o 7,8,1 0 0370 ø -ø " -`u 9,11 0 0371 ù -ù " -'u 9,11 0 0372 ú -ú " -^u 9,11 0 0373 û -û " -:u 9,10 0 0374 ü -ü " -'y 7,11,3 0 0375 ý -ý " -Tp 7,11,3 0 0376 þ -þ " -:y 7,10,3 0 0377 ÿ -ÿ " diff -aruN groff-1.16.1/font/devhtml/NR groff-1.17/font/devhtml/NR --- groff-1.16.1/font/devhtml/NR Fri May 19 07:05:50 2000 +++ groff-1.17/font/devhtml/NR Thu Jan 1 01:00:00 1970 @@ -1,308 +0,0 @@ -name NR -spacewidth 4 -charset ---- 4,1 0 040 -! 3,11 0 041 -" 5,11 0 042 " -dq " -# 8,11 0 043 -sh " -$ 8,12,2 0 044 -Do " -% 12,11 0 045 -& 13,11 0 046 & -' 4,11 0 047 -cq " -( 5,11,2 0 050 -) 6,11,2 0 051 -* 7,11 0 052 -+ 9,7 0 053 -, 4,2,2 0 054 -\- 9,4 0 055 -. 4,2 0 056 -/ 4,11 0 057 -sl " -0 8,11 0 060 -1 8,11 0 061 -2 8,11 0 062 -3 8,11 0 063 -4 8,11 0 064 -5 8,11 0 065 -6 8,11 0 066 -7 8,11 0 067 -8 8,11 0 070 -9 8,11 0 071 -: 4,7 0 072 -; 4,7,2 0 073 -< 10,7 0 074 < -= 9,6 0 075 -eq " -> 10,7 0 076 > -? 6,11 0 077 -@ 13,11 0 0100 -at " -A 10,11 0 0101 -B 10,11 0 0102 -C 11,11 0 0103 -D 11,11 0 0104 -E 10,11 0 0105 -F 10,11 0 0106 -G 11,11 0 0107 -H 12,11 0 0110 -I 6,11 0 0111 -J 7,11 0 0112 -K 11,11 0 0113 -L 10,11 0 0114 -M 16,11 0 0115 -N 13,11 0 0116 -O 11,11 0 0117 -P 10,11 0 0120 -Q 11,11,2 0 0121 -R 11,11 0 0122 -S 8,11 0 0123 -T 10,11 0 0124 -U 13,11 0 0125 -V 10,11 0 0126 -W 16,11 0 0127 -X 13,11 0 0130 -Y 10,11 0 0131 -Z 9,11 0 0132 -[ 4,11,2 0 0133 -lB " -\ 8,11 0 0134 -rs " -] 4,11,2 0 0135 -rB " -^ 7,11 0 0136 -a^ " -ha " -_ 7,0,2 0 0137 -` 4,11 0 0140 -oq " -a 8,7 0 0141 -b 7,11 0 0142 -c 7,7 0 0143 -d 8,11 0 0144 -e 7,7 0 0145 -f 5,11 0 0146 -g 8,7,3 0 0147 -h 9,11 0 0150 -i 4,10 0 0151 -j 4,10,3 0 0152 -k 9,11 0 0153 -l 4,11 0 0154 -m 14,7 0 0155 -n 9,7 0 0156 -o 7,7 0 0157 -p 8,7,3 0 0160 -q 7,7,3 0 0161 -r 7,7 0 0162 -s 6,7 0 0163 -t 5,9 0 0164 -u 9,7 0 0165 -v 8,7 0 0166 -w 12,7 0 0167 -x 8,7 0 0170 -y 8,7,3 0 0171 -z 7,7 0 0172 -{ 4,11,2 0 0173 -lC " -| 9,11 0 0174 -or " -ba " -} 5,11,2 0 0175 -rC " -~ 9,5 0 0176 -a~ " -ap " -ti " -r! 4,8,3 0 0241 ¡ -¡ " -ct 8,9,2 0 0242 ¢ -¢ " -Po 8,11 0 0243 £ -£ " -Cs 8,9 0 0244 ¤ -¤ " -Ye 8,11 0 0245 ¥ -¥ " -bb 9,11 0 0246 ¦ -¦ " -sc 7,11,2 0 0247 § -§ " -ad 6,10 0 0250 ¨ -¨ " -co 14,11 0 0251 © -© " -Of 6,11 0 0252 ª -ª " -Fo 7,6 0 0253 « -« " -no 9,5 0 0254 ¬ -¬ " -- 5,4 0 055 ­ -hy " ­ -­ " -rg 14,11 0 0256 ® -® " -a- 5,9 0 0257 ¯ -¯ " -de 6,11 0 0260 ° -° " -+- 9,7 0 0261 ± -± " -S2 5,11 0 0262 ² -² " -S3 5,11 0 0263 ³ -³ " -aa 5,11 0 0264 ´ -´ " -µ 9,7,3 0 0265 µ -ps 9,11,2 0 0266 ¶ -¶ " -pc 4,5 0 0267 · -· " -ac 5,1,3 0 0270 ¸ -¸ " -S1 5,11 0 0271 ¹ -¹ " -Om 5,11 0 0272 º -º " -Fc 7,6 0 0273 » -» " -14 12,11 0 0274 ¼ -¼ " -12 12,11 0 0275 ½ -½ " -34 12,11 0 0276 ¾ -¾ " -r? 6,8,3 0 0277 ¿ -¿ " -`A 10,14 0 0300 À -À " -'A 10,14 0 0301 Á -Á " -^A 10,14 0 0302 Â -Â " -~A 10,14 0 0303 Ã -Ã " -:A 10,13 0 0304 Ä -Ä " -oA 10,14 0 0305 Å -Å " -AE 15,11 0 0306 Æ -Æ " -,C 11,11,3 0 0307 Ç -Ç " -`E 10,14 0 0310 È -È " -'E 10,14 0 0311 É -É " -^E 10,14 0 0312 Ê -Ê " -:E 10,14 0 0313 Ë -Ë " -`I 6,14 0 0314 Ì -Ì " -'I 6,14 0 0315 Í -Í " -^I 6,14 0 0316 Î -Î " -:I 6,14 0 0317 Ï -Ï " --D 11,11 0 0320 Ð -Ð " -~N 13,14 0 0321 Ñ -Ñ " -`O 11,14 0 0322 Ò -Ò " -'O 11,14 0 0323 Ó -Ó " -^O 11,14 0 0324 Ô -Ô " -~O 11,14 0 0325 Õ -Õ " -:O 11,14 0 0326 Ö -Ö " -mu 9,7 0 0327 × -× " -/O 11,11 0 0330 Ø -Ø " -`U 13,14 0 0331 Ù -Ù " -'U 13,14 0 0332 Ú -Ú " -^U 13,14 0 0333 Û -Û " -:U 13,14 0 0334 Ü -Ü " -'Y 10,14 0 0335 Ý -Ý " -TP 10,11 0 0336 Þ -Þ " -ss 8,11 0 0337 ß -ß " -`a 8,11 0 0340 à -à " -'a 8,11 0 0341 á -á " -^a 8,11 0 0342 â -â " -~a 8,10 0 0343 ã -ã " -:a 8,10 0 0344 ä -ä " -oa 8,11 0 0345 å -å " -ae 12,7 0 0346 æ -æ " -,c 7,7,3 0 0347 ç -ç " -`e 7,11 0 0350 è -è " -'e 7,11 0 0351 é -é " -^e 7,11 0 0352 ê -ê " -:e 7,10 0 0353 ë -ë " -`i 4,11 0 0354 ì -ì " -'i 4,11 0 0355 í -í " -^i 4,11 0 0356 î -î " -:i 4,10 0 0357 ï -ï " -Sd 7,11 0 0360 ð -ð " -~n 9,10 0 0361 ñ -ñ " -`o 7,11 0 0362 ò -ò " -'o 7,11 0 0363 ó -ó " -^o 7,11 0 0364 ô -ô " -~o 7,10 0 0365 õ -õ " -:o 7,10 0 0366 ö -ö " -di 9,7 0 0367 ÷ -÷ " -/o 7,8,1 0 0370 ø -ø " -`u 9,11 0 0371 ù -ù " -'u 9,11 0 0372 ú -ú " -^u 9,11 0 0373 û -û " -:u 9,10 0 0374 ü -ü " -'y 8,11,3 0 0375 ý -ý " -Tp 8,11,3 0 0376 þ -þ " -:y 8,10,3 0 0377 ÿ -ÿ " diff -aruN groff-1.16.1/font/devhtml/R.proto groff-1.17/font/devhtml/R.proto --- groff-1.16.1/font/devhtml/R.proto Thu Jan 1 01:00:00 1970 +++ groff-1.17/font/devhtml/R.proto Wed Jan 17 15:53:37 2001 @@ -0,0 +1,315 @@ +name R +internalname 0 +spacewidth 24 +charset +! 24 0 0x0021 +" 24 0 0x0022 " +dq " +# 24 0 0x0023 +sh " +$ 24 0 0x0024 +Do " +% 24 0 0x0025 +& 24 0 0x0026 & +aq 24 0 0x0027 +' " +( 24 0 0x0028 +) 24 0 0x0029 +* 24 0 0x002A ++ 24 0 0x002B +pl " +, 24 0 0x002C +\- 24 0 0x002D +hy " +- " +mi " +en " +. 24 0 0x002E +/ 24 0 0x002F +sl " +0 24 0 0x0030 +1 24 0 0x0031 +2 24 0 0x0032 +3 24 0 0x0033 +4 24 0 0x0034 +5 24 0 0x0035 +6 24 0 0x0036 +7 24 0 0x0037 +8 24 0 0x0038 +9 24 0 0x0039 +: 24 0 0x003A +; 24 0 0x003B +< 24 0 0x003C < +la " += 24 0 0x003D +eq " +> 24 0 0x003E > +ra " +? 24 0 0x003F +@ 24 0 0x0040 +at " +A 24 0 0x0041 +B 24 0 0x0042 +C 24 0 0x0043 +D 24 0 0x0044 +E 24 0 0x0045 +F 24 0 0x0046 +G 24 0 0x0047 +H 24 0 0x0048 +I 24 0 0x0049 +J 24 0 0x004A +K 24 0 0x004B +L 24 0 0x004C +M 24 0 0x004D +N 24 0 0x004E +O 24 0 0x004F +P 24 0 0x0050 +Q 24 0 0x0051 +R 24 0 0x0052 +S 24 0 0x0053 +T 24 0 0x0054 +U 24 0 0x0055 +V 24 0 0x0056 +W 24 0 0x0057 +X 24 0 0x0058 +Y 24 0 0x0059 +Z 24 0 0x005A +[ 24 0 0x005B +lB " +\ 24 0 0x005C +rs " +] 24 0 0x005D +rB " +^ 24 0 0x005E +a^ " +ha " +_ 24 0 0x005F +ru " +ul " +` 24 0 0x0060 +a 24 0 0x0061 +b 24 0 0x0062 +c 24 0 0x0063 +d 24 0 0x0064 +e 24 0 0x0065 +f 24 0 0x0066 +g 24 0 0x0067 +h 24 0 0x0068 +i 24 0 0x0069 +j 24 0 0x006A +k 24 0 0x006B +l 24 0 0x006C +m 24 0 0x006D +n 24 0 0x006E +o 24 0 0x006F +p 24 0 0x0070 +q 24 0 0x0071 +r 24 0 0x0072 +s 24 0 0x0073 +t 24 0 0x0074 +u 24 0 0x0075 +v 24 0 0x0076 +w 24 0 0x0077 +x 24 0 0x0078 +y 24 0 0x0079 +z 24 0 0x007A +lC 24 0 0x007B +{ " +ba 24 0 0x007C +or " +| " +rC 24 0 0x007D +} " +a~ 24 0 0x007E +~ " +ti " +r! 24 0 0x00A1 ¡ +char161 " +ct 24 0 0x00A2 ¢ +char162 " +Po 24 0 0x00A3 £ +char163 " +Cs 24 0 0x00A4 ¤ +char164 " +Ye 24 0 0x00A5 ¥ +char165 " +bb 24 0 0x00A6 ¦ +char166 " +sc 24 0 0x00A7 § +char167 " +ad 24 0 0x00A8 ¨ +char168 " +co 24 0 0x00A9 © +char169 " +Of 24 0 0x00AA ª +char170 " +Fo 24 0 0x00AB « +char171 " +no 24 0 0x00AC ¬ +char172 " +rg 24 0 0x00AE ® +char174 " +a- 24 0 0x00AF ¯ +char175 " +de 24 0 0x00B0 ° +char176 " ++- 24 0 0x00B1 ± +char177 " +S2 24 0 0x00B2 ² +char178 " +S3 24 0 0x00B3 ³ +char179 " +aa 24 0 0x00B4 ´ +\' " +char180 " +char181 24 0 0x00B5 µ +ps 24 0 0x00B6 ¶ +char182 " +pc 24 0 0x00B7 · +char183 " +ac 24 0 0x00B8 ¸ +char184 " +S1 24 0 0x00B9 ¹ +char185 " +Om 24 0 0x00BA º +char186 " +Fc 24 0 0x00BB » +char187 " +14 24 0 0x00BC ¼ +char188 " +12 24 0 0x00BD ½ +char189 " +34 24 0 0x00BE ¾ +char190 " +r? 24 0 0x00BF ¿ +char191 " +`A 24 0 0x00C0 À +char192 " +'A 24 0 0x00C1 Á +char193 " +^A 24 0 0x00C2 Â +char194 " +~A 24 0 0x00C3 Ã +char195 " +:A 24 0 0x00C4 Ä +char196 " +oA 24 0 0x00C5 Å +char197 " +AE 24 0 0x00C6 Æ +char198 " +,C 24 0 0x00C7 Ç +char199 " +`E 24 0 0x00C8 È +char200 " +'E 24 0 0x00C9 É +char201 " +^E 24 0 0x00CA Ê +char202 " +:E 24 0 0x00CB Ë +char203 " +`I 24 0 0x00CC Ì +char204 " +'I 24 0 0x00CD Í +char205 " +^I 24 0 0x00CE Î +char206 " +:I 24 0 0x00CF Ï +char207 " +-D 24 0 0x00D0 Ð +char208 " +~N 24 0 0x00D1 Ñ +char209 " +`O 24 0 0x00D2 Ò +char210 " +'O 24 0 0x00D3 Ó +char211 " +^O 24 0 0x00D4 Ô +char212 " +~O 24 0 0x00D5 Õ +char213 " +:O 24 0 0x00D6 Ö +char214 " +mu 24 0 0x00D7 × +char215 " +/O 24 0 0x00D8 Ø +char216 " +`U 24 0 0x00D9 Ù +char217 " +'U 24 0 0x00DA Ú +char218 " +^U 24 0 0x00DB Û +char219 " +:U 24 0 0x00DC Ü +char220 " +'Y 24 0 0x00DD Ý +char221 " +TP 24 0 0x00DE Þ +char222 " +ss 24 0 0x00DF ß +char223 " +`a 24 0 0x00E0 à +char224 " +'a 24 0 0x00E1 á +char225 " +^a 24 0 0x00E2 â +char226 " +~a 24 0 0x00E3 ã +char227 " +:a 24 0 0x00E4 ä +char228 " +oa 24 0 0x00E5 å +char229 " +ae 24 0 0x00E6 æ +char230 " +,c 24 0 0x00E7 ç +char231 " +`e 24 0 0x00E8 è +char232 " +'e 24 0 0x00E9 é +char233 " +^e 24 0 0x00EA ê +char234 " +:e 24 0 0x00EB ë +char235 " +`i 24 0 0x00EC ì +char236 " +'i 24 0 0x00ED í +char237 " +^i 24 0 0x00EE î +char238 " +:i 24 0 0x00EF ï +char239 " +Sd 24 0 0x00F0 ð +char240 " +~n 24 0 0x00F1 ñ +char241 " +`o 24 0 0x00F2 ò +char242 " +'o 24 0 0x00F3 ó +char243 " +^o 24 0 0x00F4 ô +char244 " +~o 24 0 0x00F5 õ +char245 " +:o 24 0 0x00F6 ö +char246 " +di 24 0 0x00F7 ÷ +char247 " +/o 24 0 0x00F8 ø +char248 " +`u 24 0 0x00F9 ù +char249 " +'u 24 0 0x00FA ú +char250 " +^u 24 0 0x00FB û +char251 " +:u 24 0 0x00FC ü +char252 " +'y 24 0 0x00FD ý +char253 " +Tp 24 0 0x00FE þ +char254 " +:y 24 0 0x00FF ÿ +char255 " +\` 24 0 0x2018 ` +ga " diff -aruN groff-1.16.1/font/devhtml/S groff-1.17/font/devhtml/S --- groff-1.16.1/font/devhtml/S Sun Feb 6 10:35:22 2000 +++ groff-1.17/font/devhtml/S Thu Jan 1 01:00:00 1970 @@ -1,226 +0,0 @@ -name S -special -spacewidth 4 -charset ---- 4,1 0 040 -! 5,10 0 041 -fa 9,10 0 042 -# 7,10 0 043 -sh " -te 8,10 0 044 -% 12,10 0 045 -& 11,10 0 046 -st 6,7 0 047 -( 5,10,3 0 050 -) 5,10,3 0 051 -** 7,8 0 052 -+ 8,7 0 053 -pl " -, 3,2,2 0 054 -\- 8,4 0 055 -mi " -. 3,2 0 056 -/ 4,10 0 057 -sl " -0 7,10 0 060 -1 7,10 0 061 -2 7,10 0 062 -3 7,10 0 063 -4 7,10 0 064 -5 7,10 0 065 -6 7,10 0 066 -7 7,10 0 067 -8 7,10 0 070 -9 7,10 0 071 -: 4,7 0 072 -; 4,7,2 0 073 -< 8,7 0 074 -= 8,5 0 075 -eq " -> 8,7 0 076 -? 6,10 0 077 -=~ 8,7 0 0100 -*A 11,10 0 0101 -*B 9,10 0 0102 -*X 11,10 0 0103 -*D 9,10 0 0104 -*E 9,10 0 0105 -*F 11,10 0 0106 -*G 9,10 0 0107 -*Y 11,10 0 0110 -*I 5,10 0 0111 -+h 9,10 0 0112 -*K 10,10 0 0113 -*L 10,10 0 0114 -*M 13,10 0 0115 -*N 11,10 0 0116 -*O 10,10 0 0117 -*P 11,10 0 0120 -*H 10,10 0 0121 -*R 8,10 0 0122 -*S 9,10 0 0123 -*T 9,10 0 0124 ---- 9,10 0 0125 -ts 7,7,3 0 0126 -*W 11,10 0 0127 -*C 9,10 0 0130 -*Q 11,10 0 0131 -*Z 9,10 0 0132 -[ 5,10,3 0 0133 -lB " -tf 10,7 0 0134 -3d " -] 5,10,3 0 0135 -rB " -pp 10,10 0 0136 -_ 7,0,3 0 0137 -radicalex 7,12 0 0140 -*a 9,7 0 0141 -*b 8,11,3 0 0142 -*x 8,7,3 0 0143 -*d 7,11 0 0144 -*e 6,7 0 0145 -*f 9,10,3 0 0146 -*g 6,7,3 0 0147 -*y 8,7,3 0 0150 -*i 5,7 0 0151 -+f 9,7,3 0 0152 -*k 8,7 0 0153 -*l 8,10 0 0154 -*m 8,7,2 0 0155 -µ " -*n 8,7 0 0156 -*o 8,7 0 0157 -*p 8,7 0 0160 -*h 7,10 0 0161 -*r 8,7,3 0 0162 -*s 8,7 0 0163 -*t 6,7 0 0164 -*u 8,7 0 0165 -+p 11,8 0 0166 -*w 11,7 0 0167 -*c 7,12,3 0 0170 -*q 9,7,3 0 0171 -*z 7,11,3 0 0172 -lC 7,10,3 0 0173 -{ " -ba 3,10,3 0 0174 -or " -| " -rC 7,10,3 0 0175 -} " -ap 8,5 0 0176 -*U 9,10 0 0241 -fm 4,10 0 0242 -<= 8,9 0 0243 -f/ 4,10 0 0244 -if 10,6 0 0245 -Fn 7,10,3 0 0246 -CL 11,7 0 0247 -DI 11,7 0 0250 -HE 11,7 0 0251 -SP 11,7 0 0252 -<> 15,7 0 0253 -<- 14,7 0 0254 -ua 9,12,3 0 0255 -arrowverttp " --> 14,7 0 0256 -da 9,12,3 0 0257 -arrowvertbt " -de 6,10 0 0260 -° " -+- 8,9 0 0261 -± " -sd 6,10 0 0262 ->= 8,9 0 0263 -mu 8,7 0 0264 -× " -pt 10,6 0 0265 -pd 7,11 0 0266 -bu 7,6 0 0267 -di 8,7 0 0270 -÷ " -!= 8,7 0 0271 -== 8,6 0 0272 -~= 8,7 0 0273 -~~ " ---- 15,2 0 0274 -arrowvertex 9,12,3 0 0275 -an 15,4 0 0276 -CR 10,9 0 0277 -Ah 12,10 0 0300 -Im 10,11,1 0 0301 -Re 12,11 0 0302 -wp 12,9,3 0 0303 -c* 11,9 0 0304 -c+ 11,9 0 0305 -es 12,11 0 0306 -ca 10,7 0 0307 -cu 10,7 0 0310 -sp 10,7 0 0311 -ip 10,7,2 0 0312 ---- 10,8,1 0 0313 -sb 10,7 0 0314 -ib 10,7,2 0 0315 -mo 10,7 0 0316 -nm 10,8,1 0 0317 -/_ 11,10 0 0320 -gr 10,11 0 0321 -rg 12,10 0 0322 -co 12,10 0 0323 -tm 11,10 0 0324 ---- 12,11,1 0 0325 -sr 8,12 0 0326 -md 4,5 0 0327 -no 10,5 0 0330 -¬ " -AN 9,7 0 0331 -OR 9,7 0 0332 -hA 15,7 0 0333 -lA 14,7 0 0334 -uA 9,12 0 0335 -rA 14,7 0 0336 -dA 9,12 0 0337 -lz 7,11 0 0340 -la 5,12,3 0 0341 ---- 12,10 0 0342 ---- 12,10 0 0343 ---- 11,10 0 0344 ---- 10,11,1 0 0345 -parenlefttp 6,12,3 0 0346 -parenleftex 6,12,3 0 0347 -parenleftbt 6,12,3 0 0350 -bracketlefttp 6,12,3 0 0351 -lc " -bracketleftex 6,12,3 0 0352 -bracketleftbt 6,12,3 0 0353 -lf " -bracelefttp 7,12,3 0 0354 -lt " -braceleftmid 7,12,3 0 0355 -lk " -braceleftbt 7,12,3 0 0356 -lb " -bracerightex 7,12,3 0 0357 -braceleftex " -bv " ---- 12,12 0 0360 -ra 5,12,3 0 0361 -is 4,12,1 0 0362 ---- 10,12,3 0 0363 ---- 10,12,3 0 0364 ---- 10,12,3 0 0365 -parenrighttp 6,12,3 0 0366 -parenrightex 6,12,3 0 0367 -parenrightbt 6,12,3 0 0370 -bracketrighttp 6,12,3 0 0371 -rc " -bracketrightex 6,12,3 0 0372 -bracketrightbt 6,12,3 0 0373 -rf " -bracerighttp 7,12,3 0 0374 -rt " -bracerightmid 7,12,3 0 0375 -rk " -bracerightbt 7,12,3 0 0376 -rb " diff -aruN groff-1.16.1/font/devhtml/TB groff-1.17/font/devhtml/TB --- groff-1.16.1/font/devhtml/TB Fri May 19 07:05:50 2000 +++ groff-1.17/font/devhtml/TB Thu Jan 1 01:00:00 1970 @@ -1,308 +0,0 @@ -name TB -spacewidth 3 -charset ---- 3,1 0 040 -! 4,10 0 041 -" 7,10 0 042 " -dq " -# 7,10 0 043 -sh " -$ 7,11,1 0 044 -Do " -% 14,10 0 045 -& 12,10 0 046 & -' 4,10 0 047 -cq " -( 5,10,3 0 050 -) 5,10,3 0 051 -* 7,10 0 052 -+ 8,7 0 053 -, 3,2,2 0 054 -\- 9,4 0 055 -. 3,2 0 056 -/ 4,10 0 057 -sl " -0 7,10 0 060 -1 7,10 0 061 -2 7,10 0 062 -3 7,10 0 063 -4 7,10 0 064 -5 7,10 0 065 -6 7,10 0 066 -7 7,10 0 067 -8 7,10 0 070 -9 7,10 0 071 -: 4,7 0 072 -; 4,7,2 0 073 -< 8,7 0 074 < -= 8,5 0 075 -eq " -> 8,7 0 076 > -? 7,10 0 077 -@ 14,10,2 0 0100 -at " -A 10,10 0 0101 -B 9,10 0 0102 -C 10,10 0 0103 -D 10,10 0 0104 -E 9,10 0 0105 -F 8,10 0 0106 -G 11,10 0 0107 -H 11,10 0 0110 -I 5,10 0 0111 -J 7,10,1 0 0112 -K 11,10 0 0113 -L 9,10 0 0114 -M 13,10 0 0115 -N 10,10 0 0116 -O 11,10 0 0117 -P 9,10 0 0120 -Q 11,10,3 0 0121 -R 10,10 0 0122 -S 8,10 0 0123 -T 9,10 0 0124 -U 10,10 0 0125 -V 10,10 0 0126 -W 14,10 0 0127 -X 10,10 0 0130 -Y 10,10 0 0131 -Z 9,10 0 0132 -[ 5,10,3 0 0133 -lB " -\ 4,10 0 0134 -rs " -] 5,10,3 0 0135 -rB " -^ 8,10 0 0136 -a^ " -ha " -_ 7,0,3 0 0137 -` 4,10 0 0140 -oq " -a 7,7 0 0141 -b 8,10 0 0142 -c 6,7 0 0143 -d 7,10 0 0144 -e 6,7 0 0145 -f 5,10 0 0146 -g 7,7,3 0 0147 -h 8,10 0 0150 -i 4,10 0 0151 -j 4,10,3 0 0152 -k 8,10 0 0153 -l 4,10 0 0154 -m 12,7 0 0155 -n 8,7 0 0156 -o 7,7 0 0157 -p 8,7,3 0 0160 -q 7,7,3 0 0161 -r 6,7 0 0162 -s 6,7 0 0163 -t 5,9 0 0164 -u 7,7 0 0165 -v 7,7 0 0166 -w 10,7 0 0167 -x 7,7 0 0170 -y 7,7,3 0 0171 -z 6,7 0 0172 -{ 7,10,3 0 0173 -lC " -| 3,10,2 0 0174 -or " -ba " -} 7,10,3 0 0175 -rC " -~ 8,7 0 0176 -a~ " -ap " -ti " -r! 4,7,3 0 0241 ¡ -¡ " -ct 7,9,2 0 0242 ¢ -¢ " -Po 8,10 0 0243 £ -£ " -Cs 8,8 0 0244 ¤ -¤ " -Ye 8,10 0 0245 ¥ -¥ " -bb 3,10,2 0 0246 ¦ -¦ " -sc 7,10,2 0 0247 § -§ " -ad 5,10 0 0250 ¨ -¨ " -co 12,10 0 0251 © -© " -Of 5,10 0 0252 ª -ª " -Fo 9,6 0 0253 « -« " -no 9,5 0 0254 ¬ -¬ " -- 4,4 0 055 ­ -hy " ­ -­ " -rg 12,10 0 0256 ® -® " -a- 5,9 0 0257 ¯ -¯ " -de 6,10 0 0260 ° -° " -+- 8,9 0 0261 ± -± " -S2 4,10 0 0262 ² -² " -S3 4,10 0 0263 ³ -³ " -aa 5,11 0 0264 ´ -´ " -µ 7,7,3 0 0265 µ -ps 8,10,3 0 0266 ¶ -¶ " -pc 4,6 0 0267 · -· " -ac 5,0,3 0 0270 ¸ -¸ " -S1 4,10 0 0271 ¹ -¹ " -Om 5,10 0 0272 º -º " -Fc 9,6 0 0273 » -» " -14 10,10 0 0274 ¼ -¼ " -12 10,10 0 0275 ½ -½ " -34 10,10 0 0276 ¾ -¾ " -r? 7,7,3 0 0277 ¿ -¿ " -`A 10,14 0 0300 À -À " -'A 10,14 0 0301 Á -Á " -^A 10,14 0 0302 Â -Â " -~A 10,13 0 0303 Ã -Ã " -:A 10,13 0 0304 Ä -Ä " -oA 10,14 0 0305 Å -Å " -AE 14,10 0 0306 Æ -Æ " -,C 10,10,3 0 0307 Ç -Ç " -`E 9,14 0 0310 È -È " -'E 9,14 0 0311 É -É " -^E 9,14 0 0312 Ê -Ê " -:E 9,13 0 0313 Ë -Ë " -`I 5,14 0 0314 Ì -Ì " -'I 5,14 0 0315 Í -Í " -^I 5,14 0 0316 Î -Î " -:I 5,13 0 0317 Ï -Ï " --D 11,10 0 0320 Ð -Ð " -~N 10,13 0 0321 Ñ -Ñ " -`O 11,14 0 0322 Ò -Ò " -'O 11,14 0 0323 Ó -Ó " -^O 11,14 0 0324 Ô -Ô " -~O 11,13 0 0325 Õ -Õ " -:O 11,13 0 0326 Ö -Ö " -mu 8,7 0 0327 × -× " -/O 11,11,1 0 0330 Ø -Ø " -`U 10,14 0 0331 Ù -Ù " -'U 10,14 0 0332 Ú -Ú " -^U 10,14 0 0333 Û -Û " -:U 10,13 0 0334 Ü -Ü " -'Y 10,14 0 0335 Ý -Ý " -TP 9,10 0 0336 Þ -Þ " -ss 8,10 0 0337 ß -ß " -`a 7,11 0 0340 à -à " -'a 7,11 0 0341 á -á " -^a 7,11 0 0342 â -â " -~a 7,10 0 0343 ã -ã " -:a 7,10 0 0344 ä -ä " -oa 7,11 0 0345 å -å " -ae 11,7 0 0346 æ -æ " -,c 7,7,3 0 0347 ç -ç " -`e 7,11 0 0350 è -è " -'e 7,11 0 0351 é -é " -^e 7,11 0 0352 ê -ê " -:e 7,10 0 0353 ë -ë " -`i 4,11 0 0354 ì -ì " -'i 4,11 0 0355 í -í " -^i 4,11 0 0356 î -î " -:i 4,10 0 0357 ï -ï " -Sd 7,10 0 0360 ð -ð " -~n 8,10 0 0361 ñ -ñ " -`o 7,11 0 0362 ò -ò " -'o 7,11 0 0363 ó -ó " -^o 7,11 0 0364 ô -ô " -~o 7,10 0 0365 õ -õ " -:o 7,10 0 0366 ö -ö " -di 8,7 0 0367 ÷ -÷ " -/o 7,8,1 0 0370 ø -ø " -`u 7,11 0 0371 ù -ù " -'u 7,11 0 0372 ú -ú " -^u 7,11 0 0373 û -û " -:u 7,10 0 0374 &uulm; -ü " -'y 7,11,3 0 0375 ý -ý " -Tp 8,10,3 0 0376 þ -þ " -:y 7,10,3 0 0377 ÿ -ÿ " diff -aruN groff-1.16.1/font/devhtml/TBI groff-1.17/font/devhtml/TBI --- groff-1.16.1/font/devhtml/TBI Fri May 19 07:05:50 2000 +++ groff-1.17/font/devhtml/TBI Thu Jan 1 01:00:00 1970 @@ -1,308 +0,0 @@ -name TBI -spacewidth 3 -charset ---- 3,1 0 040 -! 7,10 0 041 -" 7,10 0 042 " -dq " -# 8,10 0 043 -sh " -$ 7,11,1 0 044 -Do " -% 14,10 0 045 -& 10,10 0 046 & -' 5,10 0 047 -cq " -( 6,10,3 0 050 -) 6,10,3 0 051 -* 7,10 0 052 -+ 9,7 0 053 -, 4,2,2 0 054 -\- 9,4 0 055 -. 3,2 0 056 -/ 6,10 0 057 -sl " -0 7,10 0 060 -1 7,10 0 061 -2 7,10 0 062 -3 7,10 0 063 -4 7,10 0 064 -5 7,10 0 065 -6 7,10 0 066 -7 7,10 0 067 -8 7,10 0 070 -9 7,10 0 071 -: 5,7 0 072 -; 4,7,2 0 073 -< 8,6 0 074 < -= 10,5 0 075 -eq " -> 8,6 0 076 > -? 8,10 0 077 -@ 15,10,2 0 0100 -at " -A 9,10 0 0101 -B 9,10 0 0102 -C 9,10 0 0103 -D 10,10 0 0104 -E 10,10 0 0105 -F 9,10 0 0106 -G 10,10 0 0107 -H 11,10 0 0110 -I 5,10 0 0111 -J 7,10,1 0 0112 -K 11,10 0 0113 -L 9,10 0 0114 -M 13,10 0 0115 -N 11,10 0 0116 -O 10,10 0 0117 -P 9,10 0 0120 -Q 10,10,3 0 0121 -R 10,10 0 0122 -S 8,10 0 0123 -T 10,10 0 0124 -U 10,10 0 0125 -V 10,10 0 0126 -W 13,10 0 0127 -X 9,10 0 0130 -Y 8,10 0 0131 -Z 8,10 0 0132 -[ 6,10,3 0 0133 -lB " -\ 6,10 0 0134 -rs " -] 5,10,3 0 0135 -rB " -^ 8,10 0 0136 -a^ " -ha " -_ 7,0,2 0 0137 -` 5,10 0 0140 -oq " -a 8,7 0 0141 -b 7,10 0 0142 -c 6,7 0 0143 -d 7,10 0 0144 -e 7,7 0 0145 -f 5,10,3 0 0146 -g 6,7,3 0 0147 -h 8,10 0 0150 -i 4,10 0 0151 -j 4,10,3 0 0152 -k 7,10 0 0153 -l 4,10 0 0154 -m 11,7 0 0155 -n 8,7 0 0156 -o 7,7 0 0157 -p 7,7,3 0 0160 -q 7,7,3 0 0161 -r 6,7 0 0162 -s 6,7 0 0163 -t 4,9 0 0164 -u 7,7 0 0165 -v 6,7 0 0166 -w 9,7 0 0167 -x 6,7 0 0170 -y 6,7,3 0 0171 -z 6,7 0 0172 -{ 7,10,3 0 0173 -lC " -| 4,10 0 0174 -or " -ba " -} 7,10,3 0 0175 -rC " -~ 10,5 0 0176 -a~ " -ap " -ti " -r! 7,7,3 0 0241 ¡ -¡ " -ct 7,8,1 0 0242 ¢ -¢ " -Po 7,10 0 0243 £ -£ " -Cs 8,8 0 0244 ¤ -¤ " -Ye 7,10 0 0245 ¥ -¥ " -bb 4,10 0 0246 ¦ -¦ " -sc 8,10,3 0 0247 § -§ " -ad 6,9 0 0250 ¨ -¨ " -co 12,10 0 0251 © -© " -Of 6,10 0 0252 ª -ª " -Fo 8,6 0 0253 « -« " -no 9,5 0 0254 ¬ -¬ " -- 5,4 0 055 ­ -hy " ­ -­ " -rg 12,10 0 0256 ® -® " -a- 6,9 0 0257 ¯ -¯ " -de 6,10 0 0260 ° -° " -+- 9,9 0 0261 ± -± " -S2 4,10 0 0262 ² -² " -S3 4,10 0 0263 ³ -³ " -aa 6,10 0 0264 ´ -´ " -µ 7,7,3 0 0265 µ -ps 8,10,3 0 0266 ¶ -¶ " -pc 4,5 0 0267 · -· " -ac 5,0,3 0 0270 ¸ -¸ " -S1 4,10 0 0271 ¹ -¹ " -Om 6,10 0 0272 º -º " -Fc 8,6 0 0273 » -» " -14 10,10 0 0274 ¼ -¼ " -12 10,10 0 0275 ½ -½ " -34 10,10 0 0276 ¾ -¾ " -r? 8,7,3 0 0277 ¿ -¿ " -`A 9,13 0 0300 À -À " -'A 9,13 0 0301 Á -Á " -^A 9,13 0 0302 Â -Â " -~A 9,13 0 0303 Ã -Ã " -:A 9,13 0 0304 Ä -Ä " -oA 9,13 0 0305 Å -Å " -AE 14,10 0 0306 Æ -Æ " -,C 9,10,3 0 0307 Ç -Ç " -`E 10,13 0 0310 È -È " -'E 10,13 0 0311 É -É " -^E 10,13 0 0312 Ê -Ê " -:E 10,13 0 0313 Ë -Ë " -`I 5,13 0 0314 Ì -Ì " -'I 5,13 0 0315 Í -Í " -^I 5,13 0 0316 Î -Î " -:I 5,13 0 0317 Ï -Ï " --D 10,10 0 0320 Ð -Ð " -~N 11,13 0 0321 Ñ -Ñ " -`O 10,13 0 0322 Ò -Ò " -'O 10,13 0 0323 Ó -Ó " -^O 10,13 0 0324 Ô -Ô " -~O 10,13 0 0325 Õ -Õ " -:O 10,13 0 0326 Ö -Ö " -mu 9,7 0 0327 × -× " -/O 10,11,1 0 0330 Ø -Ø " -`U 10,13 0 0331 Ù -Ù " -'U 10,13 0 0332 Ú -Ú " -^U 10,13 0 0333 Û -Û " -:U 10,13 0 0334 Ü -Ü " -'Y 8,13 0 0335 Ý -Ý " -TP 9,10 0 0336 Þ -Þ " -ss 7,10,3 0 0337 ß -ß " -`a 8,10 0 0340 à -à " -'a 8,10 0 0341 á -á " -^a 8,11 0 0342 â -â " -~a 8,10 0 0343 ã -ã " -:a 8,10 0 0344 ä -ä " -oa 8,11 0 0345 å -å " -ae 11,7 0 0346 æ -æ " -,c 6,7,3 0 0347 ç -ç " -`e 7,10 0 0350 è -è " -'e 7,10 0 0351 é -é " -^e 7,11 0 0352 ê -ê " -:e 7,10 0 0353 ë -ë " -`i 4,10 0 0354 ì -ì " -'i 4,10 0 0355 í -í " -^i 4,11 0 0356 î -î " -:i 4,10 0 0357 ï -ï " -Sd 7,10 0 0360 ð -ð " -~n 8,10 0 0361 ñ -ñ " -`o 7,10 0 0362 ò -ò " -'o 7,10 0 0363 ó -ó " -^o 7,11 0 0364 ô -ô " -~o 7,10 0 0365 õ -õ " -:o 7,10 0 0366 ö -ö " -di 9,7 0 0367 ÷ -÷ " -/o 7,8,1 0 0370 ø -ø " -`u 7,10 0 0371 ù -ù " -'u 7,10 0 0372 ú -ú " -^u 7,11 0 0373 û -û " -:u 7,10 0 0374 &uulm; -ü " -'y 6,10,2 0 0375 ý -ý " -Tp 7,10,3 0 0376 þ -þ " -:y 6,10,2 0 0377 ÿ -ÿ " diff -aruN groff-1.16.1/font/devhtml/TI groff-1.17/font/devhtml/TI --- groff-1.16.1/font/devhtml/TI Fri May 19 07:05:50 2000 +++ groff-1.17/font/devhtml/TI Thu Jan 1 01:00:00 1970 @@ -1,308 +0,0 @@ -name TI -spacewidth 3 -charset ---- 3,1 0 040 -! 5,10 0 041 -" 6,10 0 042 " -dq " -# 7,10 0 043 -sh " -$ 7,11,1 0 044 -Do " -% 12,10 0 045 -& 11,10 0 046 & -' 5,10 0 047 -cq " -( 5,10,3 0 050 -) 5,10,3 0 051 -* 7,10 0 052 -+ 10,7 0 053 -, 4,2,1 0 054 -\- 9,4 0 055 -. 3,2 0 056 -/ 4,10 0 057 -sl " -0 7,10 0 060 -1 7,10 0 061 -2 7,10 0 062 -3 7,10 0 063 -4 7,10 0 064 -5 7,10 0 065 -6 7,10 0 066 -7 7,10 0 067 -8 7,10 0 070 -9 7,10 0 071 -: 4,7 0 072 -; 4,7,1 0 073 -< 10,7,1 0 074 < -= 10,5 0 075 -eq " -> 10,7,1 0 076 > -? 7,10 0 077 -@ 13,10,3 0 0100 -at " -A 9,10 0 0101 -B 8,10 0 0102 -C 9,10 0 0103 -D 10,10 0 0104 -E 9,10 0 0105 -F 9,10 0 0106 -G 10,10 0 0107 -H 10,10 0 0110 -I 5,10 0 0111 -J 6,10 0 0112 -K 10,10 0 0113 -L 8,10 0 0114 -M 12,10 0 0115 -N 11,10 0 0116 -O 10,10 0 0117 -P 9,10 0 0120 -Q 10,10,3 0 0121 -R 9,10 0 0122 -S 7,10 0 0123 -T 8,10 0 0124 -U 10,10 0 0125 -V 9,10 0 0126 -W 11,10 0 0127 -X 9,10 0 0130 -Y 8,10 0 0131 -Z 8,10 0 0132 -[ 6,10,3 0 0133 -lB " -\ 4,10 0 0134 -rs " -] 6,10,3 0 0135 -rB " -^ 6,10 0 0136 -a^ " -ha " -_ 7,0,4 0 0137 -` 5,10 0 0140 -oq " -a 7,7 0 0141 -b 7,10 0 0142 -c 6,7 0 0143 -d 7,10 0 0144 -e 7,7 0 0145 -f 5,10,3 0 0146 -g 6,7,3 0 0147 -h 7,10 0 0150 -i 4,10 0 0151 -j 4,10,3 0 0152 -k 7,10 0 0153 -l 4,10 0 0154 -m 10,7 0 0155 -n 7,7 0 0156 -o 7,7 0 0157 -p 7,7,3 0 0160 -q 7,7,3 0 0161 -r 5,7 0 0162 -s 6,7 0 0163 -t 5,9 0 0164 -u 7,7 0 0165 -v 6,7 0 0166 -w 9,7 0 0167 -x 7,7 0 0170 -y 7,7,3 0 0171 -z 6,7 0 0172 -{ 6,10,3 0 0173 -lC " -| 4,10,3 0 0174 -or " -ba " -} 6,10,3 0 0175 -rC " -~ 8,5 0 0176 -a~ " -ap " -ti " -r! 6,7,3 0 0241 ¡ -¡ " -ct 7,9,2 0 0242 ¢ -¢ " -Po 7,10 0 0243 £ -£ " -Cs 7,8 0 0244 ¤ -¤ " -Ye 7,10 0 0245 ¥ -¥ " -bb 4,10,3 0 0246 ¦ -¦ " -sc 7,11,2 0 0247 § -§ " -ad 5,10 0 0250 ¨ -¨ " -co 12,10 0 0251 © -© " -Of 5,10 0 0252 ª -ª " -Fo 7,6 0 0253 « -« " -no 9,6 0 0254 ¬ -¬ " -- 5,4 0 055 ­ -hy " ­ -­ " -rg 12,10 0 0256 ® -® " -a- 5,10 0 0257 ¯ -¯ " -de 6,10 0 0260 ° -° " -+- 10,9 0 0261 ± -± " -S2 4,10 0 0262 ² -² " -S3 4,10 0 0263 ³ -³ " -aa 4,10 0 0264 ´ -´ " -µ 7,7,3 0 0265 µ -ps 8,10,3 0 0266 ¶ -¶ " -pc 4,4 0 0267 · -· " -ac 5,0,3 0 0270 ¸ -¸ " -S1 4,10 0 0271 ¹ -¹ " -Om 5,10 0 0272 º -º " -Fc 7,6 0 0273 » -» " -14 10,10 0 0274 ¼ -¼ " -12 10,10 0 0275 ½ -½ " -34 10,10 0 0276 ¾ -¾ " -r? 7,7,3 0 0277 ¿ -¿ " -`A 9,13 0 0300 À -À " -'A 9,13 0 0301 Á -Á " -^A 9,13 0 0302 Â -Â " -~A 9,13 0 0303 Ã -Ã " -:A 9,12 0 0304 Ä -Ä " -oA 9,13 0 0305 Å -Å " -AE 13,10 0 0306 Æ -Æ " -,C 9,10,3 0 0307 Ç -Ç " -`E 9,13 0 0310 È -È " -'E 9,13 0 0311 É -É " -^E 9,13 0 0312 Ê -Ê " -:E 9,12 0 0313 Ë -Ë " -`I 5,13 0 0314 Ì -Ì " -'I 5,13 0 0315 Í -Í " -^I 5,13 0 0316 Î -Î " -:I 5,12 0 0317 Ï -Ï " --D 10,10 0 0320 Ð -Ð " -~N 11,13 0 0321 Ñ -Ñ " -`O 10,13 0 0322 Ò -Ò " -'O 10,13 0 0323 Ó -Ó " -^O 10,13 0 0324 Ô -Ô " -~O 10,13 0 0325 Õ -Õ " -:O 10,12 0 0326 Ö -Ö " -mu 10,7 0 0327 × -× " -/O 10,11,1 0 0330 Ø -Ø " -`U 10,13 0 0331 Ù -Ù " -'U 10,13 0 0332 Ú -Ú " -^U 10,13 0 0333 Û -Û " -:U 10,12 0 0334 Ü -Ü " -'Y 8,13 0 0335 Ý -Ý " -TP 9,10 0 0336 Þ -Þ " -ss 7,10,3 0 0337 ß -ß " -`a 7,10 0 0340 à -à " -'a 7,10 0 0341 á -á " -^a 7,11 0 0342 â -â " -~a 7,10 0 0343 ã -ã " -:a 7,9 0 0344 ä -ä " -oa 7,10 0 0345 å -å " -ae 10,7 0 0346 æ -æ " -,c 6,7,3 0 0347 ç -ç " -`e 7,10 0 0350 è -è " -'e 7,10 0 0351 é -é " -^e 7,11 0 0352 ê -ê " -:e 7,9 0 0353 ë -ë " -`i 4,10 0 0354 ì -ì " -'i 4,10 0 0355 í -í " -^i 4,11 0 0356 î -î " -:i 4,9 0 0357 ï -ï " -Sd 7,10 0 0360 ð -ð " -~n 7,10 0 0361 ñ -ñ " -`o 7,10 0 0362 ò -ò " -'o 7,10 0 0363 ó -ó " -^o 7,11 0 0364 ô -ô " -~o 7,10 0 0365 õ -õ " -:o 7,9 0 0366 ö -ö " -di 10,7 0 0367 ÷ -÷ " -/o 7,8,1 0 0370 ø -ø " -`u 7,10 0 0371 ù -ù " -'u 7,10 0 0372 ú -ú " -^u 7,11 0 0373 û -û " -:u 7,9 0 0374 &uulm; -ü " -'y 7,10,3 0 0375 ý -ý " -Tp 7,10,3 0 0376 þ -þ " -:y 7,9,3 0 0377 ÿ -ÿ " diff -aruN groff-1.16.1/font/devhtml/TR groff-1.17/font/devhtml/TR --- groff-1.16.1/font/devhtml/TR Fri May 19 07:05:50 2000 +++ groff-1.17/font/devhtml/TR Thu Jan 1 01:00:00 1970 @@ -1,308 +0,0 @@ -name TR -spacewidth 3 -charset ---- 3,1 0 040 -! 5,10 0 041 -" 6,10 0 042 " -dq " -# 7,10 0 043 -sh " -$ 7,11,1 0 044 -Do " -% 12,10 0 045 -& 11,10 0 046 & -' 4,10 0 047 -cq " -( 5,10,3 0 050 -) 5,10,3 0 051 -* 7,10 0 052 -+ 8,7 0 053 -, 4,1,2 0 054 -\- 9,4 0 055 -. 4,1 0 056 -/ 4,10,2 0 057 -sl " -0 7,10 0 060 -1 7,10 0 061 -2 7,10 0 062 -3 7,10 0 063 -4 7,10 0 064 -5 7,10 0 065 -6 7,10 0 066 -7 7,10 0 067 -8 7,10 0 070 -9 7,10 0 071 -: 4,7 0 072 -; 4,7,2 0 073 -< 8,7 0 074 < -= 8,5 0 075 -eq " -> 8,7 0 076 > -? 6,10 0 077 -@ 13,10,2 0 0100 -at " -A 11,10 0 0101 -B 9,10 0 0102 -C 10,10 0 0103 -D 10,10 0 0104 -E 9,10 0 0105 -F 8,10 0 0106 -G 11,10 0 0107 -H 10,10 0 0110 -I 5,10 0 0111 -J 6,10 0 0112 -K 10,10 0 0113 -L 9,10 0 0114 -M 13,10 0 0115 -N 11,10 0 0116 -O 10,10 0 0117 -P 8,10 0 0120 -Q 10,10,3 0 0121 -R 9,10 0 0122 -S 8,10 0 0123 -T 9,10 0 0124 -U 10,10 0 0125 -V 9,10 0 0126 -W 13,10 0 0127 -X 10,10 0 0130 -Y 9,10 0 0131 -Z 8,10 0 0132 -[ 5,10,3 0 0133 -lB " -\ 4,10 0 0134 -rs " -] 5,10,3 0 0135 -rB " -^ 7,10 0 0136 -a^ " -ha " -_ 7,0,3 0 0137 -` 4,10 0 0140 -oq " -a 7,7 0 0141 -b 7,10 0 0142 -c 7,7 0 0143 -d 7,10 0 0144 -e 7,7 0 0145 -f 4,10 0 0146 -g 7,7,3 0 0147 -h 7,10 0 0150 -i 3,10 0 0151 -j 4,10,3 0 0152 -k 7,10 0 0153 -l 3,10 0 0154 -m 11,7 0 0155 -n 7,7 0 0156 -o 7,7 0 0157 -p 7,7,3 0 0160 -q 7,7,3 0 0161 -r 5,7 0 0162 -s 6,7 0 0163 -t 4,8 0 0164 -u 7,7 0 0165 -v 7,7 0 0166 -w 11,7 0 0167 -x 7,7 0 0170 -y 7,7,3 0 0171 -z 6,7 0 0172 -{ 7,10,3 0 0173 -lC " -| 3,10 0 0174 -or " -ba " -} 7,10,3 0 0175 -rC " -~ 8,5 0 0176 -a~ " -ap " -ti " -r! 5,7,3 0 0241 ¡ -¡ " -ct 7,8,1 0 0242 ¢ -¢ " -Po 8,10 0 0243 £ -£ " -Cs 7,8 0 0244 ¤ -¤ " -Ye 7,10 0 0245 ¥ -¥ " -bb 3,10 0 0246 ¦ -¦ " -sc 7,10,3 0 0247 § -§ " -ad 5,10 0 0250 ¨ -¨ " -co 12,10 0 0251 © -© " -Of 4,10 0 0252 ª -ª " -Fo 7,6 0 0253 « -« " -no 9,6 0 0254 ¬ -¬ " -- 4,4 0 0255 ­ -hy 4,4 0 0255 ­ -­ " -rg 12,10 0 0256 ® -® " -a- 4,9 0 0257 ¯ -¯ " -de 6,10 0 0260 ° -° " -+- 8,7 0 0261 ± -± " -S2 4,10 0 0262 ² -² " -S3 4,10 0 0263 ³ -³ " -aa 5,11 0 0264 ´ -´ " -µ 7,7,3 0 0265 µ -ps 7,10,3 0 0266 ¶ -¶ " -pc 4,5 0 0267 · -· " -ac 5,0,3 0 0270 ¸ -¸ " -S1 4,10 0 0271 ¹ -¹ " -Om 5,10 0 0272 º -º " -Fc 7,6 0 0273 » -» " -14 10,10 0 0274 ¼ -¼ " -12 10,10 0 0275 ½ -½ " -34 10,10 0 0276 ¾ -¾ " -r? 6,7,3 0 0277 ¿ -¿ " -`A 11,14 0 0300 À -À " -'A 11,14 0 0301 Á -Á " -^A 11,14 0 0302 Â -Â " -~A 11,14 0 0303 Ã -Ã " -:A 11,13 0 0304 Ä -Ä " -oA 11,14 0 0305 Å -Å " -AE 13,10 0 0306 Æ -Æ " -,C 10,10,3 0 0307 Ç -Ç " -`E 9,14 0 0310 È -È " -'E 9,14 0 0311 É -É " -^E 9,14 0 0312 Ê -Ê " -:E 9,13 0 0313 Ë -Ë " -`I 5,14 0 0314 Ì -Ì " -'I 5,14 0 0315 Í -Í " -^I 5,14 0 0316 Î -Î " -:I 5,13 0 0317 Ï -Ï " --D 10,10 0 0320 Ð -Ð " -~N 11,14 0 0321 Ñ -Ñ " -`O 10,14 0 0322 Ò -Ò " -'O 10,14 0 0323 Ó -Ó " -^O 10,14 0 0324 Ô -Ô " -~O 10,14 0 0325 Õ -Õ " -:O 10,13 0 0326 Ö -Ö " -mu 8,7 0 0327 × -× " -/O 10,11,1 0 0330 Ø -Ø " -`U 10,14 0 0331 Ù -Ù " -'U 10,14 0 0332 Ú -Ú " -^U 10,14 0 0333 Û -Û " -:U 10,13 0 0334 Ü -Ü " -'Y 9,14 0 0335 Ý -Ý " -TP 8,10 0 0336 Þ -Þ " -ss 7,10 0 0337 ß -ß " -`a 7,11 0 0340 à -à " -'a 7,11 0 0341 á -á " -^a 7,11 0 0342 â -â " -~a 7,11 0 0343 ã -ã " -:a 7,10 0 0344 ä -ä " -oa 7,11 0 0345 å -å " -ae 11,7 0 0346 æ -æ " -,c 7,7,3 0 0347 ç -ç " -`e 7,11 0 0350 è -è " -'e 7,11 0 0351 é -é " -^e 7,11 0 0352 ê -ê " -:e 7,10 0 0353 ë -ë " -`i 3,11 0 0354 ì -ì " -'i 3,11 0 0355 í -í " -^i 3,11 0 0356 î -î " -:i 3,10 0 0357 ï -ï " -Sd 7,10 0 0360 ð -ð " -~n 7,11 0 0361 ñ -ñ " -`o 7,11 0 0362 ò -ò " -'o 7,11 0 0363 ó -ó " -^o 7,11 0 0364 ô -ô " -~o 7,11 0 0365 õ -õ " -:o 7,10 0 0366 ö -ö " -di 8,7 0 0367 ÷ -÷ " -/o 7,8,1 0 0370 ø -ø " -`u 7,11 0 0371 ù -ù " -'u 7,11 0 0372 ú -ú " -^u 7,11 0 0373 û -û " -:u 7,10 0 0374 ü -ü " -'y 7,11,3 0 0375 ý -ý " -Tp 7,10,3 0 0376 þ -þ " -:y 7,10,3 0 0377 ÿ -ÿ " diff -aruN groff-1.16.1/font/devlbp/Makefile.sub groff-1.17/font/devlbp/Makefile.sub --- groff-1.16.1/font/devlbp/Makefile.sub Sun Feb 27 02:41:14 2000 +++ groff-1.17/font/devlbp/Makefile.sub Wed Apr 11 19:42:00 2001 @@ -4,6 +4,8 @@ HB HBI HI HR \ TB TBI TI TR +CLEANADD=DESC + DESC: DESC.in -rm -f DESC cat $(srcdir)/DESC.in >>DESC diff -aruN groff-1.16.1/font/devlj4/generate/Makefile groff-1.17/font/devlj4/generate/Makefile --- groff-1.16.1/font/devlj4/generate/Makefile Wed May 24 00:08:23 2000 +++ groff-1.17/font/devlj4/generate/Makefile Fri Aug 25 21:35:29 2000 @@ -165,6 +165,6 @@ -rm -f $(FONTS) extraclean: realclean - -rm -f core *~ \#* + -rm -f core *~ "#*" .PHONY: clean realclean extraclean all diff -aruN groff-1.16.1/font/devps/Makefile.sub groff-1.17/font/devps/Makefile.sub --- groff-1.16.1/font/devps/Makefile.sub Sun Feb 6 10:36:08 2000 +++ groff-1.17/font/devps/Makefile.sub Wed Oct 25 23:06:44 2000 @@ -4,8 +4,8 @@ CB CBI CI CR HB HBI HI HR HNB HNBI HNI HNR \ NB NBI NI NR PB PBI PI PR TB TBI TI TR ZCMI PSFILES=prologue symbolsl.pfa zapfdr.pfa -DEVGENFILES=generate/Makefile generate/afmname generate/dingbatsmap \ - generate/dingbatsrmap generate/lgreekmap generate/symbol.sed \ +DEVGENFILES=generate/Makefile generate/afmname generate/dingbats.map \ + generate/dingbats.rmap generate/lgreekmap generate/symbol.sed \ generate/symbolchars generate/symbolsl.afm generate/textmap DEVFILES=DESC $(PSFILES) $(DISTFILES) $(DEVGENFILES) diff -aruN groff-1.16.1/font/devps/generate/Makefile groff-1.17/font/devps/generate/Makefile --- groff-1.16.1/font/devps/generate/Makefile Mon May 22 22:46:24 2000 +++ groff-1.17/font/devps/generate/Makefile Tue Oct 24 22:39:02 2000 @@ -21,6 +21,10 @@ # make -f generate/Makefile # in the parent directory of this directory. +# The following line is required for DOS/Windows systems, since +# this Makefile needs a Unixy shell to run. +SHELL = /bin/sh + # Directory containing AFM files. Must not be current directory. # Either long names (eg Times-Roman.afm) or short names (eg timesr.afm) # may be used. See the afmname script. @@ -180,7 +184,7 @@ ZD: $(AFMTODIT) -s \ - `$(AFMNAME) $(afmdir)/ZapfDingbats.afm` $(srcdir)/dingbatsmap $@ + `$(AFMNAME) $(afmdir)/ZapfDingbats.afm` $(srcdir)/dingbats.map $@ SS: $(srcdir)/symbolsl.afm $(AFMTODIT) -s $(IFLAG) $(srcdir)/symbolsl.afm $(srcdir)/lgreekmap $@ @@ -189,7 +193,7 @@ $(AFMTODIT) -s symbol.afm symbolmap $@ ZDR: zapfdr.afm - $(AFMTODIT) -s zapfdr.afm $(srcdir)/dingbatsrmap $@ + $(AFMTODIT) -s zapfdr.afm $(srcdir)/dingbats.rmap $@ symbol.afm: $(srcdir)/symbol.sed -rm -f $@ @@ -200,8 +204,8 @@ sed -e '/^FontName /s/ZapfDingbats/ZapfDingbats-Reverse/' \ `$(AFMNAME) $(afmdir)/ZapfDingbats.afm` >$@ -ZD: $(srcdir)/dingbatsmap -ZDR: $(srcdir)/dingbatsrmap +ZD: $(srcdir)/dingbats.map +ZDR: $(srcdir)/dingbats.rmap $(TEXTFONTS): $(TEXTMAP) $(TEXTENC) $(SPECIALFONTS): symbolmap $(GREEKFONTS): $(srcdir)/lgreekmap @@ -217,7 +221,7 @@ -rm -f $(FONTS) extraclean: realclean - -rm -f core *~ \#* + -rm -f core *~ "#*" .PHONY: all clean realclean extraclean diff -aruN groff-1.16.1/font/devps/generate/dingbats.map groff-1.17/font/devps/generate/dingbats.map --- groff-1.16.1/font/devps/generate/dingbats.map Thu Jan 1 01:00:00 1970 +++ groff-1.17/font/devps/generate/dingbats.map Tue Oct 24 22:40:23 2000 @@ -0,0 +1,2 @@ +a19 OK +a12 rh diff -aruN groff-1.16.1/font/devps/generate/dingbats.rmap groff-1.17/font/devps/generate/dingbats.rmap --- groff-1.16.1/font/devps/generate/dingbats.rmap Thu Jan 1 01:00:00 1970 +++ groff-1.17/font/devps/generate/dingbats.rmap Tue Oct 24 22:40:23 2000 @@ -0,0 +1 @@ +a12 lh diff -aruN groff-1.16.1/font/devps/generate/dingbatsmap groff-1.17/font/devps/generate/dingbatsmap --- groff-1.16.1/font/devps/generate/dingbatsmap Sun Feb 6 10:36:20 2000 +++ groff-1.17/font/devps/generate/dingbatsmap Thu Jan 1 01:00:00 1970 @@ -1,2 +0,0 @@ -a19 OK -a12 rh diff -aruN groff-1.16.1/font/devps/generate/dingbatsrmap groff-1.17/font/devps/generate/dingbatsrmap --- groff-1.16.1/font/devps/generate/dingbatsrmap Sun Feb 6 10:36:20 2000 +++ groff-1.17/font/devps/generate/dingbatsrmap Thu Jan 1 01:00:00 1970 @@ -1 +0,0 @@ -a12 lh diff -aruN groff-1.16.1/font/devutf8/NOTES groff-1.17/font/devutf8/NOTES --- groff-1.16.1/font/devutf8/NOTES Sat Apr 29 08:02:44 2000 +++ groff-1.17/font/devutf8/NOTES Thu Jan 18 20:05:39 2001 @@ -58,23 +58,6 @@ "devps" maps CR to carriagereturn, which is equivalent to 0x21B5. We map it to 0x240D instead. -The line - -shc 24 0 0x00AD - -has been removed, because tmac.tty contains the line - -.if c\[shc] .shc \[shc] - -(i.e. if `shc' is defined, then tell the troff engine that it shall use -`shc' as soft hyphen - otherwise it will use `hy' = HYPHEN), and `shc' in -Markus Kuhn's UCS-fonts looks more like a minus sign than like a hyphen. -Once Markus Kuhn's fonts are fixed, this line should be added again, because -ISO-8859-x describes the soft hyphen character as "a graphic character that -is imaged by a graphic symbol identical with, or similar to, that representing -HYPHEN, for use when a line break has been established within a word" - which -is exactly groff's use of `shc'. - Using unnamed characters: Assume you want to use a Unicode character not provided in the list, say @@ -86,7 +69,7 @@ (the second column is computed as 24 * wcwidth(0x20AC)) to the file R.proto, or, when groff is already installed, to the four fonts files in - $(prefix)/share/groff/font/devutf8/. + $(prefix)/share/groff//font/devutf8/. - In your source file, use the notation \N'8364' where 8364 is the decimal representation of 0x20AC. diff -aruN groff-1.16.1/font/devutf8/R.proto groff-1.17/font/devutf8/R.proto --- groff-1.16.1/font/devutf8/R.proto Fri May 19 07:06:00 2000 +++ groff-1.17/font/devutf8/R.proto Fri Apr 6 15:03:14 2001 @@ -141,6 +141,8 @@ char171 " no 24 0 0x00AC char172 " +shc 24 0 0x00AD +char173 " rg 24 0 0x00AE char174 " a- 24 0 0x00AF diff -aruN groff-1.16.1/gendef.sh groff-1.17/gendef.sh --- groff-1.16.1/gendef.sh Sun Jun 18 12:13:50 2000 +++ groff-1.17/gendef.sh Sun Oct 22 21:30:16 2000 @@ -1,4 +1,8 @@ -# gendef filename var=val var=val +# +# gendef filename var=val var=val ... +# +# This script is used to generate src/include/defs.h +# file=$1 shift @@ -26,3 +30,5 @@ rm -f $t exit 0 + +# eof diff -aruN groff-1.16.1/man/groff.man groff-1.17/man/groff.man --- groff-1.16.1/man/groff.man Wed May 24 00:08:23 2000 +++ groff-1.17/man/groff.man Sat Mar 24 00:07:49 2001 @@ -24,7 +24,7 @@ .\" -------------------------------------------------------------------- . .if n \{\ -. mso tmac.tty-char +. mso tty-char.tmac . ftr CR R . ftr CI I . ftr CB B @@ -542,7 +542,14 @@ escape sequence. .TP .character \(dq -The double quote is used to enclose arguments in requests and macros. +The double quote is used to enclose arguments in requests and macros. In +the +.request .ds +and +.request .as +requests, a leading double quote in the argument will be stripped off, +making everything else afterwards the string to be defined (enabling leading +whitespace). The escaped double quote .esc \(dq introduces a comment. @@ -866,7 +873,7 @@ .argument stringvar . . .REQ .asciify diversion -Unformat special ASCII characters in +Unformat ASCII characters, spaces, and some escape sequences in .argument diversion . . .REQ .backtrace @@ -885,6 +892,21 @@ when current font is .argument font . . +.REQ .box +End current diversion. +. +.REQ .box macro +Divert to +.argument macro , +omitting a partially filled line. +. +.REQ .boxa +End current diversion. +. +.REQ .boxa macro +Divert and append to +.argument macro , +omitting a partially filled line. .REQ .bp Eject current page and begin new page. . @@ -985,6 +1007,9 @@ .request .ul in troff. . +.REQ .da +End current diversion. +. .REQ .da macro Divert and append to .argument macro . @@ -1003,6 +1028,21 @@ .request .end is called. . +.REQ .dei macro +Define or redefine a macro whose name is contained in the string register +.argument macro +until +.request .. +is called. +. +.REQ .dei macro end +Define or redefine a macro indirectly. +.argument macro +and +.argument end +are string registers whose contents are interpolated for the macro name +and the end macro, respectively. +. .REQ .di End current diversion. . @@ -1035,6 +1075,13 @@ Set escape character to .argument c . . +.REQ .ecr +Restore escape character saved with +.request .ecs . +. +.REQ .ecs +Save current escape character. +. .REQ .el anything Else part for if-else (\c .argument .ie ) @@ -1065,6 +1112,9 @@ .REQ .ex Exit from roff processing. . +.REQ .fam +Return to previous font family. +. .REQ .fam name Set the current font family to .argument name . @@ -1235,6 +1285,15 @@ in .argument register . . +.REQ .linetabs +Enable line-tabs mode (i.e., calculate tab positions relative to output +line). +. +.REQ .linetabs n +If +.argument n +is zero, disable line-tabs mode, otherwise enable it. +. .REQ .lf N file Set input line number to .argument N @@ -1293,7 +1352,7 @@ .REQ .mso file The same as the .so request except that .I file -is also searched in the tmac directories. +is searched in the tmac directories. . .REQ .na No output-line adjusting. @@ -1327,6 +1386,10 @@ .argument N lines. . +.REQ .nop anything +Always execute +.argument anything . +. .REQ .nr register \(+-N M Define or modify .argument register @@ -1440,6 +1503,9 @@ .REQ .rd prompt Read insertion. . +.REQ .return +Return from a macro. +. .REQ .rj n Right justify the next .argument n @@ -1595,15 +1661,25 @@ .REQ .tl \f(CB\(cq\fPleft\f(CB\(cq\fPcenter\f(CB\(cq\fPright\f(CB\(cq\fP Three-part title. . -.REQ .trf filename -Transparently output the contents of file -.argument filename . -. .REQ .tm anything Print .argument anything on terminal (UNIX standard message output). . +.REQ .tm1 anything +Print +.argument anything +on terminal (UNIX standard message output), allowing leading whitespace if +.argument anything +starts with +.character \(dq +(which will be stripped off). +. +.REQ .tmc anything +Similar to +.request .tm1 +without emitting a final newline. +. .REQ .tr abcd.... Translate .argument a @@ -1614,6 +1690,10 @@ .argument d , etc. on output. . +.REQ .trf filename +Transparently output the contents of file +.argument filename . +. .REQ .trnt abcd.... This is the same as the .request .tr @@ -1639,6 +1719,9 @@ .argument N input lines. . +.REQ .unformat diversion +Unformat space characters and tabs, preserving font information in +.argument diversion . .REQ .vpt n Enable vertical position traps if .argument n @@ -1891,6 +1974,11 @@ Unbreakable space that stretches like a normal inter-word space when a line is adjusted. . +.ESC : +Inserts a zero-width break point (similar to +.esc % +but without a soft hyphen character). +. .ESC \& newline Ignored newline, for continuation lines. . @@ -1922,15 +2010,25 @@ .ESCq A anything If .argument anything -acceptable as name of a string, macro, diversion, register, -environment or font it is -.number 1 -otherwise -.number 0 . +is acceptable as a name of a string, macro, diversion, register, +environment or font it expands to +.number 1 , +and +.number 0 +otherwise. . .ESCq b abc... Bracket building function. . +.ESCq B anything +If +.argument anything +is acceptable as a valid numeric expression it expands to +.number 1 , +and +.number 0 +otherwise. +. .ESC c Interrupt text processing. . @@ -2220,6 +2318,9 @@ .LP .PD 0 .REG .$ Number of arguments in the current macro. +.REG .a +Post-line extra line-space most recently utilized using +.escarg x 'N' . .REG .A Set to .number 1 @@ -2231,19 +2332,8 @@ .number 1 in .BR nroff . -.REG .H Available horizontal resolution in basic units. -.REG .T -Set to -.number 1 -if option -.B \-T -is used. -.REG .V Available vertical resolution in basic units. -.REG .a -Post-line extra line-space most recently utilized using -.escarg x 'N' . -.REG .C 1 if compatibility mode is in effect, 0 otherwise. .REG .c Current input line number. +.REG .C 1 if compatibility mode is in effect, 0 otherwise. .REG .cdp The depth of the last character added to the current environment. It is positive if the character extends below the baseline. @@ -2269,6 +2359,7 @@ Always 1 in GNU troff. Macros should use it to test if running under groff. .REG .h Text base-line high-water mark on current page or diversion. +.REG .H Available horizontal resolution in basic units. .REG .hla The current hyphenation language as set by the .B .hla @@ -2294,6 +2385,9 @@ request). .REG .i Current ident. .REG .in The indent that applies to the current output line. +.REG .int +Positive if last output line contains +.esc c . .REG .kern .number 1 if pairwise kerning is enabled, @@ -2304,6 +2398,10 @@ The current ligature mode (as set by the .request .lg request). +.REG .linetabs +The current line-tabs mode (as set by the +.request .linetabs +request). .REG .ll The line length that applies to the current output line. .REG .lt The title length (as set by the @@ -2331,6 +2429,12 @@ The last requested pointsize in points as a decimal fraction (string-valued). .REG .t Distance to the next trap. +.REG .T +Set to +.number 1 +if option +.B \-T +is used. .REG .tabs A string representation of the current tab settings suitable for use as an argument to the @@ -2359,6 +2463,7 @@ request. .REG .u Equal to 1 bin fill mode and 0 in nofill mode. .REG .v Current vertical line spacing. +.REG .V Available vertical resolution in basic units. .REG .vpt .number 1 if vertical position traps are enabled, @@ -2371,6 +2476,25 @@ .REG .y The minor version number. .REG .Y The revision number of groff. .REG .z Name of current diversion. +.PD +. +.\" -------------------------------------------------------------------- +.SS "WRITABLE REGISTERS" +.\" -------------------------------------------------------------------- +The following registers can be read and written by the user. +They have predefined default values, but these can be modified for +customizing a document. +.LP +.PD 0 +.REG % Current page number. +.REG c. Current input line number. +.REG ct Character type (set by width function +.esc w ). +.REG dl Maximal width of last completed diversion. +.REG dn Height of last completed diversion. +.REG dw Current day of week (1-7). +.REG dy Current day of month (1-31). +.REG hp Current horizontal position at input line. .REG llx Lower left x-coordinate (in PostScript units) of a given PostScript image (set by @@ -2379,6 +2503,9 @@ Lower left y-coordinate (in PostScript units) of a given PostScript image (set by .request .psbb ). +.REG ln Output line number. +.REG mo Current month (1-12). +.REG nl Vertical position of last printed text base-line. .REG rsb Like .register sb , but takes account of the heights and depths of characters. @@ -2393,6 +2520,10 @@ Right skip width from the center of the last character in the .esc w argument. +.REG slimit +If greater than 0, the maximum number of objects on the input stack. +If \(<=0 there is no limit, i.e., recursion can continue until virtual +memory is exhausted. .REG ssc The amount of horizontal space (possibly negative) that should be added to the last character before a subscript (generated by width function @@ -2400,6 +2531,12 @@ .REG st Height of string above base line (generated by width function .esc w ). +.REG systat +The return value of the +.I system() +function executed by the last +.request .sy +request. .REG urx Upper right x-coordinate (in PostScript units) of a given PostScript image (set by @@ -2408,37 +2545,6 @@ Upper right y-coordinate (in PostScript units) of a given PostScript image (set by .request .psbb ). -.PD -. -.\" -------------------------------------------------------------------- -.SS "WRITABLE REGISTERS" -.\" -------------------------------------------------------------------- -The following registers can be read and written by the user. -They have predefined default values, but these can be modified for -customizing a document. -.LP -.PD 0 -.REG % Current page number. -.REG c. Current input line number. -.REG ct Character type (set by width function -.esc w ). -.REG dl Maximal width of last completed diversion. -.REG dw Current day of week (1-7). -.REG dy Current day of month (1-31). -.REG hp Current horizontal position at input line. -.REG ln Output line number. -.REG mo Current month (1-12). -.REG nl Vertical position of last printed text base-line. -.REG slimit -If greater than 0, the maximum number of objects on the input stack. -If \(<=0 there is no limit, i.e., recursion can continue until virtual -memory is exhausted. -.REG systat -The return value of the -.I system() -function executed by the last -.request .sy -request. .REG year The current year (year 2000 compliant). .REG yr Current year minus 1900. For Y2K compliance use register diff -aruN groff-1.16.1/man/groff_char.man groff-1.17/man/groff_char.man --- groff-1.16.1/man/groff_char.man Fri May 19 07:06:01 2000 +++ groff-1.17/man/groff_char.man Fri Jan 12 23:42:36 2001 @@ -132,7 +132,7 @@ \&\\$3\t\\*(CH\t\\$2\t\\$4\t\\$5 .\} .. -.wh \n(nlu+\n(.tu-\n(.Vu Fo +.if !\n[cR] .wh \n(nlu+\n(.tu-\n(.Vu Fo .de Fo 'bp .He @@ -290,12 +290,14 @@ .C2 'I Iacute .C2 'O Oacute .C2 'U Uacute +.C2 'Y Yacute .C2 'a aacute .C2 'c cacute .C2 'e eacute .C2 'i iacute .C2 'o oacute .C2 'u uacute +.C2 'y yacute .C2 :A Adieresis .C2 :E Edieresis .C2 :I Idieresis diff -aruN groff-1.16.1/man/groff_font.man groff-1.17/man/groff_font.man --- groff-1.16.1/man/groff_font.man Tue Feb 29 23:09:34 2000 +++ groff-1.17/man/groff_font.man Mon Mar 19 16:33:03 2001 @@ -1,5 +1,5 @@ .ig \"-*- nroff -*- -Copyright (C) 1989-1995 Free Software Foundation, Inc. +Copyright (C) 1989-1995, 2001 Free Software Foundation, Inc. Permission is granted to make and distribute verbatim copies of this manual provided the copyright notice and this permission notice @@ -87,6 +87,16 @@ .I n scaled points. .TP +.BI prepro\ program +Call +.I program +as a preprocessor. +.TP +.BI postpro\ program +Use +.I program +as the postprocessor. +.TP .B tcommand This means that the postprocessor can handle the .B t @@ -143,6 +153,18 @@ .B charset This line and everything following in the file are ignored. It is allowed for the sake of backwards compatibility. +.TP +.BI print\ program +Use +.I program +as the spooler program for printing. +If omitted, the +.B \-l +and +.B \-L +options of +.B groff +are ignored. .LP The res, unitwidth, fonts and sizes lines are compulsory. Other commands are ignored by @@ -250,7 +272,7 @@ (if it is exactly two characters .I xx it can be entered as -.BI \e( xx\fR.) +.BI \e( xx\fR). Groff supports eight bit characters; however some utilities has difficulties with eight bit characters. For this reason, there is a convention that the name diff -aruN groff-1.16.1/man/groff_out.man groff-1.17/man/groff_out.man --- groff-1.16.1/man/groff_out.man Tue Feb 29 23:09:34 2000 +++ groff-1.17/man/groff_out.man Fri Apr 6 15:03:14 2001 @@ -1,7 +1,7 @@ '\" e .\" The above line should force the use of eqn as a preprocessor .ig -Copyright (C) 1989-2000 Free Software Foundation, Inc. +Copyright (C) 1989-2000, 2001 Free Software Foundation, Inc. Permission is granted to make and distribute verbatim copies of this manual provided the copyright notice and this permission notice @@ -85,6 +85,21 @@ in the current font. Unlike device-independent troff, it is not necessary for drivers to search special fonts to find a character. +.LP +The +.B x +device control command has been extended. +.TP +\fBx u \fIn\fR +If +.I n +is\~1, start underlining of spaces. +If +.I n +is\~0, stop underlining of spaces. +This is needed for the +.B cu +request in nroff mode and is ignored otherwise. .LP The .B D diff -aruN groff-1.16.1/man/roff.man groff-1.17/man/roff.man --- groff-1.16.1/man/roff.man Sun May 28 23:46:40 2000 +++ groff-1.17/man/roff.man Wed Nov 22 23:11:16 2000 @@ -1,4 +1,4 @@ -.\" -*- nroff -*- +.\" t -*- nroff -*- .ig roff.7 @@ -24,7 +24,7 @@ .\" -------------------------------------------------------------------- . .if n \{\ -. mso tmac.tty-char +. mso tty-char.tmac . ftr CR R . ftr CI I . ftr CB B @@ -70,6 +70,12 @@ . rm @tmp@ .. . +.de TQ +.br +.ns +.TP \\$1 +.. +. .\" -------------------------------------------------------------------- .\" Title .\" -------------------------------------------------------------------- @@ -276,8 +282,10 @@ special kind of documents in a convenient way. This greatly eases the usage of roff. The macro definitions of a package are kept in a file called -.BI tmac. name -where +.IB name .tmac +(or +.BI tmac. name\c +) where .I name is the internal roff name for this package. All tmac files are stored in a single or few directories at standard @@ -294,7 +302,7 @@ .argname name . General details on the naming of macro packages and their placement is found in -.BR tmac (@MAN5EXT@). +.BR groff_tmac (@MAN5EXT@). .LP Famous classical macro packages are .IR man , @@ -371,7 +379,7 @@ .B GROFF_TMAC_PATH A colon separated list of directories in which to search for macro files, see -.BR tmac (@MAN5EXT@). +.BR groff_tmac (@MAN5EXT@). .TP .SM .B GROFF_TYPESETTER @@ -383,38 +391,52 @@ .BI dev name directory. .B troff -will search in directories given in the +will first search in directories given with the .option \-F -option before these, and in standard directories -.RB ( .:/usr/local/share/groff/font:/usr/lib/font ) -after these. +command line option, then in +.BR GROFF_FONT_PATH , +and finally in the standard directories +.RB ( @FONTPATH@ ). .\" -------------------------------------------------------------------- .SH FILES .\" -------------------------------------------------------------------- By default, .I groff -installs all of its library files in a directory tree under -.IR /usr/local/share/groff . -This location might vary for different systems. -In the following, this directory is referred to as -.IR . -.LP +installs all of its data files in subdirectories of +.I @FONTDIR@ +and in +.I @MACRODIR@ +(except wrapper files for system-specific macro packages which will be +in +.IR @SYSTEMMACRODIR@ ). +These locations might vary for different systems. +In the following, the former is referred to as +.IR , +the latter as +.IR . .TP -.IB /tmac/troffrc +.IB /troffrc Initialization file for troff. .TP -.IB /tmac/tmac. name +.IB / name .tmac +.TQ +.IB /tmac. name Macro files. .TP -.IB /font/dev name /DESC +.IB /dev name /DESC Device description file for device .IR name . .TP -.IB /font/dev name / F +.IB /dev name / F Font file for font .I F of device .IR name . +.LP +Finally, a local macro directory +.I @LOCALMACRODIR@ +is provided for site-specific macros and packages; by default, it will be +searched before the main macro directory. .\" -------------------------------------------------------------------- .SH BUGS .\" -------------------------------------------------------------------- @@ -482,9 +504,8 @@ .BR groff_me (@MAN7EXT@), .BR groff_mm (@MAN7EXT@), .BR groff_mmroff (@MAN7EXT@), -.BR groff_ms (@MAN7EXT@), and -.BR groff_msafer (@MAN7EXT@). +.BR groff_ms (@MAN7EXT@). .LP The following utilities are available: .BR addftinfo (@MAN1EXT@), diff -aruN groff-1.16.1/mdate.sh groff-1.17/mdate.sh --- groff-1.16.1/mdate.sh Sun Feb 6 10:34:43 2000 +++ groff-1.17/mdate.sh Fri Mar 9 16:26:30 2001 @@ -5,6 +5,7 @@ # Don't want foreign dates. LANGUAGE= +LC_ALL=C; export LC_ALL (date; diff -aruN groff-1.16.1/src/devices/grodvi/dvi.cc groff-1.17/src/devices/grodvi/dvi.cc --- groff-1.16.1/src/devices/grodvi/dvi.cc Mon Jun 26 15:57:26 2000 +++ groff-1.17/src/devices/grodvi/dvi.cc Tue Apr 10 14:54:12 2001 @@ -1,5 +1,6 @@ // -*- C++ -*- -/* Copyright (C) 1989, 1990, 1991, 1992 Free Software Foundation, Inc. +/* Copyright (C) 1989, 1990, 1991, 1992, 2000, 2001 + Free Software Foundation, Inc. Written by James Clark (jjc@jclark.com) This file is part of groff. @@ -168,7 +169,7 @@ void begin_page(int); void end_page(int); void set_char(int, font *, const environment *, int w, const char *name); - void special(char *arg, const environment *env); + void special(char *arg, const environment *env, char type); void end_of_line(); void draw(int code, int *p, int np, const environment *env); }; @@ -492,8 +493,10 @@ out1(*s++); } -void dvi_printer::special(char *arg, const environment *env) +void dvi_printer::special(char *arg, const environment *env, char type) { + if (type != 'p') + return; moveto(env->hpos, env->vpos); do_special(arg); } @@ -843,7 +846,7 @@ return new dvi_printer; } -static void usage(); +static void usage(FILE *stream); int main(int argc, char **argv) { @@ -851,13 +854,18 @@ static char stderr_buf[BUFSIZ]; setbuf(stderr, stderr_buf); int c; - while ((c = getopt(argc, argv, "F:vw:d")) != EOF) + static const struct option long_options[] = { + { "help", no_argument, 0, CHAR_MAX + 1 }, + { "version", no_argument, 0, 'v' }, + { NULL, 0, 0, 0 } + }; + while ((c = getopt_long(argc, argv, "F:vw:d", long_options, NULL)) != EOF) switch(c) { case 'v': { extern const char *Version_string; - fprintf(stderr, "grodvi version %s\n", Version_string); - fflush(stderr); + printf("GNU grodvi (groff) version %s\n", Version_string); + exit(0); break; } case 'w': @@ -873,8 +881,13 @@ case 'F': font::command_line_font_dir(optarg); break; + case CHAR_MAX + 1: // --help + usage(stdout); + exit(0); + break; case '?': - usage(); + usage(stderr); + exit(1); break; default: assert(0); @@ -892,9 +905,8 @@ return 0; } -static void usage() +static void usage(FILE *stream) { - fprintf(stderr, "usage: %s [-dv] [-F dir] [-w n] [files ...]\n", + fprintf(stream, "usage: %s [-dv] [-F dir] [-w n] [files ...]\n", program_name); - exit(1); } diff -aruN groff-1.16.1/src/devices/grodvi/grodvi.man groff-1.17/src/devices/grodvi/grodvi.man --- groff-1.16.1/src/devices/grodvi/grodvi.man Sat Apr 8 07:36:28 2000 +++ groff-1.17/src/devices/grodvi/grodvi.man Wed Nov 22 23:11:17 2000 @@ -51,7 +51,7 @@ This will run .BR @g@troff\ \-Tdvi ; it will also input the macros -.BR @MACRODIR@/tmac.dvi ; +.BR @MACRODIR@/dvi.tmac ; if the input is being preprocessed with .B @g@eqn it will also input @@ -134,9 +134,9 @@ thousandths of an em. .TP .BI \-F dir -Search directory +Prepend directory .IB dir /devdvi -for font and device description files. +to the search path for font and device description files. .SH FILES .TP .B @FONTDIR@/devdvi/DESC @@ -146,7 +146,7 @@ Font description file for font .IR F . .TP -.B @MACRODIR@/tmac.dvi +.B @MACRODIR@/dvi.tmac Macros for use with .BR grodvi . .SH BUGS diff -aruN groff-1.16.1/src/devices/grohtml/ChangeLog groff-1.17/src/devices/grohtml/ChangeLog --- groff-1.16.1/src/devices/grohtml/ChangeLog Sun Jun 18 12:09:09 2000 +++ groff-1.17/src/devices/grohtml/ChangeLog Thu Jan 1 01:00:00 1970 @@ -1,247 +0,0 @@ -2000-06-17 Eli Zaretskii - - * html.cc [!_POSIX_VERSION]: Include limits.h and dirent.h or - sys/dir.h. Define NAME_MAX using MAXNAMLEN. Include nonposix.h. - (file_name_max): New function. - (html_printer::make_new_image_name): If the filesystem doesn't - support file names longer than 14 characters, use a shorter - image_name string. - (html_printer::convert_to_image): Enlarge the size of buffer[] to - accomodate 2 temp file names plus some slack. Don't put \n at the - end of commands passed to system(). Redirect stderr to the null - device programmatically, not via the shell. Use NULL_DEV, not - literal "/dev/null". Print diagnostics if any calls to system() - failed. - -2000-05-31 Keith Thompson - - * html.cc: Added declaration of mktemp() as needed for SunOS 4.1.3. - -2000-05-11 Werner LEMBERG - - * output.cc (simple_output::simple_output): Reordering of - initializers to remove compiler warning. - -2000-04-28 Gaius Mulley - - * html.cc (calculate_margin): Calculate the left and right margin - irrespective of the boolean `margin_on'. Fixes a divide by zero bug - and a column bug as reported by Steve Blinkhorn . - Improved the behaviour of the -m (margin on) option. - - * html.cc (make_html_indent): More checking. - - * html.cc (right_indentation): Fixed substitution slip-up. - -2000-03-30 Werner LEMBERG - - * grohtml.man: Document use of whitespace between command line - arguments and its parameters. - -2000-03-17 Werner LEMBERG - - * grohtml.man: Some formatting. - -2000-03-11 Werner LEMBERG - - * ordered_list.h (list_element): Added `' twice to satisfy picky - compilers. - -2000-03-01 Gaius Mulley - - * html.cc (handle_unknown_font_command): Removed dead code as - spotted by Werner. - -2000-02-11 Gaius Mulley - - * html.cc (create_tmp_file, create_temp_name): Removed. It has been - replaced with calls to xtmpfile() and xtmptemplate(). - -2000-02-07 Gaius Mulley - - * html.cc (html_printer::make_new_image_name): Tidied up file and - fixed name of image if the source file is in a different directory. - - * html.cc (create_file): Renamed to create_tmp_file. - -2000-02-07 Colin Phipps - - * html.cc (create_file): Identified & fixed security bug when - creating files in /tmp. - -2000-02-06 Werner LEMBERG - - * Makefile.sub: Adapted to new directory structure. - -2000-01-28 Gaius Mulley - - * html.cc: Minor fixes. - -2000-01-27 Gaius Mulley - - * html.cc: Added support for the new tcommand `F'. - * TODO: Updated. - -2000-01-24 Gaius Mulley - - * design.ms: Revised. Removed TODO stuff. - - * TODO: New file. - -2000-01-21 Gaius Mulley - - * html.cc: Add support for char names in special requests (to - support e.g. accented characters in HTML specials). - -2000-01-14 Gaius Mulley - - * html.cc, html.h: Many fixes to table code. - - Fixes to manual page handling, font changes, spaces, and - diacritical characters. All *standard* html character encodings - are handled. - - Added -T option which turns off all image generation for tables. - One day grohtml should be able to determine this for itself. - - Altered image name to: -.png as per - Werners suggestion. - - * grohtml.man: Document -T option. - - * html_chars.h: New file, providing diacritical table support. - - * output.cc: New file, providing basic output routines for grohtml. - - * Makefile.sub: Added output.cc. - - * Makefile.dep: Updated. - -2000-01-13 Bruno Haible - - * html.cc: Avoid most "g++ -Wall -Wno-sign-compare" warnings. - -2000-01-10 Werner Lemberg - - * html.cc: Use Version_string instead of version_string. - -1999-12-30 Gaius Mulley - - * html.cc (is_appropriate_to_start_table): Added a missing - declaration. - -1999-12-28 Gaius Mulley - - * html.cc: Revisited the table handling code with a vengeance, - aiming to make manual pages generate sensible html. - Superscripting/subscripting revisited. Fixed wierd table lengths. - Table widths are now specified in percentages. Fixed the man.n - test example which Werner reported. - -Version 1.15 released -===================== - -1999-12-21 Werner LEMBERG - - * grohtml.man: Fixed copyright year. - -1999-12-15 Gaius Mulley - - * html.cc: Some other fixes. - -1999-12-13 Gaius Mulley - - * html.cc (main): Added new option `-x' to help debugging tables. - -1999-12-11 Gaius Mulley - - * html.cc: Fixed image position bugs. However, three major bugs - remain: Firstly, grohtml sometimes miscalculates the end of an - html table resulting in text which appears twice. Secondly, - equation numbers are not handled correctly. Thirdly, equation - macros and pic macros can confuse grohtml; this can be seen by - nested `graphic-start's -- I believe the best method to solve this - is to detect .EQ, .EN, .TS, .TE, .PS, .PE sequences in troff and - add the graphic-start special character at this point. - - * grohtml.man: Minor fixes. - -1999-11-29 Gaius Mulley - - * design.ms: More updates; added some basic introductional - information. - - * html.cc: Fixed more bugs mainly in the table handling code. - Making the code terminate a table at the correct position. - Indented .IPs appear to work now. Region ends also correctly - terminate tables. - -1999-11-16 Gaius Mulley - - * design.ms, grohtml.man: Updated. - - * html.cc, ordered_list.h: Fixed many bugs in the table handling - code. Reverted the -t switch so that table handling code is used - by default and users must turn it off with -t. - - Manual page generation using `groff -Thtml -man' is much better - due in large part to the table code and minor alterations in - tmac.an. - -1999-10-30 Gaius Mulley - - * implemented auto formatting and introduced html table - code. Fixed several text handling bugs and grohtml will - detect centered lines - an offshoot of the html table code. - - * reverted meaning of grohtml's `-a' switch: using -a means that - output will be preformatted. - -1999-10-05 Gaius Mulley - - * Introduced command line options -r to determine the resolution - of generated images, -I to determine the format of images - generated. - - * Fixed many bugs to do with superscripts, subscripts, - indentation, font changes, and extraneous spaces. - - * Fixed bug in determining the range of polygons and splines. - - * Updated the manual page to reflect the new options. - - * The default image type is png format, however this will only - work if you have a gs with a png output device. If you don't have - a gs with this ability you can either reconfigure html to generate - gif images by default (alter a #define in html.cc). Or - alternatively you can use the -Igif option. - -1999-09-27 Werner LEMBERG - - * html.cc (move_horizontal): Fonts have changed one character too - late. - -1999-09-26 Werner LEMBERG - - * grohtml.man: Minor cosmetic fixes. - -1999-09-25 Gaius Mulley - - * grohtml.man, html.cc: Rewrite of the html text component. Basic - font faces supported together with font types. Superscript and - subscript have also been implemented. Temporarily removed the - -P-a switch on grohtml as it is not working (never worked). This - is the next `to do'. Added a simple macro tmac.arkup which - contains simple html features. This macro needs further work. - Arc, spline, polygon fill have all been added and arc max/min xy - limits are calculated, the same needs to be done for spline. Many - bugs have been fixed regarding basic html text. - - * design.ms: New file describing how html.cc works. - -Aug 1999 - - Initial release, very basic html text generated, quite ugly text - is generated according to many reports :-) Equations, tables, - pictures generate gif files via gs and ppmquant, ppmtogif, grops. - diff -aruN groff-1.16.1/src/devices/grohtml/Makefile.sub groff-1.17/src/devices/grohtml/Makefile.sub --- groff-1.16.1/src/devices/grohtml/Makefile.sub Sun Feb 6 10:37:28 2000 +++ groff-1.17/src/devices/grohtml/Makefile.sub Wed Jan 17 15:17:22 2001 @@ -1,10 +1,16 @@ -PROG=grohtml +PROG=post-grohtml MAN1=grohtml.n XLIBS=$(LIBDRIVER) $(LIBGROFF) MLIB=$(LIBM) OBJS=\ - html.o \ + post-html.o \ + html-text.o \ output.o CCSRCS=\ - $(srcdir)/html.cc \ + $(srcdir)/post-html.cc \ + $(srcdir)/html-text.cc \ $(srcdir)/output.cc +HDRS=\ + $(srcdir)/html.h \ + $(srcdir)/html-chars.h \ + $(srcdir)/html-text.h diff -aruN groff-1.16.1/src/devices/grohtml/TODO groff-1.17/src/devices/grohtml/TODO --- groff-1.16.1/src/devices/grohtml/TODO Sun Feb 6 10:37:43 2000 +++ groff-1.17/src/devices/grohtml/TODO Thu Jan 1 01:00:00 1970 @@ -1,294 +0,0 @@ - ------------------------------------------------------------------- - T O D O L I S T ------------------------------------------------------------------- -finish working out the max and min x, y, extents for splines. ------------------------------------------------------------------- -check and test thoroughly all the character descriptions in devhtml -(originally taken from devX100) ------------------------------------------------------------------- -improve tmac.arkup ------------------------------------------------------------------- -also improve documentation. ------------------------------------------------------------------- -fix the bugs which are exposed by Eric Raymonds pic guide, -"Making Pictures With GNU PIC". It appears that grohtml becomes confused -about which sections of the document are text and which sections need -to be rendered as an image. ------------------------------------------------------------------- -it would be nice to modularise the source. A natural division might be -to extract the table handling code from html.cc into table.cc. -The table.cc could be expanded to recognise output from tbl and try -and generate html tables with lines/rules/boxes. The code as it stands -should cope with very simple plain text tables. But of course at present -it does not get a chance to do this because the output of gtbl is -bracketed by \fCgraphic-start\fR and \fCgraphic-end\fR. ------------------------------------------------------------------- -introduce anti aliasing for the images as mentioned by Werner. ------------------------------------------------------------------- -improve generation of html. Perhaps by using a stack of current -html commands and using a kind of peephole optimizer on the stack? -Certainly the html should be buffered and optimized. ------------------------------------------------------------------- - - -Informal to do bug list and done list -===================================== - -This very informal and I've included some comments. Mainly consists -of a emailed bugs and wish lists. All very useful and welcome. - ------------------------------------------------------------------- -Dean writes: (provinsd@enf403-2.ensu.ucalgary.ca) - -I noticed also that the TOC appears immediately after the title, splitting -it from the author and abstract. Any chance it can be moved down? - -gaius> this should be straight forward. (Not done yet though) ------------------------------------------------------------------- - -.) The command `\(->', translates to the `registered' sign (or rather - the character `0xAE') instead of a right arrow. - ---nearly fixed-- 4/01/2000 - -gaius> if we know the standard html character encoding for farrow which -gaius> will work on *all* browsers then this can be fixed inside devhtml/TR -gaius> etc. Otherwise I guess we could translate this character into -> -gaius> in tmac.html ? - ------------------------------------------------------------------- - -Werner writes: - -Nevertheless, still some bugs in it. As usual, I'm refering to man.1 -of the mandb package; my command to create man.html was - - groff -U -t -man -Thtml -P-r -P200 man.1 > man.html - -.) The `-w , --where, --location' node at the beginning of man.html - shouldn't be there at all. - -> .) Some paragraphs still contain hyphenated words (e.g. first -> paragraph of the `DESCRIPTION' section). - -Oops! Please ignore this. I forgot to include `-mhtml' :-) - -.) Is it possible to have anti-aliased PNG images? - -.) The item `man --help' in the `EXAMPLES' section doesn't start a new - paragraph. - -.) In the description of the -r switch (in the `OPTIONS' section), - there is a new paragraph in the middle of a sentence. - -.) What about centering the images? Or does it depend on the table - itself? - -gaius> yes, grohtml places images at their relative position on the page. - -.) In the `OPTIONS' section, `-c, --catman' and `-d, --debug' are - glued together which shouldn't happen. ---fixed-- - -.) Sometimes, an empty line is missing between items, e.g. between the - description of the -e and the -f options. - -.) After the `-w, --where, --location' line, there is a superfluous - empty line. - -.) The indentation in the `FILES' section is inconsistent. The same - is true for `-V, --version' a few lines above. - -.) The formatting of the paragraph after the first table is completely - wrong. It appears that the first few words are set in two columns; - additionally, the indentation is incorrect. - -.) Similarly, the description of `-l' in the OPTIONS section is - idented incorrectly. Wrong indentations happen still quite - frequently. - -.) In the description of the `-D' option, there is a blank line in the - middle of a paragraph. - - - Werner - ------------------------------------------------------------------- -Werner writes: - -Gaius, - -checking a weird man page written by myself in German (using German -hyphenation patterns also :-), I found some more bugs: - -.) Look at the following: - -[\c -...\^\c -] -[\c -.BI -P \ \%Plattform-ID\^\c -] - - This translates to - -[-E Kodierungs-ID ] - ^ - (groff breaks the line after the final `]'.) - - There are two errors in it: First of all, the `\ ' command should - be translated to ` '. Secondly, a blank has crept in (marked - with `^'. Apparently, this is related to whether it is the last - item of a line or not. - ---fixed-- 4 01 2000 ------------------------------------------------------------------- - -from Steve Blinkhorn - -One thought that came immediately to mind after our first trials. -If grohtml depends on grops, should there not be an easy interface to -allow PostScript code to be interpreted into the output? For -instance, we generate our letterhead, including a logo, on the fly in -groff. The logo is pure PostScript. We use PostScript for colour -manipulation, and recently for generating a lot of graphics for -printing. - -gaius> should be interesting - if we can generate PS then GS it -gaius> we should be in business - ------------------------------------------------------------------- - D O N E L I S T ------------------------------------------------------------------- -the logical place and name for a file describing tmac.arkup is -groff_markup.man placed into the `tmac' subdirectory, and your html.ms -looks like being this kind of file. - -So I won't check it in currently -- may I ask you to convert this file -to a man page? - --- fixed -- - -Another related problem: I can imagine that a lot of people start to -write man pages with HTML output in mind also. Nevertheless, it -should be still possible to display such pages correctly with a plain -text man pager. As a consequence, such man pages should contain at -the beginning something like - - .do mso tmac.arkup - -What do you think? - - Werner - --- fixed -- -gaius> fixed by using troffrc-end I believe --------------------------------------------------------------------- -Gaius, - -in troffrc, it appears to me that tmac.html is loaded if the output -device is HTML. So why must I load it again (using -mhtml) to -suppress hyphenation for HTML output? Can you provide a fix for this? - - Werner - -gaius> fixed as above --------------------------------------------------------------------- - -from (daeschler@shuttle.de) Rainer Daeschler - -I recognized s problem limiting the usage for -"none-english aliens". The generation of PNG of GIF, -skips all special characters like - - äöü ÄÖÜ ß - -French, Spanish, and Scandinavian national letters, too. - ---fixed-- 14/01/2000 - -An option which forces tables into HTML-code instead of building -an image would be most valuable. Of course it would not preserve -the original layout in many cases, but ease modifications of -the HTML-output to the users demand afterwards. - ---fixed-- 14/01/2000 - -gaius> use the new -T option to grohtml (-P-T to groff) - ------------------------------------------------------------------ -from Werner - - but `pre-defined' appears as `pre­ line' (note the space - character after the soft hyphen). Something in the code makes - problems here... - - (IIRC, I've sent you this man.1 file a few weeks ago). - -gaius> Werner fixed this by adding .cflags 0 -\(hy\(em\(en to tmac.html - ------------------------------------------------------------------ -from Werner and Eddie -> > > .LP -> > > .URL Germany "ftp://groff.ffii.org/pub/groff/" -> > > | -> > > .URL USA "ftp://ftp.gnu.org/gnu/groff/" -> > -> > Problem: the first "|" of each line is missing a leading white space -> > space. -> > -> > How to ensure the spaces get put there? -> -> This is a feature grohtml (unfortunately -- AFAIK, Gaius hasn't found -> a good workaround yet). HTML stuff gets written as specials which -> don't consume space for troff, causing some miscalculation if placed -> at the beginning of a paragraph. A workaround is to write -> -> .LP -> \& -> .URL ... -> | -> .URL ... - -gaius> fixed by adding \& to HTML as per Werner's suggestion - - -Werner writes: - -PNGs created by grohtml have apparently a white background -- isn't it -possible to make the background transparent optionally? - -Another suggestion: What do you think about calling the PNG files --.png or something like this? I can't see an -advantage in the current naming scheme except for debugging purposes -where it may be necessary to stay with the old files. - ---fixed-- 04 01 2000 - -gaius> however I've had to retain a default grohtml-pid-index.png for all -gaius> stdin as we don't know the filename.. sadly looks like everything.. -gaius> Nearly done by including a new tcommand 'F filename' - ---fixed-- 26 01 2000 ------------------------------------------------------------------- - -.) The following code produces ugly results -- is it possible to make - the HTML result similar to the ascii output? - -.in +4m -.ta 3iC -.I "Plattform Plattform-ID (pid)" -\&.sp -.ta 3iR -Apple Unicode 0 -.br -Macintosh 1 -.br -ISO 2 -.br -Microsoft 3 -.PP - ---fixed-- 14/01/2000 ------------------------------------------------------------------- diff -aruN groff-1.16.1/src/devices/grohtml/design.ms groff-1.17/src/devices/grohtml/design.ms --- groff-1.16.1/src/devices/grohtml/design.ms Sun Feb 6 10:37:41 2000 +++ groff-1.17/src/devices/grohtml/design.ms Thu Jan 1 01:00:00 1970 @@ -1,129 +0,0 @@ -.nr PS 12 -.nr VS 14 -.LP -.TL -Design of grohtml -.sp 1i -.SH -What is grohtml -.LP -Grohtml is a back end for groff which generates html. -The aim of grohtml is to produce respectible html given -fairly typical groff input. -.SH -Limitations of grohtml -.LP -Although basic text can be translated -in a straightforward fashion there are some areas where grohtml -has to try and guess text relationship. In particular whenever -grohtml encounters text tables and indented paragraphs or -two column mode it will try and utilize the html table construct -to preserve columns. Grohtml also attempts to work out which -lines should be automatically formatted by the browser. -Ultimately in trying to make reasonable guesses most of the time -it will make mistakes occasionally. -.PP -Tbl, pic, eqn's are also generated using images which may be -considered a limitation. -.SH -Overview of html.cc -.LP -This file briefly provides an overview of how html.cc operates. -The html device driver works as follows: -.IP (i) .5i -firstly it creates a linked list of all words on a page. -.IP (ii) .5i -it runs through the page and finds the left most margin. Later -on when generating the page it removes the margin. -.IP (iii) .5i -scans a page and builds two kinds of regions ascii text and graphical. -The graphical regions consist of tbl's, eqn's, pic's -(basically anything that cannot be textually displayed). -It will scan through a page to find lines (such as footer etc) -and places these into tiny graphical regions. Certain fonts -also are treated as a graphical region - as html has no easy -equivalent. For example Greek math symbols. -.LP -Finally all graphical regions are translated into png files and -all text regions into html text. -.PP -To give grohtml a sporting chance of accuratly deciding which -is a graphical region and which is text, the front end programs -tbl, eqn, pic have all been tweeked to encapsulate pictures, tables -and equations with the following lines: -.sp -.nf -\f[CR]\&.if '\\*(.T'html' \\X(graphic-start(\c - -\&.if '\\*(.T'html' \\X(graphic-end(\c -\fP -.fi -.sp -these appear to grohtml as: -.sp -.nf -\f[CR]\&x X graphic-start - -\&... - -\&x X graphic-end\fP -.fi -.sp -.LP -In addition to graphic-start and graphic-end there are two -other "special characters" which are used. -.sp -\f[CR]\&x X index:N\fP -.sp -where N is a number. The purpose of this sequence is to stop -devhtml from automatically producing links to headings which -have a header level >N. -The line: -.sp -\f[CR]\&x X html:STRING\fR -.sp -.LP -allows a STRING to be passed through to the output file with -no processing whatsoever. Ie it allows users to include html -commands, via macro, such as: -.sp -\f[CR]\&.URL "Latest Emacs" "ftp://somewonderful.gnu.software"\fP -.sp -.LP -Where the URL macro bundles the info into STRING above. -For more info consult: \f[CR]tmac/tmac.arkup\fP. -.PP -While scanning through a page the html device copies headings and titles -into a list of links which are later written to the beginning -of the html document. -.SH -Table handling code -.LP -Provided that the -t option is not present when grohtml is run the grohtml -driver will attempt to find textual tables and generate html tables. -This allows .RS and .RE commands to operate with auto formatting. It also -should grohtml to process .2C correctly. However, the table handling code -has to examine the troff output and \fIguess\fR when a table starts and -finishes. It is well to know the limitations of this approach as it -sometimes makes the wrong decision. -.LP -Here are some of the rules that grohtml uses for terminating a html table: -.LP -.IP "(i)" .5i -A table will be terminated when grohtml finds line which is all in bold -font (it believes that this is a header which is outside of a table). -This might be considered incorrect behaviour especially if you use .2C -which generates a heading on the left column when the corresponding -right row is blank. -.IP "(ii)" .5i -A table is terminated when grohtml sees that the complete line is -has been spanned by words. Ie no gaps exist. -.IP "(nb)" .5i -the documentation about these rules is particularly incomplete and needs finishing -when time prevails. -.SH -Dependencies -.LP -Grohtml is dependent upon grops, gs which are invoked to -generate all png files. Png files are generated whenever a table, picture, -equation or line is encountered. diff -aruN groff-1.16.1/src/devices/grohtml/grohtml.man groff-1.17/src/devices/grohtml/grohtml.man --- groff-1.16.1/src/devices/grohtml/grohtml.man Sat Apr 8 07:36:29 2000 +++ groff-1.17/src/devices/grohtml/grohtml.man Fri Apr 13 11:03:53 2001 @@ -1,5 +1,5 @@ .ig \"-*- nroff -*- -Copyright (C) 1999-2000 Free Software Foundation, Inc. +Copyright (C) 1999-2000, 2001 Free Software Foundation, Inc. Permission is granted to make and distribute verbatim copies of this manual provided the copyright notice and this permission notice are @@ -36,24 +36,21 @@ .ie \\n(.$-1 .RI "[\ \fB\\$1\fP" "\\$2" "\ ]" .el .RB "[\ " "\\$1" "\ ]" .. -.OP \-atTvdgm? +.OP \-v?lrn .OP \-F dir -.OP \-I imagetype -.OP \-r resolution +.OP \-i resolution +.OP \-o image vertical offset .RI "[\ " files\|.\|.\|. "\ ]" .br .ad \na -.PP -It is possible to have whitespace between a command line option and its -parameter. .SH DESCRIPTION .B grohtml translates the output of GNU .B troff to html. -Normally +Users should always invoke .B grohtml -should be invoked by using the groff command with a +via the groff command with a .B \-Thtml option. If no files are given, @@ -71,75 +68,42 @@ .B groff options can be passed to .B grohtml -using the -.B groff +using +.BR groff 's .B \-P option. .SH OPTIONS .TP -.B \-a -force -.B grohtml -to generate html line breaks in the same position as troff dictates. -Without this option -.B grohtml -generates text in paragraphs which is formatted by the html browser. +.B \-v +Displays the version. .TP -.B \-d -turn on internal debugging. +.B \-? +Emits a usage synopsis. .TP -.B \-g -tell -.B grohtml -not to try and guess titles and headings. -By using this flag together with the -m and -a flag -.B grohtml -will treat the html browser as a printer, not as a formatter. +.B -l +Turns off the production of automatic section links at the top of the document. .TP -.B \-m -leave margins alone. -.B grohtml -will not remove left margins. +.B -r +Turns off the automatic header and footer line (html rule). .TP -.B \-t -forbids -.B grohtml -from generating html tables when implementing indentation and tabular text. -.B grohtml -can implement .IP by tables or html indents. -However if .2C is used it can only be sensibly converted to html using a -table structure. -As a few known bugs still exist with the html table code this option is -present to supress execution of this development code. -The default in -.B grohtml -is that html tables are generated when appropriate. -.TP -.B \-T -forbids -.B grohtml -from generating images when processing output from tbl. -This is useful when simple textual tables are being produced. +.B -n +Generate simple heading anchors whenever a section/number heading is found. +Without the option the anchor value is the textual heading. This can cause problems +when a heading contains a `?' on some brousers (netscape). +This flag is automatically turned on if a heading contains an image. .TP .BI \-F dir -Search the directory +Prepend directory .IB dir /dev name -for font and device description files; +to the search path for font and device description files; .I name is the name of the device, usually .BR html . .TP -.BI \-I imagetype -select the type of image generated when grohtml encounters an equation, -table, or picture. -By default this is png256. -Legal image types are: gif and any of the png formats which are supported by -ghostscript gs(1). -.TP -.BI \-r resolution +.BI \-i resolution select the resolution for all images. By default this is 80 pixels per inch. -Example: -r100 indicates 100 pixels per inch. +Example: -i100 indicates 100 pixels per inch. .TP .B \-v Print the version number. @@ -154,29 +118,15 @@ and .B BI mounted at font positions 1 to 4. -It is advisable to invoke groff with the -mhtml macro set, which turns off -headers, footers, and hyphenation; additionally, it will right justify text. .SH DEPENDENCIES .B grohtml -is dependent upon grops and gs. -If -.B grohtml -has been configured to generate gif files then it is further dependent upon, -ppmtogif, and ppmquant. -However if it has been configured to generate png files (the default) then -it is dependent upon gs having a png output device. +is dependent upon the png utilities and gs. Images are generated whenever a table, picture, equation or line is encountered. .SH BUGS -This is still very alpha. -At least three major bugs remain: -Firstly, -.B grohtml -sometimes miscalculates the end of an html table resulting in text which -appears twice. -Secondly equation numbers are not handled correctly. -Thirdly equation macros and pic macros can confuse -.BR grohtml . +.B Grohtml +has been completely redesigned and rewritten. +It is still alpha code. .SH "SEE ALSO" .BR afmtodit (@MAN1EXT@), .BR groff (@MAN1EXT@), diff -aruN groff-1.16.1/src/devices/grohtml/html-chars.h groff-1.17/src/devices/grohtml/html-chars.h --- groff-1.16.1/src/devices/grohtml/html-chars.h Thu Jan 1 01:00:00 1970 +++ groff-1.17/src/devices/grohtml/html-chars.h Wed Jan 17 15:17:22 2001 @@ -0,0 +1,27 @@ +// -*- C++ -*- +/* Copyright (C) 2000, 2001 Free Software Foundation, Inc. + * + * Gaius Mulley (gaius@glam.ac.uk) wrote output.cc + * but it owes a huge amount of ideas and raw code from + * James Clark (jjc@jclark.com) grops/ps.cc. + * + * html-chars.h + * + * provides a diacritical character combination table for html + */ + + + +struct diacritical_desc { + char *mark; + char *second_troff_char; + char translation; +}; + + +static struct diacritical_desc diacritical_table[] = { + { "ad" , "aeiouyAEIOU" , ':' , }, /* */ + { "ac" , "cC" , ',' , }, /* cedilla */ + { "aa" , "aeiouyAEIOU" , '\'' , }, /* acute */ + { NULL , NULL , (char)0, }, +}; diff -aruN groff-1.16.1/src/devices/grohtml/html-text.cc groff-1.17/src/devices/grohtml/html-text.cc --- groff-1.16.1/src/devices/grohtml/html-text.cc Thu Jan 1 01:00:00 1970 +++ groff-1.17/src/devices/grohtml/html-text.cc Fri Apr 13 11:03:53 2001 @@ -0,0 +1,829 @@ +// -*- C++ -*- +/* Copyright (C) 2000, 2001 Free Software Foundation, Inc. + * + * Gaius Mulley (gaius@glam.ac.uk) wrote html-text.cc + * + * html-text.cc + * + * provide a troff like state machine interface which + * generates html text. + */ + +/* +This file is part of groff. + +groff is free software; you can redistribute it and/or modify it under +the terms of the GNU General Public License as published by the Free +Software Foundation; either version 2, or (at your option) any later +version. + +groff is distributed in the hope that it will be useful, but WITHOUT ANY +WARRANTY; without even the implied warranty of MERCHANTABILITY or +FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License +for more details. + +You should have received a copy of the GNU General Public License along +with groff; see the file COPYING. If not, write to the Free Software +Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ + +#include "driver.h" +#include "stringclass.h" +#include "cset.h" + +#if !defined(TRUE) +# define TRUE (1==1) +#endif +#if !defined(FALSE) +# define FALSE (1==0) +#endif + + +#include "html-text.h" + + +html_text::html_text (simple_output *op) : + stackptr(NULL), lastptr(NULL), out(op), space_emitted(TRUE), + current_indentation(-1), pageoffset(-1), linelength(-1) +{ +} + +html_text::~html_text () +{ + flush_text(); +} + +/* + * end_tag - shuts down the tag. + */ + +void html_text::end_tag (tag_definition *t) +{ + switch (t->type) { + + case I_TAG: out->put_string(""); break; + case B_TAG: out->put_string(""); break; + case P_TAG: out->put_string("

").nl().enable_newlines(FALSE); break; + case SUB_TAG: out->put_string(""); break; + case SUP_TAG: out->put_string(""); break; + case TT_TAG: out->put_string(""); break; + case PRE_TAG: out->put_string(""); + if (! is_present(TABLE_TAG)) { + out->nl(); + out->enable_newlines(TRUE); + } + break; + case SMALL_TAG: out->put_string(""); break; + case BIG_TAG: out->put_string(""); break; + case TABLE_TAG: issue_table_end(); break; + + default: + error("unrecognised tag"); + } +} + +/* + * issue_tag - writes out an html tag with argument. + */ + +void html_text::issue_tag (char *tagname, char *arg) +{ + if ((arg == 0) || (strlen(arg) == 0)) { + out->put_string(tagname); + out->put_string(">"); + } else { + out->put_string(tagname); + out->put_string(" "); + out->put_string(arg); + out->put_string(">"); + } +} + +/* + * start_tag - starts a tag. + */ + +void html_text::start_tag (tag_definition *t) +{ + switch (t->type) { + + case I_TAG: issue_tag("arg1); break; + case B_TAG: issue_tag("arg1); break; + case P_TAG: issue_tag("\narg1); + out->enable_newlines(TRUE); break; + case SUB_TAG: issue_tag("arg1); break; + case SUP_TAG: issue_tag("arg1); break; + case TT_TAG: issue_tag("arg1); break; + case PRE_TAG: out->nl(); issue_tag("arg1); + out->enable_newlines(FALSE); break; + case SMALL_TAG: issue_tag("arg1); break; + case BIG_TAG: issue_tag("arg1); break; + case TABLE_TAG: issue_table_begin(t); break; + case BREAK_TAG: break; + + default: + error("unrecognised tag"); + } +} + +int html_text::table_is_void (tag_definition *t) +{ + if (linelength > 0) { + return( current_indentation*100/linelength <= 0 ); + } else { + return( FALSE ); + } +} + +void html_text::issue_table_begin (tag_definition *t) +{ + if (linelength > 0) { + int width=current_indentation*100/linelength; + + if (width > 0) { + out->put_string("").nl(); + out->put_string("").nl(); + if ((t->arg1 == 0) || (strcmp(t->arg1, "") == 0)) + out->put_string(""); + else { + out->put_string(""); + t->arg1[0] = (char)0; + } + out->put_string("
").nl(); + out->put_string(t->arg1).put_string("").nl(); + } + } +} + +void html_text::issue_table_end (void) +{ + out->put_string("
").nl(); + out->enable_newlines(TRUE); +} + +/* + * flush_text - flushes html tags which are outstanding on the html stack. + */ + +void html_text::flush_text (void) +{ + int notext=TRUE; + tag_definition *p=stackptr; + + while (stackptr != 0) { + notext = (notext && (! stackptr->text_emitted)); + if (! notext) { + end_tag(stackptr); + } + p = stackptr; + stackptr = stackptr->next; + free(p); + } + lastptr = NULL; +} + +/* + * is_present - returns TRUE if tag is already present on the stack. + */ + +int html_text::is_present (HTML_TAG t) +{ + tag_definition *p=stackptr; + + while (p != NULL) { + if (t == p->type) { + return( TRUE ); + } + p = p->next; + } + return( FALSE ); +} + +/* + * push_para - adds a new entry onto the html paragraph stack. + */ + +void html_text::push_para (HTML_TAG t, char *arg) +{ + tag_definition *p=(tag_definition *)malloc(sizeof(tag_definition)); + + p->type = t; + p->arg1 = arg; + p->text_emitted = FALSE; + + /* + * if t is a P_TAG or TABLE_TAG or PRE_TAG make sure it goes on the end of the stack. + * But we insist that a TABLE_TAG is always after a PRE_TAG + * and that a P_TAG is always after a TABLE_TAG + */ + + if (((t == P_TAG) || (t == PRE_TAG) || (t == TABLE_TAG)) && + (lastptr != NULL)) { + if (((lastptr->type == TABLE_TAG) && (t == PRE_TAG)) || + ((lastptr->type == P_TAG) && (t == TABLE_TAG))) { + /* + * insert p before the lastptr + */ + if (stackptr == lastptr) { + /* + * only on element of the stack + */ + p->next = stackptr; + stackptr = p; + } else { + /* + * more than one element is on the stack + */ + tag_definition *q = stackptr; + + while (q->next != lastptr) { + q = q->next; + } + q->next = p; + p->next = lastptr; + } + } else { + /* + * store, p, at the end + */ + lastptr->next = p; + lastptr = p; + p->next = NULL; + } + } else { + p->next = stackptr; + if (stackptr == NULL) + lastptr = p; + stackptr = p; + } +} + +/* + * do_indent - remember the indent parameters and if + * indent is > pageoff and indent has changed + * then we start a html table to implement the indentation. + */ + +void html_text::do_indent (char *arg, int indent, int pageoff, int linelen) +{ + if ((current_indentation != -1) && + (pageoffset+current_indentation != indent+pageoff)) { + /* + * actual indentation of text has changed, we need to put + * a table tag onto the stack. + */ + do_table(arg); + } + current_indentation = indent; + pageoffset = pageoff; + linelength = linelen; +} + +void html_text::do_table (char *arg) +{ + int in_pre = is_in_pre(); + // char *para_type = done_para(); + done_pre(); + shutdown(TABLE_TAG); // shutdown a previous table, if present + remove_break(); + if (in_pre) { + do_pre(); + } + // do_para(para_type); + push_para(TABLE_TAG, arg); +} + +/* + * done_table - terminates a possibly existing table. + */ + +void html_text::done_table (void) +{ + shutdown(TABLE_TAG); + space_emitted = TRUE; +} + +/* + * do_italic - changes to italic + */ + +void html_text::do_italic (void) +{ + done_bold(); + done_tt(); + if (! is_present(I_TAG)) { + push_para(I_TAG, ""); + } +} + +/* + * do_bold - changes to bold. + */ + +void html_text::do_bold (void) +{ + done_italic(); + done_tt(); + if (! is_present(B_TAG)) { + push_para(B_TAG, ""); + } +} + +/* + * do_tt - changes to teletype. + */ + +void html_text::do_tt (void) +{ + done_bold(); + done_italic(); + if ((! is_present(TT_TAG)) && (! is_present(PRE_TAG))) { + push_para(TT_TAG, ""); + } +} + +/* + * do_pre - changes to preformated text. + */ + +void html_text::do_pre (void) +{ + done_bold(); + done_italic(); + done_tt(); + char *type = done_para(); + if (! is_present(PRE_TAG)) { + push_para(PRE_TAG, ""); + } +} + +/* + * is_in_pre - returns TRUE if we are currently within a preformatted + *
 block.
+ */
+
+int html_text::is_in_pre (void)
+{
+  return( is_present(PRE_TAG) );
+}
+
+/*
+ *  is_in_table - returns TRUE if we are currently within a table.
+ */
+
+int html_text::is_in_table (void)
+{
+  return( is_present(TABLE_TAG) );
+}
+
+/*
+ *  shutdown - shuts down an html tag.
+ */
+
+char *html_text::shutdown (HTML_TAG t)
+{
+  char *arg=NULL;
+
+  if (is_present(t)) {
+    tag_definition *p    =stackptr;
+    tag_definition *temp =NULL;
+    int notext           =TRUE;
+    
+    while ((stackptr != NULL) && (stackptr->type != t)) {
+      notext = (notext && (! stackptr->text_emitted));
+      if (! notext) {
+	end_tag(stackptr);
+      }
+
+      /*
+       *  pop tag
+       */
+      p        = stackptr;
+      stackptr = stackptr->next;
+      if (stackptr == NULL)
+	lastptr = NULL;
+    
+      /*
+       *  push tag onto temp stack
+       */
+      p->next  = temp;
+      temp     = p;
+    }
+
+    /*
+     *  and examine stackptr
+     */
+    if ((stackptr != NULL) && (stackptr->type == t)) {
+      if (stackptr->text_emitted) {
+	end_tag(stackptr);
+      }
+      if (t == P_TAG) {
+	arg = stackptr->arg1;
+      }
+      p        = stackptr;
+      stackptr = stackptr->next;
+      if (stackptr == NULL)
+	lastptr = NULL;
+      free(p);
+    }
+
+    /*
+     *  and restore unaffected tags
+     */
+    while (temp != NULL) {
+      push_para(temp->type, temp->arg1);
+      p    = temp;
+      temp = temp->next;
+      free(p);
+    }
+  }
+  return( arg );
+}
+
+/*
+ *  done_bold - shuts downs a bold tag.
+ */
+
+void html_text::done_bold (void)
+{
+  shutdown(B_TAG);
+}
+
+/*
+ *  done_italic - shuts downs an italic tag.
+ */
+
+void html_text::done_italic (void)
+{
+  shutdown(I_TAG);
+}
+
+/*
+ *  done_sup - shuts downs a sup tag.
+ */
+
+void html_text::done_sup (void)
+{
+  shutdown(SUP_TAG);
+}
+
+/*
+ *  done_sub - shuts downs a sub tag.
+ */
+
+void html_text::done_sub (void)
+{
+  shutdown(SUB_TAG);
+}
+
+/*
+ *  done_tt - shuts downs a tt tag.
+ */
+
+void html_text::done_tt (void)
+{
+  shutdown(TT_TAG);
+}
+
+/*
+ *  done_pre - shuts downs a pre tag.
+ */
+
+void html_text::done_pre (void)
+{
+  shutdown(PRE_TAG);
+}
+
+/*
+ *  done_small - shuts downs a small tag.
+ */
+
+void html_text::done_small (void)
+{
+  shutdown(SMALL_TAG);
+}
+
+/*
+ *  done_big - shuts downs a big tag.
+ */
+
+void html_text::done_big (void)
+{
+  shutdown(BIG_TAG);
+}
+
+/*
+ *  check_emit_text - ensures that all previous tags have been emitted (in order)
+ *                    before the text is written.
+ */
+
+void html_text::check_emit_text (tag_definition *t)
+{
+  if ((t != NULL) && (! t->text_emitted)) {
+    /*
+     *  we peep and see whether there is a 

before the + * in which case we skip the

+ */ + if (t->type == TABLE_TAG) { + if (table_is_void(t)) { + tag_definition *n = t->next; + remove_def(t); + check_emit_text(n); + } else { + /* + * a table which will be emitted, is there a

succeeding it? + */ + if ((t->next != NULL) && + (t->next->type == P_TAG) && + ((t->next->arg1 == 0) || strcmp(t->next->arg1, "") == 0)) { + /* + * yes skip the

+ */ + check_emit_text(t->next->next); + } else { + check_emit_text(t->next); + } + t->text_emitted = TRUE; + start_tag(t); + } + } else { + check_emit_text(t->next); + t->text_emitted = TRUE; + start_tag(t); + } + } +} + +/* + * do_emittext - tells the class that text was written during the current tag. + */ + +void html_text::do_emittext (char *s, int length) +{ + if ((! is_present(P_TAG)) && (! is_present(PRE_TAG))) + do_para(""); + + if (is_present(BREAK_TAG)) { + int text = remove_break(); + check_emit_text(stackptr); + if (text) { + if (is_present(PRE_TAG)) { + out->nl(); + } else { + out->put_string("
").nl(); + } + } + } else { + check_emit_text(stackptr); + } + out->put_string(s, length); + space_emitted = FALSE; +} + +/* + * do_para- starts a new paragraph + */ + +void html_text::do_para (char *arg) +{ + done_pre(); + if (! is_present(P_TAG)) { + remove_sub_sup(); + if ((arg != 0) && (strcmp(arg, "") != 0)) { + remove_tag(TABLE_TAG); + } + push_para(P_TAG, arg); + space_emitted = TRUE; + } +} + +/* + * done_para - shuts down a paragraph tag. + */ + +char *html_text::done_para (void) +{ + space_emitted = TRUE; + return( shutdown(P_TAG) ); +} + +/* + * do_space - issues an end of paragraph + */ + +void html_text::do_space (void) +{ + if (is_in_pre()) { + do_emittext("", 0); + } else { + do_para(done_para()); + } + space_emitted = TRUE; +} + +/* + * do_break - issue a break tag. + */ + +void html_text::do_break (void) +{ + if (! is_present(PRE_TAG)) { + if (emitted_text()) { + if (! is_present(BREAK_TAG)) { + push_para(BREAK_TAG, ""); + } + } + } + space_emitted = TRUE; +} + +/* + * do_newline - issue a newline providing that we are inside a

 tag.
+ */
+
+void html_text::do_newline (void)
+{
+  if (is_present(PRE_TAG)) {
+    do_emittext("\n", 1);
+    space_emitted = TRUE;
+  }
+}
+
+/*
+ *  emitted_text - returns FALSE if white space has just been written.
+ */
+
+int html_text::emitted_text (void)
+{
+  return( ! space_emitted);
+}
+
+/*
+ *  emit_space - writes a space providing that text was written beforehand.
+ */
+
+int html_text::emit_space (void)
+{
+  if (space_emitted) {
+    if (is_present(PRE_TAG)) {
+      do_emittext(" ", 1);
+    }
+  } else {
+    out->space_or_newline();
+    space_emitted = TRUE;
+  }
+}
+
+/*
+ *  remove_def - removes a definition, t, from the stack.
+ */
+
+void html_text::remove_def (tag_definition *t)
+{
+  tag_definition *p    = stackptr;
+  tag_definition *l    = 0;
+  tag_definition *q    = 0;
+    
+  while ((p != 0) && (p != t)) {
+    l = p;
+    p = p->next;
+  }
+  if ((p != 0) && (p == t)) {
+    if (p == stackptr) {
+      stackptr = stackptr->next;
+      if (stackptr == NULL)
+	lastptr = NULL;
+      q = stackptr;
+    } else if (l == 0) {
+      error("stack list pointers are wrong");
+    } else {
+      l->next = p->next;
+      q = p->next;
+      if (l->next == NULL)
+	lastptr = l;
+    }
+    free(p);
+  }
+}
+
+/*
+ *  remove_tag - removes a tag from the stack.
+ */
+
+void html_text::remove_tag (HTML_TAG tag)
+{
+  tag_definition *p = stackptr;
+    
+  while ((p != 0) && (p->type != tag)) {
+    p = p->next;
+  }
+  if ((p != 0) && (p->type == tag))
+    remove_def(p);
+}
+
+/*
+ *  remove_sub_sup - removes a sub or sup tag, should either exist on the stack.
+ */
+
+void html_text::remove_sub_sup (void)
+{
+  if (is_present(SUB_TAG)) {
+    remove_tag(SUB_TAG);
+  }
+  if (is_present(SUP_TAG)) {
+    remove_tag(SUP_TAG);
+  }
+  if (is_present(PRE_TAG)) {
+    remove_tag(PRE_TAG);
+  }
+}
+
+/*
+ *  remove_break - break tags are not balanced thus remove it once it has been emitted.
+ *                 It returns TRUE if text was emitted before the 
was issued. + */ + +int html_text::remove_break (void) +{ + tag_definition *p = stackptr; + tag_definition *l = 0; + tag_definition *q = 0; + + while ((p != 0) && (p->type != BREAK_TAG)) { + l = p; + p = p->next; + } + if ((p != 0) && (p->type == BREAK_TAG)) { + if (p == stackptr) { + stackptr = stackptr->next; + if (stackptr == NULL) + lastptr = NULL; + q = stackptr; + } else if (l == 0) { + error("stack list pointers are wrong"); + } else { + l->next = p->next; + q = p->next; + if (l->next == NULL) + lastptr = l; + } + free(p); + } + /* + * now determine whether text was issued before
+ */ + while (q != 0) { + if (q->text_emitted) { + return( TRUE ); + } else { + q = q->next; + } + } + return( FALSE ); +} + +/* + * do_small - potentially inserts a tag into the html stream. + * However we check for a tag, if present then we terminate it. + * Otherwise a tag is inserted. + */ + +void html_text::do_small (void) +{ + if (is_present(BIG_TAG)) { + done_big(); + } else { + push_para(SMALL_TAG, ""); + } +} + +/* + * do_big - is the mirror image of do_small. + */ + +void html_text::do_big (void) +{ + if (is_present(SMALL_TAG)) { + done_small(); + } else { + push_para(BIG_TAG, ""); + } +} + +/* + * do_sup - save a superscript tag on the stack of tags. + */ + +void html_text::do_sup (void) +{ + push_para(SUP_TAG, ""); +} + +/* + * do_sub - save a subscript tag on the stack of tags. + */ + +void html_text::do_sub (void) +{ + push_para(SUB_TAG, ""); +} + diff -aruN groff-1.16.1/src/devices/grohtml/html-text.h groff-1.17/src/devices/grohtml/html-text.h --- groff-1.16.1/src/devices/grohtml/html-text.h Thu Jan 1 01:00:00 1970 +++ groff-1.17/src/devices/grohtml/html-text.h Mon Mar 19 16:33:03 2001 @@ -0,0 +1,109 @@ +// -*- C++ -*- +/* Copyright (C) 2000, 2001 Free Software Foundation, Inc. + * + * Gaius Mulley (gaius@glam.ac.uk) wrote html-text.cc + * + * html-text.h + * + * provides a state machine interface which generates html text. + */ + +/* +This file is part of groff. + +groff is free software; you can redistribute it and/or modify it under +the terms of the GNU General Public License as published by the Free +Software Foundation; either version 2, or (at your option) any later +version. + +groff is distributed in the hope that it will be useful, but WITHOUT ANY +WARRANTY; without even the implied warranty of MERCHANTABILITY or +FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License +for more details. + +You should have received a copy of the GNU General Public License along +with groff; see the file COPYING. If not, write to the Free Software +Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ + +#include "html.h" + +/* + * html tags + */ + +typedef enum {I_TAG, B_TAG, P_TAG, SUB_TAG, SUP_TAG, TT_TAG, + PRE_TAG, SMALL_TAG, BIG_TAG, BREAK_TAG, TABLE_TAG} HTML_TAG; + +typedef struct tag_definition { + HTML_TAG type; + char *arg1; + int text_emitted; + tag_definition *next; +} tag_definition ; + +/* + * the state of the current paragraph. + * It allows post-html.cc to request font changes, paragraph start/end + * and emits balanced tags with a small amount of peephole optimization. + */ + +class html_text { +public: + html_text (simple_output *op); + ~html_text (void); + void flush_text (void); + void do_emittext (char *s, int length); + void do_italic (void); + void do_bold (void); + void do_roman (void); + void do_tt (void); + void do_pre (void); + void do_small (void); + void do_big (void); + void do_para (char *arg1); + void do_sup (void); + void do_sub (void); + void do_space (void); + void do_break (void); + void do_newline (void); + void do_table (char *arg); + void done_bold (void); + void done_italic (void); + char *done_para (void); + void done_sup (void); + void done_sub (void); + void done_tt (void); + void done_pre (void); + void done_small (void); + void done_big (void); + void do_indent (char *arg, int indent, int pageoff, int linelen); + int emitted_text (void); + int emit_space (void); + int is_in_pre (void); + void remove_tag (HTML_TAG tag); + void remove_sub_sup (void); + void done_table (void); + int is_in_table (void); + +private: + tag_definition *stackptr; /* the current paragraph state */ + tag_definition *lastptr; /* the end of the stack */ + simple_output *out; + int space_emitted; + int current_indentation; /* current .in value */ + int pageoffset; /* .po value */ + int linelength; /* current line length */ + + int is_present (HTML_TAG t); + void end_tag (tag_definition *t); + void start_tag (tag_definition *t); + void push_para (HTML_TAG t, char *arg); + char *shutdown (HTML_TAG t); + void check_emit_text (tag_definition *t); + int remove_break (void); + void issue_tag (char *tagname, char *arg); + void issue_table_begin (tag_definition *t); + void issue_table_end (void); + int table_is_void (tag_definition *t); + void remove_def (tag_definition *t); +}; diff -aruN groff-1.16.1/src/devices/grohtml/html.cc groff-1.17/src/devices/grohtml/html.cc --- groff-1.16.1/src/devices/grohtml/html.cc Sun Jun 18 12:09:09 2000 +++ groff-1.17/src/devices/grohtml/html.cc Thu Jan 1 01:00:00 1970 @@ -1,6591 +0,0 @@ -// -*- C++ -*- -/* Copyright (C) 1999 Free Software Foundation, Inc. - * - * Gaius Mulley (gaius@glam.ac.uk) wrote grohtml - * but it owes a huge amount of ideas and raw code from - * James Clark (jjc@jclark.com) grops/ps.cc. - */ - -/* -This file is part of groff. - -groff is free software; you can redistribute it and/or modify it under -the terms of the GNU General Public License as published by the Free -Software Foundation; either version 2, or (at your option) any later -version. - -groff is distributed in the hope that it will be useful, but WITHOUT ANY -WARRANTY; without even the implied warranty of MERCHANTABILITY or -FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -for more details. - -You should have received a copy of the GNU General Public License along -with groff; see the file COPYING. If not, write to the Free Software -Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ - -#include "driver.h" -#include "stringclass.h" -#include "cset.h" - -#include "html.h" -#include "html_chars.h" -#include - -#ifdef HAVE_UNISTD_H -#include -#endif - -extern "C" { - // SunOS 4.1.3 fails to declare this in stdlib.h - char *mktemp(char *); -} - -#include -#include - -#ifndef _POSIX_VERSION - -#ifdef HAVE_LIMITS_H -#include -#endif /* HAVE_LIMITS_H */ - -#ifdef HAVE_DIRENT_H -#include -#else /* not HAVE_DIRENT_H */ -#ifdef HAVE_SYS_DIR_H -#include -#endif /* HAVE_SYS_DIR_H */ -#endif /* not HAVE_DIRENT_H */ - -#ifndef NAME_MAX -#ifdef MAXNAMLEN -#define NAME_MAX MAXNAMLEN -#else /* !MAXNAMLEN */ -#ifdef MAXNAMELEN -#define NAME_MAX MAXNAMELEN -#else /* !MAXNAMELEN */ -#define NAME_MAX 14 -#endif /* !MAXNAMELEN */ -#endif /* !MAXNAMLEN */ -#endif /* !NAME_MAX */ - -#endif /* not _POSIX_VERSION */ - -#include "nonposix.h" - -#include "ordered_list.h" - -#if !defined(TRUE) -# define TRUE (1==1) -#endif -#if !defined(FALSE) -# define FALSE (1==0) -#endif - -#define MAX_TEMP_NAME 1024 -#define MAX_STRING_LENGTH 4096 -#define MAX_CHAR_SIZE 50 // maximum length of character name - -#define Y_FUDGE_MARGIN +0.83 -#define A4_PAGE_LENGTH (11.6944-Y_FUDGE_MARGIN) -#define DEFAULT_IMAGE_RES 80 -#define IMAGE_BOARDER_PIXELS 10 -#define MAX_WORDS_PER_LINE 1000 // only used for table indentation -#define GAP_SPACES 3 // how many spaces needed to guess a gap? -#define GAP_WIDTH_ONE_LINE 2 // 1/GAP_WIDTH_ONE_LINE inches required for one line table -#define CENTER_TOLERANCE 2 // how many pixels off center will we think a line or region is centered -#define MIN_COLUMN 7 // minimum column size pixels for multiple lines -#define MIN_COLUMN_FOR_TWO_LINES 20 // minimum column size pixels for a 2 line table -#define MIN_TEXT_PERCENT 5 // try and round to this percentage value for used columns -#define PERCENT_THRESHOLD 20 // don't bother trying to increase and width greater than this - - -/* - * Only uncomment one of the following to determine default image type. - */ - -#define IMAGE_DEFAULT_PNG -/* #define IMAGE_DEFAULT_GIF */ - - -#if defined(IMAGE_DEFAULT_GIF) -static enum { gif, png } image_type = gif; -static char *image_device = "gif"; -#elif defined(IMAGE_DEFAULT_PNG) -static enum { gif, png } image_type = png; -static char *image_device = "png256"; -#else -# error "you must define either IMAGE_DEFAULT_GIF or IMAGE_DEFAULT_PNG" -#endif - -static int debug_on = FALSE; -static int guess_on = TRUE; -static int margin_on = FALSE; -static int auto_on = TRUE; -static int table_on = TRUE; -static int image_res = DEFAULT_IMAGE_RES; -static int debug_table_on = FALSE; -static int table_image_on = TRUE; // default is to create images for tbl - -static int linewidth = -1; - -#define DEFAULT_LINEWIDTH 40 /* in ems/1000 */ -#define MAX_LINE_LENGTH 72 -#define FILL_MAX 1000 - -void stop () {} - - -/* - * start with a few favorites - */ - -static int min (int a, int b) -{ - if (a < b) { - return( a ); - } else { - return( b ); - } -} - -static int max (int a, int b) -{ - if (a > b) { - return( a ); - } else { - return( b ); - } -} - -/* - * is_subsection - returns TRUE if a1..a2 is within b1..b2 - */ - -static int is_subsection (int a1, int a2, int b1, int b2) -{ - // easier to see whether this is not the case - return( !((a1 < b1) || (a1 > b2) || (a2 < b1) || (a2 > b2)) ); -} - -/* - * is_intersection - returns TRUE if range a1..a2 intersects with b1..b2 - */ - -static int is_intersection (int a1, int a2, int b1, int b2) -{ - // again easier to prove NOT outside limits - return( ! ((a1 > b2) || (a2 < b1)) ); -} - -/* - * is_digit - returns TRUE if character, ch, is a digit. - */ - -static int is_digit (char ch) -{ - return( (ch >= '0') && (ch <= '9') ); -} - -/* - * more_than_line_break - returns TRUE should v1 and v2 differ by more than - * a simple line break. - */ - -static int more_than_line_break (int v1, int v2, int size) -{ - return( abs(v1-v2)>size ); -} - -/* - * the class and methods for styles - */ - -struct style { - font *f; - int point_size; - int font_no; - int height; - int slant; - style (); - style (font *, int, int, int, int); - int operator == (const style &) const; - int operator != (const style &) const; -}; - -style::style() - : f(0) -{ -} - -style::style(font *p, int sz, int h, int sl, int no) - : f(p), point_size(sz), font_no(no), height(h), slant(sl) -{ -} - -int style::operator==(const style &s) const -{ - return (f == s.f && point_size == s.point_size - && height == s.height && slant == s.slant); -} - -int style::operator!=(const style &s) const -{ - return !(*this == s); -} - - -/* - * the class and methods for retaining ascii text - */ - -struct char_block { - enum { SIZE = 256 }; - char buffer[SIZE]; - int used; - char_block *next; - - char_block(); -}; - -char_block::char_block() -: used(0), next(0) -{ -} - -class char_buffer { -public: - char_buffer(); - ~char_buffer(); - char *add_string(char *, unsigned int); -private: - char_block *head; - char_block *tail; -}; - -char_buffer::char_buffer() -: head(0), tail(0) -{ -} - -char_buffer::~char_buffer() -{ - while (head != 0) { - char_block *temp = head; - head = head->next; - delete temp; - } -} - -char *char_buffer::add_string (char *s, unsigned int length) -{ - int i=0; - unsigned int old_used; - - if (tail == 0) { - tail = new char_block; - head = tail; - } else { - if (tail->used + length+1 > char_block::SIZE) { - tail->next = new char_block; - tail = tail->next; - } - } - // at this point we have a tail which is ready for the string. - if (tail->used + length+1 > char_block::SIZE) { - fatal("need to increase char_block::SIZE"); - } - - old_used = tail->used; - do { - tail->buffer[tail->used] = s[i]; - tail->used++; - i++; - length--; - } while (length>0); - - // add terminating nul character - - tail->buffer[tail->used] = '\0'; - tail->used++; - - // and return start of new string - - return( &tail->buffer[old_used] ); -} - -/* - * the classes and methods for maintaining pages and text positions and graphic regions - */ - -class text_glob { -public: - int is_less (text_glob *a, text_glob *b); - text_glob (style *s, char *string, unsigned int length, - int min_vertical, int min_horizontal, - int max_vertical, int max_horizontal, int is_command, int is_html); - text_glob (void); - ~text_glob (void); - - style text_style; - char *text_string; - unsigned int text_length; - int minv, maxv, minh, maxh; - int is_raw_command; // should the text be sent directly to the device? - int is_html_command; // is the raw command definitely for the html device ie not an eqn? -}; - -text_glob::text_glob (style *s, char *string, unsigned int length, - int min_vertical, int min_horizontal, - int max_vertical, int max_horizontal, int is_command, int is_html) - : text_style(*s), text_string(string), text_length(length), - minv(min_vertical), maxv(max_vertical), minh(min_horizontal), maxh(max_horizontal), - is_raw_command(is_command), is_html_command(is_html) -{ -} - -text_glob::text_glob () - : text_string(0), text_length(0), minv(-1), maxv(-1), minh(-1), maxh(-1), - is_raw_command(FALSE), is_html_command(FALSE) -{ -} - -text_glob::~text_glob () -{ -} - -int text_glob::is_less (text_glob *a, text_glob *b) -{ - if (is_intersection(a->minv+1, a->maxv-1, b->minv+1, b->maxv-1)) { - return( a->minh < b->minh ); - } else { - return( a->maxv < b->maxv ); - } -} - -struct xycoord { - int x; - int y; -}; - -class graphic_glob { -public: - int is_less (graphic_glob *a, graphic_glob *b); - graphic_glob (int troff_code); - graphic_glob (void); - ~graphic_glob (void); - - int minv, maxv, minh, maxh; - int xc, yc; - int nopoints; // number of points allocated in array below - struct xycoord *point; - int size; - int fill; - int code; -}; - -graphic_glob::graphic_glob () - : minv(-1), maxv(-1), minh(-1), maxh(-1), nopoints(0), point(0), size(0), code(0) -{ -} - -graphic_glob::~graphic_glob () -{ - if (point != 0) { - free(point); - } -} - -graphic_glob::graphic_glob (int troff_code) - : minv(-1), maxv(-1), minh(-1), maxh(-1), nopoints(0), point(0), size(0), code(troff_code) -{ -} - -int graphic_glob::is_less (graphic_glob *a, graphic_glob *b) -{ - return( (a->minv < b->minv) || ((a->minv == b->minv) && (a->minh < b->minh)) ); -} - -class region_glob { -public: - region_glob (void); - ~region_glob (void); - int is_less (region_glob *a, region_glob *b); - - int minv, maxv, minh, maxh; -}; - -int region_glob::is_less (region_glob *a, region_glob *b) -{ - return( (a->minv < b->minv) || ((a->minv == b->minv) && (a->minh < b->minh)) ); -} - -region_glob::region_glob (void) - : minv(-1), maxv(-1), minh(-1), maxh(-1) -{ -} - -region_glob::~region_glob (void) -{ -} - -class page { -public: - page (void); - void add (style *s, char *string, unsigned int length, - int min_vertical, int min_horizontal, - int max_vertical, int max_horizontal); - void add_html_command (style *s, char *string, unsigned int length, - int min_vertical, int min_horizontal, - int max_vertical, int max_horizontal); - void add_special_char (style *s, char *string, unsigned int length, - int min_vertical, int min_horizontal, - int max_vertical, int max_horizontal); - void add_line (int code, int x1, int y1, int x2, int y2, int size, int fill); - void add_arc (int code, int xc, int yc, int *p, double *c, int size, int fill); - void add_polygon (int code, int np, int *p, int oh, int ov, int size, int fill); - void add_spline (int code, int xc, int yc, int np, int *p, int size, int fill); - void calculate_region (void); - int is_in_region (graphic_glob *g); - int can_grow_region (graphic_glob *g); - void make_new_region (graphic_glob *g); - int has_line (region_glob *r); - int has_word (region_glob *r); - int no_raw_commands (int minv, int maxv); - - // and the data - - ordered_list regions; // squares of bitmapped pics,eqn,tbl's - ordered_list words; // position of words on page - ordered_list lines; // position of lines on page - char_buffer buffer; // all characters for this page - int is_in_graphic; // should graphics and words go below or above - ordered_list region_words; // temporary accumulation of words in a region - ordered_list region_lines; // (as above) and used so that we can determine - // the regions vertical limits -}; - -page::page() - : is_in_graphic(FALSE) -{ -} - -void page::add (style *s, char *string, unsigned int length, - int min_vertical, int min_horizontal, - int max_vertical, int max_horizontal) -{ - if (length > 0) { - text_glob *g=new text_glob(s, buffer.add_string(string, length), length, - min_vertical, min_horizontal, max_vertical, max_horizontal, FALSE, FALSE); - if (is_in_graphic) { - region_words.add(g); - } else { - words.add(g); - } - } -} - -/* - * add_html_command - it only makes sense to add html commands when we are not inside - * a graphical entity. - */ - -void page::add_html_command (style *s, char *string, unsigned int length, - int min_vertical, int min_horizontal, - int max_vertical, int max_horizontal) -{ - if ((length > 0) && (! is_in_graphic)) { - text_glob *g=new text_glob(s, buffer.add_string(string, length), length, - min_vertical, min_horizontal, max_vertical, max_horizontal, TRUE, TRUE); - words.add(g); - } -} - -/* - * add_special_char - it only makes sense to add special characters when we are inside - * a graphical entity. - */ - -void page::add_special_char (style *s, char *string, unsigned int length, - int min_vertical, int min_horizontal, - int max_vertical, int max_horizontal) -{ - if ((length > 0) && (is_in_graphic)) { - text_glob *g=new text_glob(s, buffer.add_string(string, length), length, - min_vertical, min_horizontal, max_vertical, max_horizontal, TRUE, FALSE); - region_words.add(g); - } -} - -void page::add_line (int code, int x1, int y1, int x2, int y2, int size, int fill) -{ - graphic_glob *g = new graphic_glob(code); - - g->minh = min(x1, x2); - g->maxh = max(x1, x2); - g->minv = min(y1, y2); - g->maxv = max(y1, y2); - g->point = (struct xycoord *)malloc(sizeof(xycoord)*2); - g->nopoints = 2; - g->point[0].x = x1 ; - g->point[0].y = y1 ; - g->point[1].x = x2 ; - g->point[1].y = y2 ; - g->xc = 0; - g->yc = 0; - g->size = size; - g->fill = fill; - - if (is_in_graphic) { - region_lines.add(g); - } else { - lines.add(g); - } -} - -/* - * assign_min_max_for_arc - works out the smallest box that will encompass an - * arc defined by: origin: g->xc, g->xc - * and vector (p[0], p[1]) and (p[2], p[3]) - */ - -void assign_min_max_for_arc (graphic_glob *g, int *p, double *c) -{ - int radius = (int) sqrt(c[0]*c[0]+c[1]*c[1]); - int xv1 = p[0]; - int yv1 = p[1]; - int xv2 = p[2]; - int yv2 = p[3]; - int x1 = g->xc+xv1; - int y1 = g->yc+yv1; - int x2 = g->xc+xv1+xv2; - int y2 = g->yc+yv1+yv2; - - // firstly lets use the 'circle' limitation - g->minh = x1-radius; - g->maxh = x1+radius; - g->minv = y1-radius; - g->maxv = y1+radius; - - // incidentally I'm sure there is a better way to do this, but I don't know it - // please can someone let me know or "improve" this function - - // now see which min/max can be reduced and increased for the limits of the arc - // - // - // Q2 | Q1 - // -----+----- - // Q3 | Q4 - // - - - if ((xv1>=0) && (yv1>=0)) { - // first vector in Q3 - if ((xv2>=0) && (yv2>=0)) { - // second in Q1 - g->maxh = x2; - g->minv = y1; - } else if ((xv2<0) && (yv2>=0)) { - // second in Q2 - g->maxh = x2; - g->minv = y1; - } else if ((xv2>=0) && (yv2<0)) { - // second in Q4 - g->minv = min(y1, y2); - } else if ((xv2<0) && (yv2<0)) { - // second in Q3 - if (x1>=x2) { - g->minh = x2; - g->maxh = x1; - g->minv = min(y1, y2); - g->maxv = max(y1, y2); - } else { - // xv2, yv2 could all be zero? - } - } - } else if ((xv1>=0) && (yv1<0)) { - // first vector in Q2 - if ((xv2>=0) && (yv2>=0)) { - // second in Q1 - g->maxh = max(x1, x2); - g->minh = min(x1, x2); - g->minv = y1; - } else if ((xv2<0) && (yv2>=0)) { - // second in Q2 - if (x1maxh = x2; - g->minh = x1; - g->minv = min(y1, y2); - g->maxv = max(y1, y2); - } else { - // otherwise almost full circle anyway - } - } else if ((xv2>=0) && (yv2<0)) { - // second in Q4 - g->minv = y2; - g->minh = x1; - } else if ((xv2<0) && (yv2<0)) { - // second in Q3 - g->minh = min(x1, x2); - } - } else if ((xv1<0) && (yv1<0)) { - // first vector in Q1 - if ((xv2>=0) && (yv2>=0)) { - // second in Q1 - if (x1minh = x1; - g->maxh = x2; - g->minv = min(y1, y2); - g->maxv = max(y1, y2); - } else { - // nearly full circle - } - } else if ((xv2<0) && (yv2>=0)) { - // second in Q2 - g->maxv = max(y1, y2); - } else if ((xv2>=0) && (yv2<0)) { - // second in Q4 - g->minv = min(y1, y2); - g->maxv = max(y1, y2); - g->minh = min(x1, x2); - } else if ((xv2<0) && (yv2<0)) { - // second in Q3 - g->minh = x2; - g->maxv = y1; - } - } else if ((xv1<0) && (yv1>=0)) { - // first vector in Q4 - if ((xv2>=0) && (yv2>=0)) { - // second in Q1 - g->maxh = max(x1, x2); - } else if ((xv2<0) && (yv2>=0)) { - // second in Q2 - g->maxv = max(y1, y2); - g->maxh = max(x1, x2); - } else if ((xv2>=0) && (yv2<0)) { - // second in Q4 - if (x1>=x2) { - g->minv = min(y1, y2); - g->maxv = max(y1, y2); - g->minh = min(x1, x2); - g->maxh = max(x2, x2); - } else { - // nearly full circle - } - } else if ((xv2<0) && (yv2<0)) { - // second in Q3 - g->maxv = max(y1, y2); - g->minh = min(x1, x2); - g->maxh = max(x1, x2); - } - } - // this should *never* happen but if it does it means a case above is wrong.. - - // this code is only present for safety sake - if (g->maxh < g->minh) { - if (debug_on) { - fprintf(stderr, "assert failed minh > maxh\n"); fflush(stderr); - // stop(); - } - g->maxh = g->minh; - } - if (g->maxv < g->minv) { - if (debug_on) { - fprintf(stderr, "assert failed minv > maxv\n"); fflush(stderr); - // stop(); - } - g->maxv = g->minv; - } -} - -void page::add_arc (int code, int xc, int yc, int *p, double *c, int size, int fill) -{ - graphic_glob *g = new graphic_glob(code); - - g->point = (struct xycoord *)malloc(sizeof(xycoord)*2); - g->nopoints = 2; - g->point[0].x = p[0] ; - g->point[0].y = p[1] ; - g->point[1].x = p[2] ; - g->point[1].y = p[3] ; - g->xc = xc; - g->yc = yc; - g->size = size; - g->fill = fill; - - assign_min_max_for_arc(g, p, c); - - if (is_in_graphic) { - region_lines.add(g); - } else { - lines.add(g); - } -} - - -void page::add_polygon (int code, int np, int *p, int oh, int ov, int size, int fill) -{ - graphic_glob *g = new graphic_glob(code); - int j = 0; - int i; - - g->point = (struct xycoord *)malloc(sizeof(xycoord)*np/2); - g->nopoints = np/2; - - for (i=0; inopoints; i++) { - g->point[i].x = p[j]; - j++; - g->point[i].y = p[j]; - j++; - } - // now calculate min/max - g->minh = g->point[0].x; - g->minv = g->point[0].y; - g->maxh = g->point[0].x; - g->maxv = g->point[0].y; - for (i=1; inopoints; i++) { - g->minh = min(g->minh, g->point[i].x); - g->minv = min(g->minv, g->point[i].y); - g->maxh = max(g->maxh, g->point[i].x); - g->maxv = max(g->maxv, g->point[i].y); - } - g->size = size; - g->xc = oh; - g->yc = ov; - g->fill = fill; - - if (is_in_graphic) { - region_lines.add(g); - } else { - lines.add(g); - } -} - -void page::add_spline (int code, int xc, int yc, int np, int *p, int size, int fill) -{ - graphic_glob *g = new graphic_glob(code); - int j = 0; - int i; - - g->point = (struct xycoord *)malloc(sizeof(xycoord)*np/2); - g->nopoints = np/2; - - for (i=0; inopoints; i++) { - g->point[i].x = p[j]; - j++; - g->point[i].y = p[j]; - j++; - } - // now calculate min/max - g->minh = min(g->point[0].x, g->point[0].x/2); - g->minv = min(g->point[0].y, g->point[0].y/2); - g->maxh = max(g->point[0].x, g->point[0].x/2); - g->maxv = max(g->point[0].y, g->point[0].y/2); - - /* tnum/tden should be between 0 and 1; the closer it is to 1 - the tighter the curve will be to the guiding lines; 2/3 - is the standard value */ - const int tnum = 2; - const int tden = 3; - - for (i=1; inopoints-1; i++) { - g->minh = min(g->minh, g->point[i].x*tnum/(2*tden)); - g->minv = min(g->minv, g->point[i].y*tnum/(2*tden)); - g->maxh = max(g->maxh, g->point[i].x*tnum/(2*tden)); - g->maxv = max(g->maxv, g->point[i].y*tnum/(2*tden)); - - g->minh = min(g->minh, g->point[i].x/2+(g->point[i+1].x*(tden-tden))/(2*tden)); - g->minv = min(g->minv, g->point[i].y/2+(g->point[i+1].y*(tden-tden))/(2*tden)); - g->maxh = max(g->maxh, g->point[i].x/2+(g->point[i+1].x*(tden-tden))/(2*tden)); - g->maxv = max(g->maxv, g->point[i].y/2+(g->point[i+1].y*(tden-tden))/(2*tden)); - - g->minh = min(g->minh, (g->point[i].x-g->point[i].x/2) + g->point[i+1].x/2); - g->minv = min(g->minv, (g->point[i].y-g->point[i].y/2) + g->point[i+1].y/2); - g->maxh = max(g->maxh, (g->point[i].x-g->point[i].x/2) + g->point[i+1].x/2); - g->maxv = max(g->maxv, (g->point[i].y-g->point[i].y/2) + g->point[i+1].y/2); - } - i = g->nopoints-1; - - g->minh = min(g->minh, (g->point[i].x-g->point[i].x/2)) + xc; - g->minv = min(g->minv, (g->point[i].y-g->point[i].y/2)) + yc; - g->maxh = max(g->maxh, (g->point[i].x-g->point[i].x/2)) + xc; - g->maxv = max(g->maxv, (g->point[i].y-g->point[i].y/2)) + yc; - - g->size = size; - g->xc = xc; - g->yc = yc; - g->fill = fill; - - if (is_in_graphic) { - region_lines.add(g); - } else { - lines.add(g); - } -} - -class html_font : public font { - html_font(const char *); -public: - int encoding_index; - char *encoding; - char *reencoded_name; - ~html_font(); - static html_font *load_html_font(const char *); -}; - -html_font *html_font::load_html_font(const char *s) -{ - html_font *f = new html_font(s); - if (!f->load()) { - delete f; - return 0; - } - return f; -} - -html_font::html_font(const char *nm) -: font(nm) -{ -} - -html_font::~html_font() -{ -} - -/* - * a simple class to contain the header to this document - */ - -class title_desc { -public: - title_desc (); - ~title_desc (); - - int has_been_written; - int has_been_found; - char text[MAX_STRING_LENGTH]; -}; - - -title_desc::title_desc () - : has_been_written(FALSE), has_been_found(FALSE) -{ -} - -title_desc::~title_desc () -{ -} - -class header_desc { -public: - header_desc (); - ~header_desc (); - - int no_of_headings; // how many headings have we found? - char_buffer headings; // all the headings used in the document - ordered_list headers; - int header_level; // current header level - int written_header; // have we written the header yet? - char header_buffer[MAX_STRING_LENGTH]; // current header text - - void write_headings (FILE *f); -}; - -header_desc::header_desc () - : no_of_headings(0), header_level(2), written_header(0) -{ -} - -header_desc::~header_desc () -{ -} - -/* - * paragraph_type - alignment for a new paragraph - */ - -typedef enum { left_alignment, center_alignment } paragraph_type; - -/* - * text_defn - defines the limit of text, initially these are stored in the - * column array as words. Later we examine the white space between - * the words in successive lines to find out whether we can detect - * distinct columns. The columns are generated via html tables. - */ - -struct text_defn { - int left; // the start of a word or text - int right; // the end of the text and beginning of white space - int is_used; // will this this column be used for words or space - int right_hits; // count of the number of words touching right position - int percent; // what percentage width should we use for this cell? -}; - -/* - * introduce a paragraph class so that we can nest paragraphs - * from plain html text and html tables. - */ - -class html_paragraph { -public: - html_paragraph (int in, int need, paragraph_type type, html_paragraph *prev); - ~html_paragraph (); - - int in_paragraph; - int need_paragraph; - paragraph_type para_type; - html_paragraph *previous; -}; - -/* - * html_paragraph - constructor, fill in the public fields. - */ - -html_paragraph::html_paragraph (int in, int need, paragraph_type type, html_paragraph *prev) - : in_paragraph(in), need_paragraph(need), - para_type(type), previous(prev) -{ -} - -/* - * html_paragraph - deconstructor - */ - -html_paragraph::~html_paragraph () -{ -} - -/* - * note that html_tables are currently only used to provide a better - * indentation mechanism for html text (in particular it allows grohtml - * to render .IP and .2C together with autoformatting). - */ - -class html_table { -public: - html_table (); - ~html_table (); - - int no_of_columns; // how many columns are we using? - struct text_defn *columns; // left and right margins for each column - int vertical_limit; // the limit of the table - int wrap_margin; // is the current rightmost margin able to wrap words? -}; - -html_table::html_table () - : no_of_columns(0), columns(0), vertical_limit(0), wrap_margin(0) -{ -} - -html_table::~html_table () -{ -} - -class html_printer : public printer { - FILE *tempfp; - simple_output html; - simple_output troff; - int res; - int postscript_res; - int space_char_index; - int no_of_printed_pages; - int paper_length; - enum { SBUF_SIZE = 8192 }; - char sbuf[SBUF_SIZE]; - int sbuf_len; - int sbuf_start_hpos; - int sbuf_vpos; - int sbuf_end_hpos; - int sbuf_kern; - style sbuf_style; - int sbuf_dmark_hpos; - style output_style; - int output_hpos; - int output_vpos; - int output_draw_point_size; - int line_thickness; - int output_line_thickness; - int fill; - unsigned char output_space_code; - string defs; - char *inside_font_style; - int page_number; - title_desc title; - header_desc header; - int header_indent; - page *page_contents; - html_table indentation; - int left_margin_indent; - int right_margin_indent; - int need_one_newline; - int issued_newline; - html_paragraph *current_paragraph; - char image_name[MAX_STRING_LENGTH]; - int image_number; - int graphic_level; - int supress_sub_sup; - - int start_region_vpos; - int start_region_hpos; - int end_region_vpos; - int end_region_hpos; - int cutoff_heading; - - struct graphic_glob *start_graphic; - struct text_glob *start_text; - - void flush_sbuf (); - void set_style (const style &); - void set_space_code (unsigned char c); - void do_exec (char *, const environment *); - void do_import (char *, const environment *); - void do_def (char *, const environment *); - void do_mdef (char *, const environment *); - void do_file (char *, const environment *); - void set_line_thickness (const environment *); - void change_font (text_glob *g, int is_to_html); - void terminate_current_font (void); - void flush_font (void); - void flush_page (void); - void add_char_to_sbuf (unsigned char code); - void add_to_sbuf (char code, const char *name); - void display_word (text_glob *g, int is_to_html); - void html_display_word (text_glob *g); - void troff_display_word (text_glob *g); - void display_line (graphic_glob *g, int is_to_html); - void display_fill (graphic_glob *g); - void calculate_margin (void); - void traverse_page_regions (void); - void dump_page (void); - int is_within_region (graphic_glob *g); - int is_within_region (text_glob *t); - int is_less (graphic_glob *g, text_glob *t); - void display_globs (int is_to_html); - void move_horizontal (text_glob *g, int left_margin); - void move_vertical (text_glob *g, paragraph_type p); - void write_html_font_face (const char *fontname, const char *left, const char *right); - void write_html_font_type (const char *fontname, const char *left, const char *right); - void html_change_font (text_glob *g, const char *fontname, int size); - char *html_position_text (text_glob *g, int left_margin, int right_margin); - int html_position_region (void); - void troff_change_font (const char *fontname, int size, int font_no); - void troff_position_text (text_glob *g); - int pretend_is_on_same_line (text_glob *g, int left_margin, int right_margin); - int is_on_same_line (text_glob *g, int vpos); - int looks_like_subscript (text_glob *g); - int looks_like_superscript (text_glob *g); - int looks_like_smaller_font (text_glob *g); - int looks_like_larger_font (text_glob *g); - void begin_paragraph (paragraph_type p); - void begin_paragraph_no_height (paragraph_type p); - void force_begin_paragraph (void); - void end_paragraph (void); - void save_paragraph (void); - void restore_paragraph (void); - void html_newline (void); - void convert_to_image (char *troff_src, char *image_name); - void write_title (int in_head); - void find_title (void); - int is_bold (text_glob *g); - void write_header (text_glob *g); - void determine_header_level (void); - void build_header (text_glob *g); - void make_html_indent (int indent); - int is_whole_line_bold (text_glob *g); - int is_a_header (text_glob *g); - int processed_header (text_glob *g); - void make_new_image_name (void); - void calculate_region_margins (region_glob *r); - void remove_redundant_regions (void); - void remove_duplicate_regions (void); - void move_region_to_page (void); - void calculate_region_range (graphic_glob *r); - void flush_graphic (void); - void write_string (graphic_glob *g, int is_to_html); - void prologue (void); - int gs_x (int x); - int gs_y (int y); - void display_regions (void); - int check_able_to_use_table (text_glob *g); - int using_table_for_indent (void); - int collect_columns (struct text_defn *next_words, struct text_defn *next_cols, - struct text_defn *last_words, struct text_defn *last_cols, - int max_words); - void include_into_list (struct text_defn *line, struct text_defn *item); - int is_in_column (struct text_defn *line, struct text_defn *item, int max_words); - int is_column_match (struct text_defn *match, struct text_defn *line1, - struct text_defn *line2, int max_words); - int count_columns (struct text_defn *line); - void rewind_text_to (text_glob *g); - int found_use_for_table (text_glob *start); - void column_display_word (int cell, int vert, int left, int right, int next); - void start_table (void); - void end_table (void); - void foreach_column_include_text (text_glob *start); - void define_cell (int i); - int column_calculate_left_margin (int left, int right); - int column_calculate_right_margin (int left, int right); - void display_columns (const char *word, const char *name, text_defn *line); - void calculate_right (struct text_defn *line, int max_words); - void determine_right_most_column (struct text_defn *line, int max_words); - int remove_white_using_words (struct text_defn *next_guess, struct text_defn *last_guess, struct text_defn *next_line); - void copy_line (struct text_defn *dest, struct text_defn *src); - void combine_line (struct text_defn *dest, struct text_defn *src); - int conflict_with_words (struct text_defn *column_guess, struct text_defn *words); - void remove_entry_in_line (struct text_defn *line, int j); - void remove_redundant_columns (struct text_defn *line); - void add_column_gaps (struct text_defn *line); - int continue_searching_column (text_defn *next_col, text_defn *last_col, text_defn *all_words); - void add_right_full_width (struct text_defn *line, int mingap); - int is_continueous_column (text_defn *last_col, text_defn *next_line); - int is_exact_left (text_defn *last_col, text_defn *next_line); - int find_column_index_in_line (text_glob *t, text_defn *line); - void emit_space (text_glob *g, int force_space); - int is_in_middle (int left, int right); - int check_able_to_use_center (text_glob *g); - void write_centered_line (text_glob *g); - int single_centered_line (text_defn *first, text_defn *second, text_glob *g); - int determine_row_limit (text_glob *start, int v); - void assign_used_columns (text_glob *start); - int find_column_index (text_glob *t); - int large_enough_gap (text_defn *last_col); - int is_worth_column (int left, int right); - int is_subset_of_columns (text_defn *a, text_defn *b); - void count_hits (text_defn *col, int no_of_columns, int limit); - void count_right_hits (text_defn *col, int no_of_columns); - int calculate_min_gap (text_glob *g); - int right_indentation (struct text_defn *last_guess); - void calculate_percentage_width (text_glob *start); - int able_to_steal_width (void); - int need_to_steal_width (void); - int can_distribute_fairly (void); - void utilize_round_off (void); - int will_wrap_text (int i, text_glob *start); - int next_line_on_left_column (int i, text_glob *start); - void remove_table_column (int i); - void remove_unnecessary_unused (text_glob *start); - int is_small_table (int lines, struct text_defn *last_guess, - struct text_defn *words_1, struct text_defn *cols_1, - struct text_defn *words_2, struct text_defn *cols_2, - int *limit, int *limit_1); - int is_column_subset (struct text_defn *cols_1, struct text_defn *cols_2); - int is_appropriate_to_start_table (struct text_defn *cols_1, struct text_defn *cols_2, - struct text_defn *last_guess); - int is_a_full_width_column (void); - int right_most_column (struct text_defn *col); - int large_enough_gap_for_two (struct text_defn *col); - void remove_zero_percentage_column (void); - void translate_to_html (text_glob *g); - int html_knows_about (char *troff); - void determine_diacritical_mark (const char *name, const environment *env); - int sbuf_continuation (unsigned char code, const char *name, const environment *env, int w); - char *remove_last_char_from_sbuf (); - const char *check_diacritical_combination (unsigned char code, const char *name); - int seen_backwards_escape (char *s, int l); - int should_defer_table (int lines, struct text_glob *start, struct text_defn *cols_1); - int is_new_exact_right (struct text_defn *last_guess, struct text_defn *last_cols, struct text_defn *next_cols); - void issue_left_paragraph (void); - void adjust_margin_percentages (void); - int total_percentages (void); - int get_left (void); - void can_loose_column (text_glob *start, struct text_defn *last_guess, int limit); - int check_lack_of_hits (struct text_defn *next_guess, struct text_defn *last_guess, text_glob *start, int limit); - int is_in_table (void); - - // ADD HERE - -public: - html_printer(); - ~html_printer(); - void set_char(int i, font *f, const environment *env, int w, const char *name); - void draw(int code, int *p, int np, const environment *env); - void begin_page(int); - void end_page(int); - void special(char *arg, const environment *env); - font *make_font(const char *); - void end_of_line(); -}; - -html_printer::html_printer() -: html(0, MAX_LINE_LENGTH), - troff(0, MAX_LINE_LENGTH), - no_of_printed_pages(0), - sbuf_len(0), - sbuf_dmark_hpos(-1), - output_hpos(-1), - output_vpos(-1), - line_thickness(-1), - fill(FILL_MAX + 1), - inside_font_style(0), - page_number(0), - header_indent(-1), - left_margin_indent(0), - right_margin_indent(0), - need_one_newline(0), - issued_newline(0), - image_number(0), - graphic_level(0), - supress_sub_sup(TRUE), - start_region_vpos(0), - start_region_hpos(0), - end_region_vpos(0), - end_region_hpos(0), - cutoff_heading(100) -{ - tempfp = xtmpfile(); - html.set_file(tempfp); - if (linewidth < 0) - linewidth = DEFAULT_LINEWIDTH; - if (font::hor != 1) - fatal("horizontal resolution must be 1"); - if (font::vert != 1) - fatal("vertical resolution must be 1"); -#if 0 - // should be sorted html.. - if (font::res % (font::sizescale*72) != 0) - fatal("res must be a multiple of 72*sizescale"); -#endif - int r = font::res; - int point = 0; - while (r % 10 == 0) { - r /= 10; - point++; - } - res = r; - html.set_fixed_point(point); - space_char_index = font::name_to_index("space"); - paper_length = font::paperlength; - if (paper_length == 0) - paper_length = 11*font::res; - page_contents = new page; - - postscript_res = 72000; - current_paragraph = new html_paragraph(FALSE, FALSE, left_alignment, 0); -} - -/* - * add_char_to_sbuf - adds a single character to the sbuf. - */ - -void html_printer::add_char_to_sbuf (unsigned char code) -{ - if (sbuf_len < SBUF_SIZE) { - sbuf[sbuf_len] = code; - sbuf_len++; - } else { - fatal("need to increase SBUF_SIZE"); - } -} - -/* - * add_to_sbuf - adds character code or name to the sbuf. - * It escapes \ with \\ - * We need to preserve the name of characters if they exist - * because we may need to send this character to two different - * devices: html and postscript. - */ - -void html_printer::add_to_sbuf (char code, const char *name) -{ - if (name == 0) { - if (code == '\\') { - add_char_to_sbuf('\\'); - } - add_char_to_sbuf(code); - } else { - int l=strlen(name); - int i=0; - - add_char_to_sbuf('\\'); - add_char_to_sbuf('('); - while (ihpos) || (sbuf_dmark_hpos == env->hpos)) { - name = check_diacritical_combination(code, name); - add_to_sbuf(code, name); - determine_diacritical_mark(name, env); - sbuf_end_hpos += w + sbuf_kern; - return( TRUE ); - } else { - if ((sbuf_len < SBUF_SIZE-1) && (env->hpos >= sbuf_end_hpos) && - ((sbuf_kern == 0) || (sbuf_end_hpos - sbuf_kern != env->hpos))) { - /* - * lets see whether a space is needed or not - */ - int space_width = sbuf_style.f->get_space_width(sbuf_style.point_size); - - if (env->hpos-sbuf_end_hpos < space_width) { - name = check_diacritical_combination(code, name); - add_to_sbuf(code, name); - determine_diacritical_mark(name, env); - sbuf_end_hpos = env->hpos + w; - return( TRUE ); - } - } else if ((sbuf_len > 0) && (sbuf_dmark_hpos)) { - /* - * check whether the diacritical mark is on the same character - */ - int space_width = sbuf_style.f->get_space_width(sbuf_style.point_size); - - if (abs(sbuf_dmark_hpos-env->hpos) < space_width) { - name = check_diacritical_combination(code, name); - add_to_sbuf(code, name); - determine_diacritical_mark(name, env); - sbuf_end_hpos = env->hpos + w; - return( TRUE ); - } - } - } - return( FALSE ); -} - -/* - * seen_backwards_escape - returns TRUE if we can see a escape at position i..l in s - */ - -int html_printer::seen_backwards_escape (char *s, int l) -{ - /* - * this is tricky so it is broken into components for clarity - * (we let the compiler put in all back into a complex expression) - */ - if ((l>0) && (sbuf[l] == '(') && (sbuf[l-1] == '\\')) { - /* - * ok seen '\(' but we must now check for '\\(' - */ - if ((l>1) && (sbuf[l-2] == '\\')) { - /* - * escaped the escape - */ - return( FALSE ); - } else { - return( TRUE ); - } - } else { - return( FALSE ); - } -} - -/* - * reverse - return reversed string. - */ - -char *reverse (char *s) -{ - int i=0; - int j=strlen(s)-1; - char t; - - while (i0) { - l--; - if ((sbuf[l] == ')') && (l>0) && (sbuf[l-1] == '\\')) { - /* - * found terminating escape - */ - int i=0; - - l -= 2; - while ((l>0) && (! seen_backwards_escape(sbuf, l))) { - if (sbuf[l] == '\\') { - if (sbuf[l-1] == '\\') { - last[i] = sbuf[l]; - i++; - l--; - } - } else { - last[i] = sbuf[l]; - i++; - } - l--; - } - last[i] = (char)0; - sbuf_len = l; - if (seen_backwards_escape(sbuf, l)) { - sbuf_len--; - } - return( reverse(last) ); - } else { - if ((sbuf[l] == '\\') && (l>0) && (sbuf[l-1] == '\\')) { - l -= 2; - sbuf_len = l; - return( "\\" ); - } else { - sbuf_len--; - last[0] = sbuf[sbuf_len]; - last[1] = (char)0; - return( last ); - } - } - } else { - return( NULL ); - } -} - -/* - * check_diacriticial_combination - checks to see whether the character code - * if combined with the previous diacriticial mark - * forms a new character. - */ - -const char *html_printer::check_diacritical_combination (unsigned char code, const char *name) -{ - static char troff_char[2]; - - if ((name == 0) && (sbuf_dmark_hpos >= 0)) { - // last character was a diacritical mark - char *last = remove_last_char_from_sbuf(); - - int i=0; - int j; - - while (diacritical_table[i].mark != NULL) { - if (strcmp(diacritical_table[i].mark, last) == 0) { - j=0; - while ((diacritical_table[i].second_troff_char[j] != (char)0) && - (diacritical_table[i].second_troff_char[j] != code)) { - j++; - } - if (diacritical_table[i].second_troff_char[j] == code) { - troff_char[0] = diacritical_table[i].translation; - troff_char[1] = code; - troff_char[2] = (char)0; - return( troff_char ); - } - } - i++; - } - add_to_sbuf(last[0], last); - } - return( name ); -} - -/* - * determine_diacritical_mark - if name is a diacriticial mark the record the position. - * --fixme-- is there a better way of doing this - * this must be done in troff somewhere. - */ - -void html_printer::determine_diacritical_mark (const char *name, const environment *env) -{ - if (name != 0) { - int i=0; - - while (diacritical_table[i].mark != NULL) { - if (strcmp(name, diacritical_table[i].mark) == 0) { - sbuf_dmark_hpos = env->hpos; - return; - } - i++; - } - } - sbuf_dmark_hpos = -1; -} - -/* - * set_char - adds a character into the sbuf if it is a continuation with the previous - * word otherwise flush the current sbuf and add character anew. - */ - -void html_printer::set_char(int i, font *f, const environment *env, int w, const char *name) -{ - unsigned char code = f->get_code(i); - -#if 0 - if (code == ' ') { - stop(); - } -#endif - style sty(f, env->size, env->height, env->slant, env->fontno); - if (sty.slant != 0) { - if (sty.slant > 80 || sty.slant < -80) { - error("silly slant `%1' degrees", sty.slant); - sty.slant = 0; - } - } - if ((name != 0) && (page_contents->is_in_graphic)) { - flush_sbuf(); - int r=font::res; // resolution of the device - page_contents->add_special_char(&sty, (char *)name, strlen(name), - env->vpos-sty.point_size*r/72, env->hpos, - env->vpos , env->hpos+w); - sbuf_end_hpos = env->hpos + w; - sbuf_start_hpos = env->hpos; - sbuf_vpos = env->vpos; - sbuf_style = sty; - sbuf_kern = 0; - } else { - if ((sbuf_len > 0) && (sbuf_len < SBUF_SIZE) && (sty == sbuf_style) && - (sbuf_vpos == env->vpos) && (sbuf_continuation(code, name, env, w))) { - return; - } else { - flush_sbuf(); - sbuf_len = 0; - add_to_sbuf(code, name); - determine_diacritical_mark(name, env); - sbuf_end_hpos = env->hpos + w; - sbuf_start_hpos = env->hpos; - sbuf_vpos = env->vpos; - sbuf_style = sty; - sbuf_kern = 0; - } - } -} - -/* - * file_name_max - return the maximum file-name length permitted - * by the underlying filesystem. - * - * (Code shamelessly stolen from indxbib/dirnamemax.c.) - */ - -static size_t -file_name_max (const char *fname) -{ -#ifdef _POSIX_VERSION - return pathconf (fname, _PC_NAME_MAX); -#else - return NAME_MAX; -#endif -} - - -/* - * make_new_image_name - creates a new file name ready for a image file. - */ - -void html_printer::make_new_image_name (void) -{ - image_number++; - - if ((current_filename == 0) || - (strcmp(current_filename, "") == 0) || - (strcmp(current_filename, "-") == 0) || - (strcspn(current_filename, DIR_SEPS) < strlen(current_filename))) { - if (file_name_max(".") > 14) - sprintf(image_name, "groff-html-%d-%ld", image_number, (long)getpid()); - else - // The "-gh" part might be truncated on MS-DOS, but there's enough - // space for the PID and up to 99 image numbers. That's why "-gh" - // comes last. - sprintf(image_name, "%d-%ld-gh", image_number, (long)getpid()); - } else if (file_name_max(".") > 14) { - sprintf(image_name, "%s-%d-%ld", current_filename, image_number, (long)getpid()); - } else { // see the commentary above - sprintf(image_name, "%d-%ld-%s", - image_number, (long)getpid(), current_filename); - // Make sure image_name does not have a dot in its trunk, since - // convert_to_image will append .gif or .png to it, and DOS doesn't - // allow more than a single dot in a file name. - int i = strlen(image_name); - for ( ; i > 0; i--) { - if (strchr(DIR_SEPS, image_name[i - 1])) - break; - if (image_name[i - 1] == '.') { - image_name[i - 1] = '\0'; - break; - } - } - } -} - -/* - * write_title - writes the title to this document - */ - -void html_printer::write_title (int in_head) -{ - if (title.has_been_found) { - if (in_head) { - html.put_string(""); - html.put_string(title.text); - html.put_string("\n"); - } else { - title.has_been_written = TRUE; - html.put_string("

"); - html.put_string(title.text); - html.put_string("

\n"); - } - } -} - -/* - * get_html_translation - given the position of the character and its name - * return the device encoding for such character. - */ - -char *get_html_translation (font *f, char *name) -{ - int index; - - if ((f == 0) || (name == 0) || (strcmp(name, "") == 0)) { - return( NULL ); - } else { - index = f->name_to_index(name); - if (index == 0) { - error("character `%s' not found", name); - return( NULL ); - } else { - return( (char *)f->get_special_device_encoding(index) ); - } - } -} - -/* - * str_translate_to_html - converts a string, str, into html text. It places - * the output input buffer, buf. It truncates string, str, if - * there is not enough space in buf. - * It looks up the html character encoding of single characters - * if, and_single, is TRUE. Characters such as < > & etc. - */ - -void str_translate_to_html (font *f, char *buf, int buflen, char *str, int len, int and_single) -{ - int l; - char *translation; - int e; - char escaped_char[MAX_STRING_LENGTH]; - int i=0; - int b=0; - int t=0; - -#if 0 - if (strcmp(str, "\\(\\\\-\\)") == 0) { - stop(); - } -#endif - while (str[i] != (char)0) { - if ((str[i]=='\\') && (i+1 0) { - translation = get_html_translation(f, escaped_char); - if (translation) { - l = strlen(translation); - t = max(0, min(l, buflen-b)); - strncpy(&buf[b], translation, t); - b += t; - } else { - int index=f->name_to_index(escaped_char); - - if (index != 0) { - buf[b] = f->get_code(index); - b++; - } - } - } - } - } else { - if (and_single) { - char name[2]; - - name[0] = str[i]; - name[1] = (char)0; - translation = get_html_translation(f, name); - if (translation) { - l = strlen(translation); - t = max(0, min(l, buflen-b)); - strncpy(&buf[b], translation, t); - b += t; - } else { - if (bwords.is_empty()) { - - int end_title_hpos = 0; - int start_title_vpos = 0; - int found_title_start = FALSE; - int height = 0; - int start_region =-1; - - if (! page_contents->regions.is_empty()) { - region_glob *r; - - page_contents->regions.start_from_head(); - r = page_contents->regions.get_data(); - if (r->minv > 0) { - start_region = r->minv; - } - } - - page_contents->words.start_from_head(); - do { - t = page_contents->words.get_data(); - removed_from_head = FALSE; - if ((found_title_start) && (start_region != -1) && (t->maxv >= start_region)) { - /* - * we have just encountered the first graphic region so - * we stop looking for a title. - */ - title.has_been_found = TRUE; - return; - } else if (t->is_raw_command) { - // skip raw commands - page_contents->words.move_right(); // move onto next word - } else if ((!found_title_start) && (t->minh > left_margin_indent) && - ((start_region == -1) || (t->maxv < start_region))) { - start_title_vpos = t->minv; - end_title_hpos = t->minh; - str_translate_to_html(t->text_style.f, buf, MAX_STRING_LENGTH, t->text_string, t->text_length, TRUE); - strcpy((char *)title.text, buf); - height = t->text_style.point_size*r/72; - found_title_start = TRUE; - page_contents->words.sub_move_right(); - removed_from_head = ((!page_contents->words.is_empty()) && - (page_contents->words.is_equal_to_head())); - } else if (found_title_start) { - if ((t->minv == start_title_vpos) || - ((!more_than_line_break(start_title_vpos, t->minv, (height*3)/2)) && - (t->minh > left_margin_indent)) || - (is_bold(t) && (t->minh > left_margin_indent))) { - start_title_vpos = min(t->minv, start_title_vpos); - end_title_hpos = max(t->maxh, end_title_hpos); - strcat(title.text, " "); - str_translate_to_html(t->text_style.f, buf, MAX_STRING_LENGTH, t->text_string, t->text_length, TRUE); - strcat(title.text, buf); - page_contents->words.sub_move_right(); - removed_from_head = ((!page_contents->words.is_empty()) && - (page_contents->words.is_equal_to_head())); - } else { - // end of title - title.has_been_found = TRUE; - return; - } - } else if (t->minh <= left_margin_indent) { - // no margin exists - return; - } else { - // move onto next word - page_contents->words.move_right(); - } - } while ((! page_contents->words.is_equal_to_head()) || (removed_from_head)); - } - } -} - -/* - * html_newline - generates a newline
- */ - -void html_printer::html_newline (void) -{ - int r = font::res; - int height = output_style.point_size*r/72; - - if (current_paragraph->in_paragraph) { - // safe to generate a pretty newline - html.put_string("
\n"); - } else { - html.put_string("
"); - } - output_vpos += height; - issued_newline = TRUE; -} - -/* - * issue_left_paragraph - emits a left paragraph together with appropriate - * margin if header_indent is < left_margin_indent. - */ - -void html_printer::issue_left_paragraph (void) -{ - if ((header_indent < left_margin_indent) && (! using_table_for_indent())) { - html.put_string("

"); - } else { - html.put_string("

"); - } -} - -/* - * force_begin_paragraph - force the begin_paragraph to be emitted. - */ - -void html_printer::force_begin_paragraph (void) -{ - if (current_paragraph->in_paragraph && current_paragraph->need_paragraph) { - switch (current_paragraph->para_type) { - - case left_alignment: issue_left_paragraph(); - break; - case center_alignment: html.put_string("

"); - break; - default: fatal("unknown paragraph alignment type"); - } - current_paragraph->need_paragraph = FALSE; - } -} - -/* - * begin_paragraph - starts a new paragraph. It does nothing if a paragraph - * has already been started. - */ - -void html_printer::begin_paragraph (paragraph_type p) -{ - if (! current_paragraph->in_paragraph) { - int r = font::res; - int height = output_style.point_size*r/72; - - if (output_vpos >=0) { - // we leave it alone if it is set to the top of page - output_vpos += height; - } - current_paragraph->need_paragraph = TRUE; // delay the

just in case we don't actually emit text - current_paragraph->in_paragraph = TRUE; - current_paragraph->para_type = p; - issued_newline = TRUE; - } -} - - -/* - * begin_paragraph_no_height - starts a new paragraph. It does nothing if a paragraph - * has already been started. Note it does not alter output_vpos. - */ - -void html_printer::begin_paragraph_no_height (paragraph_type p) -{ - if (! current_paragraph->in_paragraph) { - current_paragraph->need_paragraph = TRUE; // delay the

just in case we don't actually emit text - current_paragraph->in_paragraph = TRUE; - current_paragraph->para_type = p; - issued_newline = TRUE; - } -} - -/* - * end_paragraph - end the current paragraph. It does nothing if a paragraph - * has not been started. - */ - -void html_printer::end_paragraph (void) -{ - if (current_paragraph->in_paragraph) { - // check whether we have generated any text inbetween the potential paragraph begin end - if (! current_paragraph->need_paragraph) { - int r = font::res; - int height = output_style.point_size*r/72; - - output_vpos += height; - terminate_current_font(); - html.put_string("

\n"); - } else { - terminate_current_font(); - } - current_paragraph->para_type = left_alignment; - current_paragraph->in_paragraph = FALSE; - } -} - -/* - * save_paragraph - saves the current paragraph state and - * creates new paragraph state. - */ - -void html_printer::save_paragraph (void) -{ - if (current_paragraph == 0) { - fatal("current_paragraph is NULL"); - } - current_paragraph = new html_paragraph(current_paragraph->in_paragraph, - current_paragraph->need_paragraph, - current_paragraph->para_type, - current_paragraph); - terminate_current_font(); -} - -/* - * restore_paragraph - restores the previous paragraph state. - */ - -void html_printer::restore_paragraph (void) -{ - html_paragraph *old = current_paragraph; - - current_paragraph = current_paragraph->previous; - free(old); -} - -/* - * calculate_margin - runs through the words and graphics globs - * and finds the start of the left most margin. - */ - -void html_printer::calculate_margin (void) -{ - text_glob *w; - graphic_glob *g; - - // remove margin - - right_margin_indent = 0; - - if (! page_contents->words.is_empty()) { - - // firstly check the words to determine the right margin - - page_contents->words.start_from_head(); - do { - w = page_contents->words.get_data(); - if ((w->maxh >= 0) && (w->maxh > right_margin_indent)) { - right_margin_indent = w->maxh; -#if 0 - if (right_margin_indent == 758) stop(); -#endif - } - page_contents->words.move_right(); - } while (! page_contents->words.is_equal_to_head()); - - /* - * only examine graphics if no words present - */ - if (! page_contents->lines.is_empty()) { - // now check for diagrams for right margin - page_contents->lines.start_from_head(); - do { - g = page_contents->lines.get_data(); - if ((g->maxh >= 0) && (g->maxh > right_margin_indent)) { - right_margin_indent = g->maxh; -#if 0 - if (right_margin_indent == 950) stop(); -#endif - } - page_contents->lines.move_right(); - } while (! page_contents->lines.is_equal_to_head()); - } - - - /* - * now we know the right margin lets do the same to find left margin - */ - - if (header_indent == -1) { - header_indent = right_margin_indent; - } - left_margin_indent = right_margin_indent; - - if (! page_contents->words.is_empty()) { - do { - w = page_contents->words.get_data(); - if ((w->minh >= 0) && (w->minh < left_margin_indent)) { - if (! is_a_header(w) && (! w->is_raw_command)) { - left_margin_indent = w->minh; - } - } - page_contents->words.move_right(); - } while (! page_contents->words.is_equal_to_head()); - } - - /* - * only examine graphic for margins if text yields nothing - */ - - if (! page_contents->lines.is_empty()) { - // now check for diagrams - page_contents->lines.start_from_head(); - do { - g = page_contents->lines.get_data(); - if ((g->minh >= 0) && (g->minh < left_margin_indent)) { - left_margin_indent = g->minh; - } - page_contents->lines.move_right(); - } while (! page_contents->lines.is_equal_to_head()); - } - } -} - -/* - * calculate_region - runs through the graphics globs and text globs - * and ensures that all graphic routines - * are defined by the region lists. - * This then allows us to easily - * determine the range of vertical and - * horizontal boundaries for pictures, - * tbl's and eqn's. - * - */ - -void page::calculate_region (void) -{ - graphic_glob *g; - - if (! lines.is_empty()) { - lines.start_from_head(); - do { - g = lines.get_data(); - if (! is_in_region(g)) { - if (! can_grow_region(g)) { - make_new_region(g); - } - } - lines.move_right(); - } while (! lines.is_equal_to_head()); - } -} - -/* - * remove_redundant_regions - runs through the regions and ensures that - * all are needed. This is required as - * a picture may be empty, or EQ EN pair - * maybe empty. - */ - -void html_printer::remove_redundant_regions (void) -{ - region_glob *r; - - // firstly run through the region making sure that all are needed - // ie all contain a line or word - if (! page_contents->regions.is_empty()) { - page_contents->regions.start_from_tail(); - do { - r = page_contents->regions.get_data(); - calculate_region_margins(r); - if (page_contents->has_line(r) || page_contents->has_word(r)) { - page_contents->regions.move_right(); - } else { - page_contents->regions.sub_move_right(); - } - } while ((! page_contents->regions.is_empty()) && - (! page_contents->regions.is_equal_to_tail())); - } -} - -void html_printer::display_regions (void) -{ - if (debug_table_on) { - region_glob *r; - - fprintf(stderr, "==========s t a r t===========\n"); - if (! page_contents->regions.is_empty()) { - page_contents->regions.start_from_head(); - do { - r = page_contents->regions.get_data(); - fprintf(stderr, "region minv %d maxv %d\n", r->minv, r->maxv); - page_contents->regions.move_right(); - } while (! page_contents->regions.is_equal_to_head()); - } - fprintf(stderr, "============e n d=============\n"); - fflush(stderr); - } -} - -/* - * remove_duplicate_regions - runs through the regions and ensures that - * no duplicates exist. - */ - -void html_printer::remove_duplicate_regions (void) -{ - region_glob *r; - region_glob *l=0; - - if (! page_contents->regions.is_empty()) { - page_contents->regions.start_from_head(); - l = page_contents->regions.get_data(); - page_contents->regions.move_right(); - r = page_contents->regions.get_data(); - if (l != r) { - do { - r = page_contents->regions.get_data(); - // we have a legit region so we check for an intersection - if (is_intersection(r->minv, r->minv, l->minv, l->maxv) && - is_intersection(r->minh, r->maxh, l->minh, l->maxh)) { - l->minv = min(r->minv, l->minv); - l->maxv = max(r->maxv, l->maxv); - l->minh = min(r->minh, l->minh); - l->maxh = max(r->maxh, l->maxh); - calculate_region_margins(l); - page_contents->regions.sub_move_right(); - } else { - l = r; - page_contents->regions.move_right(); - } - } while ((! page_contents->regions.is_empty()) && - (! page_contents->regions.is_equal_to_head())); - } - } -} - -int page::has_line (region_glob *r) -{ - graphic_glob *g; - - if (! lines.is_empty()) { - lines.start_from_head(); - do { - g = lines.get_data(); - if (is_subsection(g->minv, g->maxv, r->minv, r->maxv) && - is_subsection(g->minh, g->maxh, r->minh, r->maxh)) { - return( TRUE ); - } - lines.move_right(); - } while (! lines.is_equal_to_head()); - } - return( FALSE ); -} - - -int page::has_word (region_glob *r) -{ - text_glob *g; - - if (! words.is_empty()) { - words.start_from_head(); - do { - g = words.get_data(); - if (is_subsection(g->minv, g->maxv, r->minv, r->maxv) && - is_subsection(g->minh, g->maxh, r->minh, r->maxh)) { - return( TRUE ); - } - words.move_right(); - } while (! words.is_equal_to_head()); - } - return( FALSE ); -} - - -void html_printer::calculate_region_margins (region_glob *r) -{ - text_glob *w; - graphic_glob *g; - - r->minh = right_margin_indent; - r->maxh = left_margin_indent; - - if (! page_contents->lines.is_empty()) { - page_contents->lines.start_from_head(); - do { - g = page_contents->lines.get_data(); - if (is_subsection(g->minv, g->maxv, r->minv, r->maxv)) { - r->minh = min(r->minh, g->minh); - r->maxh = max(r->maxh, g->maxh); - } - page_contents->lines.move_right(); - } while (! page_contents->lines.is_equal_to_head()); - } - if (! page_contents->words.is_empty()) { - page_contents->words.start_from_head(); - do { - w = page_contents->words.get_data(); - if (is_subsection(w->minv, w->maxv, r->minv, r->maxv)) { - r->minh = min(r->minh, w->minh); - r->maxh = max(r->maxh, w->maxh); - } - page_contents->words.move_right(); - } while (! page_contents->words.is_equal_to_head()); - } -} - - -int page::is_in_region (graphic_glob *g) -{ - region_glob *r; - - if (! regions.is_empty()) { - regions.start_from_head(); - do { - r = regions.get_data(); - if (is_subsection(g->minv, g->maxv, r->minv, r->maxv) && - is_subsection(g->minh, g->maxh, r->minh, r->maxh)) { - return( TRUE ); - } - regions.move_right(); - } while (! regions.is_equal_to_head()); - } - return( FALSE ); -} - - -/* - * no_raw_commands - returns TRUE if no html raw commands exist between - * minv and maxv. - */ - -int page::no_raw_commands (int minv, int maxv) -{ - text_glob *g; - - if (! words.is_empty()) { - words.start_from_head(); - do { - g = words.get_data(); - if ((g->is_raw_command) && (g->is_html_command) && - (is_intersection(g->minv, g->maxv, minv, maxv))) { - return( FALSE ); - } - words.move_right(); - } while (! words.is_equal_to_head()); - } - return( TRUE ); -} - -/* - * can_grow_region - returns TRUE if a region exists which can be extended - * to include graphic_glob *g. The region is extended. - */ - -int page::can_grow_region (graphic_glob *g) -{ - region_glob *r; - int quarter_inch=font::res/4; - - if (! regions.is_empty()) { - regions.start_from_head(); - do { - r = regions.get_data(); - // must prevent grohtml from growing a region through a html raw command - if (is_intersection(g->minv, g->maxv, r->minv, r->maxv+quarter_inch) && - (no_raw_commands(r->minv, r->maxv+quarter_inch))) { -#if defined(DEBUGGING) - stop(); - printf("r minh=%d minv=%d maxh=%d maxv=%d\n", - r->minh, r->minv, r->maxh, r->maxv); - printf("g minh=%d minv=%d maxh=%d maxv=%d\n", - g->minh, g->minv, g->maxh, g->maxv); -#endif - r->minv = min(r->minv, g->minv); - r->maxv = max(r->maxv, g->maxv); - r->minh = min(r->minh, g->minh); - r->maxh = max(r->maxh, g->maxh); -#if defined(DEBUGGING) - printf(" r minh=%d minv=%d maxh=%d maxv=%d\n", - r->minh, r->minv, r->maxh, r->maxv); -#endif - return( TRUE ); - } - regions.move_right(); - } while (! regions.is_equal_to_head()); - } - return( FALSE ); -} - - -/* - * make_new_region - creates a new region to contain, g. - */ - -void page::make_new_region (graphic_glob *g) -{ - region_glob *r=new region_glob; - - r->minv = g->minv; - r->maxv = g->maxv; - r->minh = g->minh; - r->maxv = g->maxv; - regions.add(r); -} - - -void html_printer::dump_page(void) -{ - text_glob *g; - - printf("\n\ndebugging start\n"); - page_contents->words.start_from_head(); - do { - g = page_contents->words.get_data(); - printf("%s ", g->text_string); - page_contents->words.move_right(); - } while (! page_contents->words.is_equal_to_head()); - printf("\ndebugging end\n\n"); -} - - -/* - * traverse_page_regions - runs through the regions in current_page - * and generate html for text, and troff output - * for all graphics. - */ - -void html_printer::traverse_page_regions (void) -{ - region_glob *r; - - start_region_vpos = 0; - start_region_hpos = 0; - end_region_vpos = -1; - end_region_hpos = -1; - - if (! page_contents->regions.is_empty()) { - page_contents->regions.start_from_head(); - do { - r = page_contents->regions.get_data(); - if (r->minv > 0) { - end_region_vpos = r->minv-1; - } else { - end_region_vpos = 0; - } - end_region_hpos = -1; - display_globs(TRUE); - calculate_region_margins(r); - start_region_vpos = end_region_vpos; - end_region_vpos = r->maxv; - start_region_hpos = r->minh; - end_region_hpos = r->maxh; - display_globs(FALSE); - start_region_vpos = end_region_vpos+1; - start_region_hpos = 0; - page_contents->regions.move_right(); - } while (! page_contents->regions.is_equal_to_head()); - start_region_vpos = end_region_vpos+1; - start_region_hpos = 0; - end_region_vpos = -1; - end_region_hpos = -1; - } - display_globs(TRUE); -} - -int html_printer::is_within_region (text_glob *t) -{ - int he, ve, hs; - - if (start_region_hpos == -1) { - hs = t->minh; - } else { - hs = start_region_hpos; - } - if (end_region_vpos == -1) { - ve = t->maxv; - } else { - ve = end_region_vpos; - } - if (end_region_hpos == -1) { - he = t->maxh; - } else { - he = end_region_hpos; - } - return( is_subsection(t->minv, t->maxv, start_region_vpos, ve) && - is_subsection(t->minh, t->maxh, hs, he) ); -} - -int html_printer::is_within_region (graphic_glob *g) -{ - int he, ve, hs; - - if (start_region_hpos == -1) { - hs = g->minh; - } else { - hs = start_region_hpos; - } - if (end_region_vpos == -1) { - ve = g->maxv; - } else { - ve = end_region_vpos; - } - if (end_region_hpos == -1) { - he = g->maxh; - } else { - he = end_region_hpos; - } - return( is_subsection(g->minv, g->maxv, start_region_vpos, ve) && - is_subsection(g->minh, g->maxh, hs, he) ); -} - -int html_printer::is_less (graphic_glob *g, text_glob *t) -{ - return( (g->minv < t->minv) || ((g->minv == t->minv) && (g->minh < t->minh)) ); -} - -void html_printer::convert_to_image (char *troff_src, char *image_name) -{ - char buffer[MAX_STRING_LENGTH*2 + 200]; - char *ps_src = mktemp(xtmptemplate("-ps-")); - - sprintf(buffer, "grops%s %s > %s", EXE_EXT, troff_src, ps_src); - if (debug_on) { - fprintf(stderr, "%s\n", buffer); - } - int status = system(buffer); - if (status == -1) { - fprintf(stderr, "\"%s\" failed (no grops on PATH?)\n", buffer); - return; - } - else if (status) { - fprintf(stderr, "\"%s\" returned status %d\n", buffer, status); - } - - if (image_type == gif) { - sprintf(buffer, - "echo showpage | gs%s -q -dSAFER -sDEVICE=ppmraw -r%d -g%dx%d -sOutputFile=- %s - | ppmquant%s 256 | ppmtogif%s > %s.gif", - EXE_EXT, image_res, - (end_region_hpos-start_region_hpos)*image_res/font::res+IMAGE_BOARDER_PIXELS, - (end_region_vpos-start_region_vpos)*image_res/font::res+IMAGE_BOARDER_PIXELS, - ps_src, EXE_EXT, EXE_EXT, image_name); - } else { - sprintf(buffer, - "echo showpage | gs%s -q -dSAFER -sDEVICE=%s -r%d -g%dx%d -sOutputFile=- %s - > %s.png", - EXE_EXT, image_device, - image_res, - (end_region_hpos-start_region_hpos)*image_res/font::res+IMAGE_BOARDER_PIXELS, - (end_region_vpos-start_region_vpos)*image_res/font::res+IMAGE_BOARDER_PIXELS, - ps_src, image_name); -#if 0 - sprintf(buffer, - "echo showpage | gs -q -dSAFER -sDEVICE=ppmraw -r%d -g%dx%d -sOutputFile=- %s.ps - > %s.pnm ; pnmtopng -transparent white %s.pnm > %s.png \n", - /* image_device, */ - image_res, - (end_region_hpos-start_region_hpos)*image_res/font::res+IMAGE_BOARDER_PIXELS, - (end_region_vpos-start_region_vpos)*image_res/font::res+IMAGE_BOARDER_PIXELS, - name, name, name, image_name); -#endif - } - if (debug_on) { - fprintf(stderr, "%s\n", buffer); - } - // Redirect standard error to the null device. This is more - // portable than using "2> /dev/null" inside the commands above, - // since it doesn't require a Unixy shell. - int save_stderr = dup(2); - if (save_stderr > 2) { - int fdnull = open(NULL_DEV, O_WRONLY|O_BINARY, 0666); - if (fdnull > 2) - dup2(fdnull, 2); - if (fdnull >= 0) - close(fdnull); - } - status = system(buffer); - dup2(save_stderr, 2); - if (status == -1) { - fprintf(stderr, - "Conversion to image failed (no gs/ppmquant/ppmtogif on PATH?)\n"); - } - else if (status) { - fprintf(stderr, - "Conversion to image returned status %d\n", status); - } - unlink(ps_src); - unlink(troff_src); -} - -void html_printer::prologue (void) -{ - troff.put_string("x T ps\nx res "); - troff.put_number(postscript_res); - troff.put_string(" 1 1\nx init\np1\n"); -} - -void html_printer::display_globs (int is_to_html) -{ - text_glob *t=0; - graphic_glob *g=0; - FILE *f=0; - char *troff_src; - int something=FALSE; - int is_center=FALSE; - - end_paragraph(); - - if (! is_to_html) { - is_center = html_position_region(); - make_new_image_name(); - f = xtmpfile(&troff_src, "-troff-", FALSE); - troff.set_file(f); - prologue(); - output_style.f = 0; - } - if (! page_contents->words.is_empty()) { - page_contents->words.start_from_head(); - t = page_contents->words.get_data(); - } - - if (! page_contents->lines.is_empty()) { - page_contents->lines.start_from_head(); - g = page_contents->lines.get_data(); - } - - do { -#if 0 - if ((t != 0) && (strcmp(t->text_string, "(1.a)") == 0)) { - stop(); - } -#endif - if ((t == 0) && (g != 0)) { - if (is_within_region(g)) { - something = TRUE; - display_line(g, is_to_html); - } - if (page_contents->lines.is_empty() || page_contents->lines.is_equal_to_tail()) { - g = 0; - } else { - g = page_contents->lines.move_right_get_data(); - } - } else if ((g == 0) && (t != 0)) { - if (is_within_region(t)) { - display_word(t, is_to_html); - something = TRUE; - } - if (page_contents->words.is_empty() || page_contents->words.is_equal_to_tail()) { - t = 0; - } else { - t = page_contents->words.move_right_get_data(); - } - } else { - if ((g == 0) || (t == 0)) { - // hmm nothing to print out... - } else if (is_less(g, t)) { - if (is_within_region(g)) { - display_line(g, is_to_html); - something = TRUE; - } - if (page_contents->lines.is_empty() || page_contents->lines.is_equal_to_tail()) { - g = 0; - } else { - g = page_contents->lines.move_right_get_data(); - } - } else { - if (is_within_region(t)) { - display_word(t, is_to_html); - something = TRUE; - } - if (page_contents->words.is_empty() || page_contents->words.is_equal_to_tail()) { - t = 0; - } else { - t = page_contents->words.move_right_get_data(); - } - } - } - } while ((t != 0) || (g != 0)); - - if ((! is_to_html) && (f != 0)) { - fclose(troff.get_file()); - if (something) { - convert_to_image(troff_src, image_name); - - if (is_center) { - end_paragraph(); - begin_paragraph(center_alignment); - force_begin_paragraph(); - } - html.put_string("\n"); - html_newline(); - if (is_center) { - end_paragraph(); - } - - output_vpos = end_region_vpos; - output_hpos = 0; - need_one_newline = FALSE; - output_style.f = 0; - end_paragraph(); - } - } -} - -void html_printer::flush_page (void) -{ - calculate_margin(); - output_vpos = -1; - output_hpos = get_left(); - supress_sub_sup = TRUE; -#if 0 - dump_page(); -#endif - html.begin_comment("left margin: ").comment_arg(i_to_a(left_margin_indent)).end_comment();; - html.begin_comment("right margin: ").comment_arg(i_to_a(right_margin_indent)).end_comment();; - remove_redundant_regions(); - page_contents->calculate_region(); - remove_duplicate_regions(); - find_title(); - supress_sub_sup = TRUE; - traverse_page_regions(); - terminate_current_font(); - if (need_one_newline) { - html_newline(); - } - end_paragraph(); - - // move onto a new page - delete page_contents; - page_contents = new page; -} - -static int convertSizeToHTML (int size) -{ - if (size < 6) { - return( 0 ); - } else if (size < 8) { - return( 1 ); - } else if (size < 10) { - return( 2 ); - } else if (size < 12) { - return( 3 ); - } else if (size < 14) { - return( 4 ); - } else if (size < 16) { - return( 5 ); - } else if (size < 18) { - return( 6 ); - } else { - return( 7 ); - } -} - - -void html_printer::write_html_font_face (const char *fontname, const char *left, const char *right) -{ - switch (fontname[0]) { - - case 'C': html.put_string(left) ; html.put_string("tt"); html.put_string(right); - break; - case 'H': break; - case 'T': break; - default: break; - } -} - - -void html_printer::write_html_font_type (const char *fontname, const char *left, const char *right) -{ - if (strcmp(&fontname[1], "B") == 0) { - html.put_string(left) ; html.put_string("B"); html.put_string(right); - } else if (strcmp(&fontname[1], "I") == 0) { - html.put_string(left) ; html.put_string("I"); html.put_string(right); - } else if (strcmp(&fontname[1], "BI") == 0) { - html.put_string(left) ; html.put_string("EM"); html.put_string(right); - } -} - - -void html_printer::html_change_font (text_glob *g, const char *fontname, int size) -{ - char buffer[1024]; - - if (output_style.f != 0) { - const char *oldfontname = output_style.f->get_name(); - - // firstly terminate the current font face and type - if ((oldfontname != 0) && (oldfontname != fontname)) { - write_html_font_face(oldfontname, ""); - write_html_font_type(oldfontname, ""); - } - } - - if ((output_style.point_size != size) && (output_style.point_size != 0)) { - // shutdown the previous font size - html.put_string(""); - } - - if ((output_style.point_size != size) && (size != 0)) { - // now emit the size if it has changed - sprintf(buffer, "", convertSizeToHTML(size)); - html.put_string(buffer); - output_style.point_size = size; // and remember the size - } - output_style.f = 0; // no style at present - output_style.point_size = size; // remember current font size - - if (fontname != 0) { - if (! g->is_raw_command) { - // now emit the new font - write_html_font_face(fontname, "<", ">"); - - // now emit the new font type - write_html_font_type(fontname, "<", ">"); - - output_style = g->text_style; // remember style for next time - } - } -} - - -void html_printer::change_font (text_glob *g, int is_to_html) -{ - if (is_to_html) { - if (output_style != g->text_style) { - const char *fontname=0; - int size=0; - - if (g->text_style.f != 0) { - fontname = g->text_style.f->get_name(); - size = (font::res/(72*font::sizescale))*g->text_style.point_size; - } - html_change_font(g, fontname, size); - } - } else { - // is to troff - if (output_style != g->text_style) { - if (g->text_style.f != 0) { - const char *fontname = g->text_style.f->get_name(); - int size = (font::res/(72*font::sizescale))*g->text_style.point_size; - - if (fontname == 0) { - fatal("no internalname specified for font"); - } - - troff_change_font(fontname, size, g->text_style.font_no); - output_style = g->text_style; // remember style for next time - } - } - } -} - -/* - * is_bold - returns TRUE if the text inside, g, is using a bold face. - * It returns FALSE is g contains a raw html command, even if this uses - * a bold font. - */ - -int html_printer::is_bold (text_glob *g) -{ - if (g->text_style.f == 0) { - // unknown font - return( FALSE ); - } else if (g->is_raw_command) { - return( FALSE ); - } else { - const char *fontname = g->text_style.f->get_name(); - - if (strlen(fontname) >= 2) { - return( fontname[1] == 'B' ); - } else { - return( FALSE ); - } - } -} - -void html_printer::terminate_current_font (void) -{ - text_glob g; - - // we create a dummy glob just so we can tell html_change_font not to start up - // a new font - g.is_raw_command = TRUE; - html_change_font(&g, 0, 0); -} - -void html_printer::write_header (text_glob *g) -{ - if (strlen(header.header_buffer) > 0) { - if (header.header_level > 7) { - header.header_level = 7; - } - - if (cutoff_heading+2 > header.header_level) { - // firstly we must terminate any font and type faces - terminate_current_font(); - end_paragraph(); - - // secondly we generate a tag - html.put_string(""); - // now we save the header so we can issue a list of link - style st; - - header.no_of_headings++; - - text_glob *h=new text_glob(&st, - header.headings.add_string(header.header_buffer, strlen(header.header_buffer)), - strlen(header.header_buffer), - header.no_of_headings, header.header_level, - header.no_of_headings, header.header_level, - FALSE, FALSE); - header.headers.add(h); // and add this header to the header list - } else { - terminate_current_font(); - end_paragraph(); - } - - // we adjust the margin if necessary - - if (g->minh < left_margin_indent) { - header_indent = g->minh; - } - - // and now we issue the real header - html.put_string(""); - html.put_string(header.header_buffer); - html.put_string(""); - - need_one_newline = FALSE; - begin_paragraph(left_alignment); - header.written_header = TRUE; - } -} - -/* - * translate_str_to_html - translates a string, str, into html representation. - * len indicates the string length. - */ - -void translate_str_to_html (font *f, char *str, int len) -{ - char buf[MAX_STRING_LENGTH]; - - str_translate_to_html(f, buf, MAX_STRING_LENGTH, str, len, TRUE); - strncpy(str, buf, max(len, strlen(buf)+1)); -} - -/* - * write_headings - emits a list of links for the headings in this document - */ - -void header_desc::write_headings (FILE *f) -{ - text_glob *g; - - if (! headers.is_empty()) { - headers.start_from_head(); - do { - g = headers.get_data(); - fprintf(f, "%s
\n", g->text_string, g->text_string); - headers.move_right(); - } while (! headers.is_equal_to_head()); - } -} - -void html_printer::determine_header_level (void) -{ - int i; - int l=strlen(header.header_buffer); - int stops=0; - - for (i=0; ((i 0) { - header.header_level = stops; - } -} - - -void html_printer::build_header (text_glob *g) -{ - text_glob *l; - int current_vpos; - char buf[MAX_STRING_LENGTH]; - - strcpy(header.header_buffer, ""); - do { - l = g; - current_vpos = g->minv; - str_translate_to_html(g->text_style.f, buf, MAX_STRING_LENGTH, g->text_string, g->text_length, TRUE); - strcat(header.header_buffer, (char *)buf); - page_contents->words.move_right(); - g = page_contents->words.get_data(); - if (g->minv == current_vpos) { - strcat(header.header_buffer, " "); - } - } while ((! page_contents->words.is_equal_to_head()) && - ((g->minv == current_vpos) || (l->maxh == right_margin_indent))); - - determine_header_level(); - // finally set the output to neutral for after the header - - g = page_contents->words.get_data(); - output_vpos = g->minv; // set output_vpos to the next line since - output_hpos = left_margin_indent; // html header forces a newline anyway - page_contents->words.move_left(); // so that next time we use old g - - need_one_newline = FALSE; -} - - -/* - * is_whole_line_bold - returns TRUE if the whole line is bold. - */ - -int html_printer::is_whole_line_bold (text_glob *g) -{ - text_glob *n=g; - int current_vpos=g->minv; - - do { - if (is_bold(n)) { - page_contents->words.move_right(); - n = page_contents->words.get_data(); - } else { - while (page_contents->words.get_data() != g) { - page_contents->words.move_left(); - } - return( FALSE ); - } - } while ((! page_contents->words.is_equal_to_head()) && (is_on_same_line(n, current_vpos))); - // was (n->minv == current_vpos) - while (page_contents->words.get_data() != g) { - page_contents->words.move_left(); - } - return( TRUE ); -} - - -/* - * is_a_header - returns TRUE if the whole sequence of contineous lines are bold. - * It checks to see whether a line is likely to be contineous and - * then checks that all words are bold. - */ - -int html_printer::is_a_header (text_glob *g) -{ - text_glob *l; - text_glob *n=g; - int current_vpos; - - do { - l = n; - current_vpos = n->minv; - if (is_bold(n)) { - page_contents->words.move_right(); - n = page_contents->words.get_data(); - } else { - while (page_contents->words.get_data() != g) { - page_contents->words.move_left(); - } - return( FALSE ); - } - } while ((! page_contents->words.is_equal_to_head()) && - ((n->minv == current_vpos) || (l->maxh == right_margin_indent))); - while (page_contents->words.get_data() != g) { - page_contents->words.move_left(); - } - return( TRUE ); -} - - -int html_printer::processed_header (text_glob *g) -{ - if ((guess_on) && (g->minh <= left_margin_indent) && (! using_table_for_indent()) && - (is_a_header(g))) { - build_header(g); - write_header(g); - return( TRUE ); - } else { - return( FALSE ); - } -} - -int is_punctuation (char *s, int length) -{ - return( (length == 1) && - ((s[0] == '(') || (s[0] == ')') || (s[0] == '!') || (s[0] == '.') || (s[0] == '[') || - (s[0] == ']') || (s[0] == '?') || (s[0] == ',') || (s[0] == ';') || (s[0] == ':') || - (s[0] == '@') || (s[0] == '#') || (s[0] == '$') || (s[0] == '%') || (s[0] == '^') || - (s[0] == '&') || (s[0] == '*') || (s[0] == '+') || (s[0] == '-') || (s[0] == '=') || - (s[0] == '{') || (s[0] == '}') || (s[0] == '|') || (s[0] == '\"') || (s[0] == '\'')) - ); -} - -/* - * move_horizontal - moves right into the position, g->minh. - */ - -void html_printer::move_horizontal (text_glob *g, int left_margin) -{ - if (g->text_style.f != 0) { - int w = g->text_style.f->get_space_width(g->text_style.point_size); - - if (w == 0) { - fatal("space width is zero"); - } - if ((output_hpos == left_margin) && (g->minh > output_hpos)) { - make_html_indent(g->minh-output_hpos); - } else { - emit_space(g, FALSE); - } - output_hpos = g->maxh; - output_vpos = g->minv; - - change_font(g, TRUE); - } -} - -/* - * looks_like_subscript - returns TRUE if, g, looks like a subscript. - */ - -int html_printer::looks_like_subscript (text_glob *g) -{ - int r = font::res; - int height = output_style.point_size*r/72; - - /* was return( ((output_vpos < g->minv) && (output_style.point_size != 0) && - * (output_style.point_size > g->text_style.point_size)) ); - */ - - return( (output_style.point_size != 0) && (! supress_sub_sup) && (output_vpos+height < g->maxv) ); -} - -/* - * looks_like_superscript - returns TRUE if, g, looks like a superscript. - */ - -int html_printer::looks_like_superscript (text_glob *g) -{ - int r = font::res; - int height = output_style.point_size*r/72; - -/* was - * return(((output_vpos > g->minv) && (output_style.point_size != 0) && - * (output_style.point_size > g->text_style.point_size))); - */ - - return( (output_style.point_size != 0) && (! supress_sub_sup) && (output_vpos+height > g->maxv) ); -} - -/* - * looks_like_larger_font - returns TRUE if, g, can be treated as a larger font. - * g needs to be on the same line - */ - -int html_printer::looks_like_larger_font (text_glob *g) -{ - int r = font::res; - int height = output_style.point_size*r/72; - - return( (output_vpos+height == g->maxv) && (output_style.point_size != 0) && - (convertSizeToHTML(g->text_style.point_size)+1 == convertSizeToHTML(output_style.point_size)) ); -} - -/* - * looks_like_smaller_font - returns TRUE if, g, can be treated as a smaller font. - * g needs to be on the same line - */ - -int html_printer::looks_like_smaller_font (text_glob *g) -{ - int r = font::res; - int height = output_style.point_size*r/72; - - return( (output_vpos+height == g->maxv) && (output_style.point_size != 0) && - (convertSizeToHTML(g->text_style.point_size) == convertSizeToHTML(output_style.point_size)+1) ); -} - -/* - * pretend_is_on_same_line - returns TRUE if we think, g, is on the same line as the previous glob. - * Note that it believes a single word spanning the left..right as being - * on a different line. - */ - -int html_printer::pretend_is_on_same_line (text_glob *g, int left_margin, int right_margin) -{ - return( auto_on && (right_margin == output_hpos) && (left_margin == g->minh) && - (right_margin != g->maxh) && ((! is_whole_line_bold(g)) || (g->text_style.f == output_style.f)) && - (! (using_table_for_indent()) || (indentation.wrap_margin)) ); -} - -int html_printer::is_on_same_line (text_glob *g, int vpos) -{ -#if 0 - if (g->is_html_command) { - stop(); - } -#endif - return( - (vpos >= 0) && - (is_intersection(vpos, vpos+g->text_style.point_size*font::res/72-1, g->minv, g->maxv)) - ); -} - - -/* - * make_html_indent - creates a relative indentation. - */ - -void html_printer::make_html_indent (int indent) -{ - if ((indent > 0) && ((right_margin_indent-get_left()) > 0) && - ((indent*100)/(right_margin_indent-get_left()))) { - html.put_string(""); - } -} - -/* - * using_table_for_indent - returns TRUE if we currently using a table for indentation - * purposes. - */ - -int html_printer::using_table_for_indent (void) -{ - return( indentation.no_of_columns != 0 ); -} - -/* - * calculate_min_gap - returns the minimum gap by which we deduce columns. - * This is a rough heuristic. - */ - -int html_printer::calculate_min_gap (text_glob *g) -{ - text_glob *t = g; - - while ((t->is_raw_command) && (! page_contents->words.is_equal_to_tail()) && - ((t->minv < end_region_vpos) || (end_region_vpos < 0))) { - page_contents->words.move_right(); - t=page_contents->words.get_data(); - } - rewind_text_to(g); - if (t->is_raw_command) { - return( font::res * 10 ); // impossibly large gap width - } else { - return( t->text_style.f->get_space_width(t->text_style.point_size)*GAP_SPACES ); - } -} - -/* - * collect_columns - place html text in a column and return the vertical limit reached. - */ - -int html_printer::collect_columns (struct text_defn *next_words, - struct text_defn *next_cols, - struct text_defn *last_words, - struct text_defn *last_cols, - int max_words) -{ - text_glob *start = page_contents->words.get_data(); - text_glob *t = start; - int upper_limit = 0; - - /* - * initialize cols and words - */ - next_words[0].left = 0; - next_words[0].right = 0; - next_cols [0].left = 0; - next_cols [0].right = 0; - - /* - * if we have not reached the end collect the words on the current line - */ - if (start != 0) { - int graphic_limit = end_region_vpos; - - if (is_whole_line_bold(t) && (t->minh <= left_margin_indent) && (guess_on)) { - /* - * found header therefore terminate indentation table. - * Return a negative number so we know a header has - * stopped the column - */ - upper_limit = -t->minv; - } else { - int i =0; // is the index into next_cols - int j =0; // is the column index for last_cols - int k =0; // is the index into next_words - int l =0; // is the index into next_words - int prevh =0; - int mingap =calculate_min_gap(start); - - /* - * while words on the same line record them and any significant gaps - */ - while ((t != 0) && (is_on_same_line(t, start->minv) && (i t->minv))) { - - /* - * now find column index from the last line which corresponds to, t. - */ - j = find_column_index_in_line(t, last_cols); - - /* - * now find word index from the last line which corresponds to, t. - */ - l = find_column_index_in_line(t, last_words); - - /* - * Note t->minh might equal t->maxh when we are passing a special device character via \X - * we currently ignore this when considering tables - * - * if we have found a significant gap then record it - */ - if (((t->minh - prevh >= mingap) || - ((last_cols != 0) && (last_cols [j].right != 0) && (t->minh == last_cols [j].left))) && - (t->minh != t->maxh)) { - next_cols[i].left = t->minh; - next_cols[i].right = t->maxh; - i++; - /* - * terminate the array - */ - if (i0) { - /* - * move previous right hand column to align with, t. - */ - - if (t->minh > next_cols[i-1].left) { - /* - * a simple precaution in case we get globs which are technically on the same line - * (sadly this does occur sometimes - maybe we should be stricter with is_on_same_line) - * --fixme-- - */ - next_cols[i-1].right = max(next_cols[i-1].right, t->maxh); - } - } - /* - * remember to record the individual words - */ - next_words[k].left = t->minh; - next_words[k].right = t->maxh; - k++; - - /* - * and record the vertical upper limit - */ - upper_limit = max(t->minv, upper_limit); - - /* - * and update prevh - used to detect a when a different line is seen - */ - prevh = t->maxh; - - /* - * get next word into, t, which equals 0, if no word is found - */ - page_contents->words.move_right(); - t = page_contents->words.get_data(); - if (page_contents->words.is_equal_to_head()) { - t = 0; - } - } - - /* - * and terminate the next_words array - */ - - if (k next_cols[k].right) { - fprintf(stderr, "left > right\n"); fflush(stderr); - stop(); - fatal("next_cols has messed up columns"); - } - if ((k>0) && (k+1 next_cols[k+1].left)) { - fprintf(stderr, "next_cols[k].right > next_cols[k+1].left\n"); fflush(stderr); - stop(); - fatal("next_cols has messed up columns"); - } - } -#endif - } - } - return( upper_limit ); -} - -/* - * conflict_with_words - returns TRUE if a word sequence crosses a column. - */ - -int html_printer::conflict_with_words (struct text_defn *column_guess, struct text_defn *words) -{ - int i=0; - int j; - - while ((column_guess[i].right != 0) && (i= column_guess[i+1].left)) { - if (debug_table_on) { - fprintf(stderr, "is a conflict with words\n"); - fflush(stderr); - } - return( TRUE ); - } - j++; - } - i++; - } - if (debug_table_on) { - fprintf(stderr, "is NOT a conflict with words\n"); - fflush(stderr); - } - return( FALSE ); -} - -/* - * combine_line - combines dest and src. - */ - -void html_printer::combine_line (struct text_defn *dest, struct text_defn *src) -{ - int i; - - for (i=0; (ileft)) { - i++; - } - - if (line[i].right == 0) { - // add to the end - if (i0) && (line[i-1].left > item->left)) { - fatal("insertion error"); - } - line[i].left = item->left; - line[i].right = item->right; - i++; - line[i].left = 0; - line[i].right = 0; - } - } else { - if (line[i].left == item->left) { - line[i].right = max(item->right, line[i].right); - } else { - // insert - int left = item->left; - int right = item->right; - int l = line[i].left; - int r = line[i].right; - - while ((i+1left) { - return( TRUE ); - } else { - i++; - } - } - return( FALSE ); -} - -/* - * calculate_right - calculate the right most margin for each column in line. - */ - -void html_printer::calculate_right (struct text_defn *line, int max_words) -{ - int i=0; - - while ((i0) { - line[i-1].right = line[i].left; - } - i++; - } -} - -/* - * add_right_full_width - adds an extra column to the right to bring the table up to - * full width. - */ - -void html_printer::add_right_full_width (struct text_defn *line, int mingap) -{ - int i=0; - - while ((i0) && (line[i-1].right != right_margin_indent) && (i+10) { - // remember right_margin_indent is the right most position for this page - line[i-1].right = column_calculate_right_margin(line[i-1].left, right_margin_indent); - } -} - -/* - * is_column_match - returns TRUE if a word is aligned in the same horizontal alignment - * between two lines, line1 and line2. If so then this horizontal - * position is saved in match. - */ - -int html_printer::is_column_match (struct text_defn *match, - struct text_defn *line1, struct text_defn *line2, int max_words) -{ - int i=0; - int j=0; - int found=FALSE; - int first=(match[0].left==0); - - if (first) { - struct text_defn t; - - t.left = left_margin_indent; - t.right = 0; - - include_into_list(match, &t); - } - while ((line1[i].right != 0) && (line2[i].right != 0)) { - if (line1[i].left == line2[j].left) { - // same horizontal alignment found - include_into_list(match, &line1[i]); - i++; - j++; - found = TRUE; - } else if (line1[i].left < line2[j].left) { - i++; - } else { - j++; - } - } - calculate_right(match, max_words); - return( found ); -} - -/* - * check_lack_of_hits - returns TRUE if a column has been moved to a position - * of only one hit from a position of more than one hit. - */ - -int html_printer::check_lack_of_hits (struct text_defn *next_guess, - struct text_defn *last_guess, - text_glob *start, int limit) -{ - text_glob *current=page_contents->words.get_data(); - int n=count_columns(last_guess); - int m=count_columns(next_guess); - int i, j; - - if (limit > 0) { - rewind_text_to(start); - count_hits(last_guess, n, limit); - rewind_text_to(current); - i=0; - j=0; - while ((i= 2)) { - /* - * next_guess has to be = 1 as this position is new - */ - return( TRUE ); - } - if (last_guess[i].left < next_guess[j].left) { - i++; - } else { - j++; - } - } - } - return( FALSE ); -} - -/* - * remove_white_using_words - remove white space in, last_guess, by examining, next_line - * placing results into next_guess. - * It returns TRUE if the same columns exist in next_guess and last_guess - * we do allow columns to shrink but if a column disappears then we return FALSE. - */ - -int html_printer::remove_white_using_words (struct text_defn *next_guess, - struct text_defn *last_guess, struct text_defn *next_line) -{ - int i=0; - int j=0; - int k=0; - int removed=FALSE; - - while ((last_guess[j].right != 0) && (next_line[k].right != 0)) { - if (last_guess[j].left == next_line[k].left) { - // same horizontal alignment found - next_guess[i].left = last_guess[j].left; - next_guess[i].right = max(last_guess[j].right, next_line[k].right); - i++; - j++; - k++; - if ((next_guess[i-1].right > last_guess[j].left) && (last_guess[j].right != 0)) { - removed = TRUE; - } - } else if (last_guess[j].right < next_line[k].left) { - next_guess[i].left = last_guess[j].left; - next_guess[i].right = last_guess[j].right; - i++; - j++; - } else if (last_guess[j].left > next_line[k].right) { - // insert a word sequence from next_line[k] - next_guess[i].left = next_line[k].left; - next_guess[i].right = next_line[k].right; - i++; - k++; - } else if (is_intersection(last_guess[j].left, last_guess[j].right, next_line[k].left, next_line[k].right)) { - // potential for a column disappearing - next_guess[i].left = min(last_guess[j].left , next_line[k].left); - next_guess[i].right = max(last_guess[j].right, next_line[k].right); - i++; - j++; - k++; - if ((next_guess[i-1].right > last_guess[j].left) && (last_guess[j].right != 0)) { - removed = TRUE; - } - } - } - while (next_line[k].right != 0) { - next_guess[i].left = next_line[k].left; - next_guess[i].right = next_line[k].right; - i++; - k++; - } - if (iwords.get_data() != g) { - if (page_contents->words.is_equal_to_head()) { - page_contents->words.start_from_tail(); - } else { - page_contents->words.move_left(); - } - } -} - -/* - * can_loose_column - checks to see whether we should combine two columns. - * This is allowed if there are is only one hit on the - * left hand edge and the previous column is very close. - */ - -void html_printer::can_loose_column (text_glob *start, struct text_defn *last_guess, int limit) -{ - text_glob *current=page_contents->words.get_data(); - int n=count_columns(last_guess); - int i; - - rewind_text_to(start); - count_hits(last_guess, n, limit); - i=0; - while (i (last_guess[i+1].left-last_guess[i].right))) { - last_guess[i].right = last_guess[i+1].right; - remove_entry_in_line(last_guess, i+1); - n = count_columns(last_guess); - i = 0; - } else { - i++; - } - } - rewind_text_to(current); -} - -/* - * display_columns - a long overdue debugging function, as this column code is causing me grief :-( - */ - -void html_printer::display_columns (const char *word, const char *name, text_defn *line) -{ - int i=0; - - fprintf(stderr, "[%s:%s]", name, word); - while (line[i].right != 0) { - fprintf(stderr, " ", line[i].left, line[i].right, line[i].percent); - i++; - } - fprintf(stderr, "\n"); - fflush(stderr); -} - -/* - * copy_line - dest = src - */ - -void html_printer::copy_line (struct text_defn *dest, struct text_defn *src) -{ - int k; - - for (k=0; ((src[k].right != 0) && (k0) && (line[i-1].right != right_margin_indent) && - (is_worth_column(line[i-1].right, right_margin_indent))) { - t.left = line[i-1].right; - t.right = right_margin_indent; - include_into_list(line, &t); - } -} - -/* - * is_continueous_column - returns TRUE if a line has a word on one - * of the last_col right most boundaries. - */ - -int html_printer::is_continueous_column (text_defn *last_col, text_defn *next_line) -{ - int w = count_columns(next_line); - int c = count_columns(last_col); - int i, j; - - for (i=0; i= MIN_COLUMN ); -#endif - return( TRUE ); -} - -/* - * large_enough_gap - returns TRUE if a large enough gap for one line was seen. - * We need to make sure that a single line definitely warrents - * a table. - * It also removes other smaller gaps. - */ - -int html_printer::large_enough_gap (text_defn *last_col) -{ - int i=0; - int found=FALSE; - int r=font::res; - int gap=r/GAP_WIDTH_ONE_LINE; - - if (abs(last_col[i].left - left_margin_indent) >= gap) { - found = TRUE; - } - while ((last_col[i].right != 0) && (last_col[i+1].right != 0)) { - if (abs(last_col[i+1].left-last_col[i].right) >= gap) { - found = TRUE; - i++; - } else { - // not good enough for a single line, remove it - last_col[i].right = last_col[i+1].right; - remove_entry_in_line(last_col, i+1); - } - } - return( found ); -} - -/* - * is_subset_of_columns - returns TRUE if line, a, is a subset of line, b. - */ - -int html_printer::is_subset_of_columns (text_defn *a, text_defn *b) -{ - int i; - int j; - - i=0; - while ((iwords.get_data(); - text_glob *g = start; - - // firstly reset the used field - for (i=0; iminv <= limit)) { - i=0; - while ((iminh)) { - i++; - } - if ((col[i].left == g->minh) && (col[i].right != 0)) { - col[i].is_used++; - } - page_contents->words.move_right(); - if (page_contents->words.is_equal_to_head()) { - g = 0; - page_contents->words.start_from_tail(); - } else { - g=page_contents->words.get_data(); - } - } -} - -/* - * count_right_hits - counts the number of right hits per column. - * A right hit is when the left hand position - * of a glob hits the right hand column. - */ - -void html_printer::count_right_hits (text_defn *col, int no_of_columns) -{ - int i; - text_glob *start = page_contents->words.get_data(); - text_glob *g = start; - - // firstly reset the used field - for (i=0; iminv <= indentation.vertical_limit)) { - i=0; - while ((iminh)) { - i++; - } - if ((imaxh)) { - if (debug_table_on) { - fprintf(stderr, "found right hit [%s] at %d in %d\n", - g->text_string, g->maxh, i); - fflush(stderr); - } - col[i].right_hits++; - } - page_contents->words.move_right(); - if (page_contents->words.is_equal_to_head()) { - g = 0; - page_contents->words.start_from_tail(); - } else { - g=page_contents->words.get_data(); - } - } -} - -/* - * right_indentation - returns TRUE if a single column has been found and - * it resembles an indentation. Ie .RS/.RE or ABSTACT - */ - -int html_printer::right_indentation (struct text_defn *last_guess) -{ - // it assumes that last_guess contains a single column - return( (last_guess[0].left > left_margin_indent) ); -} - -/* - * able_to_steal_width - returns TRUE if we have an unused column which we can steal from. - * It must have more than MIN_TEXT_PERCENT to do this. - */ - -int html_printer::able_to_steal_width (void) -{ - int i; - - for (i=0; i MIN_TEXT_PERCENT)) { - return( TRUE ); - } - } - return( FALSE ); -} - -/* - * is_divisible_by - returns TRUE if n is divisible by d leaving no remainder. - */ - -static int is_divisible_by (int n, int d) -{ - return( (n % d) == 0 ); -} - -/* - * need_to_steal_width - returns TRUE if a used column need to be - * given a little extra width for safty sake. - */ - -int html_printer::need_to_steal_width (void) -{ - int i; - - for (i=0; i0); i++) { - if ((indentation.columns[i].is_used) && - (indentation.columns[i].percent < PERCENT_THRESHOLD)) { - indentation.columns[i].percent++; - excess--; - } - } - // we might as well try and keep any numbers simple if possible - for (i=0; (i0); i++) { - if ((indentation.columns[i].is_used) && - (! is_divisible_by(indentation.columns[i].percent, MIN_TEXT_PERCENT))) { - indentation.columns[i].percent++; - excess--; - } - } - // forget the niceties lets just use excess up now! - for (i=0; (i0); i++) { - if (indentation.columns[i].is_used) { - indentation.columns[i].percent++; - excess--; - } - } -} - -/* - * can_distribute_fairly - returns TRUE if we can redistribute some of the unused width into - * columns that are used. - */ - -int html_printer::can_distribute_fairly (void) -{ - int i; - int total=0; - int used =0; - int excess; - - // firstly total up all percentages - so we can use round offs - for (i=0; i MIN_TEXT_PERCENT) { - indentation.columns[i].percent--; - excess++; - } - } - } - } - if (excess >= used) { - for (i=0; iminv; - - while ((start != 0) && (start->minv < indentation.vertical_limit) && - (is_on_same_line(start, current_vpos))) { - if (page_contents->words.is_equal_to_tail()) { - start = 0; - } else { - page_contents->words.move_right(); - start = page_contents->words.get_data(); - } - } - if ((start != 0) && (start->minv < indentation.vertical_limit)) { - // onto next line now - current_vpos=start->minv; - while ((start != 0) && (start->minv < indentation.vertical_limit) && - (is_on_same_line(start, current_vpos))) { - if (start->minh == indentation.columns[i].left) { - return( TRUE ); - } - if (page_contents->words.is_equal_to_tail()) { - start = 0; - } else { - page_contents->words.move_right(); - start = page_contents->words.get_data(); - } - } - } - return( FALSE ); -} - -/* - * will_wrap_text - returns TRUE if text is wrapped in column, i. - */ - -int html_printer::will_wrap_text (int i, text_glob *start) -{ - text_glob *current=page_contents->words.get_data(); - - if (auto_on) { - rewind_text_to(start); - while ((start != 0) && (start->minv < indentation.vertical_limit)) { - if (indentation.columns[i].right == start->maxh) { - // ok right word is on column boarder - check next line - if (next_line_on_left_column(i, start)) { - rewind_text_to(current); - return( TRUE ); - } - } - if (page_contents->words.is_equal_to_tail()) { - start = 0; - } else { - page_contents->words.move_right(); - start = page_contents->words.get_data(); - } - } - } - rewind_text_to(current); - return( FALSE ); -} - -/* - * remove_unnecessary_unused - runs through a table and decides whether an unused - * column can be removed. This is only true if the - * column to the left does not wrap text. - */ - -void html_printer::remove_unnecessary_unused (text_glob *start) -{ - int i=0; - int left=get_left(); - int right; - - while (itext_string, "[b4 steal] indentation.columns", indentation.columns); - } - - // now steal from the unused columns.. - remove_unnecessary_unused(start); - - if (debug_table_on) { - display_columns(start->text_string, "[after steal] indentation.columns", indentation.columns); - } - -#if 0 - utilize_round_off(); -#endif - remove_zero_percentage_column(); -} - - -/* - * is_column_subset - returns TRUE if the columns described by small can be contained in - * the columns in large. - */ - -int html_printer::is_column_subset (struct text_defn *small, struct text_defn *large) -{ - int ns=count_columns(small); - int nl=count_columns(large); - int found; - int i=0; - int j; - - while (i0 ); -} - -/* - * right_most_column - returns the right most column position. - */ - -int html_printer::right_most_column (struct text_defn *col) -{ - int i = count_columns(col); - - if (i>0) { - return( col[i-1].right ); - } else { - return( 0 ); - } -} - -/* - * large_enough_gap_for_two - returns TRUE if there exists a large enough gap - * for two lines. - */ - -int html_printer::large_enough_gap_for_two (struct text_defn *col) -{ - int i=0; - int found=FALSE; - int gap=MIN_COLUMN_FOR_TWO_LINES; - - if (abs(col[i].left - left_margin_indent) >= gap) { - found = TRUE; - } - while ((col[i].right != 0) && (col[i+1].right != 0)) { - if (abs(col[i+1].left-col[i].right) >= gap) { - found = TRUE; - i++; - } else { - // not good enough for this table, remove it - col[i].right = col[i+1].right; - remove_entry_in_line(col, i+1); - } - } - return( found ); -} - -/* - * is_small_table - applies some rigorous rules to test whether we should start this - * table at this point. - */ - -int html_printer::is_small_table (int lines, struct text_defn *last_guess, - struct text_defn *words_1, struct text_defn *cols_1, - struct text_defn *words_2, struct text_defn *cols_2, - int *limit, int *limit_1) -{ - /* - * firstly we check for an indented paragraph - */ - - if ((lines >= 2) && - (count_columns(cols_1) == count_columns(cols_2)) && (count_columns(cols_1) == 1) && - right_indentation(cols_1) && (! right_indentation(cols_2)) && - (cols_1[0].right == right_margin_indent)) { - return( FALSE ); - } - - if (lines == 2) { - /* - * as we only have two lines in our table we need to examine in detail whether - * we should construct a table from these two lines. - * For example if the text is the start of an indented paragraph and - * line1 and line2 are contineous then they should form one row in our table but - * if line1 and line2 are not contineous it is safer to treat them separately. - * - * We are prepared to reduce the table to one line - */ - if (((count_columns(cols_1) != count_columns(cols_2)) && (cols_1[0].left > cols_2[0].left)) || - (! ((is_column_subset(cols_1, cols_2)) || - (is_column_subset(cols_2, cols_1))))) { - /* - * now we must check to see whether line1 and line2 join - */ - if ((right_most_column(cols_1) == right_margin_indent) && - (cols_2[0].left == left_margin_indent)) { - /* - * looks like they join, we don't want a table at all. - */ - return( FALSE ); - } - /* - * use single line table - */ - lines--; - *limit = *limit_1; - copy_line(last_guess, cols_1); - } - } - - if ((count_columns(last_guess)==1) && (right_indentation(last_guess))) { - if (lines == 1) { - *limit = *limit_1; - } - return( TRUE ); - } - - /* - * check for large gap with single line or if multiple lines with more than one column - */ - - if (lines == 1) { - if (large_enough_gap(last_guess)) { - *limit = *limit_1; - return( TRUE ); - } - } else if (count_columns(last_guess)>1) { - if (lines == 2) { - return( large_enough_gap_for_two(last_guess) ); - } - return( TRUE ); - } - return( FALSE ); -} - - -/* - * is_appropriate_to_start_table - returns TRUE if it is appropriate to start the table - * at this point. - */ - -int html_printer::is_appropriate_to_start_table (struct text_defn *cols_1, - struct text_defn *cols_2, - struct text_defn *last_guess) -{ - if (count_columns(last_guess) == 1) { - if (debug_table_on) { - display_columns("", "[is] cols_1" , cols_1); - display_columns("", "[is] cols_2" , cols_2); - display_columns("", "[is] last_guess", last_guess); - } - - if (! ((is_column_subset(cols_1, cols_2)) || - (is_column_subset(cols_2, cols_1)))) { - return( FALSE ); - } - if ((count_columns(cols_1) == 1) && - (cols_1[0].left > left_margin_indent) && (cols_1[0].right < right_margin_indent) && - (cols_1[0].right != cols_2[0].right) && - (count_columns(last_guess) == 1)) { - return( FALSE ); - } - } - return( TRUE ); -} - -/* - * is_a_full_width_column - returns TRUE if there exists a full width column. - */ - -int html_printer::is_a_full_width_column (void) -{ - int i=0; - - while (i 2) { - int i=0; - int c=count_columns(cols_1); - - count_hits(cols_1, count_columns(cols_1), indentation.vertical_limit); - rewind_text_to(start); - count_right_hits(cols_1, count_columns(cols_1)); - rewind_text_to(start); - while (i 1) || (cols_1[i].right_hits > 1)) { - return( FALSE ); - } - i++; - } - /* - * first line (cols_1) is not aligned on any future column, we defer. - */ - return( TRUE ); - } - return( FALSE ); -} - -/* - * is_new_exact_right - returns TRUE if the, next_cols, has a word sitting - * on the right hand margin of last_guess. But only - * if no exact right word was found in last_cols. - */ - -int html_printer::is_new_exact_right (struct text_defn *last_guess, - struct text_defn *last_cols, - struct text_defn *next_cols) -{ - int n=count_columns(last_guess)-1; - return( FALSE ); - - if ((n>=0) && (last_guess[n].right != 0) && (last_cols[n].right != 0) && (next_cols[n].right != 0)) { - if ((last_cols[n].right != last_guess[n].right) && - ((next_cols[n].right == last_guess[n].right) || (next_cols[n].right == right_margin_indent))) { - return( TRUE ); - } - } - return( FALSE ); -} - -/* - * found_use_for_table - checks whether the some words on one line directly match - * the horizontal alignment of the line below. - * This is rather complex as we need to detect text tables - * such as .2C .IP Abstracts and indentations - * - * Algorithm is: - * - * read first line of text and calculate the significant - * gaps between words - * next next line of text and do the same - * if a conflict between these lines exists and - * first line is centered - * then - * return centered line - * elsif start of a table is found - * then - * repeat - * read next line of text and calculate significant gaps - * until conflict between the gaps is found - * record table - * return table found - * else - * return no table found - * fi - */ - -int html_printer::found_use_for_table (text_glob *start) -{ - text_glob *t; - struct text_defn all_words [MAX_WORDS_PER_LINE]; // logical OR of words on each line - struct text_defn words_1 [MAX_WORDS_PER_LINE]; // actual words found on first line - struct text_defn words_2 [MAX_WORDS_PER_LINE]; // actual words found on second line - struct text_defn cols_1 [MAX_WORDS_PER_LINE]; // columns found on line 1 - struct text_defn cols_2 [MAX_WORDS_PER_LINE]; // columns found on line 2 - struct text_defn last_words [MAX_WORDS_PER_LINE]; // actual words found on last line - struct text_defn last_cols [MAX_WORDS_PER_LINE]; // columns found so far - struct text_defn next_words [MAX_WORDS_PER_LINE]; // actual words found on last line (new) - struct text_defn next_cols [MAX_WORDS_PER_LINE]; // columns found on next line - struct text_defn last_guess [MAX_WORDS_PER_LINE]; // columns found on last line - // (logical AND of gaps (treat gaps = true)) - struct text_defn next_guess [MAX_WORDS_PER_LINE]; // columns found on next line - // (logical AND of gaps (treat gaps = true)) - struct text_defn prev_guess [MAX_WORDS_PER_LINE]; // temporary copy of last_guess - int i =0; - int lines =1; // number of lines read - int limit; // vertical limit reached in our table - int limit_1; // vertical position after line 1 - -#if 0 - if (strcmp(start->text_string, "
") == 0) { - stop(); - } -#endif - - /* - * get first set of potential columns into last_line, call this last_guess - */ - limit = collect_columns(words_1, cols_1, 0, 0, MAX_WORDS_PER_LINE); - limit_1 = limit; - copy_line(last_guess, cols_1); - - /* - * initialize the all_words columns - if this should ever equal a complete line - * with no gaps then we terminate the table. - */ - copy_line(all_words, cols_1); - - /* - * and set the current limit found - */ - indentation.vertical_limit = limit; - - /* - * have we reached the end of page? - */ - if (page_contents->words.is_equal_to_head() || (limit == 0)) { - cols_2[0].left = 0; - cols_2[0].right = 0; - } else { - /* - * the answer to the previous question was no. - * So we need to examine the next line - */ - limit = collect_columns(words_2, cols_2, words_1, cols_1, MAX_WORDS_PER_LINE); - if (limit >= 0) { - lines++; - } - } - - /* - * now check to see whether the first line looks like a single centered line - */ - if (single_centered_line(cols_1, cols_2, start)) { - rewind_text_to(start); - write_centered_line(start); - /* - * indicate to caller than we have centered text, not found a table. - */ - indentation.no_of_columns = 0; - return( TRUE ); - } else if (! table_on) { - /* - * user does not allow us to find a table (we are allowed to find centered lines (above)) - */ - rewind_text_to(start); - return( FALSE ); - } - - /* - * remove any gaps from all_words - */ - combine_line(all_words, cols_2); - if (debug_table_on) { - display_columns(start->text_string, "[1] all_words" , all_words); - display_columns(start->text_string, "[1] cols_1" , cols_1); - display_columns(start->text_string, "[1] words_1" , words_1); - display_columns(start->text_string, "[1] cols_2" , cols_2); - display_columns(start->text_string, "[1] words_2" , words_2); - display_columns(start->text_string, "[1] last_guess", last_guess); - } - - /* - * next_guess = last_guess AND next_cols (where gap = true) - */ - - if (remove_white_using_words(prev_guess, last_guess, cols_2)) { - } - if (remove_white_using_words(next_guess, prev_guess, all_words)) { - } - - if (debug_table_on) { - display_columns(start->text_string, "[2] next_guess", next_guess); - } - - copy_line(prev_guess, cols_1); - combine_line(prev_guess, cols_2); - - /* - * if no sequence of words crosses a column and - * both the last column and all_words are not a full solid line of text - */ - if ((! conflict_with_words(next_guess, all_words)) && - (continue_searching_column(next_guess, next_guess, all_words)) && - (is_appropriate_to_start_table(cols_1, cols_2, prev_guess)) && - (! page_contents->words.is_equal_to_head()) && - ((end_region_vpos < 0) || (limit < end_region_vpos)) && - (limit > 0)) { - - /* - * subtract any columns which are bridged by a sequence of words - */ - - copy_line(next_cols , cols_2); - copy_line(next_words, words_2); - - do { - copy_line(prev_guess, next_guess); // copy next_guess away so we can compare it later - combine_line(last_guess, next_guess); - - if (debug_table_on) { - t = page_contents->words.get_data(); - display_columns(t->text_string, "[l] last_guess", last_guess); - } - indentation.vertical_limit = limit; - - copy_line(last_cols, next_cols); - copy_line(last_words, next_words); - if (page_contents->words.is_equal_to_head()) { - /* - * terminate the search - */ - next_cols[0].left = 0; - next_cols[0].right = 0; - } else { - limit = collect_columns(next_words, next_cols, last_words, last_cols, MAX_WORDS_PER_LINE); - lines++; - } - - combine_line(all_words, next_cols); - if (debug_table_on) { - display_columns(t->text_string, "[l] all_words" , all_words); - display_columns(t->text_string, "[l] last_cols" , last_cols); - display_columns(t->text_string, "[l] next_words", next_words); - display_columns(t->text_string, "[l] next_cols" , next_cols); - } - - if (limit >= 0) { - /* - * (if limit is < 0 then the table ends anyway.) - * we check to see whether we should combine close columns. - */ - can_loose_column(start, last_guess, limit); - } - t = page_contents->words.get_data(); -#if 0 - if (strcmp(t->text_string, "heT") == 0) { - stop(); - } -#endif - - } while ((! remove_white_using_words(next_guess, last_guess, next_cols)) && - (! conflict_with_words(next_guess, all_words)) && - (continue_searching_column(next_guess, last_guess, all_words)) && - ((is_continueous_column(prev_guess, last_cols)) || (is_exact_left(last_guess, next_cols))) && - (! is_new_exact_right(last_guess, last_cols, next_cols)) && - (! page_contents->words.is_equal_to_head()) && - (! check_lack_of_hits(next_guess, last_guess, start, limit)) && - ((end_region_vpos <= 0) || (t->minv < end_region_vpos)) && - (limit >= 0)); - lines--; - } - - if (limit < 0) { - indentation.vertical_limit = limit; - } - - if (page_contents->words.is_equal_to_head()) { - // end of page check whether we should include everything - if ((! conflict_with_words(next_guess, all_words)) && - (continue_searching_column(next_guess, last_guess, all_words)) && - ((is_continueous_column(prev_guess, last_cols)) || (is_exact_left(last_guess, next_cols)))) { - // end of page reached - therefore include everything - page_contents->words.start_from_tail(); - t = page_contents->words.get_data(); - combine_line(last_guess, next_guess); - indentation.vertical_limit = t->minv; - } - } else { - t = page_contents->words.get_data(); - if (((! conflict_with_words(last_guess, all_words))) && - (t->minv > end_region_vpos) && (end_region_vpos > 0)) { - indentation.vertical_limit = limit; - } - if ((end_region_vpos > 0) && (t->minv > end_region_vpos)) { - indentation.vertical_limit = min(indentation.vertical_limit, end_region_vpos+1); - } else if (indentation.vertical_limit < 0) { - // -1 as we don't want to include section heading itself - indentation.vertical_limit = -indentation.vertical_limit-1; - } - } - - if (debug_table_on) { - display_columns(start->text_string, "[1] all_words" , all_words); - display_columns(start->text_string, "[1] cols_1" , cols_1); - display_columns(start->text_string, "[1] words_1" , words_1); - display_columns(start->text_string, "[1] cols_2" , cols_2); - display_columns(start->text_string, "[1] words_2" , words_2); - display_columns(start->text_string, "[1] last_guess", last_guess); - display_columns(start->text_string, "[1] next_guess", next_guess); - } - rewind_text_to(start); - - i = count_columns(last_guess); - if ((i>1) || (right_indentation(last_guess))) { - - // was (continue_searching_column(last_guess, last_guess, all_words)))) { - if (should_defer_table(lines, start, cols_1)) { - /* - * yes, but let us check for a single line table - */ - lines = 1; - copy_line(last_guess, cols_1); - } - - if (is_small_table(lines, last_guess, words_1, cols_1, words_2, cols_2, - &indentation.vertical_limit, &limit_1)) { - - // copy match into permenant html_table - - if (indentation.columns != 0) { - free(indentation.columns); - } - if (debug_table_on) { - display_columns(start->text_string, "[x] last_guess", last_guess); - } - add_column_gaps(last_guess); - if (debug_table_on) { - display_columns(start->text_string, "[g] last_guess", last_guess); - } - - /* - * +1 for the potential header_margin - * +1 for null - */ - - indentation.no_of_columns = count_columns(last_guess); - indentation.columns = (struct text_defn *)malloc((indentation.no_of_columns+2)*sizeof(struct text_defn)); - - i=0; - while (i<=indentation.no_of_columns) { - indentation.columns[i].left = last_guess[i].left; - indentation.columns[i].right = last_guess[i].right; - i++; - } - - if (indentation.no_of_columns>0) { - assign_used_columns(start); - rewind_text_to(start); - calculate_percentage_width(start); - - if (debug_table_on) { - display_columns(start->text_string, "[g] indentation.columns", indentation.columns); - } - - /* - * clearly a single column 100% is not worth using a table. - * Also we check to see whether the first line is sensibly - * part of this table. - */ - if (is_a_full_width_column()) { - indentation.no_of_columns = 0; - free( indentation.columns ); - indentation.columns = 0; - } else { - return( TRUE ); - } - } - } - } - return( FALSE ); -} - -/* - * define_cell - creates a table cell using the percentage width. - */ - -void html_printer::define_cell (int i) -{ - html.put_string("
\n"); - if (g != 0) { - page_contents->words.move_left(); - // and correct output_vpos - g=page_contents->words.get_data(); - output_vpos = g->minv; - } - } -} - -/* - * total_percentages - returns the total of all the percentages in the table. - */ - -int html_printer::total_percentages () -{ - int i; - int sum=0; - - for (i=0; i\n"); -} - -/* - * end_table - finishes off a table. - */ - -void html_printer::end_table (void) -{ - html.put_string("
\n"); -} - -/* - * column_display_word - given a left, right pair and the indentation.vertical_limit - * write out html text within this region. - */ - -void html_printer::column_display_word (int cell, int vert, int left, int right, int next) -{ - text_glob *g=page_contents->words.get_data(); - - supress_sub_sup = TRUE; - if (left != next) { - define_cell(cell); - begin_paragraph_no_height(left_alignment); - while ((g != 0) && (g->minv <= vert)) { - if ((left <= g->minh) && (g->minhis_raw_command) { - html.put_string((char *)g->text_string); - } else { - translate_to_html(g); - } - if (postword != 0) { - html.put_string(postword); - } - issued_newline = FALSE; - } - } - if (page_contents->words.is_equal_to_tail()) { - g = 0; - } else { - page_contents->words.move_right(); - g=page_contents->words.get_data(); - } - } - end_paragraph(); - html.put_string("
\n"); - indentation.no_of_columns = 0; - restore_paragraph(); - supress_sub_sup = TRUE; -} - - -/* - * is_in_table - returns TRUE if we are inside an html table. - */ - -int html_printer::is_in_table (void) -{ - return( indentation.no_of_columns != 0 ); -} - - -/* - * column_calculate_right_margin - scan through the column and find the right most margin - */ - -int html_printer::column_calculate_right_margin (int left, int right) -{ - if (left == right) { - return( right ); - } else { - int rightmost =-1; - int count = 0; - text_glob *start = page_contents->words.get_data(); - text_glob *g = start; - - while ((g != 0) && (g->minv <= indentation.vertical_limit)) { - if ((left <= g->minh) && (g->minhtext_string, g->maxh); fflush(stderr); - } - if (g->maxh == rightmost) { - count++; - } else if (g->maxh > rightmost) { - count = 1; - rightmost = g->maxh; - } - if (g->maxh > right) { - if (debug_on) { - fprintf(stderr, "problem as right word = %s %d [%d..%d]\n", - g->text_string, right, g->minh, g->maxh); fflush(stderr); - // stop(); - } - } - } - page_contents->words.move_right(); - if (page_contents->words.is_equal_to_head()) { - g = 0; - page_contents->words.start_from_tail(); - } else { - g=page_contents->words.get_data(); - } - } - rewind_text_to(start); - if (rightmost == -1) { - return( right ); // no words in this column - } else { - return( rightmost ); - } - } -} - -/* - * column_calculate_left_margin - scan through the column and find the left most margin - */ - -int html_printer::column_calculate_left_margin (int left, int right) -{ - if (left == right) { - return( left ); - } else { - int leftmost=right; - text_glob *start = page_contents->words.get_data(); - text_glob *g = start; - - while ((g != 0) && (g->minv <= indentation.vertical_limit)) { - if ((left <= g->minh) && (g->minhminh, leftmost); - } - page_contents->words.move_right(); - if (page_contents->words.is_equal_to_head()) { - g = 0; - page_contents->words.start_from_tail(); - } else { - g=page_contents->words.get_data(); - } - } - rewind_text_to(start); - if (leftmost == right) { - return( left ); // no words in this column - } else { - return( leftmost ); - } - } -} - -/* - * find_column_index - returns the index to the column in which glob, t, exists. - */ - -int html_printer::find_column_index_in_line (text_glob *t, text_defn *line) -{ - int i=0; - - while ((line != 0) && ((line[i].right != 0) || (line[i].right != 0)) && - (! ((line[i].left<=t->minh) && (line[i].right>t->minh)))) { - i++; - } - return( i ); -} - -/* - * find_column_index - returns the index to the column in which glob, t, exists. - */ - -int html_printer::find_column_index (text_glob *t) -{ - int i=0; - - while ((iminh) && - (indentation.columns[i].right>t->minh)))) { - i++; - } - return( i ); -} - -/* - * determine_row_limit - checks each row to see if there is a gap in a cell. - * We return the vertical position after the empty cell - * at the start of the next line. - */ - -int html_printer::determine_row_limit (text_glob *start, int v) -{ - text_glob *t; - int i; - int vpos, last, prev; - text_glob *is_gap[MAX_WORDS_PER_LINE]; - text_glob zero(&start->text_style, 0, 0, 0, 0, 0, 0, 0, 0); - -#if 1 - if ((v == -1) && (strcmp(start->text_string, "CASE") == 0)) { - stop(); - } -#endif - - if (v >= indentation.vertical_limit) { - return( v+1 ); - } else { - /* - * initially we start with all gaps in our table - * after a gap we start a new row - * here we set the gap array to the previous line - */ - - if (v>=0) { - t = page_contents->words.get_data(); - if (t->minv < v) { - do { - page_contents->words.move_right(); - t = page_contents->words.get_data(); - } while ((! page_contents->words.is_equal_to_head()) && - (t->minv <= v)); - } - } - if (page_contents->words.is_equal_to_head()) { - t = &zero; - } else { - page_contents->words.move_left(); - t = page_contents->words.get_data(); - } - - prev = t->minv; - for (i=0; iwords.is_equal_to_tail()) { - rewind_text_to(start); - return( indentation.vertical_limit ); - } else { - page_contents->words.move_right(); - } - t = page_contents->words.get_data(); - vpos = t->minv; - - // now check each row for a gap - do { - last = vpos; - vpos = t->minv; - if (vpos > indentation.vertical_limit) { - // we have reached the end of the table, quit - rewind_text_to(start); - return( indentation.vertical_limit ); - } - - i = find_column_index(t); - if (i>=indentation.no_of_columns) { - error("find_column_index has failed"); - stop(); - } else { - if (! is_on_same_line(t, last)) { - prev = last; - } - - if ((! is_on_same_line(is_gap[i], vpos)) && (! is_on_same_line(is_gap[i], prev)) && - (indentation.columns[i].is_used)) { - // no word on previous line - must be a gap - force alignment of row - rewind_text_to(start); - return( prev ); - } - is_gap[i] = t; - } - page_contents->words.move_right(); - t = page_contents->words.get_data(); - } while ((! page_contents->words.is_equal_to_head()) && - (vpos < indentation.vertical_limit) && (vpos >= last)); - page_contents->words.move_left(); - t = page_contents->words.get_data(); - rewind_text_to(start); - return( indentation.vertical_limit ); - } -} - -/* - * assign_used_columns - sets the is_used field of the column array of records. - */ - -void html_printer::assign_used_columns (text_glob *start) -{ - text_glob *t = start; - int i; - - for (i=0; iwords.is_empty()) { - do { - i = find_column_index(t); - if (indentation.columns[i].right != 0) { - if (debug_table_on) { - fprintf(stderr, "[%s] in column %d at %d..%d limit %d\n", t->text_string, - i, t->minv, t->maxv, indentation.vertical_limit); fflush(stderr); - } - indentation.columns[i].is_used = TRUE; - } - page_contents->words.move_right(); - t = page_contents->words.get_data(); - } while ((t->minvwords.is_equal_to_head())); - } - if (debug_table_on) { - for (i=0; i ", - indentation.columns[i].left, - indentation.columns[i].right, - indentation.columns[i].is_used); - } - fprintf(stderr, "\n"); - fflush(stderr); - } -} - -/* - * adjust_margin_percentages - so far we have ignored the header_indent - * and just considered left_margin_indent..right_margin_indent. - * (We do this since we can assume 100% is total width for main text). - * However as header_indent can be < left_margin_indent we need to - * recalculate the real percentages in the light of the extended width. - */ - -void html_printer::adjust_margin_percentages (void) -{ - if ((header_indent < left_margin_indent) && (header_indent != -1)) { - /* - * recalculation necessary - */ - int i=0; - - while (i0) { - int i; - int left, right; - int limit=-1; - - start_table(); - rewind_text_to(start); - count_right_hits(indentation.columns, indentation.no_of_columns); - rewind_text_to(start); - - do { - limit = determine_row_limit(start, limit); // find the bottom of the next row - html.put_string("\n"); - i=0; - start = page_contents->words.get_data(); - while (iminv; - output_hpos = indentation.columns[i].left; - // and display each column until limit - right = column_calculate_right_margin(indentation.columns[i].left, - indentation.columns[i].right); - left = column_calculate_left_margin(indentation.columns[i].left, - indentation.columns[i].right); - - if (right>indentation.columns[i].right) { - if (debug_on) { - fprintf(stderr, "assert calculated right column edge is greater than column\n"); fflush(stderr); - // stop(); - } - } - - if (lefttext_string); - fflush(stderr); - // stop(); - } - } else { - indentation.wrap_margin = TRUE; - } - - column_display_word(i, limit, left, right, indentation.columns[i].right); - i++; - } - - if (page_contents->words.is_equal_to_tail()) { - start = 0; - } else { - page_contents->words.sub_move_right(); - if (page_contents->words.is_empty()) { - start = 0; - } else { - start = page_contents->words.get_data(); - } - } - - html.put_string("\n"); - } while (((limit < indentation.vertical_limit) && (start != 0) && - (! page_contents->words.is_empty())) || (limit == -1)); - end_table(); - - if (start == 0) { - // finished page remove all words - page_contents->words.start_from_head(); - while (! page_contents->words.is_empty()) { - page_contents->words.sub_move_right(); - } - } else if (! page_contents->words.is_empty()) { - page_contents->words.move_left(); - } - } -} - -/* - * write_centered_line - generates a line of centered text. - */ - -void html_printer::write_centered_line (text_glob *g) -{ - int current_vpos=g->minv; - - move_vertical(g, center_alignment); - - header.written_header = FALSE; - supress_sub_sup = TRUE; - output_vpos = g->minv; - output_hpos = g->minh; - do { - char *postword=html_position_text(g, left_margin_indent, right_margin_indent); - - if (! header.written_header) { - if (g->is_raw_command) { - html.put_string((char *)g->text_string); - } else { - translate_to_html(g); - } - if (postword != 0) { - html.put_string(postword); - } - need_one_newline = TRUE; - issued_newline = FALSE; - } - page_contents->words.move_right(); - g = page_contents->words.get_data(); - } while ((! page_contents->words.is_equal_to_head()) && (is_on_same_line(g, current_vpos))); - page_contents->words.move_left(); // so when we move right we land on the word following this centered line - need_one_newline = TRUE; -} - -/* - * is_in_middle - returns TRUE if the text defn, t, is in the middle of the page. - */ - -int html_printer::is_in_middle (int left, int right) -{ - return( abs(abs(left-left_margin_indent) - abs(right_margin_indent-right)) <= CENTER_TOLERANCE ); -} - -/* - * single_centered_line - returns TRUE if first is a centered line with a different - * margin to second. - */ - -int html_printer::single_centered_line (text_defn *first, text_defn *second, text_glob *g) -{ - return( - ((count_columns(first) == 1) && (first[0].left != left_margin_indent) && - (first[0].left != second[0].left) && is_in_middle(first->left, first->right)) - ); -} - -/* - * check_able_to_use_center - returns TRUE if we can see a centered line. - */ - -int html_printer::check_able_to_use_center (text_glob *g) -{ - if (auto_on && table_on && ((! is_on_same_line(g, output_vpos)) || issued_newline) && (! using_table_for_indent())) { - // we are allowed to check for centered line - // first check to see whether we might be looking at a set of columns - struct text_defn last_guess[MAX_WORDS_PER_LINE]; - struct text_defn last_words[MAX_WORDS_PER_LINE]; - - collect_columns(last_words, last_guess, 0, 0, MAX_WORDS_PER_LINE); - - rewind_text_to(g); - if ((count_columns(last_guess) == 1) && (is_in_middle(last_guess[0].left, last_guess[0].right))) { - write_centered_line(g); - return( TRUE ); - } - } - return( FALSE ); -} - -/* - * check_able_to_use_table - examines forthcoming text to see whether we can - * better format it by using an html transparent table. - */ - -int html_printer::check_able_to_use_table (text_glob *g) -{ - if (auto_on && ((! is_on_same_line(g, output_vpos)) || issued_newline) && (! using_table_for_indent())) { - // we are allowed to check for table - - if ((output_hpos != right_margin_indent) && (found_use_for_table(g))) { - foreach_column_include_text(g); - return( TRUE ); - } - } - return( FALSE ); -} - -/* - * move_vertical - if we are using html auto formatting then decide whether to - * break the line via a
or a

sequence. - */ - -void html_printer::move_vertical (text_glob *g, paragraph_type p) -{ - int r = font::res; - int height = (g->text_style.point_size+2)*r/72; // --fixme-- we always assume VS is PS+2 (could do better) - int temp_vpos; - - if (auto_on) { - if ((more_than_line_break(output_vpos, g->minv, height)) || (p != current_paragraph->para_type)) { - end_paragraph(); - begin_paragraph(p); - } else { - html_newline(); - } - } else { - if (output_vpos == -1) { - temp_vpos = g->minv; - } else { - temp_vpos = output_vpos; - } - - force_begin_paragraph(); - if (need_one_newline) { - html_newline(); - temp_vpos += height; - } else { - need_one_newline = TRUE; - } - - while ((temp_vpos < g->minv) && (more_than_line_break(temp_vpos, g->minv, height))) { - html_newline(); - temp_vpos += height; - } - } -} - -/* - * emit_space - emits a space within html, it checks for the font type and - * will change font depending upon, g. Courier spaces are larger - * than roman so we need consistancy when changing between them. - */ - -void html_printer::emit_space (text_glob *g, int force_space) -{ - if (! current_paragraph->need_paragraph) { - // only generate a space if we have written a word - as html will ignore it otherwise - if ((output_style != g->text_style) && (g->text_style.f != 0)) { - terminate_current_font(); - } - if (force_space || (g->minh > output_hpos)) { - html.put_string(" "); - } - change_font(g, TRUE); - } -} - -/* - * html_position_text - determine whether the text is subscript/superscript/normal - * or a header. - */ - -char *html_printer::html_position_text (text_glob *g, int left_margin, int right_margin) -{ - char *postword=0; - - begin_paragraph(left_alignment); - - if ((! header.written_header) && - (is_on_same_line(g, output_vpos) || - pretend_is_on_same_line(g, left_margin, right_margin))) { - - /* - * check whether we should supress superscripts and subscripts. - * I guess we might be able to do better by examining text on this line - * --fixme-- - */ - - if ((! is_on_same_line(g, output_vpos)) && (pretend_is_on_same_line(g, left_margin, right_margin))) { - supress_sub_sup = TRUE; - } - header.written_header = FALSE; - force_begin_paragraph(); - - // check whether we need to insert white space between words on 'same' line - if (pretend_is_on_same_line(g, left_margin, right_margin)) { - emit_space(g, TRUE); - } - - // check whether the font was reset after generating an image - if (output_style.f == 0) { - change_font(g, TRUE); - } - - if (looks_like_subscript(g)) { - - g->text_style.point_size = output_style.point_size; - g->minv = output_vpos; // this ensures that output_vpos doesn't alter - // which allows multiple subscripted words - move_horizontal(g, left_margin); - html.put_string(""); - postword = ""; - } else if (looks_like_superscript(g)) { - - g->text_style.point_size = output_style.point_size; - g->minv = output_vpos; - - move_horizontal(g, left_margin); - html.put_string(""); - postword = ""; - } else { - move_horizontal(g, left_margin); - } - supress_sub_sup = FALSE; - } else { - // we have found a new line - if (! header.written_header) { - move_vertical(g, left_alignment); - } - header.written_header = FALSE; - - if (processed_header(g)) { - // we must not alter output_vpos as we have peeped at the next word - // and set vpos to this - to ensure we do not generate a
after - // a heading. (The html heading automatically generates a line break) - output_hpos = left_margin; - return( postword ); - } else { - force_begin_paragraph(); - if ((! is_in_table()) && (margin_on)) { - make_html_indent(left_margin); - } - if (g->minh-left_margin != 0) { - make_html_indent(g->minh-left_margin); - } - change_font(g, TRUE); - supress_sub_sup = FALSE; - } - } - output_vpos = g->minv; - output_hpos = g->maxh; - return( postword ); -} - - -int html_printer::html_position_region (void) -{ - int r = font::res; - int height = output_style.point_size*r/72; - int temp_vpos; - int is_center = FALSE; - - if (output_style.point_size != 0) { - if (output_vpos != start_region_vpos) { - - // graphic starts on a different line - if (output_vpos == -1) { - temp_vpos = start_region_vpos; - } else { - temp_vpos = output_vpos; - } - supress_sub_sup = TRUE; - if (need_one_newline) { - html_newline(); - temp_vpos += height; - } else { - need_one_newline = TRUE; - } - - while ((temp_vpos < start_region_vpos) && - (more_than_line_break(temp_vpos, start_region_vpos, height))) { - html_newline(); - temp_vpos += height; - } - } - } - if (auto_on && (is_in_middle(start_region_hpos, end_region_hpos))) { - is_center = TRUE; - } else { - if (start_region_hpos > get_left()) { - make_html_indent(start_region_hpos-get_left()); - } - } - output_vpos = start_region_vpos; - output_hpos = start_region_hpos; - return( is_center ); -} - -/* - * gs_x - translate and scale the x axis - */ - -int html_printer::gs_x (int x) -{ - x += IMAGE_BOARDER_PIXELS/2; - return((x-start_region_hpos)*postscript_res/font::res); -} - - -/* - * gs_y - translate and scale the y axis - */ - -int html_printer::gs_y (int y) -{ - int yoffset=((int)(A4_PAGE_LENGTH*(double)font::res))-end_region_vpos; - - y += IMAGE_BOARDER_PIXELS/2; - return( (y+yoffset)*postscript_res/font::res ); -} - - -void html_printer::troff_position_text (text_glob *g) -{ - change_font(g, FALSE); - - troff.put_string("V"); - troff.put_number(gs_y(g->maxv)); - troff.put_string("\n"); - - troff.put_string("H"); - troff.put_number(gs_x(g->minh)); - troff.put_string("\n"); -} - -void html_printer::troff_change_font (const char *fontname, int size, int font_no) -{ - troff.put_string("x font "); - troff.put_number(font_no); - troff.put_string(" "); - troff.put_string(fontname); - troff.put_string("\nf"); - troff.put_number(font_no); - troff.put_string("\ns"); - troff.put_number(size*1000); - troff.put_string("\n"); -} - - -void html_printer::set_style(const style &sty) -{ -#if 0 - const char *fontname = sty.f->get_name(); - if (fontname == 0) - fatal("no internalname specified for font"); - - change_font(fontname, (font::res/(72*font::sizescale))*sty.point_size); -#endif -} - -void html_printer::end_of_line() -{ - flush_sbuf(); - output_hpos = -1; -} - -void html_printer::html_display_word (text_glob *g) -{ -#if 0 - if (strcmp(g->text_string, "ot") == 0) { - stop(); - } -#endif - if (! check_able_to_use_table(g)) { - char *postword=html_position_text(g, left_margin_indent, right_margin_indent); - - if (! header.written_header) { - if (g->is_raw_command) { - html.put_string((char *)g->text_string); - } else { - translate_to_html(g); - } - if (postword != 0) { - html.put_string(postword); - } - need_one_newline = TRUE; - issued_newline = FALSE; - } - } -} - -void html_printer::troff_display_word (text_glob *g) -{ - troff_position_text(g); - if (g->is_raw_command) { - int l=strlen((char *)g->text_string); - if (l == 1) { - troff.put_string("c"); - troff.put_string((char *)g->text_string); - troff.put_string("\n"); - } else if (l > 1) { - troff.put_string("C"); - troff.put_troffps_char((char *)g->text_string); - troff.put_string("\n"); - } - } else { - troff_position_text(g); - troff.put_string("t"); - troff.put_translated_string((const char *)g->text_string); - troff.put_string("\n"); - } -} - -void html_printer::display_word (text_glob *g, int is_to_html) -{ - if (is_to_html) { - html_display_word(g); - } else if ((g->is_raw_command) && (g->is_html_command)) { - // found a raw html command inside a graphic glob. - // We should emit the command to the html device, but of course we - // cannot place it correctly as we are dealing with troff words. - // Remember output_vpos will refer to troff and not html. - html.put_string((char *)g->text_string); - } else { - troff_display_word(g); - } -} - -/* - * translate_to_html - translates a textual string into html text - */ - -void html_printer::translate_to_html (text_glob *g) -{ - char buf[MAX_STRING_LENGTH]; - - str_translate_to_html(g->text_style.f, buf, MAX_STRING_LENGTH, - g->text_string, g->text_length, TRUE); - html.put_string(buf); -} - -/* - * html_knows_about - given a character name, troff, return TRUE - * if we know how to display this character using - * html unicode. - */ - -int html_printer::html_knows_about (char *troff) -{ - // --fixme-- needs to have similar code as above - return( FALSE ); -} - -/* - * display_fill - generates a troff format fill command - */ - -void html_printer::display_fill (graphic_glob *g) -{ - troff.put_string("Df ") ; - troff.put_number(g->fill); - troff.put_string(" 0\n"); -} - -/* - * display_line - displays a line using troff format - */ - -void html_printer::display_line (graphic_glob *g, int is_to_html) -{ - if (is_to_html) { - fatal("cannot emit lines in html"); - } - if (g->code == 'l') { - // straight line - - troff.put_string("V"); - troff.put_number(gs_y(g->point[0].y)); - troff.put_string("\n"); - - troff.put_string("H"); - troff.put_number(gs_x(g->point[0].x)); - troff.put_string("\n"); - - display_fill(g); - - troff.put_string("Dl "); - troff.put_number((g->point[1].x-g->point[0].x)*postscript_res/font::res); - troff.put_string(" "); - troff.put_number((g->point[1].y-g->point[0].y)*postscript_res/font::res); - troff.put_string("\n"); - // printf("line %c %d %d %d %d size %d\n", (char)g->code, g->point[0].x, g->point[0].y, - // g->point[1].x, g->point[1].y, g->size); - } else if ((g->code == 'c') || (g->code == 'C')) { - // circle - - int xradius = (g->maxh - g->minh) / 2; - int yradius = (g->maxv - g->minv) / 2; - // center of circle or elipse - - troff.put_string("V"); - troff.put_number(gs_y(g->minv+yradius)); - troff.put_string("\n"); - - troff.put_string("H"); - troff.put_number(gs_x(g->minh)); - troff.put_string("\n"); - - display_fill(g); - - if (g->code == 'c') { - troff.put_string("Dc "); - } else { - troff.put_string("DC "); - } - - troff.put_number(xradius*2*postscript_res/font::res); - troff.put_string("\n"); - - } else if ((g->code == 'e') || (g->code == 'E')) { - // ellipse - - int xradius = (g->maxh - g->minh) / 2; - int yradius = (g->maxv - g->minv) / 2; - // center of elipse - this is untested - - troff.put_string("V"); - troff.put_number(gs_y(g->minv+yradius)); - troff.put_string("\n"); - - troff.put_string("H"); - troff.put_number(gs_x(g->minh)); - troff.put_string("\n"); - - display_fill(g); - - if (g->code == 'e') { - troff.put_string("De "); - } else { - troff.put_string("DE "); - } - - troff.put_number(xradius*2*postscript_res/font::res); - troff.put_string(" "); - troff.put_number(yradius*2*postscript_res/font::res); - troff.put_string("\n"); - } else if ((g->code == 'p') || (g->code == 'P')) { - // polygon - troff.put_string("V"); - troff.put_number(gs_y(g->yc)); - troff.put_string("\n"); - - troff.put_string("H"); - troff.put_number(gs_x(g->xc)); - troff.put_string("\n"); - - display_fill(g); - - if (g->code == 'p') { - troff.put_string("Dp"); - } else { - troff.put_string("DP"); - } - - int i; - int xc=g->xc; - int yc=g->yc; - for (i=0; inopoints; i++) { - troff.put_string(" "); - troff.put_number((g->point[i].x-xc)*postscript_res/font::res); - troff.put_string(" "); - troff.put_number((g->point[i].y-yc)*postscript_res/font::res); - xc = g->point[i].x; - yc = g->point[i].y; - } - troff.put_string("\n"); - } else if (g->code == 'a') { - // arc - troff.put_string("V"); - troff.put_number(gs_y(g->yc)); - troff.put_string("\n"); - - troff.put_string("H"); - troff.put_number(gs_x(g->xc)); - troff.put_string("\n"); - - display_fill(g); - - troff.put_string("Da"); - - int i; - - for (i=0; inopoints; i++) { - troff.put_string(" "); - troff.put_number(g->point[i].x*postscript_res/font::res); - troff.put_string(" "); - troff.put_number(g->point[i].y*postscript_res/font::res); - } - troff.put_string("\n"); - } else if (g->code == '~') { - // spline - troff.put_string("V"); - troff.put_number(gs_y(g->yc)); - troff.put_string("\n"); - - troff.put_string("H"); - troff.put_number(gs_x(g->xc)); - troff.put_string("\n"); - - display_fill(g); - - troff.put_string("D~"); - - int i; - int xc=g->xc; - int yc=g->yc; - for (i=0; inopoints; i++) { - troff.put_string(" "); - troff.put_number((g->point[i].x-xc)*postscript_res/font::res); - troff.put_string(" "); - troff.put_number((g->point[i].y-yc)*postscript_res/font::res); - xc = g->point[i].x; - yc = g->point[i].y; - } - troff.put_string("\n"); - } -} - - -/* - * flush_sbuf - flushes the current sbuf into the list of glyphs. - */ - -void html_printer::flush_sbuf() -{ - if (sbuf_len > 0) { - int r=font::res; // resolution of the device - set_style(sbuf_style); - - page_contents->add(&sbuf_style, sbuf, sbuf_len, - sbuf_vpos-sbuf_style.point_size*r/72, sbuf_start_hpos, - sbuf_vpos , sbuf_end_hpos); - - output_hpos = sbuf_end_hpos; - output_vpos = sbuf_vpos; - sbuf_len = 0; - sbuf_dmark_hpos = -1; - } -} - - -void html_printer::set_line_thickness(const environment *env) -{ - line_thickness = env->size; - printf("line thickness = %d\n", line_thickness); -} - -void html_printer::draw(int code, int *p, int np, const environment *env) -{ - switch (code) { - - case 'l': - if (np == 2) { - page_contents->add_line(code, - env->hpos, env->vpos, env->hpos+p[0], env->vpos+p[1], - env->size, fill); - } else { - error("2 arguments required for line"); - } - break; - case 't': - { - if (np == 0) { - line_thickness = -1; - } else { - // troff gratuitously adds an extra 0 - if (np != 1 && np != 2) { - error("0 or 1 argument required for thickness"); - break; - } - line_thickness = p[0]; - } - break; - } - - case 'P': - // fall through - case 'p': - { - if (np & 1) { - error("even number of arguments required for polygon"); - break; - } - if (np == 0) { - error("no arguments for polygon"); - break; - } - // firstly lets add our current position to polygon - int oh=env->hpos; - int ov=env->vpos; - int i=0; - - while (iadd_polygon(code, np, p, env->hpos, env->vpos, env->size, fill); - } - break; - case 'E': - // fall through - case 'e': - if (np != 2) { - error("2 arguments required for ellipse"); - break; - } - page_contents->add_line(code, - env->hpos, env->vpos-p[1]/2, env->hpos+p[0], env->vpos+p[1]/2, - env->size, fill); - - break; - case 'C': - // fill circle - - case 'c': - { - // troff adds an extra argument to C - if (np != 1 && !(code == 'C' && np == 2)) { - error("1 argument required for circle"); - break; - } - page_contents->add_line(code, - env->hpos, env->vpos-p[0]/2, env->hpos+p[0], env->vpos+p[0]/2, - env->size, fill); - } - break; - case 'a': - { - if (np == 4) { - double c[2]; - - if (adjust_arc_center(p, c)) { - page_contents->add_arc('a', env->hpos, env->vpos, p, c, env->size, fill); - } else { - // a straignt line - page_contents->add_line('l', env->hpos, env->vpos, p[0]+p[2], p[1]+p[3], env->size, fill); - } - } else { - error("4 arguments required for arc"); - } - } - break; - case '~': - { - if (np & 1) { - error("even number of arguments required for spline"); - break; - } - if (np == 0) { - error("no arguments for spline"); - break; - } - // firstly lets add our current position to spline - int oh=env->hpos; - int ov=env->vpos; - int i=0; - - while (iadd_spline('~', env->hpos, env->vpos, np, p, env->size, fill); - } - break; - case 'f': - { - if (np != 1 && np != 2) { - error("1 argument required for fill"); - break; - } - fill = p[0]; - if (fill < 0 || fill > FILL_MAX) { - // This means fill with the current color. - fill = FILL_MAX + 1; - } - break; - } - - default: - error("unrecognised drawing command `%1'", char(code)); - break; - } -} - - -void html_printer::begin_page(int n) -{ - page_number = n; - html.begin_comment("Page: ").comment_arg(i_to_a(page_number)).end_comment();; - no_of_printed_pages++; - - output_style.f = 0; - output_space_code = 32; - output_draw_point_size = -1; - output_line_thickness = -1; - output_hpos = -1; - output_vpos = -1; -} - -void testing (text_glob *g) {} - -void html_printer::flush_graphic (void) -{ - graphic_glob g; - - graphic_level = 0; - page_contents->is_in_graphic = FALSE; - - g.minv = -1; - g.maxv = -1; - calculate_region_range(&g); - if (g.minv != -1) { - page_contents->make_new_region(&g); - } - move_region_to_page(); -} - -void html_printer::end_page(int) -{ - flush_sbuf(); - flush_graphic(); - flush_page(); -} - -font *html_printer::make_font(const char *nm) -{ - return html_font::load_html_font(nm); -} - -html_printer::~html_printer() -{ - if (fseek(tempfp, 0L, 0) < 0) - fatal("fseek on temporary file failed"); - html.set_file(stdout); - fputs("\n", stdout); - fputs("\n", stdout); - fputs("\n", stdout); - write_title(TRUE); - fputs("\n", stdout); - fputs("\n", stdout); - write_title(FALSE); - header.write_headings(stdout); - { - extern const char *Version_string; - html.begin_comment("Creator : ") - .comment_arg("groff ") - .comment_arg("version ") - .comment_arg(Version_string) - .end_comment(); - } - { -#ifdef LONG_FOR_TIME_T - long -#else - time_t -#endif - t = time(0); - html.begin_comment("CreationDate: ") - .comment_arg(ctime(&t)) - .end_comment(); - } - html.begin_comment("Total number of pages: ").comment_arg(i_to_a(no_of_printed_pages)).end_comment(); - html.end_line(); - html.copy_file(tempfp); - fputs("\n", stdout); - fputs("\n", stdout); - fclose(tempfp); -} - - -/* - * calculate_region_range - calculates the vertical range for words and lines - * within the region lists. - */ - -void html_printer::calculate_region_range (graphic_glob *r) -{ - text_glob *w; - graphic_glob *g; - - if (! page_contents->region_lines.is_empty()) { - page_contents->region_lines.start_from_head(); - do { - g = page_contents->region_lines.get_data(); - if ((r->minv == -1) || (g->minv < r->minv)) { - r->minv = g->minv; - } - if ((r->maxv == -1) || (g->maxv > r->maxv)) { - r->maxv = g->maxv; - } - page_contents->region_lines.move_right(); - } while (! page_contents->region_lines.is_equal_to_head()); - } - if (! page_contents->region_words.is_empty()) { - page_contents->region_words.start_from_head(); - do { - w = page_contents->region_words.get_data(); - - if ((r->minv == -1) || (w->minv < r->minv)) { - r->minv = w->minv; - } - if ((r->maxv == -1) || (w->maxv > r->maxv)) { - r->maxv = w->maxv; - } - page_contents->region_words.move_right(); - } while (! page_contents->region_words.is_equal_to_head()); - } -} - - -/* - * move_region_to_page - moves lines and words held in the temporary region - * list to the page list. - */ - -void html_printer::move_region_to_page (void) -{ - text_glob *w; - graphic_glob *g; - - page_contents->region_lines.start_from_head(); - while (! page_contents->region_lines.is_empty()) { - g = page_contents->region_lines.get_data(); // remove from our temporary region list - page_contents->lines.add(g); // and add to the page list - page_contents->region_lines.sub_move_right(); - } - page_contents->region_words.start_from_head(); - while (! page_contents->region_words.is_empty()) { - w = page_contents->region_words.get_data(); // remove from our temporary region list - page_contents->words.add(w); // and add to the page list - page_contents->region_words.sub_move_right(); - } -} - -/* - * is_graphic_start - returns TRUE if the start of table, pic, eqn was seen. - */ - -int is_graphic_start (char *s) -{ - return( (strcmp(s, "graphic-start") == 0) || - ((strcmp(s, "table-start") == 0) && (table_image_on)) ); -} - -/* - * is_graphic_end - return TRUE if the end of a table, pic, eqn was seen. - */ - -int is_graphic_end (char *s) -{ - return( (strcmp(s, "graphic-end") == 0) || - ((strcmp(s, "table-end") == 0) && (table_image_on)) ); -} - -/* - * special - handle all x X requests from troff. For grohtml they allow users - * to pass raw html commands, turn auto linked headings off/on and - * also allow tbl, eqn & pic say what commands they have generated. - */ - -void html_printer::special(char *s, const environment *env) -{ - if (s != 0) { - if (is_graphic_start(s)) { - graphic_level++; - if (graphic_level == 1) { - page_contents->is_in_graphic = TRUE; // add words and lines to temporary region lists - } - } else if (is_graphic_end(s) && (graphic_level > 0)) { - graphic_level--; - if (graphic_level == 0) { - flush_graphic(); - } - } else if (strncmp(s, "html:", 5) == 0) { - int r=font::res; // resolution of the device - char buf[MAX_STRING_LENGTH]; - font *f=sbuf_style.f; - - if (f == NULL) { - int found=FALSE; - - f = font::load_font("TR", &found); - } - str_translate_to_html(f, buf, MAX_STRING_LENGTH, - &s[5], strlen(s)-5, FALSE); - page_contents->add_html_command(&sbuf_style, buf, strlen(buf), - - // need to pass rest of string through to html output during flush - - env->vpos-env->size*r/72, env->hpos, - env->vpos , env->hpos); - // assume that the html command has no width, if it does then we hopefully troff - // will have fudged this in a macro and requested that the formatting move right by - // the appropriate width - } else if (strncmp(s, "index:", 6) == 0) { - cutoff_heading = atoi(&s[6]); - } - } -} - -void set_image_type (char *type) -{ - if (strcmp(type, "gif") == 0) { - image_type = gif; - } else if (strcmp(type, "png") == 0) { - image_type = png; - image_device = "png256"; - } else if (strncmp(type, "png", 3) == 0) { - image_type = png; - image_device = type; - } -} - -printer *make_printer() -{ - return new html_printer; -} - -static void usage(); - -int main(int argc, char **argv) -{ - program_name = argv[0]; - static char stderr_buf[BUFSIZ]; - setbuf(stderr, stderr_buf); - int c; - while ((c = getopt(argc, argv, "F:atTvdgmx?I:r:")) != EOF) - switch(c) { - case 'v': - { - extern const char *Version_string; - fprintf(stderr, "grohtml version %s\n", Version_string); - fflush(stderr); - break; - } - case 'a': - auto_on = FALSE; - break; - case 't': - table_on = FALSE; - break; - case 'T': - table_image_on = FALSE; - break; - case 'F': - font::command_line_font_dir(optarg); - break; - case 'I': - // user specifying the type of images we should generate - set_image_type(optarg); - break; - case 'r': - // resolution (dots per inch for an image) - image_res = atoi(optarg); - break; - case 'd': - // debugging on - debug_on = TRUE; - break; - case 'x': - debug_table_on = TRUE; - break; - case 'g': - // do not guess title and headings - guess_on = FALSE; - break; - case 'm': - // leave margins alone - margin_on = TRUE; - break; - case '?': - usage(); - break; - default: - assert(0); - } - if (optind >= argc) { - do_file("-"); - } else { - for (int i = optind; i < argc; i++) - do_file(argv[i]); - } - delete pr; - return 0; -} - -static void usage() -{ - fprintf(stderr, "usage: %s [-avdgmt?] [-r resolution] [-F dir] [-I imagetype] [files ...]\n", - program_name); - exit(1); -} diff -aruN groff-1.16.1/src/devices/grohtml/html.h groff-1.17/src/devices/grohtml/html.h --- groff-1.16.1/src/devices/grohtml/html.h Sun Feb 6 10:37:40 2000 +++ groff-1.17/src/devices/grohtml/html.h Fri Mar 16 16:48:31 2001 @@ -1,5 +1,5 @@ // -*- C++ -*- -/* Copyright (C) 1989, 1990, 1991, 1992 Free Software Foundation, Inc. +/* Copyright (C) 2000, 2001 Free Software Foundation, Inc. Written by James Clark (jjc@jclark.com) This file is part of groff. @@ -18,6 +18,36 @@ with groff; see the file COPYING. If not, write to the Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ +#if !defined(HTML_H) +# define HTML_H +# undef DEBUGGING +// # define DEBUGGING + +/* + * class and structure needed to buffer words + */ + +struct word { + char *s; + word *next; + + word (const char *w, int n); + ~word (); +}; + +class word_list { +public: + word_list (); + int flush (FILE *f); + void add_word (const char *s, int n); + int get_length (void); + +private: + int length; + word *head; + word *tail; +}; + class simple_output { public: simple_output(FILE *, int max_line_length); @@ -40,14 +70,22 @@ simple_output &end_line(); simple_output &put_raw_char(char); simple_output &special(const char *); - simple_output &put_html_char (char); + simple_output &enable_newlines(int); + simple_output &check_newline(int n); + simple_output &nl(void); + simple_output &space_or_newline (void); + simple_output &begin_tag (void); FILE *get_file(); private: - FILE *fp; - int max_line_length; // not including newline - int col; - int need_space; - int fixed_point; + FILE *fp; + int max_line_length; // not including newline + int col; + int fixed_point; + int newlines; // can we issue newlines automatically? + word_list last_word; + + void flush_last_word (void); + int check_space (const char *s, int n); }; inline FILE *simple_output::get_file() @@ -55,3 +93,4 @@ return fp; } +#endif diff -aruN groff-1.16.1/src/devices/grohtml/html_chars.h groff-1.17/src/devices/grohtml/html_chars.h --- groff-1.16.1/src/devices/grohtml/html_chars.h Sun Feb 6 10:37:41 2000 +++ groff-1.17/src/devices/grohtml/html_chars.h Thu Jan 1 01:00:00 1970 @@ -1,27 +0,0 @@ -// -*- C++ -*- -/* Copyright (C) 2000 Free Software Foundation, Inc. - * - * Gaius Mulley (gaius@glam.ac.uk) wrote output.cc - * but it owes a huge amount of ideas and raw code from - * James Clark (jjc@jclark.com) grops/ps.cc. - * - * html_chars.h - * - * provides a diacritical character combination table for html - */ - - - -struct diacritical_desc { - char *mark; - char *second_troff_char; - char translation; -}; - - -static struct diacritical_desc diacritical_table[] = { - { "ad" , "aeiouyAEIOU" , ':' , }, /* */ - { "ac" , "cC" , ',' , }, /* cedilla */ - { "aa" , "aeiouyAEIOU" , '\'' , }, /* acute */ - { NULL , NULL , (char)0, }, -}; diff -aruN groff-1.16.1/src/devices/grohtml/ordered_list.h groff-1.17/src/devices/grohtml/ordered_list.h --- groff-1.16.1/src/devices/grohtml/ordered_list.h Sat Mar 11 16:49:53 2000 +++ groff-1.17/src/devices/grohtml/ordered_list.h Thu Jan 1 01:00:00 1970 @@ -1,193 +0,0 @@ -/* - * Copyright (C) 1999 Free Software Foundation, Inc. - * - * Ordered list, a template module for simple ordered list manipulation. - * - * Gaius Mulley (gaius@glam.ac.uk) - */ - -template class list_element -{ - public: - list_element *right; - list_element *left; - - list_element (T *in); - T *data; -}; - -template class ordered_list -{ - private: - list_element *head; - list_element *tail; - list_element *ptr; - public: - ordered_list (void); - ~ ordered_list (void); - void add (T* in); - void sub_move_right (void); - void move_right (void); - void move_left (void); - int is_empty (void); - int is_equal_to_tail (void); - int is_equal_to_head (void); - void start_from_head (void); - void start_from_tail (void); - T *move_right_get_data (void); - T *move_left_get_data (void); - T *get_data (void); -}; - - -template ordered_list::ordered_list() - : head(0), tail(0), ptr(0) -{ -} - -template ordered_list::~ordered_list() -{ - list_element *temp=head; - - do { - temp = head; - if (temp != 0) { - head = head->right; - delete temp; - } - } while ((head != 0) && (head != tail)); -} - -template list_element::list_element(T *in) - : right(0), left(0) -{ - data = in; -} - -template void ordered_list::add(T *in) -{ - list_element *t = new list_element(in); // create a new list element with data field initialized - list_element *last; - - if (in == 0) { - fatal("cannot add NULL to ordered list"); - } - - if (head == 0) { - head = t; - tail = t; - t->left = t; - t->right = t; - } else { - last = tail; - - while ((last != head) && (in->is_less(in, last->data))) { - last = last->left; - } - - if (in->is_less(in, last->data)) { - t->right = last; - last->left->right = t; - t->left = last->left; - last->left = t; - // now check for a new head - if (last == head) { - head = t; - } - } else { - // add t onto beyond last - t->right = last->right; - t->left = last; - last->right->left = t; - last->right = t; - // now check for a new tail - if (last == tail) { - tail = t; - } - } - } -} - -template void ordered_list::sub_move_right (void) -{ - list_element *t=ptr->right; - - if (head == tail) { - head = 0; - if (tail != 0) { - delete tail; - } - tail = 0; - ptr = 0; - } else { - if (head == ptr) { - head = head->right; - } - if (tail == ptr) { - tail = tail->left; - } - ptr->left->right = ptr->right; - ptr->right->left = ptr->left; - ptr=t; - } -} - -template void ordered_list::start_from_head (void) -{ - ptr = head; -} - -template void ordered_list::start_from_tail (void) -{ - ptr = tail; -} - -template int ordered_list::is_empty (void) -{ - return( head == 0 ); -} - -template int ordered_list::is_equal_to_tail (void) -{ - return( ptr == tail ); -} - -template int ordered_list::is_equal_to_head (void) -{ - return( ptr == head ); -} - -template void ordered_list::move_left (void) -{ - ptr = ptr->left; -} - -template void ordered_list::move_right (void) -{ - ptr = ptr->right; -} - -template T* ordered_list::get_data (void) -{ - return( ptr->data ); -} - -template T* ordered_list::move_right_get_data (void) -{ - ptr = ptr->right; - if (ptr == head) { - return( 0 ); - } else { - return( ptr->data ); - } -} - -template T* ordered_list::move_left_get_data (void) -{ - ptr = ptr->left; - if (ptr == tail) { - return( 0 ); - } else { - return( ptr->data ); - } -} diff -aruN groff-1.16.1/src/devices/grohtml/output.cc groff-1.17/src/devices/grohtml/output.cc --- groff-1.16.1/src/devices/grohtml/output.cc Sat May 13 01:27:49 2000 +++ groff-1.17/src/devices/grohtml/output.cc Fri Mar 16 16:48:31 2001 @@ -1,5 +1,5 @@ // -*- C++ -*- -/* Copyright (C) 2000 Free Software Foundation, Inc. +/* Copyright (C) 2000, 2001 Free Software Foundation, Inc. * * Gaius Mulley (gaius@glam.ac.uk) wrote output.cc * but it owes a huge amount of ideas and raw code from @@ -45,20 +45,100 @@ # define FALSE (1==0) #endif +/* + * word - initialise a word and set next to NULL + */ + +word::word (const char *w, int n) + : next(0) +{ + s = (char *)malloc(n+1); + strncpy(s, w, n); + s[n] = (char)0; +} + +/* + * destroy word and the string copy. + */ + +word::~word () +{ + free(s); +} + +/* + * word_list - create an empty word list. + */ + +word_list::word_list () + : head(0), tail(0), length(0) +{ +} + +/* + * flush - flush a word list to a FILE, f, and return the + * length of the buffered string. + */ + +int word_list::flush (FILE *f) +{ + word *t; + int len=length; + + while (head != 0) { + t = head; + head = head->next; + fputs(t->s, f); + delete t; + } + head = 0; + tail = 0; + length = 0; +#if defined(DEBUGGING) + fflush(f); // just for testing +#endif + return( len ); +} + +/* + * add_word - adds a word to the outstanding word list. + */ + +void word_list::add_word (const char *s, int n) +{ + if (head == 0) { + head = new word(s, n); + tail = head; + } else { + tail->next = new word(s, n); + tail = tail->next; + } + length += n; +} + +/* + * get_length - returns the number of characters buffered + */ + +int word_list::get_length (void) +{ + return( length ); +} /* * the classes and methods for simple_output manipulation */ simple_output::simple_output(FILE *f, int n) -: fp(f), max_line_length(n), col(0), need_space(0), fixed_point(0) +: fp(f), max_line_length(n), col(0), fixed_point(0), newlines(0) { } simple_output &simple_output::set_file(FILE *f) { + if (fp) + fflush(fp); fp = f; - col = 0; return *this; } @@ -72,10 +152,10 @@ simple_output &simple_output::end_line() { + flush_last_word(); if (col != 0) { putc('\n', fp); col = 0; - need_space = 0; } return *this; } @@ -87,48 +167,91 @@ simple_output &simple_output::simple_comment(const char *s) { + flush_last_word(); if (col != 0) putc('\n', fp); fputs("\n", fp); col = 0; - need_space = 0; return *this; } simple_output &simple_output::begin_comment(const char *s) { + flush_last_word(); if (col != 0) putc('\n', fp); - fputs("\n", fp); - col = 0; - need_space = 0; + flush_last_word(); + space_or_newline(); + put_string("-->").nl(); return *this; } -simple_output &simple_output::comment_arg(const char *s) +/* + * check_newline - checks to see whether we are able to issue + * a newline and that one is needed. + */ + +simple_output &simple_output::check_newline(int n) { - int len = strlen(s); + if ((col + n + last_word.get_length() + 1 > max_line_length) && (newlines)) { + fputc('\n', fp); + col = last_word.flush(fp); + } +} - if (col + len + 1 > max_line_length) { - fputs("\n ", fp); - col = 1; +/* + * space_or_newline - will emit a newline or a space later on + * depending upon the current column. + */ + +simple_output &simple_output::space_or_newline (void) +{ +#if defined(DEBUGGING) + fflush(fp); // just for testing +#endif + if ((col + last_word.get_length() + 1 > max_line_length) && (newlines)) { + fputc('\n', fp); + if (last_word.get_length() > 0) { + col = last_word.flush(fp); + } else { + col = 0; + } + } else { + if (last_word.get_length() != 0) { + if (col > 0) { + fputc(' ', fp); + col++; + } + col += last_word.flush(fp); + } } - fputs(s, fp); - col += len + 1; - return *this; +} + +/* + * nl - writes a newline providing that we + * are not in the first column. + */ + +simple_output &simple_output::nl (void) +{ + space_or_newline(); + col += last_word.flush(fp); + if (col != 0) { + fputc('\n', fp); + col = 0; + } + return *this ; } simple_output &simple_output::set_fixed_point(int n) @@ -140,83 +263,21 @@ simple_output &simple_output::put_raw_char(char c) { + col += last_word.flush(fp); putc(c, fp); col++; - need_space = 0; return *this; } simple_output &simple_output::put_string(const char *s, int n) { - int i=0; - - while (i 0) { + if (newlines) { + if (col + len + 1 > max_line_length) { + fputs("\n", fp); + col = 0; + } else { + fputs(" ", fp); + col++; + } + len += last_word.flush(fp); + } else { + fputs(" ", fp); + col++; + col += last_word.flush(fp); + } } - fputs(s, fp); - col += len; - need_space = 1; - return *this; } diff -aruN groff-1.16.1/src/devices/grohtml/post-html.cc groff-1.17/src/devices/grohtml/post-html.cc --- groff-1.16.1/src/devices/grohtml/post-html.cc Thu Jan 1 01:00:00 1970 +++ groff-1.17/src/devices/grohtml/post-html.cc Fri Apr 13 11:03:53 2001 @@ -0,0 +1,2933 @@ +// -*- C++ -*- +/* Copyright (C) 2000, 2001 Free Software Foundation, Inc. + * + * Gaius Mulley (gaius@glam.ac.uk) wrote post-html.cc + * but it owes a huge amount of ideas and raw code from + * James Clark (jjc@jclark.com) grops/ps.cc. + */ + +/* +This file is part of groff. + +groff is free software; you can redistribute it and/or modify it under +the terms of the GNU General Public License as published by the Free +Software Foundation; either version 2, or (at your option) any later +version. + +groff is distributed in the hope that it will be useful, but WITHOUT ANY +WARRANTY; without even the implied warranty of MERCHANTABILITY or +FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License +for more details. + +You should have received a copy of the GNU General Public License along +with groff; see the file COPYING. If not, write to the Free Software +Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ + +#include "driver.h" +#include "stringclass.h" +#include "cset.h" +#include "html.h" +#include "html-chars.h" +#include "html-text.h" + +#include + +#ifdef HAVE_UNISTD_H +#include +#endif + +#include +#include + +#if !defined(TRUE) +# define TRUE (1==1) +#endif +#if !defined(FALSE) +# define FALSE (1==0) +#endif + +#define MAX_STRING_LENGTH 4096 +#define MAX_LINE_LENGTH 60 /* maximum characters we want in a line */ +#define SIZE_INCREMENT 2 /* font size increment = +2 */ +#define BASE_POINT_SIZE 10 /* 10 points is the base size ie html size 3 */ +#define CENTER_TOLERANCE 2 /* how many pixels off center will we still */ +#define ANCHOR_TEMPLATE "heading%d" /* if simple anchor is set we use this */ +#define UNICODE_DESC_START 0x80 /* all character entities above this are */ + /* either encoded by their glyph names or if */ + /* there is no name then we use &#nnn; */ +#define INDENTATION /* #undef INDENTATION to remove .in handling */ + +typedef enum {CENTERED, LEFT, RIGHT, INLINE} TAG_ALIGNMENT; + +/* + * prototypes + */ + +void str_translate_to_html (font *f, char *buf, int buflen, char *str, int len, int and_single); +char *get_html_translation (font *f, const char *name); + + +static int auto_links = TRUE; /* by default we enable automatic links at */ + /* top of the document. */ +static int auto_rule = TRUE; /* by default we enable an automatic rule */ + /* at the top and bottom of the document */ +static int simple_anchors = FALSE; /* default to anchors with heading text */ + + +/* + * start with a few favorites + */ + +void stop () {} + +static int min (int a, int b) +{ + if (a < b) { + return( a ); + } else { + return( b ); + } +} + +static int max (int a, int b) +{ + if (a > b) { + return( a ); + } else { + return( b ); + } +} + +/* + * is_subsection - returns TRUE if a1..a2 is within b1..b2 + */ + +static int is_subsection (int a1, int a2, int b1, int b2) +{ + // easier to see whether this is not the case + return( !((a1 < b1) || (a1 > b2) || (a2 < b1) || (a2 > b2)) ); +} + +/* + * is_intersection - returns TRUE if range a1..a2 intersects with b1..b2 + */ + +static int is_intersection (int a1, int a2, int b1, int b2) +{ + // again easier to prove NOT outside limits + return( ! ((a1 > b2) || (a2 < b1)) ); +} + +/* + * is_digit - returns TRUE if character, ch, is a digit. + */ + +static int is_digit (char ch) +{ + return( (ch >= '0') && (ch <= '9') ); +} + +/* + * the classes and methods for maintaining a list of files. + */ + +struct file { + FILE *fp; + file *next; + + file (FILE *f); +}; + +/* + * file - initialize all fields to NULL + */ + +file::file (FILE *f) + : fp(f), next(0) +{ +} + +class files { +public: + files (); + FILE *get_file (void); + void start_of_list (void); + void move_next (void); + void add_new_file (FILE *f); +private: + file *head; + file *tail; + file *ptr; +}; + +/* + * files - create an empty list of files. + */ + +files::files () + : head(0), tail(0), ptr(0) +{ +} + +/* + * get_file - returns the FILE associated with ptr. + */ + +FILE *files::get_file (void) +{ + if (ptr) { + return( ptr->fp ); + } else { + return( 0 ); + } +} + +/* + * start_of_list - reset the ptr to the start of the list. + */ + +void files::start_of_list (void) +{ + ptr = head; +} + +/* + * move_next - moves the ptr to the next element on the list. + */ + +void files::move_next (void) +{ + if (ptr != 0) + ptr = ptr->next; +} + +/* + * add_new_file - adds a new file, f, to the list. + */ + +void files::add_new_file (FILE *f) +{ + if (head == 0) { + head = new file(f); + tail = head; + } else { + tail->next = new file(f); + tail = tail->next; + } + ptr = tail; +} + +/* + * the class and methods for styles + */ + +struct style { + font *f; + int point_size; + int font_no; + int height; + int slant; + style (); + style (font *, int, int, int, int); + int operator == (const style &) const; + int operator != (const style &) const; +}; + +style::style() + : f(0) +{ +} + +style::style(font *p, int sz, int h, int sl, int no) + : f(p), point_size(sz), font_no(no), height(h), slant(sl) +{ +} + +int style::operator==(const style &s) const +{ + return (f == s.f && point_size == s.point_size + && height == s.height && slant == s.slant); +} + +int style::operator!=(const style &s) const +{ + return !(*this == s); +} + +/* + * the class and methods for retaining ascii text + */ + +struct char_block { + enum { SIZE = 256 }; + char buffer[SIZE]; + int used; + char_block *next; + + char_block(); +}; + +char_block::char_block() +: used(0), next(0) +{ +} + +class char_buffer { +public: + char_buffer(); + ~char_buffer(); + char *add_string(char *, unsigned int); +private: + char_block *head; + char_block *tail; +}; + +char_buffer::char_buffer() +: head(0), tail(0) +{ +} + +char_buffer::~char_buffer() +{ + while (head != 0) { + char_block *temp = head; + head = head->next; + delete temp; + } +} + +char *char_buffer::add_string (char *s, unsigned int length) +{ + int i=0; + unsigned int old_used; + + if (tail == 0) { + tail = new char_block; + head = tail; + } else { + if (tail->used + length+1 > char_block::SIZE) { + tail->next = new char_block; + tail = tail->next; + } + } + // at this point we have a tail which is ready for the string. + if (tail->used + length+1 > char_block::SIZE) { + fatal("need to increase char_block::SIZE"); + } + + old_used = tail->used; + do { + tail->buffer[tail->used] = s[i]; + tail->used++; + i++; + length--; + } while (length>0); + + // add terminating nul character + + tail->buffer[tail->used] = '\0'; + tail->used++; + + // and return start of new string + + return( &tail->buffer[old_used] ); +} + +/* + * the classes and methods for maintaining glyph positions. + */ + +class text_glob { +public: + text_glob (style *s, char *string, unsigned int length, + int min_vertical , int min_horizontal, + int max_vertical , int max_horizontal, + int is_html , int is_troff_command, + int is_auto_image, + int is_a_line , int thickness); + text_glob (void); + ~text_glob (void); + int is_a_line (void); + int is_a_tag (void); + int is_raw (void); + int is_eol (void); + int is_auto_img (void); + int is_br (void); + + style text_style; + char *text_string; + unsigned int text_length; + int minv, maxv, minh, maxh; + int is_raw_command; // should the text be sent directly to the device? + int is_tag; // is this a .br, .sp, .tl etc + int is_line; // is the command a ? + int is_img_auto; // image created by eqn delim + int thickness; // the thickness of a line +}; + +text_glob::text_glob (style *s, char *string, unsigned int length, + int min_vertical, int min_horizontal, + int max_vertical, int max_horizontal, + int is_html, int is_troff_command, + int is_auto_image, + int is_a_line, int line_thickness) + : text_style(*s), text_string(string), text_length(length), + minv(min_vertical), minh(min_horizontal), maxv(max_vertical), maxh(max_horizontal), + is_raw_command(is_html), is_tag(is_troff_command), is_img_auto(is_auto_image), + is_line(is_a_line), thickness(line_thickness) +{ +} + +text_glob::text_glob () + : text_string(0), text_length(0), minv(-1), maxv(-1), minh(-1), maxh(-1), + is_raw_command(FALSE), is_tag(FALSE), is_line(FALSE), thickness(0) +{ +} + +text_glob::~text_glob () +{ +} + +/* + * is_a_line - returns TRUE if glob should be converted into an


+ */ + +int text_glob::is_a_line (void) +{ + return( is_line ); +} + +/* + * is_a_tag - returns TRUE if glob contains a troff directive. + */ + +int text_glob::is_a_tag (void) +{ + return( is_tag ); +} + +/* + * is_eol - returns TRUE if glob contains the tag eol + */ + +int text_glob::is_eol (void) +{ + return( is_tag && (strcmp(text_string, "html-tag:eol") == 0) ); +} + +/* + * is_raw - returns TRUE if glob contains raw html. + */ + +int text_glob::is_raw (void) +{ + return( is_raw_command ); +} + +/* + * is_auto_img - returns TRUE if the glob contains an automatically + * generated image. + */ + +int text_glob::is_auto_img (void) +{ + return( is_img_auto ); +} + +/* + * is_br - returns TRUE if the glob is a tag containing a .br + */ + +int text_glob::is_br (void) +{ + return( is_a_tag() && (strcmp("html-tag:.br", text_string) == 0) ); +} + +/* + * the class and methods used to construct ordered double linked lists. + * In a previous implementation we used templates via #include "ordered-list.h", + * but this does assume that all C++ compilers can handle this feature. Pragmatically + * it is safer to assume this is not the case. + */ + +struct element_list { + element_list *right; + element_list *left; + text_glob *datum; + int lineno; + int minv, maxv, minh, maxh; + + element_list (text_glob *d, + int line_number, + int min_vertical, int min_horizontal, + int max_vertical, int max_horizontal); + element_list (); +}; + +element_list::element_list () + : right(0), left(0), datum(0), lineno(0), minv(-1), maxv(-1), minh(-1), maxh(-1) +{ +} + +/* + * element_list - create a list element assigning the datum and region parameters. + */ + +element_list::element_list (text_glob *in, + int line_number, + int min_vertical, int min_horizontal, + int max_vertical, int max_horizontal) + : right(0), left(0), datum(in), lineno(line_number), + minv(min_vertical), minh(min_horizontal), maxv(max_vertical), maxh(max_horizontal) +{ +} + +class list { +public: + list (); + ~list (); + int is_less (element_list *a, element_list *b); + void add (text_glob *in, + int line_number, + int min_vertical, int min_horizontal, + int max_vertical, int max_horizontal); + void sub_move_right (void); + void move_right (void); + void move_left (void); + int is_empty (void); + int is_equal_to_tail (void); + int is_equal_to_head (void); + void start_from_head (void); + void start_from_tail (void); + text_glob *move_right_get_data (void); + text_glob *move_left_get_data (void); + text_glob *get_data (void); +private: + element_list *head; + element_list *tail; + element_list *ptr; +}; + +/* + * list - construct an empty list. + */ + +list::list () + : head(0), tail(0), ptr(0) +{ +} + +/* + * ~list - destroy a complete list. + */ + +list::~list() +{ + element_list *temp=head; + + do { + temp = head; + if (temp != 0) { + head = head->right; + delete temp; + } + } while ((head != 0) && (head != tail)); +} + +/* + * is_less - returns TRUE if a is left of b if on the same line or + * if a is higher up the page than b. + */ + +int list::is_less (element_list *a, element_list *b) +{ + // was if (is_intersection(a->minv+1, a->maxv-1, b->minv+1, b->maxv-1)) { + if (a->lineno < b->lineno) { + return( TRUE ); + } else if (a->lineno > b->lineno) { + return( FALSE ); + } else if (is_intersection(a->minv, a->maxv, b->minv, b->maxv)) { + return( a->minh < b->minh ); + } else { + return( a->maxv < b->maxv ); + } +} + +/* + * add - adds a datum to the list in the order specified by the region position. + */ + +void list::add (text_glob *in, int line_number, int min_vertical, int min_horizontal, int max_vertical, int max_horizontal) +{ + // create a new list element with datum and position fields initialized + element_list *t = new element_list(in, line_number, min_vertical, min_horizontal, max_vertical, max_horizontal); + element_list *last; + + if (head == 0) { + head = t; + tail = t; + t->left = t; + t->right = t; + } else { + last = tail; + + while ((last != head) && (is_less(t, last))) { + last = last->left; + } + + if (is_less(t, last)) { + t->right = last; + last->left->right = t; + t->left = last->left; + last->left = t; + // now check for a new head + if (last == head) { + head = t; + } + } else { + // add t beyond last + t->right = last->right; + t->left = last; + last->right->left = t; + last->right = t; + // now check for a new tail + if (last == tail) { + tail = t; + } + } + } +} + +/* + * sub_move_right - removes the element which is currently pointed to by ptr + * from the list and moves ptr to the right. + */ + +void list::sub_move_right (void) +{ + element_list *t=ptr->right; + + if (head == tail) { + head = 0; + if (tail != 0) { + delete tail; + } + tail = 0; + ptr = 0; + } else { + if (head == ptr) { + head = head->right; + } + if (tail == ptr) { + tail = tail->left; + } + ptr->left->right = ptr->right; + ptr->right->left = ptr->left; + ptr=t; + } +} + +/* + * start_from_head - assigns ptr to the head. + */ + +void list::start_from_head (void) +{ + ptr = head; +} + +/* + * start_from_tail - assigns ptr to the tail. + */ + +void list::start_from_tail (void) +{ + ptr = tail; +} + +/* + * is_empty - returns TRUE if the list has no elements. + */ + +int list::is_empty (void) +{ + return( head == 0 ); +} + +/* + * is_equal_to_tail - returns TRUE if the ptr equals the tail. + */ + +int list::is_equal_to_tail (void) +{ + return( ptr == tail ); +} + +/* + * is_equal_to_head - returns TRUE if the ptr equals the head. + */ + +int list::is_equal_to_head (void) +{ + return( ptr == head ); +} + +/* + * move_left - moves the ptr left. + */ + +void list::move_left (void) +{ + ptr = ptr->left; +} + +/* + * move_right - moves the ptr right. + */ + +void list::move_right (void) +{ + ptr = ptr->right; +} + +/* + * get_datum - returns the datum referenced via ptr. + */ + +text_glob* list::get_data (void) +{ + return( ptr->datum ); +} + +/* + * move_right_get_data - returns the datum referenced via ptr and moves + * ptr right. + */ + +text_glob* list::move_right_get_data (void) +{ + ptr = ptr->right; + if (ptr == head) { + return( 0 ); + } else { + return( ptr->datum ); + } +} + +/* + * move_left_get_data - returns the datum referenced via ptr and moves + * ptr right. + */ + +text_glob* list::move_left_get_data (void) +{ + ptr = ptr->left; + if (ptr == tail) { + return( 0 ); + } else { + return( ptr->datum ); + } +} + +/* + * page class and methods + */ + +class page { +public: + page (void); + void add (style *s, char *string, unsigned int length, + int line_number, + int min_vertical, int min_horizontal, + int max_vertical, int max_horizontal); + void add_html (style *s, char *string, unsigned int length, + int line_number, + int min_vertical, int min_horizontal, + int max_vertical, int max_horizontal); + void add_tag (style *s, char *string, unsigned int length, + int line_number, + int min_vertical, int min_horizontal, + int max_vertical, int max_horizontal); + void add_line (style *s, + int line_number, + int x1, int y1, int x2, int y2, + int thickness); + void dump_page (void); // debugging method + + // and the data + + list glyphs; // position of glyphs and specials on page + char_buffer buffer; // all characters for this page +}; + +page::page() +{ +} + +void page::add (style *s, char *string, unsigned int length, + int line_number, + int min_vertical, int min_horizontal, + int max_vertical, int max_horizontal) +{ + if (length > 0) { + text_glob *g=new text_glob(s, buffer.add_string(string, length), length, + min_vertical, min_horizontal, max_vertical, max_horizontal, + FALSE, FALSE, FALSE, FALSE, 0); + glyphs.add(g, line_number, min_vertical, min_horizontal, max_vertical, max_horizontal); + } +} + +/* + * add_html - add a raw html command, for example mailto, line, background, image etc. + */ + +void page::add_html (style *s, char *string, unsigned int length, + int line_number, + int min_vertical, int min_horizontal, + int max_vertical, int max_horizontal) +{ + if (length > 0) { + text_glob *g=new text_glob(s, buffer.add_string(string, length), length, + min_vertical, min_horizontal, max_vertical, max_horizontal, + TRUE, FALSE, FALSE, FALSE, 0); + glyphs.add(g, line_number, min_vertical, min_horizontal, max_vertical, max_horizontal); + } +} + +/* + * add_tag - adds a troff tag, for example: .tl .sp .br + */ + +void page::add_tag (style *s, char *string, unsigned int length, + int line_number, + int min_vertical, int min_horizontal, + int max_vertical, int max_horizontal) +{ + if (length > 0) { + text_glob *g=new text_glob(s, buffer.add_string(string, length), length, + min_vertical, min_horizontal, max_vertical, max_horizontal, + FALSE, TRUE, + (strncmp(string, "html-tag:.auto-image", 20) == 0), + FALSE, 0); + glyphs.add(g, line_number, min_vertical, min_horizontal, max_vertical, max_horizontal); + } +} + +/* + * add_line - adds the primitive providing that y1==y2 + */ + +void page::add_line (style *s, + int line_number, + int x1, int y1, int x2, int y2, + int thickness) +{ + if (y1 == y2) { + text_glob *g = new text_glob(s, "", 0, + min(y1, y2), min(x1, y2), max(y1, y2), max(x1, x2), + FALSE, TRUE, FALSE, FALSE, thickness); + glyphs.add(g, line_number, min(y1, y2), min(x1, y2), max(y1, y2), max(x1, x2)); + } +} + +/* + * dump_page - dump the page contents for debugging purposes. + */ + +void page::dump_page(void) +{ + text_glob *g; + + printf("\n\ndebugging start\n"); + glyphs.start_from_head(); + do { + g = glyphs.get_data(); + printf("%s ", g->text_string); + glyphs.move_right(); + } while (! glyphs.is_equal_to_head()); + printf("\ndebugging end\n\n"); +} + +/* + * font classes and methods + */ + +class html_font : public font { + html_font(const char *); +public: + int encoding_index; + char *encoding; + char *reencoded_name; + ~html_font(); + static html_font *load_html_font(const char *); +}; + +html_font *html_font::load_html_font(const char *s) +{ + html_font *f = new html_font(s); + if (!f->load()) { + delete f; + return 0; + } + return f; +} + +html_font::html_font(const char *nm) +: font(nm) +{ +} + +html_font::~html_font() +{ +} + +/* + * a simple class to contain the header to this document + */ + +class title_desc { +public: + title_desc (); + ~title_desc (); + + int has_been_written; + int has_been_found; + char text[MAX_STRING_LENGTH]; +}; + + +title_desc::title_desc () + : has_been_written(FALSE), has_been_found(FALSE) +{ +} + +title_desc::~title_desc () +{ +} + +class header_desc { +public: + header_desc (); + ~header_desc (); + + int no_of_headings; // how many headings have we found? + char_buffer headings; // all the headings used in the document + list headers; // list of headers built from .NH and .SH + int header_level; // current header level + int written_header; // have we written the header yet? + char header_buffer[MAX_STRING_LENGTH]; // current header text + + void write_headings (FILE *f, int force); +}; + +header_desc::header_desc () + : no_of_headings(0), header_level(2), written_header(0) +{ +} + +header_desc::~header_desc () +{ +} + +/* + * write_headings - emits a list of links for the headings in this document + */ + +void header_desc::write_headings (FILE *f, int force) +{ + text_glob *g; + + if (auto_links || force) { + if (! headers.is_empty()) { + int h=1; + + headers.start_from_head(); + do { + g = headers.get_data(); + fputs("text_string, f); + h++; + fputs("\">", f); + fputs(g->text_string, f); + fputs("
\n", f); + headers.move_right(); + } while (! headers.is_equal_to_head()); + fputs("\n", f); + } + } +} + +class html_printer : public printer { + files file_list; + simple_output html; + int res; + int space_char_index; + int no_of_printed_pages; + int paper_length; + enum { SBUF_SIZE = 8192 }; + char sbuf[SBUF_SIZE]; + int sbuf_len; + int sbuf_start_hpos; + int sbuf_vpos; + int sbuf_end_hpos; + int sbuf_kern; + style sbuf_style; + style output_style; + int output_hpos; + int output_vpos; + int output_vpos_max; + int output_draw_point_size; + int line_thickness; + int output_line_thickness; + unsigned char output_space_code; + string defs; + char *inside_font_style; + int page_number; + title_desc title; + title_desc indent; // use title class to remember $1 of .ip + header_desc header; + int header_indent; + int supress_sub_sup; + int cutoff_heading; + page *page_contents; + html_text *current_paragraph; + int end_center; + int end_tempindent; + TAG_ALIGNMENT next_tag; + int fill_on; + int linelength; + int pageoffset; + int indentation; + int prev_indent; + int pointsize; + int vertical_spacing; + int line_number; + + void flush_sbuf (); + void set_style (const style &); + void set_space_code (unsigned char c); + void do_exec (char *, const environment *); + void do_import (char *, const environment *); + void do_def (char *, const environment *); + void do_mdef (char *, const environment *); + void do_file (char *, const environment *); + void set_line_thickness (const environment *); + void terminate_current_font (void); + void flush_font (void); + void add_char_to_sbuf (unsigned char code); + void add_to_sbuf (unsigned char code, const char *name); + void write_title (int in_head); + void determine_diacritical_mark (const char *name, const environment *env); + int sbuf_continuation (unsigned char code, const char *name, const environment *env, int w); + char *remove_last_char_from_sbuf (); + int seen_backwards_escape (char *s, int l); + void flush_page (void); + void troff_tag (text_glob *g); + void flush_globs (void); + void emit_line (text_glob *g); + void emit_raw (text_glob *g); + void translate_to_html (text_glob *g); + void determine_space (text_glob *g); + void start_font (const char *name); + void end_font (const char *name); + int is_font_courier (font *f); + int is_courier_until_eol (void); + void start_size (int from, int to); + void do_font (text_glob *g); + void do_center (char *arg); + void do_break (void); + void do_eol (void); + void do_title (void); + void do_fill (int on); + void do_heading (char *arg); + void write_header (void); + void determine_header_level (int level); + void do_linelength (char *arg); + void do_pageoffset (char *arg); + void do_indentation (char *arg); + void do_tempindent (char *arg); + void do_indentedparagraph (void); + void do_verticalspacing (char *arg); + void do_pointsize (char *arg); + void do_centered_image (void); + void do_left_image (void); + void do_right_image (void); + void do_auto_image (text_glob *g, const char *filename); + void do_links (void); + void do_flush (void); + int is_in_middle (int left, int right); + void do_sup_or_sub (text_glob *g); + int start_subscript (text_glob *g); + int end_subscript (text_glob *g); + int start_superscript (text_glob *g); + int end_superscript (text_glob *g); + + // ADD HERE + +public: + html_printer (); + ~html_printer (); + void set_char (int i, font *f, const environment *env, int w, const char *name); + void draw (int code, int *p, int np, const environment *env); + void begin_page (int); + void end_page (int); + void special (char *arg, const environment *env, char type); + font *make_font (const char *); + void end_of_line (); +}; + +printer *make_printer() +{ + return new html_printer; +} + +static void usage(FILE *stream); + +void html_printer::set_style(const style &sty) +{ + const char *fontname = sty.f->get_name(); + if (fontname == 0) + fatal("no internalname specified for font"); + +#if 0 + change_font(fontname, (font::res/(72*font::sizescale))*sty.point_size); +#endif +} + +void html_printer::end_of_line() +{ + flush_sbuf(); + line_number++; +} + +/* + * emit_line - writes out a horizontal rule. + */ + +void html_printer::emit_line (text_glob *g) +{ + // --fixme-- needs to know the length in percentage + html.put_string("
"); +} + +/* + * emit_raw - writes the raw html information directly to the device. + */ + +void html_printer::emit_raw (text_glob *g) +{ + do_font(g); + if (next_tag == INLINE) { + determine_space(g); + current_paragraph->do_emittext(g->text_string, g->text_length); + } else { + int in_table=current_paragraph->is_in_table(); + + current_paragraph->done_para(); + switch (next_tag) { + + case CENTERED: + current_paragraph->do_para("align=center"); + break; + case LEFT: + current_paragraph->do_para("align=left"); + break; + case RIGHT: + current_paragraph->do_para("align=right"); + break; + default: + fatal("unknown enumeration"); + } + current_paragraph->do_emittext(g->text_string, g->text_length); + current_paragraph->done_para(); + next_tag = INLINE; + supress_sub_sup = TRUE; +#if defined(INDENTATION) + if (in_table) { + stop(); + current_paragraph->do_indent(NULL, 0, pageoffset, linelength); + current_paragraph->do_indent(indent.text, indentation, pageoffset, linelength); + } +#endif + } +} + +/* + * do_center - handle the .ce commands from troff. + */ + +void html_printer::do_center (char *arg) +{ + int n = atoi(arg); + + current_paragraph->do_break(); + current_paragraph->done_para(); + supress_sub_sup = TRUE; + + if (n > 0) { + current_paragraph->do_para("align=center"); + end_center += n; + } else { + end_center = 0; + } +} + +/* + * do_centered_image - set a flag such that the next html-tag is + * placed inside a centered paragraph. + */ + +void html_printer::do_centered_image (void) +{ + next_tag = CENTERED; +} + +/* + * do_right_image - set a flag such that the next html-tag is + * placed inside a right aligned paragraph. + */ + +void html_printer::do_right_image (void) +{ + next_tag = RIGHT; +} + +/* + * do_left_image - set a flag such that the next html-tag is + * placed inside a left aligned paragraph. + */ + +void html_printer::do_left_image (void) +{ + next_tag = LEFT; +} + +/* + * exists - returns TRUE if filename exists. + */ + +static int exists (const char *filename) +{ + FILE *fp = fopen(filename, "r"); + + if (fp == 0) { + return( FALSE ); + } else { + fclose(fp); + return( TRUE ); + } +} + +/* + * generate_img_src - returns a html image tag for the filename + * providing that the image exists. + */ + +static char *generate_img_src (const char *filename) +{ + static char buffer[MAX_STRING_LENGTH]; + + while (filename && (filename[0] == ' ')) { + filename++; + } + if (exists(filename)) { + strcpy(buffer, "", 3); + } + return( (char *)&buffer ); + } else { + return( 0 ); + } +} + +/* + * do_auto_image - tests whether the image, indicated by filename, + * is present, if so then it emits an html image tag. + * An image tag may be passed through from pic, eqn + * but the corresponding image might not be created. + * Consider .EQ delim $$ .EN or an empty .PS .PE. + */ + +void html_printer::do_auto_image (text_glob *g, const char *filename) +{ + char *buffer = generate_img_src(filename); + + if (buffer) { + /* + * utilize emit_raw by creating a new text_glob. + */ + text_glob h = *g; + + h.text_string = buffer; + h.text_length = strlen(buffer); + emit_raw(&h); + } else { + next_tag = INLINE; + } +} + +/* + * do_title - handle the .tl commands from troff. + */ + +void html_printer::do_title (void) +{ + text_glob *t; + int removed_from_head; + char buf[MAX_STRING_LENGTH]; + + if (page_number == 1) { + int found_title_start = FALSE; + if (! page_contents->glyphs.is_empty()) { + page_contents->glyphs.sub_move_right(); /* move onto next word */ + do { + t = page_contents->glyphs.get_data(); + removed_from_head = FALSE; + if (t->is_auto_img()) { + char *img=generate_img_src((char *)(t->text_string + 20)); + + if (img) { + if (found_title_start) { + strcat(title.text, " "); + } + found_title_start = TRUE; + title.has_been_found = TRUE; + strcat(title.text, img); + } + page_contents->glyphs.sub_move_right(); /* move onto next word */ + removed_from_head = ((!page_contents->glyphs.is_empty()) && + (page_contents->glyphs.is_equal_to_head())); + } else if (t->is_raw_command) { + /* skip raw commands + */ + page_contents->glyphs.sub_move_right(); /* move onto next word */ + } else if (t->is_eol()) { + /* end of title found + */ + title.has_been_found = TRUE; + return; + } else if (t->is_a_tag()) { + /* end of title found, but move back so that we read this tag and process it + */ + page_contents->glyphs.move_left(); /* move backwards to last word */ + title.has_been_found = TRUE; + return; + } else if (found_title_start) { + strcat(title.text, " "); + str_translate_to_html(t->text_style.f, buf, MAX_STRING_LENGTH, t->text_string, t->text_length, TRUE); + strcat(title.text, buf); + page_contents->glyphs.sub_move_right(); /* move onto next word */ + removed_from_head = ((!page_contents->glyphs.is_empty()) && + (page_contents->glyphs.is_equal_to_head())); + } else { + str_translate_to_html(t->text_style.f, buf, MAX_STRING_LENGTH, t->text_string, t->text_length, TRUE); + strcpy((char *)title.text, buf); + found_title_start = TRUE; + title.has_been_found = TRUE; + page_contents->glyphs.sub_move_right(); /* move onto next word */ + removed_from_head = ((!page_contents->glyphs.is_empty()) && + (page_contents->glyphs.is_equal_to_head())); + } + } while ((! page_contents->glyphs.is_equal_to_head()) || (removed_from_head)); + } + // page_contents->glyphs.move_left(); /* move backwards to last word */ + } +} + +void html_printer::write_header (void) +{ + if (strlen(header.header_buffer) > 0) { + if (header.header_level > 7) { + header.header_level = 7; + } + + // firstly we must terminate any font and type faces + current_paragraph->done_para(); + current_paragraph->done_table(); + supress_sub_sup = TRUE; + + if (cutoff_heading+2 > header.header_level) { + // now we save the header so we can issue a list of links + header.no_of_headings++; + style st; + + text_glob *h=new text_glob(&st, + header.headings.add_string(header.header_buffer, strlen(header.header_buffer)), + strlen(header.header_buffer), + header.no_of_headings, header.header_level, + header.no_of_headings, header.header_level, + FALSE, FALSE, FALSE, FALSE, FALSE); + header.headers.add(h, + header.no_of_headings, + header.no_of_headings, header.no_of_headings, + header.no_of_headings, header.no_of_headings); // and add this header to the header list + + // lastly we generate a tag + + html.nl().put_string("").nl(); + } + + // and now we issue the real header + html.put_string(""); + html.put_string(header.header_buffer); + html.put_string("").nl(); + + current_paragraph->do_para(""); + } +} + +void html_printer::determine_header_level (int level) +{ + if (level == 0) { + int i; + int l=strlen(header.header_buffer); + + for (i=0; ((iglyphs.move_right(); + if (! page_contents->glyphs.is_equal_to_head()) { + g = page_contents->glyphs.get_data(); + do { + if (g->is_auto_img(