#! /bin/bash
bad=0
len=0
echo 'running tests in directory test/'
for a in *.f; do
  ../f77reorder <$a >tmp
  b="$a - "
  c="ok. "
  len=$[ $len + ${#b} +${#c} ]
  if [ $len -gt 60 ]; then
    echo
    len=0
  fi
  echo -n "$b"
  if ! diff $(basename $a .f).F tmp &> /dev/null; then
    bad=1
    len=0
    echo "test failed on $a"
  else
    echo -n "$c"
  fi
  rm -f tmp
done
echo
if [ $bad -ne 0 ]; then
  echo 'test failed'
  exit 1
else
  echo 'tests succeeded'
fi

