CTAN sync 202104040301

8 files changed, 68 insertions, 1 deletions

diff --git a/indexing/upmendex/source/tests/pprec0.ist b/indexing/upmendex/source/tests/pprec0.ist
new file mode 100644
index 0000000000..ec1242bbba
--- /dev/null
+++ b/indexing/upmendex/source/tests/pprec0.ist
@@ -0,0 +1,11 @@
+% -*- coding: utf-8 -*-
+
+%page_precedence "rnaRA"
+
+delim_0 "[[delim0]]"
+delim_1 "[[delim1]]"
+delim_2 "[[delim2]]"
+delim_r "[[delimr]]"
+suffix_2p "[[sfx 2p]]"
+suffix_3p "[[sfx 3p]]"
+
diff --git a/indexing/upmendex/source/tests/pprec1.ist b/indexing/upmendex/source/tests/pprec1.ist
new file mode 100644
index 0000000000..8f9221ebce
--- /dev/null
+++ b/indexing/upmendex/source/tests/pprec1.ist
@@ -0,0 +1,11 @@
+% -*- coding: utf-8 -*-
+
+page_precedence "nrR"
+
+delim_0 "[[delim0]]"
+delim_1 "[[delim1]]"
+delim_2 "[[delim2]]"
+delim_r "[[delimr]]"
+suffix_2p "[[sfx 2p]]"
+suffix_3p "[[sfx 3p]]"
+
diff --git a/indexing/upmendex/source/tests/pprec2.ist b/indexing/upmendex/source/tests/pprec2.ist
new file mode 100644
index 0000000000..eeec1e95cf
--- /dev/null
+++ b/indexing/upmendex/source/tests/pprec2.ist
@@ -0,0 +1,11 @@
+% -*- coding: utf-8 -*-
+
+page_precedence "Rnr"
+
+delim_0 "[[delim0]]"
+delim_1 "[[delim1]]"
+delim_2 "[[delim2]]"
+delim_r "[[delimr]]"
+suffix_2p "[[sfx 2p]]"
+suffix_3p "[[sfx 3p]]"
+
diff --git a/indexing/upmendex/source/tests/pprecA-0.ind b/indexing/upmendex/source/tests/pprecA-0.ind
new file mode 100644
index 0000000000..245eacacdd
--- /dev/null
+++ b/indexing/upmendex/source/tests/pprecA-0.ind
@@ -0,0 +1,5 @@
+\begin{theindex}
+
+  \item entryA[[delim0]]i[[sfx 3p]], 1[[sfx 3p]], I[[sfx 3p]]
+
+\end{theindex}
diff --git a/indexing/upmendex/source/tests/pprecA-1.ind b/indexing/upmendex/source/tests/pprecA-1.ind
new file mode 100644
index 0000000000..772e302d7c
--- /dev/null
+++ b/indexing/upmendex/source/tests/pprecA-1.ind
@@ -0,0 +1,5 @@
+\begin{theindex}
+
+  \item entryA[[delim0]]1[[sfx 3p]], i[[sfx 3p]], I[[sfx 3p]]
+
+\end{theindex}
diff --git a/indexing/upmendex/source/tests/pprecA-2.ind b/indexing/upmendex/source/tests/pprecA-2.ind
new file mode 100644
index 0000000000..52d35cb3d7
--- /dev/null
+++ b/indexing/upmendex/source/tests/pprecA-2.ind
@@ -0,0 +1,5 @@
+\begin{theindex}
+
+  \item entryA[[delim0]]I[[sfx 3p]], 1[[sfx 3p]], i[[sfx 3p]]
+
+\end{theindex}
diff --git a/indexing/upmendex/source/tests/pprecA.idx b/indexing/upmendex/source/tests/pprecA.idx
new file mode 100644
index 0000000000..8e770b9d0d
--- /dev/null
+++ b/indexing/upmendex/source/tests/pprecA.idx
@@ -0,0 +1,9 @@
+\indexentry{entryA}{i}
+\indexentry{entryA}{ii}
+\indexentry{entryA}{iii}
+\indexentry{entryA}{1}
+\indexentry{entryA}{2}
+\indexentry{entryA}{3}
+\indexentry{entryA}{I}
+\indexentry{entryA}{II}
+\indexentry{entryA}{III}
diff --git a/indexing/upmendex/source/tests/upmendex.test b/indexing/upmendex/source/tests/upmendex.test
index da75821d10..70ff2fac21 100755
--- a/indexing/upmendex/source/tests/upmendex.test
+++ b/indexing/upmendex/source/tests/upmendex.test
@@ -7,7 +7,7 @@
 TEXMFCNF=$srcdir/../kpathsea
 export TEXMFCNF
 
-rm -f foo.*
+rm -f foo.* uni.* pprec*.*
 
 ./upmendex $srcdir/tests/foo.idx -o foo.ind1 -t foo.ilg1 \
 	&& diff $srcdir/tests/foo.ind foo.ind1 || exit 1
@@ -24,3 +24,13 @@ cat $srcdir/tests/uni.idx | \
 	>uni.ind2 2>uni.ilg2 \
 	&& diff $srcdir/tests/uni.ind uni.ind2 || exit 1
 
+# test for page_precedence
+./upmendex -s $srcdir/tests/pprec0.ist $srcdir/tests/pprecA.idx -o pprecA-0.ind1 -t pprecA-0.ilg \
+	&& diff $srcdir/tests/pprecA-0.ind pprecA-0.ind1 || exit 1
+
+./upmendex -s $srcdir/tests/pprec1.ist $srcdir/tests/pprecA.idx -o pprecA-1.ind1 -t pprecA-1.ilg \
+	&& diff $srcdir/tests/pprecA-1.ind pprecA-1.ind1 || exit 1
+
+./upmendex -s $srcdir/tests/pprec2.ist $srcdir/tests/pprecA.idx -o pprecA-2.ind1 -t pprecA-2.ilg \
+	&& diff $srcdir/tests/pprecA-2.ind pprecA-2.ind1 || exit 1
+