summaryrefslogtreecommitdiffstats
path: root/contrib/groff/tmac/trace.tmac
diff options
context:
space:
mode:
authorru <ru@FreeBSD.org>2005-10-20 10:45:19 +0000
committerru <ru@FreeBSD.org>2005-10-20 10:45:19 +0000
commit353ac0b339df3493d1950b6527988b77b76bd197 (patch)
tree8a188846a3f5bd2f2b8cb869cba64e3c470a2b26 /contrib/groff/tmac/trace.tmac
parentc40093b1f1b43dc237b9d272697cdd0842ec64ec (diff)
downloadFreeBSD-src-353ac0b339df3493d1950b6527988b77b76bd197.zip
FreeBSD-src-353ac0b339df3493d1950b6527988b77b76bd197.tar.gz
Virgin import of FSF groff v1.19.2
Diffstat (limited to 'contrib/groff/tmac/trace.tmac')
-rw-r--r--contrib/groff/tmac/trace.tmac66
1 files changed, 58 insertions, 8 deletions
diff --git a/contrib/groff/tmac/trace.tmac b/contrib/groff/tmac/trace.tmac
index c341b76..286c605 100644
--- a/contrib/groff/tmac/trace.tmac
+++ b/contrib/groff/tmac/trace.tmac
@@ -10,6 +10,7 @@
.eo
.
.rn de !!de
+.rn de1 !!de1
.
.
.!!de de
@@ -17,12 +18,12 @@
. ec
. do !!de \$1
. ie "\$1"\\$0" .do tm1 "\\*[!!sp]*** de trace enter: \\$0 \\$@
-. el .do tm1 "\*[!!sp]*** trace enter \$1: \\$0 \\$@
+. el .do tm1 "\\*[!!sp]*** de trace enter \$1: \\$0 \\$@
. do as !!sp " \"
. do nop \\*[!!\$1]\\
. do substring !!sp 1
. ie "\$1"\\$0" .do tm1 "\\*[!!sp]*** trace exit: \\$0 \\$@
-. el .do tm1 "\*[!!sp]*** trace exit \$1: \\$0 \\$@
+. el .do tm1 "\\*[!!sp]*** trace exit \$1: \\$0 \\$@
\..
.
. do ds !!d1 !!\$1
@@ -32,19 +33,40 @@
. do dei !!d1 !!d2
..
.
+.!!de de1
+. do ecs
+. ec
+. do !!de \$1
+. ie "\$1"\\$0" .do tm1 "\\*[!!sp]*** de1 trace enter: \\$0 \\$@
+. el .do tm1 "\\*[!!sp]*** de1 trace enter \$1: \\$0 \\$@
+. do as !!sp " \"
+. do nop \\*[!!\$1]\\
+. do substring !!sp 1
+. ie "\$1"\\$0" .do tm1 "\\*[!!sp]*** trace exit: \\$0 \\$@
+. el .do tm1 "\\*[!!sp]*** trace exit \$1: \\$0 \\$@
+\..
+.
+. do ds !!d1 !!\$1
+. do ds !!d2 \$2
+.
+. do ecr
+. do dei1 !!d1 !!d2
+..
+.
.rn am !!am
+.rn am1 !!am1
.
-.!!am am
+.!!de am
. do ecs
. ec
-. do !!am \$1
+. do !!de \$1
. ie "\$1"\\$0" .do tm1 "\\*[!!sp]*** am trace enter: \\$0 \\$@
-. el .do tm1 "\*[!!sp]*** am trace enter \$1: \\$0 \\$@
-. as !!sp " \"
+. el .do tm1 "\\*[!!sp]*** am trace enter \$1: \\$0 \\$@
+. do as !!sp " \"
. do nop \\*[!!\$1]\\
-. substring !!sp 1
+. do substring !!sp 1
. ie "\$1"\\$0" .do tm1 "\\*[!!sp]*** trace exit: \\$0 \\$@
-. el .do tm1 "\*[!!sp]*** trace exit \$1: \\$0 \\$@
+. el .do tm1 "\\*[!!sp]*** trace exit \$1: \\$0 \\$@
\..
.
. do ds !!a1 !!\$1
@@ -54,6 +76,34 @@
. do ami !!a1 !!a2
..
.
+.!!de am1
+. do ecs
+. ec
+. do !!de \$1
+. ie "\$1"\\$0" .do tm1 "\\*[!!sp]*** am1 trace enter: \\$0 \\$@
+. el .do tm1 "\\*[!!sp]*** am1 trace enter \$1: \\$0 \\$@
+. do as !!sp " \"
+. do nop \\*[!!\$1]\\
+. do substring !!sp 1
+. ie "\$1"\\$0" .do tm1 "\\*[!!sp]*** trace exit: \\$0 \\$@
+. el .do tm1 "\\*[!!sp]*** trace exit \$1: \\$0 \\$@
+\..
+.
+. do ds !!a1 !!\$1
+. do ds !!a2 \$2
+.
+. do ecr
+. do ami1 !!a1 !!a2
+..
+.
+.rn return !!return
+.
+.!!de1 return
+. substring !!sp 1
+. tm1 "\*[!!sp]*** return
+. !!return twice
+..
+.
.ec
.
.cp \n(_C
OpenPOWER on IntegriCloud