Running the gfortran test_suite without DejaGnu

[THOMAS Paul Richard]

Francois-Xavier,

I use the following bash script for Cygwin:

echo "*****************gfortran testsuite*******************"
echo
d:/irun/bin/gfortran --version
echo
echo "*****************gfortran.dg**************************"
WDIR=d:/downloads/gfortran/gcc*/gcc/testsuite/gfortran.dg
cd $WDIR
A=./*.f90
{
  rm object.o
  rm test.exe
}
for prog in $A
  do 
    echo
    echo "*********compiling and running "$prog"**************"
    echo 
    d:/irun/bin/gfortran -c $prog -o object.o 2> err.txt
    cat err.txt
    d:/irun/bin/gfortran object.o -o test.exe 2> err.txt
    cat err.txt
    ./test.exe 2>err.txt
    cat err.txt
    {
      rm object.o
      rm test.exe
    }
  done
echo ""
echo "*****************gfortran.fortran_torture**************"	
WDIR=D:/downloads/gfortran/gcc*/gcc/testsuite/gfortran.dg/g77
cd $WDIR
A=./*.f
for prog in $A
  do 
    echo
    echo "*********compiling and running "$prog"**************"
    echo 
    if [ $prog = ffree-form*.f ]
      then
      d:/irun/bin/gfortran -c -ffree-form $prog -o object.o 2> err.txt
    else
      d:/irun/bin/gfortran -c $prog -o object.o 2> err.txt
    fi
    cat err.txt
    d:/irun/bin/gfortran object.o -o test.exe 2> err.txt
    cat err.txt
    if [ $prog = 980310-1.f ]
      then
        ./test.exe 2> err.txt
        1
    else
       ./test.exe 2> err.txt
    fi
    cat err.txt
    {
      rm object.o
      rm test.exe
    }
  done