test_lfort_cmdline

#!/bin/bash

set -e
set -x

if [[ $1 == "" ]]; then
    echo "Test local lfort"
    PATH="$(pwd):$PATH"
    FC=lfort
elif [[ $1 == "lfort" ]]; then
    echo "Test installed lfort"
    FC=lfort
elif [[ $1 == "gfortran" ]]; then
    echo "Test installed gfortran"
    FC=gfortran
else
    echo "Invalid option"
    exit 1
fi

f=`pwd`/examples/expr2.f90
ASM_PATTERN="movq\|movl\|retq"

cd $(mktemp -d)
$FC $f -o a.out
[ -f "a.out" ]
[ -x "a.out" ]
./a.out

cd $(mktemp -d)
$FC -c $f
[ -f "expr2.o" ]
[ ! -x "expr2.o" ]
$FC -o expr2 expr2.o
[ -f "expr2" ]
[ -x "expr2" ]
./expr2

cd $(mktemp -d)
$FC -o xx1 -c $f
[ -f "xx1" ]
[ ! -x "xx1" ]
$FC -o expr2 xx1
[ -f "expr2" ]
[ -x "expr2" ]
./expr2

cd $(mktemp -d)
$FC -o xx1 $f
[ -f "xx1" ]
[ -x "xx1" ]
./xx1

cd $(mktemp -d)
$FC -S $f
[ -f "expr2.s" ]
grep $ASM_PATTERN expr2.s

cd $(mktemp -d)
$FC -S -c $f
[ -f "expr2.s" ]
grep $ASM_PATTERN expr2.s

cd $(mktemp -d)
$FC -S -o xx1 $f
[ -f "xx1" ]
grep $ASM_PATTERN xx1

cd $(mktemp -d)
$FC -S -o xx1 -c $f
[ -f "xx1" ]
grep $ASM_PATTERN xx1

if [[ $FC != "gfortran" ]]; then
    # LFortran specific options
    cd $(mktemp -d)
    $FC --show-ast $f > log
    [ ! -f "expr2.o" ]
    grep 'mod.Program' log
    grep 'Integer()' log && exit 1
    $FC --show-ast-typed $f > log
    [ ! -f "expr2.o" ]
    grep 'mod.Program' log
    grep 'Integer()' log

    cd $(mktemp -d)
    $FC -emit-llvm $f
    [ -f "expr2.ll" ]

    cd $(mktemp -d)
    $FC $f
    [ ! -f "a.out" ]
fi

echo "All tests succeeded"