texlive[63317] Build/source/texk/bibtex-x: bibtex-x: fix a bug on
commits+takuji at tug.org
commits+takuji at tug.org
Tue May 17 14:10:32 CEST 2022
Revision: 63317
http://tug.org/svn/texlive?view=revision&revision=63317
Author: takuji
Date: 2022-05-17 14:10:32 +0200 (Tue, 17 May 2022)
Log Message:
-----------
bibtex-x: fix a bug on text.prefix$
Modified Paths:
--------------
trunk/Build/source/texk/bibtex-x/ChangeLog
trunk/Build/source/texk/bibtex-x/bibtex-4.c
trunk/Build/source/texk/bibtex-x/bibtex.h
trunk/Build/source/texk/bibtex-x/tests/substra.bbl
trunk/Build/source/texk/bibtex-x/tests/substru.bbl
trunk/Build/source/texk/bibtex-x/tests/testsubstra.bib
trunk/Build/source/texk/bibtex-x/tests/testsubstru.bib
trunk/Build/source/texk/bibtex-x/tests/txtprfxa.bbl
trunk/Build/source/texk/bibtex-x/tests/txtprfxu.bbl
trunk/Build/source/texk/bibtex-x/version.h
Modified: trunk/Build/source/texk/bibtex-x/ChangeLog
===================================================================
--- trunk/Build/source/texk/bibtex-x/ChangeLog 2022-05-16 23:49:08 UTC (rev 63316)
+++ trunk/Build/source/texk/bibtex-x/ChangeLog 2022-05-17 12:10:32 UTC (rev 63317)
@@ -1,3 +1,12 @@
+2022-05-17 TANAKA Takuji <ttk at t-lab.opal.ne.jp>
+
+ * version.h:
+ Bump version to 4.00 (17 may 2022).
+ * bibtex-4.c, bibtex.h:
+ Fix a bug of text.prefix$ in bibtexu.
+ * tests/testsubstr[au].bib, substr[au].bbl, txtprfx[au].bbl:
+ Update tests.
+
2022-05-08 TANAKA Takuji <ttk at t-lab.opal.ne.jp>
* version.h:
Modified: trunk/Build/source/texk/bibtex-x/bibtex-4.c
===================================================================
--- trunk/Build/source/texk/bibtex-x/bibtex-4.c 2022-05-16 23:49:08 UTC (rev 63316)
+++ trunk/Build/source/texk/bibtex-x/bibtex-4.c 2022-05-17 12:10:32 UTC (rev 63317)
@@ -2387,7 +2387,7 @@
/*
The same for the length of character UTF-8. 23/sep/2009
*/
- DO_UTF8(str_pool[sp_xptr1], , sp_xptr1++, sp_xptr1 += 2, sp_xptr1 += 3);
+ DO_UTF8(str_pool[sp_xptr1-1], , sp_xptr1++, sp_xptr1 += 2, sp_xptr1 += 3);
#endif
INCR (num_text_chars);
END
Modified: trunk/Build/source/texk/bibtex-x/bibtex.h
===================================================================
--- trunk/Build/source/texk/bibtex-x/bibtex.h 2022-05-16 23:49:08 UTC (rev 63316)
+++ trunk/Build/source/texk/bibtex-x/bibtex.h 2022-05-17 12:10:32 UTC (rev 63317)
@@ -1485,7 +1485,7 @@
else if ((ch >= 0xC2) && (ch <= 0xDF)) { do_2; } \
else if ((ch >= 0xE0) && (ch <= 0xEF)) { do_3; } \
else if ((ch >= 0xF0) && (ch <= 0xF4)) { do_4; } \
- else printf("this isn't a right UTF-8 char!\n")
+ else printf("this (%x) isn't a right UTF-8 char!\n", ch)
/***************************************************************************
Modified: trunk/Build/source/texk/bibtex-x/tests/substra.bbl
===================================================================
--- trunk/Build/source/texk/bibtex-x/tests/substra.bbl 2022-05-16 23:49:08 UTC (rev 63316)
+++ trunk/Build/source/texk/bibtex-x/tests/substra.bbl 2022-05-17 12:10:32 UTC (rev 63317)
@@ -275,5 +275,60 @@
\item[-6 3] {\xEE\xF8
\item[-7 2] {\xEE
\item[-8 1] {
+\item[orig] {\a}\xC5\xE5{\b}\xC6\xE6{\c}\xC7\xE7
+\item[1 5] {\a}\xC5
+\item[1 4] {\a}
+\item[1 3] {\a
+\item[1 2] {\
+\item[1 1] {
+\item[2 1] \
+\item[3 1] a
+\item[4 1] }
+\item[5 1] \xC5
+\item[1 5] {\a}\xC5
+\item[2 5] \a}\xC5\xE5
+\item[3 5] a}\xC5\xE5{
+\item[4 5] }\xC5\xE5{\
+\item[5 5] \xC5\xE5{\b
+\item[1 5] {\a}\xC5
+\item[2 4] \a}\xC5
+\item[3 3] a}\xC5
+\item[4 2] }\xC5
+\item[5 1] \xC5
+\item[1 8] {\a}\xC5\xE5{\
+\item[2 7] \a}\xC5\xE5{\
+\item[3 6] a}\xC5\xE5{\
+\item[4 5] }\xC5\xE5{\
+\item[5 4] \xC5\xE5{\
+\item[6 3] \xE5{\
+\item[7 2] {\
+\item[8 1] \
+\item[-1 5] \c}\xC7\xE7
+\item[-1 4] c}\xC7\xE7
+\item[-1 3] }\xC7\xE7
+\item[-1 2] \xC7\xE7
+\item[-1 1] \xE7
+\item[-2 1] \xC7
+\item[-3 1] }
+\item[-4 1] c
+\item[-5 1] \
+\item[-1 5] \c}\xC7\xE7
+\item[-2 5] {\c}\xC7
+\item[-3 5] \xE6{\c}
+\item[-4 5] \xC6\xE6{\c
+\item[-5 5] }\xC6\xE6{\
+\item[-1 5] \c}\xC7\xE7
+\item[-2 4] \c}\xC7
+\item[-3 3] \c}
+\item[-4 2] \c
+\item[-5 1] \
+\item[-1 8] \xC6\xE6{\c}\xC7\xE7
+\item[-2 7] \xC6\xE6{\c}\xC7
+\item[-3 6] \xC6\xE6{\c}
+\item[-4 5] \xC6\xE6{\c
+\item[-5 4] \xC6\xE6{\
+\item[-6 3] \xC6\xE6{
+\item[-7 2] \xC6\xE6
+\item[-8 1] \xC6
\end{itemize}
\endinput
Modified: trunk/Build/source/texk/bibtex-x/tests/substru.bbl
===================================================================
--- trunk/Build/source/texk/bibtex-x/tests/substru.bbl 2022-05-16 23:49:08 UTC (rev 63316)
+++ trunk/Build/source/texk/bibtex-x/tests/substru.bbl 2022-05-17 12:10:32 UTC (rev 63317)
@@ -220,6 +220,171 @@
\item[-6 3] uvw
\item[-7 2] uv
\item[-8 1] u
+\item[orig] {\a}Åå{\b}Ææ{\c}Çç
+\item[1 5] {\a}Å
+\item[1 4] {\a}
+\item[1 3] {\a
+\item[1 2] {\
+\item[1 1] {
+\item[2 1] \
+\item[3 1] a
+\item[4 1] }
+\item[5 1] Å
+\item[1 5] {\a}Å
+\item[2 5] \a}Åå
+\item[3 5] a}Åå{
+\item[4 5] }Åå{\
+\item[5 5] Åå{\b
+\item[1 5] {\a}Å
+\item[2 4] \a}Å
+\item[3 3] a}Å
+\item[4 2] }Å
+\item[5 1] Å
+\item[1 8] {\a}Åå{\
+\item[2 7] \a}Åå{\
+\item[3 6] a}Åå{\
+\item[4 5] }Åå{\
+\item[5 4] Åå{\
+\item[6 3] å{\
+\item[7 2] {\
+\item[8 1] \
+\item[-1 5] \c}Çç
+\item[-1 4] c}Çç
+\item[-1 3] }Çç
+\item[-1 2] Çç
+\item[-1 1] ç
+\item[-2 1] Ç
+\item[-3 1] }
+\item[-4 1] c
+\item[-5 1] \
+\item[-1 5] \c}Çç
+\item[-2 5] {\c}Ç
+\item[-3 5] æ{\c}
+\item[-4 5] Ææ{\c
+\item[-5 5] }Ææ{\
+\item[-1 5] \c}Çç
+\item[-2 4] \c}Ç
+\item[-3 3] \c}
+\item[-4 2] \c
+\item[-5 1] \
+\item[-1 8] Ææ{\c}Çç
+\item[-2 7] Ææ{\c}Ç
+\item[-3 6] Ææ{\c}
+\item[-4 5] Ææ{\c
+\item[-5 4] Ææ{\
+\item[-6 3] Ææ{
+\item[-7 2] Ææ
+\item[-8 1] Æ
+\item[orig] {\a}αあ{\b}βい{\c}γう
+\item[1 5] {\a}α
+\item[1 4] {\a}
+\item[1 3] {\a
+\item[1 2] {\
+\item[1 1] {
+\item[2 1] \
+\item[3 1] a
+\item[4 1] }
+\item[5 1] α
+\item[1 5] {\a}α
+\item[2 5] \a}αあ
+\item[3 5] a}αあ{
+\item[4 5] }αあ{\
+\item[5 5] αあ{\b
+\item[1 5] {\a}α
+\item[2 4] \a}α
+\item[3 3] a}α
+\item[4 2] }α
+\item[5 1] α
+\item[1 8] {\a}αあ{\
+\item[2 7] \a}αあ{\
+\item[3 6] a}αあ{\
+\item[4 5] }αあ{\
+\item[5 4] αあ{\
+\item[6 3] あ{\
+\item[7 2] {\
+\item[8 1] \
+\item[-1 5] \c}γう
+\item[-1 4] c}γう
+\item[-1 3] }γう
+\item[-1 2] γう
+\item[-1 1] う
+\item[-2 1] γ
+\item[-3 1] }
+\item[-4 1] c
+\item[-5 1] \
+\item[-1 5] \c}γう
+\item[-2 5] {\c}γ
+\item[-3 5] い{\c}
+\item[-4 5] βい{\c
+\item[-5 5] }βい{\
+\item[-1 5] \c}γう
+\item[-2 4] \c}γ
+\item[-3 3] \c}
+\item[-4 2] \c
+\item[-5 1] \
+\item[-1 8] βい{\c}γう
+\item[-2 7] βい{\c}γ
+\item[-3 6] βい{\c}
+\item[-4 5] βい{\c
+\item[-5 4] βい{\
+\item[-6 3] βい{
+\item[-7 2] βい
+\item[-8 1] β
+\item[orig] {\a}あα{\b}いβ{\c}うγ
+\item[1 5] {\a}あ
+\item[1 4] {\a}
+\item[1 3] {\a
+\item[1 2] {\
+\item[1 1] {
+\item[2 1] \
+\item[3 1] a
+\item[4 1] }
+\item[5 1] あ
+\item[1 5] {\a}あ
+\item[2 5] \a}あα
+\item[3 5] a}あα{
+\item[4 5] }あα{\
+\item[5 5] あα{\b
+\item[1 5] {\a}あ
+\item[2 4] \a}あ
+\item[3 3] a}あ
+\item[4 2] }あ
+\item[5 1] あ
+\item[1 8] {\a}あα{\
+\item[2 7] \a}あα{\
+\item[3 6] a}あα{\
+\item[4 5] }あα{\
+\item[5 4] あα{\
+\item[6 3] α{\
+\item[7 2] {\
+\item[8 1] \
+\item[-1 5] \c}うγ
+\item[-1 4] c}うγ
+\item[-1 3] }うγ
+\item[-1 2] うγ
+\item[-1 1] γ
+\item[-2 1] う
+\item[-3 1] }
+\item[-4 1] c
+\item[-5 1] \
+\item[-1 5] \c}うγ
+\item[-2 5] {\c}う
+\item[-3 5] β{\c}
+\item[-4 5] いβ{\c
+\item[-5 5] }いβ{\
+\item[-1 5] \c}うγ
+\item[-2 4] \c}う
+\item[-3 3] \c}
+\item[-4 2] \c
+\item[-5 1] \
+\item[-1 8] いβ{\c}うγ
+\item[-2 7] いβ{\c}う
+\item[-3 6] いβ{\c}
+\item[-4 5] いβ{\c
+\item[-5 4] いβ{\
+\item[-6 3] いβ{
+\item[-7 2] いβ
+\item[-8 1] い
\item[orig] {{AB}CD}EFG tuv{wx{yz}}
\item[1 5] {{AB}
\item[1 4] {{AB
Modified: trunk/Build/source/texk/bibtex-x/tests/testsubstra.bib
===================================================================
--- trunk/Build/source/texk/bibtex-x/tests/testsubstra.bib 2022-05-16 23:49:08 UTC (rev 63316)
+++ trunk/Build/source/texk/bibtex-x/tests/testsubstra.bib 2022-05-17 12:10:32 UTC (rev 63317)
@@ -15,3 +15,7 @@
field = {{{\xC5\xC7}\xC8\xCE}\xD8\xDC\xDD~\xE5\xE7\xE8{\xEE\xF8{\xFC\xFD}}},
}
+ at Type{brace-backslash1,
+ field = "{\a}\xC5\xE5{\b}\xC6\xE6{\c}\xC7\xE7",
+}
+
Modified: trunk/Build/source/texk/bibtex-x/tests/testsubstru.bib
===================================================================
--- trunk/Build/source/texk/bibtex-x/tests/testsubstru.bib 2022-05-16 23:49:08 UTC (rev 63316)
+++ trunk/Build/source/texk/bibtex-x/tests/testsubstru.bib 2022-05-17 12:10:32 UTC (rev 63317)
@@ -45,3 +45,15 @@
field = {AÇう冤EÜЖ~tçユ漆𡚴xюω},
}
+ at Type{brace-backslash1,
+ field = "{\a}Åå{\b}Ææ{\c}Çç",
+}
+
+ at Type{brace-backslash2,
+ field = "{\a}αあ{\b}βい{\c}γう",
+}
+
+ at Type{brace-backslash3,
+ field = "{\a}あα{\b}いβ{\c}うγ",
+}
+
Modified: trunk/Build/source/texk/bibtex-x/tests/txtprfxa.bbl
===================================================================
--- trunk/Build/source/texk/bibtex-x/tests/txtprfxa.bbl 2022-05-16 23:49:08 UTC (rev 63316)
+++ trunk/Build/source/texk/bibtex-x/tests/txtprfxa.bbl 2022-05-17 12:10:32 UTC (rev 63317)
@@ -45,5 +45,14 @@
\item[5] {{\xC5\xC7}\xC8\xCE}\xD8
\item[6] {{\xC5\xC7}\xC8\xCE}\xD8\xDC
\item[7] {{\xC5\xC7}\xC8\xCE}\xD8\xDC\xDD
+\item[orig] {\a}\xC5\xE5{\b}\xC6\xE6{\c}\xC7\xE7
+\item[len] 9
+\item[1] {\a}
+\item[2] {\a}\xC5
+\item[3] {\a}\xC5\xE5
+\item[4] {\a}\xC5\xE5{\b}
+\item[5] {\a}\xC5\xE5{\b}\xC6
+\item[6] {\a}\xC5\xE5{\b}\xC6\xE6
+\item[7] {\a}\xC5\xE5{\b}\xC6\xE6{\c}
\end{itemize}
\endinput
Modified: trunk/Build/source/texk/bibtex-x/tests/txtprfxu.bbl
===================================================================
--- trunk/Build/source/texk/bibtex-x/tests/txtprfxu.bbl 2022-05-16 23:49:08 UTC (rev 63316)
+++ trunk/Build/source/texk/bibtex-x/tests/txtprfxu.bbl 2022-05-17 12:10:32 UTC (rev 63317)
@@ -36,6 +36,33 @@
\item[5] {AB}CDE
\item[6] {AB}CDEF
\item[7] {AB}CDEFG
+\item[orig] {\a}Åå{\b}Ææ{\c}Çç
+\item[len] 9
+\item[1] {\a}
+\item[2] {\a}Å
+\item[3] {\a}Åå
+\item[4] {\a}Åå{\b}
+\item[5] {\a}Åå{\b}Æ
+\item[6] {\a}Åå{\b}Ææ
+\item[7] {\a}Åå{\b}Ææ{\c}
+\item[orig] {\a}αあ{\b}βい{\c}γう
+\item[len] 9
+\item[1] {\a}
+\item[2] {\a}α
+\item[3] {\a}αあ
+\item[4] {\a}αあ{\b}
+\item[5] {\a}αあ{\b}β
+\item[6] {\a}αあ{\b}βい
+\item[7] {\a}αあ{\b}βい{\c}
+\item[orig] {\a}あα{\b}いβ{\c}うγ
+\item[len] 9
+\item[1] {\a}
+\item[2] {\a}あ
+\item[3] {\a}あα
+\item[4] {\a}あα{\b}
+\item[5] {\a}あα{\b}い
+\item[6] {\a}あα{\b}いβ
+\item[7] {\a}あα{\b}いβ{\c}
\item[orig] {{AB}CD}EFG tuv{wx{yz}}
\item[len] 15
\item[1] {{A}}
Modified: trunk/Build/source/texk/bibtex-x/version.h
===================================================================
--- trunk/Build/source/texk/bibtex-x/version.h 2022-05-16 23:49:08 UTC (rev 63316)
+++ trunk/Build/source/texk/bibtex-x/version.h 2022-05-17 12:10:32 UTC (rev 63317)
@@ -89,7 +89,7 @@
*/
#ifndef __VERSION_H__
# define __VERSION_H__ 1
-# define PACKAGE_DATE "(8 may 2022)"
+# define PACKAGE_DATE "(17 may 2022)"
# define VERSION PACKAGE_VERSION " " PACKAGE_DATE
#endif /* __VERSION_H__ */
More information about the tex-live-commits
mailing list.