Fix gensymbol script

This commit is contained in:
Isuru Fernando 2017-11-06 19:00:23 -06:00 committed by Ian Henriksen
parent 3ace0fda3f
commit 9268314290
1 changed files with 5 additions and 1 deletions

View File

@ -3411,13 +3411,17 @@
); );
use File::Spec;
use File::Basename;
my $dirname = File::Spec->catfile(dirname(dirname(File::Spec->rel2abs(__FILE__))), "lapack-netlib");
if ($ARGV[8] == 1) { if ($ARGV[8] == 1) {
#ONLY_CBLAS=1 #ONLY_CBLAS=1
@underscore_objs = (@misc_underscore_objs); @underscore_objs = (@misc_underscore_objs);
} elsif ($ARGV[5] == 1) { } elsif ($ARGV[5] == 1) {
#NO_LAPACK=1 #NO_LAPACK=1
@underscore_objs = (@blasobjs, @misc_underscore_objs); @underscore_objs = (@blasobjs, @misc_underscore_objs);
} elsif (-d "../lapack-netlib") { } elsif (-d $dirname) {
if ($ARGV[7] == 0) { if ($ARGV[7] == 0) {
# NEED2UNDERSCORES=0 # NEED2UNDERSCORES=0
# Don't need 2 underscores # Don't need 2 underscores