Virtualization
/
meson
mirror of https://gitlab.com/qemu-project/meson.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

Fortran refactoring.

This commit is contained in:
Jussi Pakkanen 2014-08-13 18:17:53 +03:00
parent 5aa2cd1566
commit 08472ed4cc
1 changed files with 19 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

37
environment.py
View File

@ -1135,17 +1135,15 @@ class ClangCPPCompiler(CPPCompiler):
def get_pch_suffix(self):
return 'pch'
class GnuFortranCompiler():
class FortranCompiler():
std_warn_args = ['-Wall']
def __init__(self, exelist, version, gcc_type, is_cross, exe_wrapper=None):
def __init__(self, exelist, version,is_cross, exe_wrapper=None):
super().__init__()
self.exelist = exelist
self.version = version
self.gcc_type = gcc_type
self.is_cross = is_cross
self.exe_wrapper = exe_wrapper
self.id = 'gcc'
self.language = 'fortran'
def get_id(self):
@ -1242,16 +1240,21 @@ end program prog
def module_name_to_filename(self, module_name):
return module_name.lower() + '.mod'
class G95FortranCompiler(GnuFortranCompiler):
class GnuFortranCompiler(FortranCompiler):
def __init__(self, exelist, version, gcc_type, is_cross, exe_wrapper=None):
GnuFortranCompiler.__init__(self, exelist, version, gcc_type, is_cross, exe_wrapper=None)
self.id = 'g95'
super().__init__(exelist, version, is_cross, exe_wrapper=None)
self.gcc_type = gcc_type
self.id = 'gcc'
class SunFortranCompiler(GnuFortranCompiler):
def __init__(self, exelist, version, gcc_type, is_cross, exe_wrapper=None):
GnuFortranCompiler.__init__(self, exelist, version, gcc_type, is_cross, exe_wrapper=None)
self.id = 'sun'
class G95FortranCompiler(FortranCompiler):
def __init__(self, exelist, version, is_cross, exe_wrapper=None):
super().__init__(exelist, version, is_cross, exe_wrapper=None)
self.id = 'g95'
class SunFortranCompiler(FortranCompiler):
def __init__(self, exelist, version, is_cross, exe_wrapper=None):
super().__init__(exelist, version, is_cross, exe_wrapper=None)
self.id = 'sun'
def get_dependency_gen_args(self, outtarget, outfile):
return ['-fpp']
@ -1413,7 +1416,7 @@ class Environment():
self.default_cpp = ['c++']
self.default_objc = ['cc']
self.default_objcpp = ['c++']
self.default_fortran = ['gfortran']
self.default_fortran = ['gfortran', 'g95', 'f95', 'f90', 'f77']
self.default_static_linker = 'ar'
self.vs_static_linker = 'lib'
@ -1556,20 +1559,18 @@ class Environment():
vmatch = re.search(Environment.version_regex, out)
if vmatch: version = vmatch.group(0)
gcc_type = GCC_STANDARD
if 'GNU Fortran' in out:
return GnuFortranCompiler([compiler], version, gcc_type, is_cross, exe_wrap)
return GnuFortranCompiler([compiler], version, GCC_STANDARD, is_cross, exe_wrap)
if 'G95' in out:
return G95FortranCompiler([compiler], version, gcc_type, is_cross, exe_wrap)
return G95FortranCompiler([compiler], version, is_cross, exe_wrap)
if 'Sun Fortran' in err:
version = 'unknown version'
vmatch = re.search(Environment.version_regex, err)
if vmatch:
version = vmatch.group(0)
return SunFortranCompiler([compiler], version, gcc_type, is_cross, exe_wrap)
return SunFortranCompiler([compiler], version, is_cross, exe_wrap)
raise EnvironmentException('Unknown compiler(s): "' + ', '.join(compilers) + '"')