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

#! /bin/sh

#

#

TEST_BIN=./test-pobyso-dirty-find-zeros

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

} # End ok_if_fail

#

##

ok_if_ok() {

  echo "$@"

  eval "$TEST_BIN $ARGUMENTS"

  OUTCOME=$?

if [ $OUTCOME -ne 0 ] ; then

  echo "Failed for $ARGUMENTS"

  echo

  exit 1

fi

echo

} # End ok_if_ok

##

ARGUMENTS="NULL"

WHY=" (NULL argument)"

ok_if_fail "Testing: $ARGUMENTS"

##

ARGUMENTS="\"diff(log(x)-remez(log(x),1,[2^40;2^40+1]))\" \

\"2^40+1\" \"2^40\""

WHY=" (because of inverted lower and upper bounds)"

ok_if_fail "Testing: $ARGUMENTS"

##

ARGUMENTS="\"diff(log(x)-remez(log(x),1,[2^40;2^40+1]))\" \

\"2^40\" \"2^40+1\""

#WHY=" (because \"1/x+\" is not a valid expression)"

ok_if_ok "Testing: $ARGUMENTS"

##

echo "Tests terminated without error."

echo