3
# Test checking of Emacs Lisp format strings.
6
trap 'rm -fr $tmpfiles' 1 2 3 15
8
tmpfiles="$tmpfiles f-el-2.data"
9
cat <<\EOF > f-el-2.data
10
# Valid: %% doesn't count
13
# Invalid: invalid msgstr
16
# Valid: same arguments
19
# Valid: same arguments, with different widths
22
# Valid: same arguments but in numbered syntax
27
msgstr "xyz%3$c%2$x%1$s"
28
# Invalid: too few arguments
29
msgid "abc%2$xdef%1$s"
31
# Invalid: too few arguments
34
# Invalid: too many arguments
37
# Valid: same numbered arguments, with different widths
39
msgstr "xyz%2$4s%1$5s"
40
# Invalid: missing argument
41
msgid "abc%2$sdef%1$x"
43
# Invalid: missing argument
44
msgid "abc%1$sdef%2$x"
46
# Invalid: added argument
48
msgstr "xyz%1$xvw%2$c"
49
# Valid: type compatibility
52
# Valid: type compatibility
55
# Valid: type compatibility
58
# Valid: type compatibility
61
# Valid: type compatibility
64
# Valid: type compatibility
67
# Valid: type compatibility
70
# Valid: type compatibility
73
# Valid: type compatibility
76
# Valid: type compatibility
79
# Valid: type compatibility
82
# Invalid: type incompatibility
85
# Invalid: type incompatibility
88
# Invalid: type incompatibility
91
# Invalid: type incompatibility
94
# Invalid: type incompatibility
97
# Invalid: type incompatibility
100
# Invalid: type incompatibility
103
# Invalid: type incompatibility
106
# Invalid: type incompatibility
109
# Invalid: type incompatibility
112
# Invalid: type incompatibility
115
# Invalid: type incompatibility
118
# Invalid: type incompatibility
121
# Invalid: type incompatibility
124
# Invalid: type incompatibility
127
# Invalid: type incompatibility
130
# Invalid: type incompatibility
133
# Invalid: type incompatibility
136
# Invalid: type incompatibility
139
# Invalid: type incompatibility
142
# Invalid: type incompatibility
145
# Invalid: type incompatibility
148
# Invalid: type incompatibility
151
# Invalid: type incompatibility
154
# Invalid: type incompatibility
157
# Invalid: type incompatibility
160
# Invalid: type incompatibility
163
# Invalid: type incompatibility
166
# Invalid: type incompatibility
169
# Invalid: type incompatibility
172
# Invalid: type incompatibility
175
# Invalid: type incompatibility
178
# Invalid: type incompatibility
181
# Invalid: type incompatibility
184
# Invalid: type incompatibility
187
# Invalid: type incompatibility
190
# Invalid: type incompatibility
193
# Invalid: type incompatibility
196
# Invalid: type incompatibility
199
# Invalid: type incompatibility
202
# Invalid: type incompatibility
205
# Invalid: type incompatibility
208
# Invalid: type incompatibility
211
# Invalid: type incompatibility
214
# Invalid: type incompatibility
217
# Invalid: type incompatibility
220
# Invalid: type incompatibility
223
# Invalid: type incompatibility
226
# Invalid: type incompatibility
229
# Invalid: type incompatibility
232
# Invalid: type incompatibility
235
# Invalid: type incompatibility
238
# Invalid: type incompatibility
241
# Invalid: type incompatibility
244
# Invalid: type incompatibility
247
# Invalid: type incompatibility
250
# Invalid: type incompatibility
253
# Invalid: type incompatibility
260
while read comment; do
264
tmpfiles="$tmpfiles f-el-2-$n.po f-el-2-$n.mo"
265
cat <<EOF > f-el-2-$n.po
271
if echo "$comment" | grep 'Valid:' > /dev/null; then
272
if ${MSGFMT} --check-format -o f-el-2-$n.mo f-el-2-$n.po; then
278
${MSGFMT} --check-format -o f-el-2-$n.mo f-el-2-$n.po 2> /dev/null
285
if test -n "$fail"; then
286
echo "Format string checking error:" 1>&2
287
cat f-el-2-$n.po 1>&2
290
rm -f f-el-2-$n.po f-el-2-$n.mo