[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[bug #55320] [PATCH] tmac/an-old.tmac: Add a warning about a missing .RS
From: |
G. Branden Robinson |
Subject: |
[bug #55320] [PATCH] tmac/an-old.tmac: Add a warning about a missing .RS or an extra .RE |
Date: |
Tue, 19 Jan 2021 22:02:34 -0500 (EST) |
User-agent: |
Mozilla/5.0 (X11; Linux x86_64; rv:78.0) Gecko/20100101 Firefox/78.0 |
Update of bug #55320 (project groff):
Status: Confirmed => In Progress
_______________________________________________________
Follow-up Comment #2:
I have my own fix for this ready to push.
diff --git a/tmac/an-old.tmac b/tmac/an-old.tmac
index b7781eca..ba1ad64f 100644
--- a/tmac/an-old.tmac
+++ b/tmac/an-old.tmac
@@ -579,6 +579,21 @@
..
.
.de1 RE
+. ie \\n[.$] .nr an-RE-requested-level \\$1
+. el .nr an-RE-requested-level (\\n[an-level] - 1)
+. ie \\n[.$] \{\
+. if (\\n[an-RE-requested-level] = \\n[an-level]) \
+. ds an-RE-problem redundant; already at level \\n[an-level]\"
+. if (\\n[an-RE-requested-level] > \\n[an-level]) \
+. ds an-RE-problem too large\"
+. if (\\n[an-RE-requested-level] < 1) \
+. ds an-RE-problem too small\"
+. if d an-RE-problem \
+. an-style-warn argument """\\$1""" to .\\$0 \\*[an-RE-problem]
+. rm an-RE-problem
+. \}
+. el .if !(\\n[an-RE-requested-level]) .an-style-warn unbalanced .\\$0
+. rr an-RE-requested-level
. ie \\n[.$] .nr an-level ((;\\$1) <? \\n[an-level])
. el .nr an-level -1
. nr an-level (1 >? \\n[an-level])
_______________________________________________________
Reply to this item at:
<https://savannah.gnu.org/bugs/?55320>
_______________________________________________
Message sent via Savannah
https://savannah.gnu.org/
- [bug #55320] [PATCH] tmac/an-old.tmac: Add a warning about a missing .RS or an extra .RE,
G. Branden Robinson <=