home *** CD-ROM | disk | FTP | other *** search
- Newsgroups: gnu.groff.bug
- Path: sparky!uunet!cis.ohio-state.edu!noao.edu!rstevens
- From: rstevens@noao.edu (W. Richard Stevens)
- Subject: Re: Annoying ?roff-ism
- Message-ID: <1992Dec26.202037.8253@noao.edu>
- Sender: gnulists@ai.mit.edu
- Organization: National Optical Astronomy Observatories, Tucson, AZ, USA
- References: <1992Dec23.150031.5068@spdcc.com>
- Distribution: gnu
- Date: Sat, 26 Dec 1992 20:20:37 GMT
- Approved: bug-groff@prep.ai.mit.edu
- Lines: 19
-
- Here is the standard way that I've seen to do it. As I recall I
- got this from the indexing code (mainly awk scripts) available
- from research.att.com (the ones described by Kernighan and Bentley
- quite a few years back). Something tells me they credit this to
- Ravi Sethi, but I'm not certain.
-
- . \" If the current diversion name is empty, print the index
- . \" entry on standard error. Else call ourself via the
- . \" transparent mechanism so the output is generated when
- . \" the diversion (keep/save) is actually output.
- . \" Note there is a tab between the 9th arg and the page#.
- .de ix
- .nr PN \\n%
- .ie '\\n(.z'' .tm ix: \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9 \\n(PN
- .el \\!.ix \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
- ..
-
- Rich Stevens (rstevens@noao.edu)
-
-