#! /bin/sh
# -*- coding: utf-8 -*-
# Copyright (C) 2009, 2010, 2011, 2013 Laboratoire de Recherche et
# Développement de l'Epita (LRDE).
# Copyright (C) 2003, 2004 Laboratoire d'Informatique de Paris 6 (LIP6),
# département Systèmes Répartis Coopératifs (SRC), Université Pierre
# et Marie Curie.
#
# 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/>.


# Check for spot::ltl::tostring.

. ./defs || exit 1

set -e

run 0 ../tostring 'a'
run 0 ../tostring '1'
run 0 ../tostring '0'
run 0 ../tostring 'a => b'
run 0 ../tostring 'G a '
run 0 ../tostring 'a U b'
run 0 ../tostring 'a & b'
run 0 ../tostring 'a & b & c'
run 0 ../tostring 'b & a & b'
run 0 ../tostring 'b & a & a'
run 0 ../tostring 'a & b & (c |(f U g)| e)'
run 0 ../tostring 'b & a & a & (c | e |(f U g)| e | c) & b'
run 0 ../tostring 'a <=> b'
run 0 ../tostring 'a & b & (c |(f U g)| e)'
run 0 ../tostring 'b & a & a & (c | e |(g U g)| e | c) & b'
run 0 ../tostring 'F"F1"&G"G"&X"X"'
run 0 ../tostring 'GFfalse'
run 0 ../tostring 'GFtrue'
run 0 ../tostring 'p=0Uq=1Ut=1'
run 0 ../tostring 'F"FALSE"'
run 0 ../tostring 'G"TruE"'
run 0 ../tostring 'FFALSE'
run 0 ../tostring 'GTruE'
run 0 ../tostring 'p=0UFXp=1'
run 0 ../tostring 'GF"\GF"'
run 0 ../tostring 'GF"foo bar"'
run 0 ../tostring 'FFG__GFF'
run 0 ../tostring 'X"U"'
run 0 ../tostring 'X"W"'
run 0 ../tostring 'X"M"'
run 0 ../tostring 'X"R"'

run 0 ../tostring '{a;b;{c && d*};**}|=>G{a*:b*}'
run 0 ../tostring 'GF!{{a || c} && b}'
run 0 ../tostring 'GF!{{a || c*} && b}<>->{{!a}*}'
run 0 ../tostring 'GF{{a || c*} & b[*]}[]->{d}'
run 0 ../tostring '{a[*2..3]}'
run 0 ../tostring '{a[*0..1]}'
run 0 ../tostring '{a[*0..]}'
run 0 ../tostring '{a[*..]}'
run 0 ../tostring '{a[*1..]}'
run 0 ../tostring '{a[+]}'
run 0 ../tostring '{[+]}'
run 0 ../tostring '{a[*2..3][*4..5]}'

run 0 ../tostring '{a**}<>->1' > out
test "`sed 1q < out `" = '{a[*]}!'
