mirror of
https://git.savannah.gnu.org/git/bison.git
synced 2026-03-09 20:33:03 +00:00
2e4986a88d
* Makefile.am (TESTS, check_PROGRAMS): Initialize here. * examples/local.mk (doc, extexi): Define here. * examples/calc++/local.mk: Adjust accordingly. * configure.ac: Ask for parallel-tests (for the way the logs are handled). * examples/calc++/test: As a consequence, always be verbose. ($prog): New. (run): Use it. Sort the tests in a more natural order (simplest first).
94 lines
1.8 KiB
Bash
Executable File
94 lines
1.8 KiB
Bash
Executable File
#! /bin/sh
|
|
|
|
# Copyright (C) 2005-2012 Free Software Foundation, Inc.
|
|
#
|
|
# This program is free software: you can redistribute it and/or modify
|
|
# it under the terms of the GNU General Public License as published by
|
|
# the Free Software Foundation, either version 3 of the License, or
|
|
# (at your option) any later version.
|
|
#
|
|
# This program is distributed in the hope that it will be useful,
|
|
# but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
# GNU General Public License for more details.
|
|
#
|
|
# You should have received a copy of the GNU General Public License
|
|
# along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
me=`basename $0`
|
|
|
|
# Number of the current test.
|
|
number=1
|
|
|
|
# Exit status of this script.
|
|
exit=true
|
|
|
|
# The exercised program.
|
|
prog=./examples/calc++/calc++
|
|
|
|
# run EXPECTED-EXIT-STATUS EXPECTED-OUTPUT [PARSER-OPTIONS]
|
|
# ---------------------------------------------------------
|
|
run ()
|
|
{
|
|
# Effective and expected exit status.
|
|
local sta_exp=$1
|
|
shift
|
|
local out_exp=$1
|
|
shift
|
|
$prog "$@" - <input >out_eff
|
|
local sta_eff=$?
|
|
local out_eff=`cat out_eff`
|
|
if test $sta_eff -eq $sta_exp; then
|
|
if test "$out_eff" = "$out_exp"; then
|
|
printf "$me: PASS: %2d\n" $number
|
|
else
|
|
printf "$me: FAIL: %2d (expected output: %s, effective: %s\n" \
|
|
$number "$out_exp" "$out_eff"
|
|
exit=false
|
|
fi
|
|
else
|
|
printf "$me: FAIL: %2d (expected status: %d, effective: %d\n" \
|
|
$number $sta_exp $sta_eff
|
|
exit=false
|
|
fi
|
|
number=`expr $number + 1`
|
|
}
|
|
|
|
|
|
cat >input <<EOF
|
|
toto := 1
|
|
toto
|
|
EOF
|
|
run 0 1 -s
|
|
|
|
|
|
cat >input <<EOF
|
|
a := 1
|
|
b := 2
|
|
c := 3
|
|
d := a + b * c
|
|
d
|
|
EOF
|
|
run 0 7
|
|
run 0 7 -p
|
|
|
|
|
|
cat >input <<EOF
|
|
a := 1
|
|
b := 2
|
|
c := 3
|
|
d := (a + b) * c
|
|
d
|
|
EOF
|
|
run 0 9
|
|
|
|
|
|
cat >input <<EOF
|
|
a := 1
|
|
d := a + b * c
|
|
EOF
|
|
run 1 ''
|
|
|
|
rm input out_eff
|
|
$exit
|