BSD 4_3_Tahoe release
[unix-history] / usr / lib / me / sh.me
index 403cec4..166c8ac 100644 (file)
@@ -1,17 +1,28 @@
 .nr _0 \n(c.
 .nr _0 \n(c.
-.\"    @(#)sh.me       2.1     8/18/80
+.\"    @(#)sh.me       2.6 (Berkeley) 5/21/88
+.\"
+.\" Copyright (c) 1988 Regents of the University of California.
+.\" All rights reserved.
+.\"
+.\" Redistribution and use in source and binary forms are permitted
+.\" provided that this notice is preserved and that due credit is given
+.\" to the University of California at 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'' without express or implied warranty.
 .\" This version has had comments stripped; an unstripped version is available.
 .de sh
 .\" This version has had comments stripped; an unstripped version is available.
 .de sh
+.fi
 .if (\\n(si>0)&(\\n(si<1n) \
 .      nr si \\n(sin
 .ce 0
 .@d "\\$1" +1 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8
 .if !"\\$2"_" \
 \{\
 .if (\\n(si>0)&(\\n(si<1n) \
 .      nr si \\n(sin
 .ce 0
 .@d "\\$1" +1 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8
 .if !"\\$2"_" \
 \{\
-.      ds |x \&\\$2
-.      $p "\\*(|x" "\\*($n" \\n($0
-.      $0 "\\*(|x" "\\*($n" \\n($0
-.      rm |x
+.      ds |n \&\\$2
+.      $p "\\*(|n" "\\*($n" \\n($0
+.      $0 "\\*(|n" "\\*($n" \\n($0
+.      rm |n
 .\}
 .nr $p 0 1
 ..
 .\}
 .nr $p 0 1
 ..
@@ -23,7 +34,7 @@
 .ds $n \&\"
 .ie \\n($0>=1 \
 \{\
 .ds $n \&\"
 .ie \\n($0>=1 \
 \{\
-.      if \\n($1=0 \
+.      if '\\n($1'0' \
 .              nr $1 1
 .      if (\\n(.$>=3) .if !"\\$3"-" \
 .              nr $1 \\$3
 .              nr $1 1
 .      if (\\n(.$>=3) .if !"\\$3"-" \
 .              nr $1 \\$3
@@ -33,7 +44,7 @@
 .      nr $1 0
 .ie \\n($0>=2 \
 \{\
 .      nr $1 0
 .ie \\n($0>=2 \
 \{\
-.      if \\n($2=0 \
+.      if '\\n($2'0' \
 .              nr $2 1
 .      if (\\n(.$>=4) .if !"\\$4"-" \
 .              nr $2 \\$4
 .              nr $2 1
 .      if (\\n(.$>=4) .if !"\\$4"-" \
 .              nr $2 \\$4
@@ -43,7 +54,7 @@
 .      nr $2 0
 .ie \\n($0>=3 \
 \{\
 .      nr $2 0
 .ie \\n($0>=3 \
 \{\
-.      if \\n($3=0 \
+.      if '\\n($3'0' \
 .              nr $3 1
 .      if (\\n(.$>=5) .if !"\\$5"-" \
 .              nr $3 \\$5
 .              nr $3 1
 .      if (\\n(.$>=5) .if !"\\$5"-" \
 .              nr $3 \\$5
@@ -53,7 +64,7 @@
 .      nr $3 0
 .ie \\n($0>=4 \
 \{\
 .      nr $3 0
 .ie \\n($0>=4 \
 \{\
-.      if \\n($4=0 \
+.      if '\\n($4'0' \
 .              nr $4 1
 .      if (\\n(.$>=6) .if !"\\$6"-" \
 .              nr $4 \\$6
 .              nr $4 1
 .      if (\\n(.$>=6) .if !"\\$6"-" \
 .              nr $4 \\$6
@@ -63,7 +74,7 @@
 .      nr $4 0
 .ie \\n($0>=5 \
 \{\
 .      nr $4 0
 .ie \\n($0>=5 \
 \{\
-.      if \\n($5=0 \
+.      if '\\n($5'0' \
 .              nr $5 1
 .      if (\\n(.$>=7) .if !"\\$7"-" \
 .              nr $5 \\$7
 .              nr $5 1
 .      if (\\n(.$>=7) .if !"\\$7"-" \
 .              nr $5 \\$7
@@ -73,7 +84,7 @@
 .      nr $5 0
 .ie \\n($0>=6 \
 \{\
 .      nr $5 0
 .ie \\n($0>=6 \
 \{\
-.      if \\n($6=0 \
+.      if '\\n($6'0' \
 .              nr $6 1
 .      if (\\n(.$>=8) .if !"\\$8"-" \
 .              nr $6 \\$8
 .              nr $6 1
 .      if (\\n(.$>=8) .if !"\\$8"-" \
 .              nr $6 \\$8