add Fujitsu compilers

Co-authored-by: Tomoki Karatsu <karatsu.spack@gmail.com>
This commit is contained in:
Gilles Gouaillardet 2020-11-29 13:57:57 +09:00
parent 3788b6d156
commit 358100ec15
1 changed files with 8 additions and 3 deletions

11
f_check
View File

@ -69,7 +69,12 @@ if ($compiler eq "") {
$bu = "_"; $bu = "_";
} }
if ($data =~ /GNU/ || $data =~ /GCC/ ) { if ($data =~ /Fujitsu/) {
$vendor = FUJITSU;
$openmp = "-Kopenmp";
} elsif ($data =~ /GNU/ || $data =~ /GCC/ ) {
$data =~ /(\d+)\.(\d+).(\d+)/; $data =~ /(\d+)\.(\d+).(\d+)/;
$major = $1; $major = $1;
@ -337,8 +342,8 @@ if ($link ne "") {
&& ($flags !~ /kernel32/) && ($flags !~ /kernel32/)
&& ($flags !~ /advapi32/) && ($flags !~ /advapi32/)
&& ($flags !~ /shell32/) && ($flags !~ /shell32/)
&& ($flags !~ /omp/ || ($vendor !~ /PGI/ && $flags =~ /omp/)) && ($flags !~ /omp/ || ($vendor !~ /PGI/ && $vendor !~ /FUJITSU/ && $flags =~ /omp/))
&& ($flags !~ /[0-9]+/) && ($flags !~ /[0-9]+/ || ($vendor == FUJITSU && $flags =~ /^-lfj90/))
&& ($flags !~ /^\-l$/) && ($flags !~ /^\-l$/)
) { ) {
$linker_l .= $flags . " "; $linker_l .= $flags . " ";