unix/hlib/fc.sh


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30

#!/bin/bash
#
# FC.SH -- Link an IMFORT or host fortran program from IRAF.  A front end
# to XC, the purpose of this script is to determine the IRAF architecture
# and add the appropriate host compiler file to XC.


# Determine the desired architecture.
IRAFARCH=`$iraf/unix/hlib/irafarch.csh`
MACH=$IRAFARCH


# Set any float option switch.
case $IRAFARCH in
    macosx)
        float="-/arch -//i386"
        ;;
    macintel)
        float="-/arch -//x86_64"
        ;;
    linux64)
        float="-/m64"				# FIXME
        ;;
    *)
        float=""
        ;;
esac

# Call XC with the appropriate float option.
xc $float $@