tests: minor improvements

* tests/calc.at (AT_CHECK_SPACES): To speed up, accept several files
at once, and factor some calls.
This commit is contained in:
Akim Demaille
2012-12-03 17:27:54 +01:00
parent 064e42b0ac
commit 9527072c95

View File

@@ -462,14 +462,14 @@ AT_CHECK([cat stderr], 0, [expout])
]) ])
# AT_CHECK_SPACES([FILE]) # AT_CHECK_SPACES([FILES])
# ----------------------- # ------------------------
# Make sure we did not introduce bad spaces. Checked here because all # Make sure we did not introduce bad spaces. Checked here because all
# the skeletons are (or should be) exercized here. # the skeletons are (or should be) exercized here.
m4_define([AT_CHECK_SPACES], m4_define([AT_CHECK_SPACES],
[AT_CHECK([$PERL -ne ' [AT_CHECK([$PERL -ne '
chomp; chomp;
print "$.: {$_}\n" print "$ARGV:$.: {$_}\n"
if (# No starting/ending empty lines. if (# No starting/ending empty lines.
(eof || $. == 1) && /^\s*$/ (eof || $. == 1) && /^\s*$/
# No trailing space. # No trailing space.
@@ -495,8 +495,9 @@ AT_BISON_OPTION_PUSHDEFS([$1])
AT_DATA_CALC_Y([$1]) AT_DATA_CALC_Y([$1])
AT_FULL_COMPILE([calc], AT_DEFINES_IF([[lex], [main]])) AT_FULL_COMPILE([calc], AT_DEFINES_IF([[lex], [main]]))
AT_CHECK_SPACES([calc.AT_SKEL_CC_IF([cc], [c])]) AT_CHECK_SPACES(m4_join([ ],
AT_DEFINES_IF([AT_CHECK_SPACES([calc.AT_SKEL_CC_IF([hh], [h])])]) [calc.AT_SKEL_CC_IF([cc], [c])],
[AT_DEFINES_IF([calc.AT_SKEL_CC_IF([hh], [h])])]))
# Test the priorities. # Test the priorities.
_AT_CHECK_CALC([$1], _AT_CHECK_CALC([$1],