Add back symbols that got dropped when splitting by type

This commit is contained in:
Martin Kroeker 2020-10-19 20:37:52 +02:00 committed by GitHub
parent 9cac379655
commit 4ad33c46b0
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 70 additions and 33 deletions

View File

@ -51,7 +51,7 @@
zgeadd, dzsum); zgeadd, dzsum);
@blasobjs = (lsame, xerbla); @blasobjs = (lsame, xerbla);
@halfblasobjs = (sbgemm, sbdot, sbstobf16, sbdtobf16, sbf16tos, dbf16tod); @bfblasobjs = (sbgemm, sbdot, sbstobf16, sbdtobf16, sbf16tos, dbf16tod);
@cblasobjsc = ( @cblasobjsc = (
cblas_caxpy, cblas_ccopy, cblas_cdotc, cblas_cdotu, cblas_cgbmv, cblas_cgemm, cblas_cgemv, cblas_caxpy, cblas_ccopy, cblas_cdotc, cblas_cdotu, cblas_cgbmv, cblas_cgemm, cblas_cgemv,
cblas_cgerc, cblas_cgeru, cblas_chbmv, cblas_chemm, cblas_chemv, cblas_cher2, cblas_cher2k, cblas_cgerc, cblas_cgeru, cblas_chbmv, cblas_chemm, cblas_chemv, cblas_cher2, cblas_cher2k,
@ -72,7 +72,7 @@
); );
@cblasobjss = ( @cblasobjss = (
cblas_sasum, cblas_saxpy, cblas_sasum, cblas_saxpy, cblas_saxpby,
cblas_scopy, cblas_sdot, cblas_sdsdot, cblas_sgbmv, cblas_sgemm, cblas_scopy, cblas_sdot, cblas_sdsdot, cblas_sgbmv, cblas_sgemm,
cblas_sgemv, cblas_sger, cblas_snrm2, cblas_srot, cblas_srotg, cblas_sgemv, cblas_sger, cblas_snrm2, cblas_srot, cblas_srotg,
cblas_srotm, cblas_srotmg, cblas_ssbmv, cblas_sscal, cblas_sspmv, cblas_sspr2, cblas_sspr, cblas_srotm, cblas_srotmg, cblas_ssbmv, cblas_sscal, cblas_sspmv, cblas_sspr2, cblas_sspr,
@ -94,7 +94,7 @@
@cblasobjs = ( cblas_xerbla ); @cblasobjs = ( cblas_xerbla );
@halfcblasobjs = (cblas_sbgemm, cblas_sbdot, cblas_sbstobf16, cblas_sbdtobf16, cblas_sbf16tos, cblas_dbf16tod); @bfcblasobjs = (cblas_sbgemm, cblas_sbdot, cblas_sbstobf16, cblas_sbdtobf16, cblas_sbf16tos, cblas_dbf16tod);
@exblasobjs = ( @exblasobjs = (
qamax,qamin,qasum,qaxpy,qcabs1,qcopy,qdot,qgbmv,qgemm, qamax,qamin,qasum,qaxpy,qcabs1,qcopy,qdot,qgbmv,qgemm,
@ -415,7 +415,7 @@ zpotri,
cgeqrt, cgeqrt2, cgeqrt3, cgemqrt, cgeqrt, cgeqrt2, cgeqrt3, cgemqrt,
ctpqrt, ctpqrt2, ctpmqrt, ctprfb, ctpqrt, ctpqrt2, ctpmqrt, ctprfb,
); );
@lapack2objszc = ( @lapackobjs2zc = (
# ZCLASRC -- Double-single mixed precision complex routines called from # ZCLASRC -- Double-single mixed precision complex routines called from
# single, single-extra and double precision complex LAPACK # single, single-extra and double precision complex LAPACK
# routines (i.e. from CLASRC, CXLASRC, ZLASRC). # routines (i.e. from CLASRC, CXLASRC, ZLASRC).
@ -425,7 +425,7 @@ zpotri,
cpotrs, cpotrs,
); );
@lapack2objsd = ( @lapackobjs2d = (
# DLASRC -- Double precision real LAPACK routines # DLASRC -- Double precision real LAPACK routines
# already provided by @lapackobjs: # already provided by @lapackobjs:
# dgesv, dgetf2, dgetrs, dlaswp, dlauu2, dlauum, dpotf2, dpotrf, dpotri, # dgesv, dgetf2, dgetrs, dlaswp, dlauu2, dlauum, dpotf2, dpotrf, dpotri,
@ -568,7 +568,7 @@ zpotri,
); );
# functions added for lapack-3.6.0 # functions added for lapack-3.6.0
@lapack2objsc = ( @lapack2objsc, @lapackobjs2c = ( @lapackobjs2c,
cgejsv, cgejsv,
cgesvdx, cgesvdx,
cgesvj, cgesvj,
@ -604,7 +604,7 @@ zpotri,
csyr2, csyr2,
cunm22, cunm22,
); );
@lapackobjs2d = (@lapack2objsd, @lapackobjs2d = (@lapackobjs2d,
dbdsvdx, dbdsvdx,
dgesvdx, dgesvdx,
dgetrf2, dgetrf2,
@ -637,7 +637,7 @@ zpotri,
dpotrf2, dpotrf2,
dsecnd, dsecnd,
); );
@lapack2objss = (@lapack2objss, @lapackobjs2s = (@lapackobjs2s,
sbdsvdx, sbdsvdx,
second, second,
sgesvdx, sgesvdx,
@ -670,7 +670,7 @@ zpotri,
sorm22, sorm22,
spotrf2, spotrf2,
); );
@lapack2objsz = (@lapack2objsz, @lapackobjs2z = (@lapackobjs2z,
zgejsv, zgejsv,
zgesvdx, zgesvdx,
zgesvj, zgesvj,
@ -707,7 +707,7 @@ zpotri,
zunm22, zunm22,
); );
# functions added for lapack-3.7.0 # functions added for lapack-3.7.0
@lapack2objss = (@lapack2objss, @lapackobjs2s = (@lapackobjs2s,
slarfy, slarfy,
strevc3, strevc3,
sgelqt, sgelqt,
@ -726,7 +726,7 @@ zpotri,
stplqt2, stplqt2,
stpmlqt, stpmlqt,
); );
@lapack2objsd = (@lapack2objsd, @lapackobjs2d = (@lapackobjs2d,
dlarfy, dlarfy,
dsyconvf, dsyconvf,
dtrevc3, dtrevc3,
@ -746,7 +746,7 @@ zpotri,
dtplqt2, dtplqt2,
dtpmlqt, dtpmlqt,
); );
@lapack2objsc = (@lapack2objsc, @lapackobjs2c = (@lapackobjs2c,
clarfy, clarfy,
csyconvf, csyconvf,
ctrevc3, ctrevc3,
@ -766,7 +766,7 @@ zpotri,
ctplqt2, ctplqt2,
ctpmlqt, ctpmlqt,
); );
@lapack2objsz = (@lapack2objsz, @lapackobjs2z = (@lapackobjs2z,
zlarfy, zlarfy,
zsyconvf, zsyconvf,
ztrevc3, ztrevc3,
@ -786,7 +786,7 @@ zpotri,
zlamswlq, zlamswlq,
zgemlq, zgemlq,
); );
@lapack2objs = (@lapack2objs, @lapackobjs2 = (@lapackobjs2,
sladiv1, sladiv1,
dladiv1, dladiv1,
iparam2stage, iparam2stage,
@ -796,21 +796,21 @@ zpotri,
ilaenv2stage, ilaenv2stage,
); );
# functions added for lapack-3.9.0 # functions added for lapack-3.9.0
@lapack2objsc = (@lapack2objsc, @lapackobjs2c = (@lapackobjs2c,
cgesvdq, cgesvdq,
cungtsqr, cungtsqr,
dcombssq, dcombssq,
); );
@lapack2objsd = (@lapack2objsd, @lapackobjs2d = (@lapackobjs2d,
dgesvdq, dgesvdq,
dorgtsqr, dorgtsqr,
); );
@lapack2objss = (@lapack2objss, @lapackobjs2s = (@lapackobjs2s,
scombssq, scombssq,
sgesvdq, sgesvdq,
sorgtsqr, sorgtsqr,
); );
@lapack2objsz = (@lapack2objsz, @lapackobjs2z = (@lapackobjs2z,
zgesvdq, zgesvdq,
zungtsqr zungtsqr
); );
@ -835,8 +835,27 @@ zpotri,
dlatzm, dtzrqf); dlatzm, dtzrqf);
@lapack_deprecated_objss = ( @lapack_deprecated_objss = (
sgelsx,
sgegs, sgegs,
sgegv, sgegv,
sgeqpf,
sggsvd,
sggsvp,
slahrd,
slatzm,
stzrqf
);
@lapack_deprecated_objsz = (
zgegs,
zgegv,
zgelsx,
zgeqpf,
zggsvd,
zggsvp,
zlahrd,
zlatzm,
ztzrqf
); );
@lapacke_deprecated_objsc = ( @lapacke_deprecated_objsc = (
@ -3590,48 +3609,66 @@ use File::Basename;
my $dirname = File::Spec->catfile(dirname(dirname(File::Spec->rel2abs(__FILE__))), "lapack-netlib"); my $dirname = File::Spec->catfile(dirname(dirname(File::Spec->rel2abs(__FILE__))), "lapack-netlib");
if ($ARGV[12] == 1) { if ($ARGV[12] == 1) {
@blasobjs = (@blasobjs, @halfblasobjs); @blasobjs = (@blasobjs, @bfblasobjs);
@cblasobjs = (@cblasobjs, @halfcblasobjs); @cblasobjs = (@cblasobjs, @bfcblasobjs);
} }
if ($ARGV[13] == 1) { if ($ARGV[13] == 1) {
@blasobjs = (@blasobjs, @blasobjss); @blasobjs = (@blasobjs, @blasobjss);
@cblasobjs = (@cblasobjs, @cblasobjss); @cblasobjs = (@cblasobjs, @cblasobjss);
@lapackobjs = (@lapackobjs, @lapackobjss); @lapackobjs = (@lapackobjs, @lapackobjss);
@lapack2objs = (@lapack2objs, @lapack2objss); @lapackobjs2 = (@lapackobjs2, @lapackobjs2s);
@lapackobjs2 = (@lapackobjs2, @lapackobjs2sc);
@lapackobjs2 = (@lapackobjs2, @lapackobjs2ds);
@lapack_deprecated_objs = (@lapack_deprecated_objs, @lapack_deprecated_objss);
@lapacke_deprecated_objs = (@lapacke_deprecated_objs, @lapacke_deprecated_objss);
@lapack_embeded_underscore_objs = (@lapack_embeded_underscore_objs, @lapack_embeded_underscore_objs_s); @lapack_embeded_underscore_objs = (@lapack_embeded_underscore_objs, @lapack_embeded_underscore_objs_s);
@lapackeobjs = (@lapackeobjs, @lapackeobjss); @lapackeobjs = (@lapackeobjs, @lapackeobjss);
@lapackobjs2 = (@lapackobjs2, @lapackobjs2s);
} }
if ($ARGV[14] == 1) { if ($ARGV[14] == 1) {
@blasobjs = (@blasobjs, @blasobjsd); @blasobjs = (@blasobjs, @blasobjsd);
@cblasobjs = (@cblasobjs, @cblasobjsd); @cblasobjs = (@cblasobjs, @cblasobjsd);
@lapackobjs = (@lapackobjs, @lapackobjsd); @lapackobjs = (@lapackobjs, @lapackobjsd);
@lapack2objs = (@lapack2objs, @lapack2objsd); if ($ARGV[13] == 0) {
@lapackobjs2 = (@lapackobjs2, @lapackobjs2ds);
}
@lapackobjs2 = (@lapackobjs2, @lapackobjs2d, @lapackobjs2dz);
@lapack_deprecated_objs = (@lapack_deprecated_objs, @lapack_deprecated_objsd);
@lapacke_deprecated_objs = (@lapacke_deprecated_objs, @lapacke_deprecated_objsd);
@lapack_embeded_underscore_objs = (@lapack_embeded_underscore_objs, @lapack_embeded_underscore_objs_d); @lapack_embeded_underscore_objs = (@lapack_embeded_underscore_objs, @lapack_embeded_underscore_objs_d);
@lapackeobjs = (@lapackeobjs, @lapackeobjsd); @lapackeobjs = (@lapackeobjs, @lapackeobjsd);
@lapackobjs2 = (@lapackobjs2, @lapackobjs2d);
} }
if ($ARGV[15] == 1) { if ($ARGV[15] == 1) {
@blasobjs = (@blasobjs, @blasobjsc); @blasobjs = (@blasobjs, @blasobjsc);
@cblasobjs = (@cblasobjs, @cblasobjsc); @cblasobjs = (@cblasobjs, @cblasobjsc);
@gemm3mobjs = (@gemm3mobjs, @gemm3mobjsc); @gemm3mobjs = (@gemm3mobjs, @gemm3mobjsc);
@cblasgemm3mobjs = (@cblasgemm3mobjs, @sblasgemm3mobjsc); @cblasgemm3mobjs = (@cblasgemm3mobjs, @cblasgemm3mobjsc);
@lapackobjs = (@lapackobjs, @lapackobjsc); @lapackobjs = (@lapackobjs, @lapackobjsc);
@lapack2objs = (@lapack2objs, @lapack2objsc, @lapac2objszc); @lapackobjs2 = (@lapackobjs2, @lapackobjs2c, @lapackobjs2zc);
if ($ARGV[13] == 0) {
@lapackobjs2 = (@lapackobjs2, @lapackobjs2sc);
}
@lapack_deprecated_objs = (@lapack_deprecated_objs, @lapack_deprecated_objsc);
@lapacke_deprecated_objs = (@lapacke_deprecated_objs, @lapacke_deprecated_objsc);
@lapack_embeded_underscore_objs = (@lapack_embeded_underscore_objs, @lapack_embeded_underscore_objs_c); @lapack_embeded_underscore_objs = (@lapack_embeded_underscore_objs, @lapack_embeded_underscore_objs_c);
@lapackeobjs = (@lapackeobjs, @lapackeobjsc); @lapackeobjs = (@lapackeobjs, @lapackeobjsc);
@lapackobjs2 = (@lapackobjs2, @lapackobjs2sc, @lapackobjs2c);
} }
if ($ARGV[16] == 1) { if ($ARGV[16] == 1) {
@blasobjs = (@blasobjs, @blasobjsz); @blasobjs = (@blasobjs, @blasobjsz);
@cblasobjs = (@cblasobjs, @cblasobjsz); @cblasobjs = (@cblasobjs, @cblasobjsz);
@gemm3mobjs = (@gemm3mobjs, @gemm3mobjsz); @gemm3mobjs = (@gemm3mobjs, @gemm3mobjsz);
@cblasgemm3mobjs = (@cblasgemm3mobjs, @sblasgemm3mobjsz); @cblasgemm3mobjs = (@cblasgemm3mobjs, @cblasgemm3mobjsz);
@lapackobjs = (@lapackobjs, @lapackobjsz); @lapackobjs = (@lapackobjs, @lapackobjsz);
@lapack2objs = (@lapack2objs, @lapack2objsz, @lapack2objszc); @lapackobjs2 = (@lapackobjs2, @lapackobjs2z);
if ($ARGV[15] == 0) {
@lapackobjs2 = (@lapackobjs2, @lapackobjs2zc);
}
if ($ARGV[14] == 0) {
@lapackobjs2 = (@lapackobjs2, @lapackobjs2dz);
}
@lapack_deprecated_objs = (@lapack_deprecated_objs, @lapack_deprecated_objsz);
@lapacke_deprecated_objs = (@lapacke_deprecated_objs, @lapacke_deprecated_objsz);
@lapack_embeded_underscore_objs = (@lapack_embeded_underscore_objs, @lapack_embeded_underscore_objs_z); @lapack_embeded_underscore_objs = (@lapack_embeded_underscore_objs, @lapack_embeded_underscore_objs_z);
@lapackeobjs = (@lapackeobjs, @lapackeobjsz); @lapackeobjs = (@lapackeobjs, @lapackeobjsz);
@lapackobjs2 = (@lapackobjs2, @lapackobjs2dz, @lapackobjs2z);
} }
if ($ARGV[8] == 1) { if ($ARGV[8] == 1) {
#ONLY_CBLAS=1 #ONLY_CBLAS=1