bibtex-x: ver4.00, add is.cjk.str$, bitwise and/or to built-in function

git-svn-id: svn://tug.org/texlive/trunk@63173 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 32 insertions, 31 deletions

diff --git a/Build/source/texk/bibtex-x/tests/testsubstr.bst b/Build/source/texk/bibtex-x/tests/testsubstr.bst
index 146bd94bfb6..7da2e11b9e3 100644
--- a/Build/source/texk/bibtex-x/tests/testsubstr.bst
+++ b/Build/source/texk/bibtex-x/tests/testsubstr.bst
@@ -1,28 +1,30 @@
+% BibTeX test style file
+% Copyright 2022 TANAKA Takuji <ttk@t-lab.opal.ne.jp>
+% You may freely use, modify and/or distribute this file.
+
 ENTRY {field}{}{}
 
 FUNCTION {output_entry} {
   "\item[orig] " field * write$ newline$
-  "\item[1 1] " field #1 #1 substring$ * write$ newline$
-  "\item[1 2] " field #1 #2 substring$ * write$ newline$
-  "\item[1 3] " field #1 #3 substring$ * write$ newline$
-  "\item[1 4] " field #1 #4 substring$ * write$ newline$
   "\item[1 5] " field #1 #5 substring$ * write$ newline$
-  "\item[1 6] " field #1 #6 substring$ * write$ newline$
-  "\item[1 7] " field #1 #7 substring$ * write$ newline$
+  "\item[1 4] " field #1 #4 substring$ * write$ newline$
+  "\item[1 3] " field #1 #3 substring$ * write$ newline$
+  "\item[1 2] " field #1 #2 substring$ * write$ newline$
   "\item[1 1] " field #1 #1 substring$ * write$ newline$
   "\item[2 1] " field #2 #1 substring$ * write$ newline$
   "\item[3 1] " field #3 #1 substring$ * write$ newline$
   "\item[4 1] " field #4 #1 substring$ * write$ newline$
   "\item[5 1] " field #5 #1 substring$ * write$ newline$
-  "\item[6 1] " field #6 #1 substring$ * write$ newline$
-  "\item[7 1] " field #7 #1 substring$ * write$ newline$
-  "\item[1 7] " field #1 #7 substring$ * write$ newline$
-  "\item[2 6] " field #2 #6 substring$ * write$ newline$
+  "\item[1 5] " field #1 #5 substring$ * write$ newline$
+  "\item[2 5] " field #2 #5 substring$ * write$ newline$
   "\item[3 5] " field #3 #5 substring$ * write$ newline$
-  "\item[4 4] " field #4 #4 substring$ * write$ newline$
-  "\item[5 3] " field #5 #3 substring$ * write$ newline$
-  "\item[6 2] " field #6 #2 substring$ * write$ newline$
-  "\item[7 1] " field #7 #1 substring$ * write$ newline$
+  "\item[4 5] " field #4 #5 substring$ * write$ newline$
+  "\item[5 5] " field #5 #5 substring$ * write$ newline$
+  "\item[1 5] " field #1 #5 substring$ * write$ newline$
+  "\item[2 4] " field #2 #4 substring$ * write$ newline$
+  "\item[3 3] " field #3 #3 substring$ * write$ newline$
+  "\item[4 2] " field #4 #2 substring$ * write$ newline$
+  "\item[5 1] " field #5 #1 substring$ * write$ newline$
   "\item[1 8] " field #1 #8 substring$ * write$ newline$
   "\item[2 7] " field #2 #7 substring$ * write$ newline$
   "\item[3 6] " field #3 #6 substring$ * write$ newline$
@@ -31,26 +33,25 @@ FUNCTION {output_entry} {
   "\item[6 3] " field #6 #3 substring$ * write$ newline$
   "\item[7 2] " field #7 #2 substring$ * write$ newline$
   "\item[8 1] " field #8 #1 substring$ * write$ newline$
-  "\item[-1 1] " field #-1 #1 substring$ * write$ newline$
-  "\item[-1 2] " field #-1 #2 substring$ * write$ newline$
-  "\item[-1 3] " field #-1 #3 substring$ * write$ newline$
+  "\item[-1 5] " field #-1 #5 substring$ * write$ newline$
   "\item[-1 4] " field #-1 #4 substring$ * write$ newline$
+  "\item[-1 3] " field #-1 #3 substring$ * write$ newline$
+  "\item[-1 2] " field #-1 #2 substring$ * write$ newline$
+  "\item[-1 1] " field #-1 #1 substring$ * write$ newline$
+  "\item[-2 1] " field #-2 #1 substring$ * write$ newline$
+  "\item[-3 1] " field #-3 #1 substring$ * write$ newline$
+  "\item[-4 1] " field #-4 #1 substring$ * write$ newline$
+  "\item[-5 1] " field #-5 #1 substring$ * write$ newline$
   "\item[-1 5] " field #-1 #5 substring$ * write$ newline$
-  "\item[-1 6] " field #-1 #6 substring$ * write$ newline$
-  "\item[-1 7] " field #-1 #7 substring$ * write$ newline$
-  "\item[-2 7] " field #-2 #7 substring$ * write$ newline$
-  "\item[-3 7] " field #-3 #7 substring$ * write$ newline$
-  "\item[-4 7] " field #-4 #7 substring$ * write$ newline$
-  "\item[-5 7] " field #-5 #7 substring$ * write$ newline$
-  "\item[-6 7] " field #-6 #7 substring$ * write$ newline$
-  "\item[-7 7] " field #-7 #7 substring$ * write$ newline$
-  "\item[-1 7] " field #-1 #7 substring$ * write$ newline$
-  "\item[-2 6] " field #-2 #6 substring$ * write$ newline$
+  "\item[-2 5] " field #-2 #5 substring$ * write$ newline$
   "\item[-3 5] " field #-3 #5 substring$ * write$ newline$
-  "\item[-4 4] " field #-4 #4 substring$ * write$ newline$
-  "\item[-5 3] " field #-5 #3 substring$ * write$ newline$
-  "\item[-6 2] " field #-6 #2 substring$ * write$ newline$
-  "\item[-7 1] " field #-7 #1 substring$ * write$ newline$
+  "\item[-4 5] " field #-4 #5 substring$ * write$ newline$
+  "\item[-5 5] " field #-5 #5 substring$ * write$ newline$
+  "\item[-1 5] " field #-1 #5 substring$ * write$ newline$
+  "\item[-2 4] " field #-2 #4 substring$ * write$ newline$
+  "\item[-3 3] " field #-3 #3 substring$ * write$ newline$
+  "\item[-4 2] " field #-4 #2 substring$ * write$ newline$
+  "\item[-5 1] " field #-5 #1 substring$ * write$ newline$
   "\item[-1 8] " field #-1 #8 substring$ * write$ newline$
   "\item[-2 7] " field #-2 #7 substring$ * write$ newline$
   "\item[-3 6] " field #-3 #6 substring$ * write$ newline$