The Meson Build System http://mesonbuild.com/
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

353 lines
12 KiB

# Copyright 2012-2017 The Meson development team
# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
# You may obtain a copy of the License at
# http://www.apache.org/licenses/LICENSE-2.0
# Unless required by applicable law or agreed to in writing, software
# distributed under the License is distributed on an "AS IS" BASIS,
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
# See the License for the specific language governing permissions and
# limitations under the License.
from .c import CCompiler
from .compilers import (
ICC_STANDARD,
Compiler,
GnuCompiler,
ElbrusCompiler,
IntelCompiler,
)
class FortranCompiler(Compiler):
library_dirs_cache = CCompiler.library_dirs_cache
program_dirs_cache = CCompiler.library_dirs_cache
find_library_cache = CCompiler.library_dirs_cache
def __init__(self, exelist, version, is_cross, exe_wrapper=None, **kwargs):
self.language = 'fortran'
Compiler.__init__(self, exelist, version, **kwargs)
cc = CCompiler(exelist, version, is_cross, exe_wrapper, **kwargs)
self.id = 'unknown'
self.is_cross = cc.is_cross
self.exe_wrapper = cc.exe_wrapper
def get_display_language(self):
return 'Fortran'
def needs_static_linker(self):
return CCompiler.needs_static_linker(self)
def get_always_args(self):
return CCompiler.get_always_args(self)
def get_linker_debug_crt_args(self):
return CCompiler.get_linker_debug_crt_args(self)
def get_no_stdinc_args(self):
return CCompiler.get_no_stdinc_args(self)
def get_no_stdlib_link_args(self):
return CCompiler.get_no_stdlib_link_args(self)
def get_warn_args(self, level):
return CCompiler.get_warn_args(self, level)
def get_no_warn_args(self):
return CCompiler.get_no_warn_args(self)
def get_soname_args(self, *args):
return CCompiler.get_soname_args(self, *args)
def split_shlib_to_parts(self, fname):
return CCompiler.split_shlib_to_parts(self, fname)
def build_rpath_args(self, *args):
return CCompiler.build_rpath_args(self, *args)
def get_dependency_gen_args(self, outtarget, outfile):
return []
def depfile_for_object(self, objfile):
return CCompiler.depfile_for_object(self, objfile)
def get_depfile_suffix(self):
return CCompiler.get_depfile_suffix(self)
def get_exelist(self):
return CCompiler.get_exelist(self)
def get_linker_exelist(self):
return CCompiler.get_linker_exelist(self)
def get_preprocess_only_args(self):
return ['-cpp'] + CCompiler.get_preprocess_only_args(self)
def get_compile_only_args(self):
return CCompiler.get_compile_only_args(self)
def get_no_optimization_args(self):
return CCompiler.get_no_optimization_args(self)
def get_compiler_check_args(self):
return CCompiler.get_compiler_check_args(self)
def get_output_args(self, target):
return CCompiler.get_output_args(self, target)
def get_linker_output_args(self, outputname):
return CCompiler.get_linker_output_args(self, outputname)
def get_coverage_args(self):
return CCompiler.get_coverage_args(self)
def get_coverage_link_args(self):
return CCompiler.get_coverage_link_args(self)
def get_werror_args(self):
return CCompiler.get_werror_args(self)
def get_std_exe_link_args(self):
return CCompiler.get_std_exe_link_args(self)
def get_include_args(self, path, is_system):
return CCompiler.get_include_args(self, path, is_system)
def get_module_incdir_args(self):
return ('-I', )
def get_module_outdir_args(self, path):
return ['-module' + path]
def module_name_to_filename(self, module_name):
return module_name.lower() + '.mod'
def get_std_shared_lib_link_args(self):
return CCompiler.get_std_shared_lib_link_args(self)
def get_library_dirs_real(self):
return CCompiler.get_library_dirs_real(self)
def get_library_dirs(self):
return CCompiler.get_library_dirs(self)
def get_pic_args(self):
return CCompiler.get_pic_args(self)
def name_string(self):
return CCompiler.name_string(self)
def get_linker_search_args(self, dirname):
return CCompiler.get_linker_search_args(self, dirname)
def get_default_include_dirs(self):
return CCompiler.get_default_include_dirs(self)
def gen_export_dynamic_link_args(self, env):
return CCompiler.gen_export_dynamic_link_args(self, env)
def gen_import_library_args(self, implibname):
return CCompiler.gen_import_library_args(self, implibname)
def sanity_check(self, work_dir, environment):
code = '''program main
integer :: ret = 0
call exit(ret)
end program main'''
return CCompiler.sanity_check_impl(self, work_dir, environment, 'sanitycheckf.f90', code)
def _get_compiler_check_args(self, env, extra_args, dependencies, mode='compile'):
return CCompiler._get_compiler_check_args(self, env, extra_args, dependencies, mode='compile')
def compiles(self, code, env, extra_args=None, dependencies=None, mode='compile'):
return CCompiler.compiles(self, code, env, extra_args, dependencies, mode)
def _build_wrapper(self, code, env, extra_args, dependencies=None, mode='compile', want_output=False):
return CCompiler._build_wrapper(self, code, env, extra_args, dependencies, mode, want_output)
def links(self, code, env, extra_args=None, dependencies=None):
return CCompiler.links(self, code, env, extra_args, dependencies)
def run(self, code, env, extra_args=None, dependencies=None):
return CCompiler.run(self, code, env, extra_args, dependencies)
def _get_patterns(self, *args, **kwargs):
return CCompiler._get_patterns(self, *args, **kwargs)
def get_library_naming(self, *args, **kwargs):
return CCompiler.get_library_naming(self, *args, **kwargs)
def find_library_real(self, *args):
return CCompiler.find_library_real(self, *args)
def find_library_impl(self, *args):
return CCompiler.find_library_impl(self, *args)
def find_library(self, libname, env, extra_dirs, libtype='default'):
code = '''program main
call exit(0)
end program main'''
return self.find_library_impl(libname, env, extra_dirs, code, libtype)
def thread_flags(self, env):
return CCompiler.thread_flags(self, env)
def thread_link_flags(self, env):
return CCompiler.thread_link_flags(self, env)
def linker_to_compiler_args(self, args):
return CCompiler.linker_to_compiler_args(self, args)
def has_arguments(self, args, env, code, mode):
return CCompiler.has_arguments(self, args, env, code, mode)
def has_multi_arguments(self, args, env):
return CCompiler.has_multi_arguments(self, args, env)
class GnuFortranCompiler(GnuCompiler, FortranCompiler):
def __init__(self, exelist, version, gcc_type, is_cross, exe_wrapper=None, defines=None, **kwargs):
FortranCompiler.__init__(self, exelist, version, is_cross, exe_wrapper, **kwargs)
GnuCompiler.__init__(self, gcc_type, defines)
default_warn_args = ['-Wall']
self.warn_args = {'1': default_warn_args,
'2': default_warn_args + ['-Wextra'],
'3': default_warn_args + ['-Wextra', '-Wpedantic']}
def get_dependency_gen_args(self, outtarget, outfile):
# Disabled until this is fixed:
# https://gcc.gnu.org/bugzilla/show_bug.cgi?id=62162
# return ['-cpp', '-MD', '-MQ', outtarget]
return []
def get_module_outdir_args(self, path):
return ['-J' + path]
def language_stdlib_only_link_flags(self):
return ['-lgfortran', '-lm', '-lquadmath']
class ElbrusFortranCompiler(GnuFortranCompiler, ElbrusCompiler):
def __init__(self, exelist, version, gcc_type, is_cross, exe_wrapper=None, defines=None, **kwargs):
GnuFortranCompiler.__init__(self, exelist, version, gcc_type, is_cross, exe_wrapper, defines, **kwargs)
ElbrusCompiler.__init__(self, gcc_type, defines)
class G95FortranCompiler(FortranCompiler):
def __init__(self, exelist, version, is_cross, exe_wrapper=None, **kwags):
FortranCompiler.__init__(self, exelist, version, is_cross, exe_wrapper, **kwags)
self.id = 'g95'
default_warn_args = ['-Wall']
self.warn_args = {'1': default_warn_args,
'2': default_warn_args + ['-Wextra'],
'3': default_warn_args + ['-Wextra', '-pedantic']}
def get_module_outdir_args(self, path):
return ['-fmod=' + path]
def get_no_warn_args(self):
# FIXME: Confirm that there's no compiler option to disable all warnings
return []
class SunFortranCompiler(FortranCompiler):
def __init__(self, exelist, version, is_cross, exe_wrapper=None, **kwags):
FortranCompiler.__init__(self, exelist, version, is_cross, exe_wrapper, **kwags)
self.id = 'sun'
def get_dependency_gen_args(self, outtarget, outfile):
return ['-fpp']
def get_always_args(self):
return []
def get_warn_args(self, level):
return []
def get_module_incdir_args(self):
return ('-M', )
def get_module_outdir_args(self, path):
return ['-moddir=' + path]
def openmp_flags(self):
return ['-xopenmp']
class IntelFortranCompiler(IntelCompiler, FortranCompiler):
def __init__(self, exelist, version, is_cross, exe_wrapper=None, **kwags):
self.file_suffixes = ('f90', 'f', 'for', 'ftn', 'fpp')
FortranCompiler.__init__(self, exelist, version, is_cross, exe_wrapper, **kwags)
# FIXME: Add support for OS X and Windows in detect_fortran_compiler so
# we are sent the type of compiler
IntelCompiler.__init__(self, ICC_STANDARD)
self.id = 'intel'
default_warn_args = ['-warn', 'general', '-warn', 'truncated_source']
self.warn_args = {'1': default_warn_args,
'2': default_warn_args + ['-warn', 'unused'],
'3': ['-warn', 'all']}
def get_preprocess_only_args(self):
return ['-cpp', '-EP']
class PathScaleFortranCompiler(FortranCompiler):
def __init__(self, exelist, version, is_cross, exe_wrapper=None, **kwags):
FortranCompiler.__init__(self, exelist, version, is_cross, exe_wrapper, **kwags)
self.id = 'pathscale'
default_warn_args = ['-fullwarn']
self.warn_args = {'1': default_warn_args,
'2': default_warn_args,
'3': default_warn_args}
def openmp_flags(self):
return ['-mp']
class PGIFortranCompiler(FortranCompiler):
def __init__(self, exelist, version, is_cross, exe_wrapper=None, **kwags):
FortranCompiler.__init__(self, exelist, version, is_cross, exe_wrapper, **kwags)
self.id = 'pgi'
default_warn_args = ['-Minform=inform']
self.warn_args = {'1': default_warn_args,
'2': default_warn_args,
'3': default_warn_args}
def get_module_incdir_args(self):
return ('-module', )
def get_no_warn_args(self):
return ['-silent']
def openmp_flags(self):
return ['-fopenmp']
class Open64FortranCompiler(FortranCompiler):
def __init__(self, exelist, version, is_cross, exe_wrapper=None, **kwags):
FortranCompiler.__init__(self, exelist, version, is_cross, exe_wrapper, **kwags)
self.id = 'open64'
default_warn_args = ['-fullwarn']
self.warn_args = {'1': default_warn_args,
'2': default_warn_args,
'3': default_warn_args}
def openmp_flags(self):
return ['-mp']
class NAGFortranCompiler(FortranCompiler):
def __init__(self, exelist, version, is_cross, exe_wrapper=None, **kwags):
FortranCompiler.__init__(self, exelist, version, is_cross, exe_wrapper, **kwags)
self.id = 'nagfor'
def get_warn_args(self, level):
return []
def get_module_outdir_args(self, path):
return ['-mdir', path]
def openmp_flags(self):
return ['-openmp']