gbranden pushed a commit to branch master
in repository groff.
commit 584b3fe5c06d0dd9cf5470759145de5996bd9d5e
Author: G. Branden Robinson <[email protected]>
AuthorDate: Wed Apr 15 06:45:46 2026 -0500
[groff]: Improve `dt` request unit test.
* src/roff/groff/tests/dt-request-works.sh: Verify that diversion trap
removal works.
---
ChangeLog | 7 ++++++
src/roff/groff/tests/dt-request-works.sh | 37 +++++++++++++++++++++++++++++++-
2 files changed, 43 insertions(+), 1 deletion(-)
diff --git a/ChangeLog b/ChangeLog
index fe76ec0c0..f77214043 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+2026-04-15 G. Branden Robinson <[email protected]>
+
+ [groff]: Improve `dt` request unit test.
+
+ * src/roff/groff/tests/dt-request-works.sh: Verify that
+ diversion trap removal works.
+
2026-04-15 G. Branden Robinson <[email protected]>
* src/roff/troff/node.cpp (suppress_node::tprint): Refactor code
diff --git a/src/roff/groff/tests/dt-request-works.sh
b/src/roff/groff/tests/dt-request-works.sh
index c0f071761..adfd0a47e 100755
--- a/src/roff/groff/tests/dt-request-works.sh
+++ b/src/roff/groff/tests/dt-request-works.sh
@@ -19,8 +19,17 @@
groff="${abs_top_builddir:-.}/test-groff"
+fail=
+
+wail () {
+ echo "...FAILED"
+ fail=yes
+}
+
# Unit-test `dt` request.
+# Test trap planting.
+
input='.
.de TT
BOING
@@ -40,6 +49,32 @@ qux
output=$(printf '%s\n' "$input" | "$groff" -a 2>/dev/null)
echo "$output"
output=$(echo $output) # condense onto one line
-echo "$output" | grep -q "bar BOING qux"
+echo "$output" | grep -q "bar BOING qux" || wail
+
+# Test trap removal.
+
+input2='.
+.de TT
+WHOOPS
+.br
+..
+.di DD
+.dt 3v TT
+.nf
+foo
+bar
+.dt
+.sp
+baz
+.di
+.DD
+.'
+
+output2=$(printf '%s\n' "$input2" | "$groff" -a 2>/dev/null)
+echo "$output2"
+output2=$(echo $output2) # condense onto one line
+echo "$output2" | grep -q "foo bar baz" || wail
+
+test -z "$fail"
# vim:set autoindent expandtab shiftwidth=4 tabstop=4 textwidth=72:
_______________________________________________
groff-commit mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/groff-commit
