FM / fcompiler

/usr/lib64/python2.6/site-packages/numpy/distutils/fcompiler/

/usr/lib64/python2.6/site-packages/numpy/distutils/fcompiler

Name	Size	Mode	Actions
absoft.py	5415	0644	edit dl rm
absoft.pyc	5803	0644	edit dl rm
absoft.pyo	5803	0644	edit dl rm
compaq.py	3941	0644	edit dl rm
compaq.pyc	5281	0644	edit dl rm
compaq.pyo	5281	0644	edit dl rm
g95.py	1312	0644	edit dl rm
g95.pyc	1856	0644	edit dl rm
g95.pyo	1856	0644	edit dl rm
gnu.py	13388	0644	edit dl rm
gnu.pyc	11280	0644	edit dl rm
gnu.pyo	11280	0644	edit dl rm
hpux.py	1394	0644	edit dl rm
hpux.pyc	2300	0644	edit dl rm
hpux.pyo	2300	0644	edit dl rm
ibm.py	3350	0644	edit dl rm
ibm.pyc	4080	0644	edit dl rm
ibm.pyo	4080	0644	edit dl rm
intel.py	8196	0644	edit dl rm
intel.pyc	9373	0644	edit dl rm
intel.pyo	9373	0644	edit dl rm
lahey.py	1367	0644	edit dl rm
lahey.pyc	2341	0644	edit dl rm
lahey.pyo	2341	0644	edit dl rm
mips.py	1756	0644	edit dl rm
mips.pyc	2814	0644	edit dl rm
mips.pyo	2814	0644	edit dl rm
nag.py	1319	0644	edit dl rm
nag.pyc	2232	0644	edit dl rm
nag.pyo	2232	0644	edit dl rm
none.py	744	0644	edit dl rm
none.pyc	1167	0644	edit dl rm
none.pyo	1167	0644	edit dl rm
pg.py	1184	0644	edit dl rm
pg.pyc	1962	0644	edit dl rm
pg.pyo	1962	0644	edit dl rm
sun.py	1540	0644	edit dl rm
sun.pyc	2402	0644	edit dl rm
sun.pyo	2402	0644	edit dl rm
vast.py	1708	0644	edit dl rm
vast.pyc	2333	0644	edit dl rm
vast.pyo	2333	0644	edit dl rm
__init__.py	36924	0644	edit dl rm
__init__.pyc	33396	0644	edit dl rm
__init__.pyo	33197	0644	edit dl rm

Edit: /usr/lib64/python2.6/site-packages/numpy/distutils/fcompiler/absoft.py (5415B)

# http://www.absoft.com/literature/osxuserguide.pdf
# http://www.absoft.com/documentation.html

# Notes:
# - when using -g77 then use -DUNDERSCORE_G77 to compile f2py
#   generated extension modules (works for f2py v2.45.241_1936 and up)

import os

from numpy.distutils.cpuinfo import cpu
from numpy.distutils.fcompiler import FCompiler, dummy_fortran_file
from numpy.distutils.misc_util import cyg2win32

compilers = ['AbsoftFCompiler']

class AbsoftFCompiler(FCompiler):

compiler_type = 'absoft'
    description = 'Absoft Corp Fortran Compiler'
    #version_pattern = r'FORTRAN 77 Compiler (?P<version>[^\s*,]*).*?Absoft Corp'
    version_pattern = r'(f90:.*?(Absoft Pro FORTRAN Version|FORTRAN 77 Compiler|Absoft Fortran Compiler Version|Copyright Absoft Corporation.*?Version))'+\
                       r' (?P<version>[^\s*,]*)(.*?Absoft Corp|)'

# on windows: f90 -V -c dummy.f
    # f90: Copyright Absoft Corporation 1994-1998 mV2; Cray Research, Inc. 1994-1996 CF90 (2.x.x.x  f36t87) Version 2.3 Wed Apr 19, 2006  13:05:16

# samt5735(8)$ f90 -V -c dummy.f
    # f90: Copyright Absoft Corporation 1994-2002; Absoft Pro FORTRAN Version 8.0
    # Note that fink installs g77 as f77, so need to use f90 for detection.

