mirror of
https://https.git.savannah.gnu.org/git/groff.git
synced 2026-01-26 15:39:07 +00:00
63 lines
1.9 KiB
Bash
Executable File
63 lines
1.9 KiB
Bash
Executable File
#!/bin/sh
|
|
#
|
|
# Copyright 2022-2025 G. Branden Robinson
|
|
#
|
|
# This file is part of groff, the GNU roff typesetting system.
|
|
#
|
|
# groff is free software; you can redistribute it and/or modify it under
|
|
# the terms of the GNU General Public License as published by the Free
|
|
# Software Foundation, either version 3 of the License, or (at your
|
|
# option) any later version.
|
|
#
|
|
# groff is distributed in the hope that it will be useful, but WITHOUT
|
|
# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
|
# FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
|
# for more details.
|
|
#
|
|
# You should have received a copy of the GNU General Public License
|
|
# along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
groff="${abs_top_builddir:-.}/test-groff"
|
|
|
|
fail=
|
|
|
|
wail () {
|
|
echo FAILED >&2
|
|
fail=YES
|
|
}
|
|
|
|
# Regression-test Savannah #24048. Pages that are too short to
|
|
# accommodate minimal header and footer requirements should not cause
|
|
# infinite trap recursion.
|
|
|
|
input='.COVER
|
|
.TL
|
|
Title
|
|
.AU "R. Thurston Howell"
|
|
.AT "Professor of Agnotology" "Publisher, Posterior Analytics Weekly"
|
|
.COVEND
|
|
.P
|
|
Main matter goes here.'
|
|
|
|
echo "checking that sample document fits using default length" >&2
|
|
output=$(printf "%s\n" "$input" \
|
|
| "$groff" -b -mm -Tascii -P-cbou | nl -ba)
|
|
echo "$output"
|
|
test "$(echo "$output" | wc -l)" -eq 132 || wail # 66 lines * 2 pages
|
|
|
|
echo "checking that sample document fits using -rL5v" >&2
|
|
output=$(printf "%s\n" "$input" \
|
|
| "$groff" -b -rL6v -mm -Tascii -P-cbou | nl -ba)
|
|
echo "$output"
|
|
test "$(echo "$output" | wc -l)" -eq 48 || wail # 6 lines * 8 pages
|
|
|
|
echo "checking that sample document fails gracefully using -rL5v" >&2
|
|
error=$(printf "%s\n" "$input" \
|
|
| "$groff" -b -rL5v -mm -Tascii -P-cbou -z 2>&1)
|
|
# Assume that >= 10 lines of stderr must be due to a giant backtrace.
|
|
test $(echo "$error" | wc -l) -lt 10 || wail
|
|
|
|
test -z "$fail"
|
|
|
|
# vim:set autoindent expandtab shiftwidth=4 tabstop=4 textwidth=72:
|