floraachy
/
OpenBLAS
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Refs #123. Fixed exporting DLL functions bug on Windows

This commit is contained in:
Zhang Xianyi 2012-07-06 21:37:51 +08:00
parent 6fcdaa4387
commit 4a5d08d0cf
1 changed files with 16 additions and 19 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
exports/gensymbol
View File

@ -2760,10 +2760,8 @@ if ($ARGV[0] eq "win2k"){
print "EXPORTS\n";
$count = 1;
#remove openblas_set_num_threads
@underscore_objs = grep /[^openblas_set_num_threads]/,@underscore_objs;
foreach $objs (@underscore_objs) {
unless ($objs =~ /openblas_set_num_threads/) { #remove openblas_set_num_threads
$uppercase = $objs;
$uppercase =~ tr/[a-z]/[A-Z]/;
print "\t$objs=$objs","_ \@", $count, "\n";
@ -2773,17 +2771,16 @@ if ($ARGV[0] eq "win2k"){
print "\t$uppercase=$objs", "_ \@", $count, "\n";
$count ++;
}
}
#for openblas_set_num_threads
print "\topenblas_set_num_threads_=openblas_set_num_threads_ \@", $count, "\n";
$count ++;
# if ($ARGV[4] == 0) {
foreach $objs (@no_underscore_objs) {
print "\t",$objs,"=$objs"," \@", $count, "\n";
$count ++;
}
# }
exit(0);
}