From 0fd52043f3066b39266fbdacd2fa36df61fe2a18 Mon Sep 17 00:00:00 2001
From: "G. Branden Robinson" <g.branden.robinson@gmail.com>
Date: Fri, 6 Jan 2023 13:51:57 -0600
Subject: contrib/mm/m.tmac: Add code comments.

---
 contrib/mm/m.tmac | 10 ++++++++++
 1 file changed, 10 insertions(+)

(limited to 'contrib')

diff --git a/contrib/mm/m.tmac b/contrib/mm/m.tmac
index c38ba983b..b849f750c 100644
--- a/contrib/mm/m.tmac
+++ b/contrib/mm/m.tmac
@@ -379,6 +379,7 @@ Index		array!index
 .\"---------------------------------------------
 .\" ####### module init ######
 .\"	reset all things
+.\" XXX: Resets .cu and .ul but _not_ .ce or .rj.
 .de init@reset
 .ie \\n[misc@adjust] 'ad
 .el 'na
@@ -508,12 +509,21 @@ in=\\n[.i] fi=\\n[.u] .d=\\n[.d] nl=\\n[nl] pg=\\n[%]
 .nr line*lp\\n[.z] \\n[.d]
 ..
 .\" ######## module misc ###############
+.\" XXX: This register value is meaningless.
+.\"   .ad b
+.\"   .nr misc@adjust \n[.j]
+.\" might be better...
 .nr misc@adjust 14
 .de SA
 .if \\n[.$] \{\
 .	if \\$1-1 .@error "SA: bad arg: \\$1"
+.\" XXX: ...then...
+.\"   .ad l
+.\"   .nr misc@adjust \\n[.j]
 .	nr misc@adjust 0\\$1
 .\}
+.\" XXX: ...and finally an unconditional.
+.\"   .ad \\n[.j]
 .ie \\n[misc@adjust] 'ad
 .el 'na
 ..
-- 
cgit v1.2.1