Laboratoire de l'Informatique et du Parallélisme » Pobyso

#! /bin/sh

#

#

TEST_BIN=./test-pobyso-is-constant-expression

echo

## Functions

ok_if_fail() {

  echo "$@"

  eval "$TEST_BIN $ARGUMENTS"

if [ $? -eq 0 ] ; then

  echo "Succeeded (but should not have) for $ARGUMENTS"

  exit 1

fi

echo "Correctly failing$WHY."

echo

}

##

ok_if_ok() {

  echo "$@"

  eval "$TEST_BIN $ARGUMENTS"

if [ $? -ne 0 ] ; then

  echo "Failed for $ARGUMENTS"

  exit 1

fi

echo

}

##

ARGUMENTS=

WHY=" (NULL argument)"

ok_if_fail "Testing: $ARGUMENTS"

##

ARGUMENTS="\"1\""

ok_if_ok "Testing: $ARGUMENTS"

##

ARGUMENTS="\"-1\""

ok_if_ok "Testing: $ARGUMENTS"

##

ARGUMENTS="\"cos(pi)\""

ok_if_ok "Testing: $ARGUMENTS"

##

ARGUMENTS="\"1.1\""

#WHY=" (because -1 in exponents list)"

ok_if_ok "Testing: $ARGUMENTS"

##

ARGUMENTS="\"cos(pi/4)^(exp(cos(0)))\""

#WHY=" (because -1 in exponents list)"

ok_if_ok "Testing: $ARGUMENTS"

##

ARGUMENTS="\"1.1*cos(pi)^(exp(cos(0)))\""

WHY=" (because \"cos(pi)\" (i.e -1) is raised to a fractionnal power)"

ok_if_fail "Testing: $ARGUMENTS"

##

ARGUMENTS="\"+infty\""

ok_if_ok "Testing: $ARGUMENTS"

##

echo "Tests terminated without error."

echo