]> git.ipfire.org Git - thirdparty/gettext.git/commitdiff
xgettext: Scheme: Reorganize tests.
authorBruno Haible <bruno@clisp.org>
Fri, 16 Aug 2024 18:53:13 +0000 (20:53 +0200)
committerBruno Haible <bruno@clisp.org>
Fri, 16 Aug 2024 18:53:13 +0000 (20:53 +0200)
* gettext-tools/tests/xgettext-scheme-format-1: Renamed from
gettext-tools/tests/xgettext-scheme-5.
* gettext-tools/tests/xgettext-scheme-format-2: Renamed from
gettext-tools/tests/xgettext-scheme-6.
* gettext-tools/tests/Makefile.am (TESTS): Update.

gettext-tools/tests/Makefile.am
gettext-tools/tests/xgettext-scheme-5 [deleted file]
gettext-tools/tests/xgettext-scheme-format-1 [new file with mode: 0755]
gettext-tools/tests/xgettext-scheme-format-2 [moved from gettext-tools/tests/xgettext-scheme-6 with 55% similarity]

index cd06a0d6ebf5c1f123fcb6bd4bdc1b946297e871..5315aa3d293ef23a66de57fa520fd3dd55b569a3 100644 (file)
@@ -153,7 +153,8 @@ TESTS = gettext-1 gettext-2 \
        xgettext-python-stackovfl-3 xgettext-python-stackovfl-4 \
        xgettext-ruby-1 \
        xgettext-scheme-1 xgettext-scheme-2 xgettext-scheme-3 \
-       xgettext-scheme-4 xgettext-scheme-5 xgettext-scheme-6 \
+       xgettext-scheme-4 \
+       xgettext-scheme-format-1 xgettext-scheme-format-2 \
        xgettext-scheme-stackovfl-1 xgettext-scheme-stackovfl-2 \
        xgettext-sh-1 xgettext-sh-2 xgettext-sh-3 xgettext-sh-4 xgettext-sh-5 \
        xgettext-sh-6 xgettext-sh-7 xgettext-sh-8 \
diff --git a/gettext-tools/tests/xgettext-scheme-5 b/gettext-tools/tests/xgettext-scheme-5
deleted file mode 100755 (executable)
index 26cd2ad..0000000
+++ /dev/null
@@ -1,24 +0,0 @@
-#! /bin/sh
-. "${srcdir=.}/init.sh"; path_prepend_ . ../src
-
-# Test Scheme support: scheme-format string with a loop.
-
-cat <<\EOF > xg-sc-5.scm
-(_ "~{~*~}")
-EOF
-
-: ${XGETTEXT=xgettext}
-${XGETTEXT} -k_ --omit-header --no-location -d xg-sc-5.tmp xg-sc-5.scm || Exit 1
-LC_ALL=C tr -d '\r' < xg-sc-5.tmp.po > xg-sc-5.po || Exit 1
-
-cat <<\EOF > xg-sc-5.ok
-#, scheme-format
-msgid "~{~*~}"
-msgstr ""
-EOF
-
-: ${DIFF=diff}
-${DIFF} xg-sc-5.ok xg-sc-5.po
-result=$?
-
-exit $result
diff --git a/gettext-tools/tests/xgettext-scheme-format-1 b/gettext-tools/tests/xgettext-scheme-format-1
new file mode 100755 (executable)
index 0000000..4fe9a6e
--- /dev/null
@@ -0,0 +1,24 @@
+#! /bin/sh
+. "${srcdir=.}/init.sh"; path_prepend_ . ../src
+
+# Test Scheme support: scheme-format string with a loop.
+
+cat <<\EOF > xg-sc-format-1.scm
+(_ "~{~*~}")
+EOF
+
+: ${XGETTEXT=xgettext}
+${XGETTEXT} -k_ --omit-header --no-location -d xg-sc-format-1.tmp xg-sc-format-1.scm || Exit 1
+LC_ALL=C tr -d '\r' < xg-sc-format-1.tmp.po > xg-sc-format-1.po || Exit 1
+
+cat <<\EOF > xg-sc-format-1.ok
+#, scheme-format
+msgid "~{~*~}"
+msgstr ""
+EOF
+
+: ${DIFF=diff}
+${DIFF} xg-sc-format-1.ok xg-sc-format-1.po
+result=$?
+
+exit $result
similarity index 55%
rename from gettext-tools/tests/xgettext-scheme-6
rename to gettext-tools/tests/xgettext-scheme-format-2
index 6926acf5a4bbc0b90c737d5f98e2e69e62e7ff0c..08bb2522eadd197130d988d7d9a939c4475cacd9 100755 (executable)
@@ -3,22 +3,22 @@
 
 # Test Scheme support: scheme-format string with a complex nested loop.
 
-cat <<\EOF > xg-sc-6.scm
+cat <<\EOF > xg-sc-format-2.scm
 (_ "A~0{B~0b~,v*C~:*D~,v*E~,v*F~0{G~0{H~}I~}J~^~}K")
 EOF
 
 : ${XGETTEXT=xgettext}
-${XGETTEXT} -k_ --omit-header --no-location -d xg-sc-6.tmp xg-sc-6.scm || Exit 1
-LC_ALL=C tr -d '\r' < xg-sc-6.tmp.po > xg-sc-6.po || Exit 1
+${XGETTEXT} -k_ --omit-header --no-location -d xg-sc-format-2.tmp xg-sc-format-2.scm || Exit 1
+LC_ALL=C tr -d '\r' < xg-sc-format-2.tmp.po > xg-sc-format-2.po || Exit 1
 
-cat <<\EOF > xg-sc-6.ok
+cat <<\EOF > xg-sc-format-2.ok
 #, scheme-format
 msgid "A~0{B~0b~,v*C~:*D~,v*E~,v*F~0{G~0{H~}I~}J~^~}K"
 msgstr ""
 EOF
 
 : ${DIFF=diff}
-${DIFF} xg-sc-6.ok xg-sc-6.po
+${DIFF} xg-sc-format-2.ok xg-sc-format-2.po
 result=$?
 
 exit $result