note other reasons for pclose to return -1; wait(2) -> wait4(2)
[unix-history] / usr / src / share / me / footnote.me
index ebcb7df..d4ecafa 100644 (file)
@@ -1,6 +1,23 @@
 .nr _0 \n(c.
 .nr _0 \n(c.
-.\"    @(#)footnote.me 2.3     %G%
+.\" Copyright (c) 1988 The Regents of the University of California.
+.\" All rights reserved.
+.\"
+.\" Redistribution and use in source and binary forms are permitted
+.\" provided that the above copyright notice and this paragraph are
+.\" duplicated in all such forms and that any documentation,
+.\" advertising materials, and other materials related to such
+.\" distribution and use acknowledge that the software was developed
+.\" by the University of California, Berkeley.  The name of the
+.\" University may not be used to endorse or promote products derived
+.\" from this software without specific prior written permission.
+.\" THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
+.\" IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
+.\" WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
+.\"
+.\"    @(#)footnote.me 2.9 (Berkeley) %G%
+.\"
 .\"    %beginstrip%
 .\"    %beginstrip%
+.\"
 .de (f                 \" *** begin footnote
 .ec
 .if "\\n(.z"|f" .tm Line \\n(c. -- Illegal footnote nesting
 .de (f                 \" *** begin footnote
 .ec
 .if "\\n(.z"|f" .tm Line \\n(c. -- Illegal footnote nesting
 .      in 0
 .      xl \\n($lu-\\n(fuu
 .      @F \\n(ff
 .      in 0
 .      xl \\n($lu-\\n(fuu
 .      @F \\n(ff
-.      sz \\n(fpu
+.      sz \\n(fp
 .      vs \\n(.su*\\n($Ru
 .      if !\\n(?f \
 \{\
 .      vs \\n(.su*\\n($Ru
 .      if !\\n(?f \
 \{\
-.              nr _b +2u*\n(.Vu        \" fudge factor
+.              nr _b +1v       \" allow space for $s
 .              $s
 .      \}
 .      br
 .              $s
 .      \}
 .      br
@@ -32,7 +49,7 @@
 .              in 0            \" reset everything from .bc
 .              xl \\n($lu-\\n(fuu
 .              @F \\n(ff
 .              in 0            \" reset everything from .bc
 .              xl \\n($lu-\\n(fuu
 .              @F \\n(ff
-.              sz \\n(fpu
+.              sz \\n(fp
 .              vs \\n(.su*\\n($Ru
 .              if !\\n(?f \
 .                      $s
 .              vs \\n(.su*\\n($Ru
 .              if !\\n(?f \
 .                      $s
 .              ti \\n(fiu
 .      if \n@>2 .tm    << (f $f=\\n($f
 .\}
 .              ti \\n(fiu
 .      if \n@>2 .tm    << (f $f=\\n($f
 .\}
-.el \!.(f \\$1
+.el \
+\{\
+.      ev 2
+\!.(f \\$1
+.\}
 ..
 .de )f                 \" *** end footnote
 .ie "\\n(.z"|f" \
 ..
 .de )f                 \" *** end footnote
 .ie "\\n(.z"|f" \
 .      nr dn _D
 .      rr _D
 .\}
 .      nr dn _D
 .      rr _D
 .\}
-.el \!.)f
+.el \
+\{\
+.      br
+\!.)f
+.      ev
+.\}
 ..
 .if \n(ff<=0 \
 .      nr ff 1                 \" footnote font: Times Roman
 ..
 .if \n(ff<=0 \
 .      nr ff 1                 \" footnote font: Times Roman