#-----------------------------------------------------------------------
#;  Copyright (C) 1995
#;  Associated Universities, Inc. Washington DC, USA.
#;
#;  This program 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 2 of
#;  the License, or (at your option) any later version.
#;
#;  This program 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, write to the Free
#;  Software Foundation, Inc., 675 Massachusetts Ave, Cambridge,
#;  MA 02139, USA.
#;
#;  Correspondence concerning AIPS should be addressed as follows:
#;         Internet email: aipsmail@nrao.edu.
#;         Postal address: AIPS Project Office
#;                         National Radio Astronomy Observatory
#;                         520 Edgemont Road
#;                         Charlottesville, VA 22903-2475 USA
#-----------------------------------------------------------------------
. $SYSLOCAL/FCOPTS.SH
:                                       "*.FOR modules at default"
:                                       "optimization level?"
ls 2> /dev/null | grep '\.FOR$' | \
   sed -e 's/\..*//' | \
   fgrep -v -x -f $SYSLOCAL/OPT2.LIS | \
   {
      while read BASE
      do
         rm -f $PREP/BASE.f
         PP `pwd`/$BASE.FOR > /dev/null
         rm -f $PREP/BASE.o
         echo $COMPILER $COMP $PREP/$BASE.f
         $COMPILER $COMP $PREP/$BASE.f 2>&1
         case $PURGE in
            TRUE)
               rm -f $PREP/$BASE.f
            ;;

            *)
            ;;
         esac
      done
   }
:                                       "*.FOR modules at O2"
:                                       "optimization level?"
COMP=`echo $COMP | sed -e 's/ *-O1//'`
COMP=`echo $COMP | sed -e 's/ *-O2//'`
COMP=`echo $COMP | sed -e 's/ *-O3//'`
COMP=`echo $COMP | sed -e 's/ *-g//'`
COMP=`echo $COMP -O3`
ls 2> /dev/null | grep '\.FOR$' | \
   sed -e 's/\..*//' | \
   fgrep -x -f $SYSLOCAL/OPT2.LIS | \
   {
      while read BASE
      do
         rm -f $PREP/$BASE.f
         PP `pwd`/$BASE.FOR > /dev/null
         rm -f $PREP/BASE.o
         echo $COMPILER $COMP $PREP/$BASE.f
         $COMPILER $COMP $PREP/$BASE.f 2>&1
         case $PURGE in
            TRUE)
               rm -f $PREP/$BASE.f
            ;;

            *)
            ;;
         esac
      done
   }
:                                       "C modules."
. $SYSLOCAL/CCOPTS.SH
ls 2> /dev/null | grep '\.C$' | \
   sed -e 's/\..*//' | \
   {
      while read BASE
      do
         rm -f $PREP/$BASE.c
         PP `pwd`/$BASE.C > /dev/null
         rm -f $PREP/$BASE.o
         echo $COMPILER $COMP $PREP/$BASE.c
         $COMPILER $COMP $PREP/$BASE.c 2>&1
         case $PURGE in
            TRUE)
               rm -f $PREP/$BASE.c
            ;;

            *)
            ;;
         esac
      done
   }
:                                       "Assembler modules?"
. $SYSLOCAL/ASOPTS.SH
ls 2> /dev/null | grep '\.S$' | \
   sed -e 's/\..*//' | \
   {
      while read BASE
      do
         rm -f $PREP/$BASE.s
         PP `pwd`/$BASE.S > /dev/null
         rm -f $PREP/$BASE.o
         echo $ASSEMBLER $COMP $PREP/$BASE.s
         $ASSEMBLER $COMP $PREP/$BASE.s 2>&1
         case $PURGE in
            TRUE)
               rm -f $PREP/$BASE.s
            ;;

            *)
            ;;
         esac
      done
   }
