[Groff-commit] groff/man groff_out.man

[Eric S. Raymond]

CVSROOT:        /sources/groff
Module name:    groff
Changes by:     Eric S. Raymond <esr>   07/02/07 12:18:52

Modified files:
        man            : groff_out.man 

Log message:
        First step in macro simplification; eliminate list1..n, simplify
        .offset and .index_offset so they no longer require groff-specific
        features or eqn (instead, use troff micromotions for subscripting).

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/groff/man/groff_out.man?cvsroot=groff&r1=1.30&r2=1.31

Patches:
Index: groff_out.man
===================================================================
RCS file: /sources/groff/groff/man/groff_out.man,v
retrieving revision 1.30
retrieving revision 1.31
diff -u -b -r1.30 -r1.31
--- groff_out.man       6 Feb 2007 09:27:15 -0000       1.30
+++ groff_out.man       7 Feb 2007 12:18:52 -0000       1.31
@@ -60,60 +60,11 @@
 .\" Begin of macro definitions
 .eo
 .
-.c comma separated list of indexed variables
-.de list1..n
-.  ds @arg1 \$1\"
-.  nop \c
-.  ie t \
-.    nop address@hidden sub 1$, address@hidden sub 2$, .\|.\|., address@hidden 
sub n$ \c
-.  el \{\
-.    IR address@hidden ,
-.    IR address@hidden ,
-.    nop \&...,
-.    I address@hidden
-.  \}
-.  rm @arg1
-..
 .de offset
-.  if (\n[.$] < 2) \
-.    ab `.offset' needs at least 2 arguments
-.  ds @arg1 \$1\"
-.  ds @arg2 \$2\"
-.  shift 2
-.  nop (\f[I]\,address@hidden/\f[],\ \f[I]\,address@hidden/\f[])\$*
-.  rm @arg1
-.  rm @arg2
+(\fI\,\$1\/\fP,\ \fI\,\$2\/\fP)\$3
 ..
 .de indexed_offset
-.  if (\n[.$] < 4) \
-.    ab `.indexed_offset' needs at least 4 arguments
-.  ds @arg1 \$1\"
-.  ds @index1 \$2\"
-.  ds @arg2 \$3\"
-.  ds @index2 \$4\"
-.  shift 4
-.  ie t \{\
-.    ie \B'address@hidden' \{\
-.      nop (address@hidden sub roman address@hidden,\ \c
-.    \}
-.    el \{\
-.      nop (address@hidden sub address@hidden,\ \c
-.    \}
-.    ie \B'address@hidden' \{\
-.      nop address@hidden sub roman address@hidden)\$* \c
-.    \}
-.    el \{\
-.      nop address@hidden sub address@hidden)\$* \c
-.    \}
-.  \}
-.  el \{\
-.    nop (address@hidden@index1]\f[],\ \c
-.    nop address@hidden@index2]\f[])\$* \c
-.  \}
-.  rm @arg1
-.  rm @arg2
-.  rm @index1
-.  rm @index2
+.offset \$1\d\s-3\fR\$2\fP\s+3\u \$3\d\s-3\fR\$4\fP\s+3\u \$5
 ..
 .c format: .command <name> "<arguments>" <punctuation>
 .de command
@@ -939,13 +890,15 @@
 units\~\c
 .BR u .
 .
-The arguments called
-.list1..n h
+The 
+.I h 
+arguments
 stand for horizontal distances where positive means right, negative
 left.
 .
-The arguments called
-.list1..n v
+The 
+.I v 
+arguments
 stand for vertical distances where positive means down, negative up.
 .
 All these distances are offsets relative to the current location.