executables = {
        'version_cmd'  : None,          # set by update_executables
        'compiler_f77' : ["f77"],
        'compiler_fix' : ["f90"],
        'compiler_f90' : ["f90"],
        'linker_so'    : ["<F90>"],
        'archiver'     : ["ar", "-cr"],
        'ranlib'       : ["ranlib"]
        }

if os.name=='nt':
        library_switch = '/out:'      #No space after /out:!

module_dir_switch = None
    module_include_switch = '-p'

def update_executables(self):
        f = cyg2win32(dummy_fortran_file())
        self.executables['version_cmd'] = ['<F90>', '-V', '-c',
                                           f+'.f', '-o', f+'.o']

def get_flags_linker_so(self):
        if os.name=='nt':
            opt = ['/dll']
        # The "-K shared" switches are being left in for pre-9.0 versions
        # of Absoft though I don't think versions earlier than 9 can
        # actually be used to build shared libraries.  In fact, version
        # 8 of Absoft doesn't recognize "-K shared" and will fail.
        elif self.get_version() >= '9.0':
            opt = ['-shared']
        else:
            opt = ["-K","shared"]
        return opt

def library_dir_option(self, dir):
        if os.name=='nt':
            return ['-link','/PATH:"%s"' % (dir)]
        return "-L" + dir

def library_option(self, lib):
        if os.name=='nt':
            return '%s.lib' % (lib)
        return "-l" + lib

def get_library_dirs(self):
        opt = FCompiler.get_library_dirs(self)
        d = os.environ.get('ABSOFT')
        if d:
            if self.get_version() >= '10.0':
                # use shared libraries, the static libraries were not compiled -fPIC
                prefix = 'sh'
            else:
                prefix = ''
            if cpu.is_64bit():
                suffix = '64'
            else:
                suffix = ''
            opt.append(os.path.join(d, '%slib%s' % (prefix, suffix)))
        return opt

def get_libraries(self):
        opt = FCompiler.get_libraries(self)
        if self.get_version() >= '10.0':
            opt.extend(['af90math', 'afio', 'af77math', 'U77'])
        elif self.get_version() >= '8.0':
            opt.extend(['f90math','fio','f77math','U77'])
        else:
            opt.extend(['fio','f90math','fmath','U77'])
        if os.name =='nt':
            opt.append('COMDLG32')
        return opt

def get_flags(self):
        opt = FCompiler.get_flags(self)
        if os.name != 'nt':
            opt.extend(['-s'])
            if self.get_version():
                if self.get_version()>='8.2':
                    opt.append('-fpic')
        return opt

def get_flags_f77(self):
        opt = FCompiler.get_flags_f77(self)
        opt.extend(['-N22','-N90','-N110'])
        v = self.get_version()
        if os.name == 'nt':
            if v and v>='8.0':
                opt.extend(['-f','-N15'])
        else:
            opt.append('-f')
            if v:
                if v<='4.6':
                    opt.append('-B108')
                else:
                    # Though -N15 is undocumented, it works with
                    # Absoft 8.0 on Linux
                    opt.append('-N15')
        return opt

def get_flags_f90(self):
        opt = FCompiler.get_flags_f90(self)
        opt.extend(["-YCFRL=1","-YCOM_NAMES=LCS","-YCOM_PFX","-YEXT_PFX",
                    "-YCOM_SFX=_","-YEXT_SFX=_","-YEXT_NAMES=LCS"])
        if self.get_version():
            if self.get_version()>'4.6':
                opt.extend(["-YDEALLOC=ALL"])
        return opt

def get_flags_fix(self):
        opt = FCompiler.get_flags_fix(self)
        opt.extend(["-YCFRL=1","-YCOM_NAMES=LCS","-YCOM_PFX","-YEXT_PFX",
                    "-YCOM_SFX=_","-YEXT_SFX=_","-YEXT_NAMES=LCS"])
        opt.extend(["-f","fixed"])
        return opt

def get_flags_opt(self):
        opt = ['-O']
        return opt

if __name__ == '__main__':
    from distutils import log
    log.set_verbosity(2)
    from numpy.distutils.fcompiler import new_fcompiler
    compiler = new_fcompiler(compiler='absoft')
    compiler.customize()
    print compiler.get_version()

cmd: