summaryrefslogtreecommitdiff
path: root/tmac/trace.tmac
diff options
context:
space:
mode:
authorwl <wl>2004-10-10 18:17:37 +0000
committerwl <wl>2004-10-10 18:17:37 +0000
commit72072ef1ed94b70a3ab61c0c4ace6a49207f4469 (patch)
treebc4d4678a23dc2597b636e5452b19a8c2b85c651 /tmac/trace.tmac
parente751604d543e17be25b564894075c397e82d925d (diff)
downloadgroff-72072ef1ed94b70a3ab61c0c4ace6a49207f4469.tar.gz
* tmac/trace.tmac: Fix handling of `am' and `am1' calls.
Diffstat (limited to 'tmac/trace.tmac')
-rw-r--r--tmac/trace.tmac8
1 files changed, 4 insertions, 4 deletions
diff --git a/tmac/trace.tmac b/tmac/trace.tmac
index 0c354eee..286c605b 100644
--- a/tmac/trace.tmac
+++ b/tmac/trace.tmac
@@ -59,10 +59,10 @@
.!!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 " \"
+. do as !!sp " \"
. do nop \\*[!!\$1]\\
. do substring !!sp 1
. ie "\$1"\\$0" .do tm1 "\\*[!!sp]*** trace exit: \\$0 \\$@
@@ -79,10 +79,10 @@
.!!de am1
. do ecs
. ec
-. do !!am \$1
+. do !!de \$1
. ie "\$1"\\$0" .do tm1 "\\*[!!sp]*** am1 trace enter: \\$0 \\$@
. el .do tm1 "\\*[!!sp]*** am1 trace enter \$1: \\$0 \\$@
-. as !!sp " \"
+. do as !!sp " \"
. do nop \\*[!!\$1]\\
. do substring !!sp 1
. ie "\$1"\\$0" .do tm1 "\\*[!!sp]*** trace exit: \\$0 \\$@