579e8fc0a9
* src/sanity/style.test: Test for the missing header. * iface/ltsmin/check.test, src/kripketest/kripke.test, src/kripketest/parse_print_test.cc, src/ltlparse/fmterror.cc, src/ltltest/consterm.test, src/ltltest/kind.test, src/ltltest/length.test, src/ltltest/ltlfilt.test, src/ltltest/reduc.cc, src/ltltest/reduc.test, src/ltltest/reduc0.test, src/ltltest/reducpsl.test, src/ltltest/remove_x.test, src/ltltest/unabbrevwm.test, src/ltltest/utf8.test, src/ltltest/uwrm.test, src/ltlvisit/dump.cc, src/ltlvisit/remove_x.cc, src/misc/casts.hh, src/misc/fixpool.hh, src/misc/hashfunc.hh, src/misc/ltstr.hh, src/sanity/readme.test, src/taalgos/tgba2ta.cc, src/tgbaalgos/bfssteps.cc, src/tgbaalgos/stats.cc, src/tgbatest/acc.test, src/tgbatest/bitvect.test, src/tgbatest/complementation.test, src/tgbatest/cycles.test, src/tgbatest/degendet.test, src/tgbatest/dfs.test, src/tgbatest/dupexp.test, src/tgbatest/emptchkr.test, src/tgbatest/intvcomp.test, src/tgbatest/ltl2ta.test, src/tgbatest/ltl2ta2.test, src/tgbatest/ltlprod.test, src/tgbatest/maskacc.test, src/tgbatest/obligation.test, src/tgbatest/randpsl.test, src/tgbatest/readsat.cc, src/tgbatest/readsat.test, src/tgbatest/scc.test, src/tgbatest/sccsimpl.test, src/tgbatest/taatgba.test, src/tgbatest/tgbaread.test, src/tgbatest/tripprod.test, src/tgbatest/uniq.test, src/tgbatest/wdba.test: Add it.
83 lines
2.4 KiB
Bash
Executable file
83 lines
2.4 KiB
Bash
Executable file
#!/bin/sh
|
|
# -*- coding: utf-8 -*-
|
|
# Copyright (C) 2011, 2012, 2014, 2015 Laboratoire de Recherche et
|
|
# Développement de l'Epita (LRDE).
|
|
#
|
|
# This file is part of Spot, a model checking library.
|
|
#
|
|
# Spot 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.
|
|
#
|
|
# Spot 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/>.
|
|
|
|
|
|
. ./defs
|
|
|
|
divine compile > output 2>&1
|
|
|
|
if grep -i ltsmin output; then
|
|
:
|
|
else
|
|
echo "divine not installed, or no ltsmin interface"
|
|
exit 77
|
|
fi
|
|
|
|
if ! test -x "$(which spins)"; then
|
|
echo "spins not installed."
|
|
exit 77
|
|
fi
|
|
|
|
set -e
|
|
|
|
# Promela
|
|
for opt in '' '-z'; do
|
|
|
|
run 0 ../modelcheck $opt -E $srcdir/elevator2.1.pm \
|
|
'!G("req[1]==1" -> (F("p==1" && "cabin_0._pc==2")))'
|
|
run 0 ../modelcheck $opt -e $srcdir/elevator2.1.pm \
|
|
'F("p==2")'
|
|
done
|
|
|
|
# dve2
|
|
for opt in '' '-z'; do
|
|
# The three examples from the README.
|
|
# (Don't run the first one using "run 0" because it would take too much
|
|
# time with valgrind.).
|
|
|
|
../modelcheck $opt -E $srcdir/beem-peterson.4.dve \
|
|
'!GF(P_0.CS|P_1.CS|P_2.CS|P_3.CS)' \
|
|
| grep -v pages > stdout1
|
|
# same formula, different syntax.
|
|
../modelcheck $opt -E $srcdir/beem-peterson.4.dve \
|
|
'!GF("P_0==CS"|"P_1 == CS"|"P_2 ==CS"|"P_3== CS")' \
|
|
| grep -v pages > stdout2
|
|
cmp stdout1 stdout2
|
|
run 0 ../modelcheck $opt -e $srcdir/beem-peterson.4.dve \
|
|
'!G(P_0.wait -> F P_0.CS)'
|
|
run 0 ../modelcheck $opt -e $srcdir/beem-peterson.4.dve '!G("pos[1] < 3")'
|
|
done
|
|
|
|
# Now check some error messages.
|
|
run 1 ../modelcheck foo.dve "F(P_0.CS)" 2>stderr
|
|
cat stderr
|
|
grep 'Cannot open' stderr
|
|
# the dve2C file was generated in the current directory
|
|
run 1 ../modelcheck beem-peterson.4.dve2C \
|
|
'Xfoo | P_0.f & X"P_0.k < 2xx" | G"pos[0]"' 2>stderr
|
|
cat stderr
|
|
grep 'variable `foo' stderr
|
|
grep "state \`f'.*P_0" stderr
|
|
grep "Unexpected.*\`xx'" stderr
|
|
grep 'Possible.*CS' stderr
|
|
grep 'Possible.*NCS' stderr
|
|
grep 'Possible.*q2' stderr
|
|
grep 'Possible.*q3' stderr
|
|
grep 'Possible.*wait' stderr
|