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.
47 lines
1.3 KiB
47 lines
1.3 KiB
1 year ago
|
"""
|
||
|
|
fujitsu
|
||
|
|
|
||
|
|
Supports Fujitsu compiler function.
|
||
|
|
This compiler is developed by Fujitsu and is used in A64FX on Fugaku.
|
||
|
|
"""
|
||
|
|
from numpy.distutils.fcompiler import FCompiler
|
||
|
|
|
||
|
|
compilers = ['FujitsuFCompiler']
|
||
|
|
|
||
|
|
class FujitsuFCompiler(FCompiler):
|
||
|
|
compiler_type = 'fujitsu'
|
||
|
|
description = 'Fujitsu Fortran Compiler'
|
||
|
|
|
||
|
|
possible_executables = ['frt']
|
||
|
|
version_pattern = r'frt \(FRT\) (?P<version>[a-z\d.]+)'
|
||
|
|
# $ frt --version
|
||
|
|
# frt (FRT) x.x.x yyyymmdd
|
||
|
|
|
||
|
|
executables = {
|
||
|
|
'version_cmd' : ["<F77>", "--version"],
|
||
|
|
'compiler_f77' : ["frt", "-Fixed"],
|
||
|
|
'compiler_fix' : ["frt", "-Fixed"],
|
||
|
|
'compiler_f90' : ["frt"],
|
||
|
|
'linker_so' : ["frt", "-shared"],
|
||
|
|
'archiver' : ["ar", "-cr"],
|
||
|
|
'ranlib' : ["ranlib"]
|
||
|
|
}
|
||
|
|
pic_flags = ['-KPIC']
|
||
|
|
module_dir_switch = '-M'
|
||
|
|
module_include_switch = '-I'
|
||
|
|
|
||
|
|
def get_flags_opt(self):
|
||
|
|
return ['-O3']
|
||
|
|
def get_flags_debug(self):
|
||
|
|
return ['-g']
|
||
|
|
def runtime_library_dir_option(self, dir):
|
||
|
|
return f'-Wl,-rpath={dir}'
|
||
|
|
def get_libraries(self):
|
||
|
|
return ['fj90f', 'fj90i', 'fjsrcinfo']
|
||
|
|
|
||
|
|
if __name__ == '__main__':
|
||
|
|
from distutils import log
|
||
|
|
from numpy.distutils import customized_fcompiler
|
||
|
|
log.set_verbosity(2)
|
||
|
|
print(customized_fcompiler('fujitsu').get_version())
|