Merge branch 'amd' of github.com:flame/blis into amd

This commit is contained in:
Field G. Van Zee
2019-03-16 16:01:43 -05:00
548 changed files with 1454 additions and 1443 deletions

View File

@@ -14,12 +14,14 @@ but many others have contributed code and feedback, including
Erling Andersen @erling-d-andersen Erling Andersen @erling-d-andersen
Alex Arslan @ararslan Alex Arslan @ararslan
Vernon Austel (IBM, T.J. Watson Research Center) Vernon Austel (IBM, T.J. Watson Research Center)
Matthew Brett @matthew-brett (University of Birmingham)
Jed Brown @jedbrown (Argonne National Laboratory) Jed Brown @jedbrown (Argonne National Laboratory)
Robin Christ @robinchrist Robin Christ @robinchrist
Kay Dewhurst @jkd2016 (Max Planck Institute, Halle, Germany) Kay Dewhurst @jkd2016 (Max Planck Institute, Halle, Germany)
Jeff Diamond (Oracle) Jeff Diamond (Oracle)
Johannes Dieterich @iotamudelta Johannes Dieterich @iotamudelta
Krzysztof Drewniak @krzysz00 Krzysztof Drewniak @krzysz00
Marat Dukhan @Maratyszcza (Google)
Victor Eijkhout @VictorEijkhout (Texas Advanced Computing Center) Victor Eijkhout @VictorEijkhout (Texas Advanced Computing Center)
Isuru Fernando @isuruf Isuru Fernando @isuruf
Roman Gareev @gareevroman Roman Gareev @gareevroman
@@ -30,7 +32,7 @@ but many others have contributed code and feedback, including
Jeff Hammond @jeffhammond (Intel) Jeff Hammond @jeffhammond (Intel)
Jacob Gorm Hansen @jacobgorm Jacob Gorm Hansen @jacobgorm
Jean-Michel Hautbois @jhautbois Jean-Michel Hautbois @jhautbois
Ian Henriksen @insertinterestingnamehere Ian Henriksen @insertinterestingnamehere (The University of Texas at Austin)
Minh Quan Ho @hominhquan Minh Quan Ho @hominhquan
Matthew Honnibal @honnibal Matthew Honnibal @honnibal
Stefan Husmann @stefanhusmann Stefan Husmann @stefanhusmann
@@ -63,6 +65,7 @@ but many others have contributed code and feedback, including
Rene Sitt Rene Sitt
Tony Skjellum @tonyskjellum (The University of Tennessee at Chattanooga) Tony Skjellum @tonyskjellum (The University of Tennessee at Chattanooga)
Mikhail Smelyanskiy (Intel, Parallel Computing Lab) Mikhail Smelyanskiy (Intel, Parallel Computing Lab)
Nathaniel Smith @njsmith
Shaden Smith @ShadenSmith Shaden Smith @ShadenSmith
Tyler Smith @tlrmchlsmth (The University of Texas at Austin) Tyler Smith @tlrmchlsmth (The University of Texas at Austin)
Paul Springer @springer13 (RWTH-Aachen) Paul Springer @springer13 (RWTH-Aachen)
@@ -83,8 +86,10 @@ partners, including
AMD AMD
Hewlett Packard Enterprise Hewlett Packard Enterprise
Huawei
Intel Intel
Microsoft Microsoft
Oracle
Texas Instruments Texas Instruments
as well as the National Science Foundation (NSF Awards CCF-0917167, as well as the National Science Foundation (NSF Awards CCF-0917167,

View File

@@ -159,7 +159,23 @@
#define BLIS_DISABLE_SHARED #define BLIS_DISABLE_SHARED
#endif #endif
#define BLIS_EXPORT_BLAS #if !defined(BLIS_ENABLE_SHARED)
#define BLIS_EXPORT_BLIS #define BLIS_EXPORT
#else
#if defined(_WIN32) || defined(__CYGWIN__)
#ifdef BLIS_IS_BUILDING_LIBRARY
#define BLIS_EXPORT __declspec(dllexport)
#else
#define BLIS_EXPORT __declspec(dllimport)
#endif
#elif defined(__GNUC__) && __GNUC__ >= 4
#define BLIS_EXPORT __attribute__ ((visibility ("default")))
#else
#define BLIS_EXPORT
#endif
#endif
#define BLIS_EXPORT_BLIS BLIS_EXPORT
#define BLIS_EXPORT_BLAS BLIS_EXPORT
#endif #endif

View File

@@ -183,8 +183,6 @@ bli_cgemm4mb
bli_cgemm4mb_ker_var2 bli_cgemm4mb_ker_var2
bli_cgemm4mh bli_cgemm4mh
bli_cgemm_ex bli_cgemm_ex
bli_cgemm_haswell_asm_3x8
bli_cgemm_haswell_asm_8x3
bli_cgemm_ker_var2 bli_cgemm_ker_var2
bli_cgemm_md_c2r_ref bli_cgemm_md_c2r_ref
bli_cgemmtrsm_l_ukernel bli_cgemmtrsm_l_ukernel
@@ -591,7 +589,6 @@ bli_daddv
bli_daddv_ex bli_daddv_ex
bli_damaxv bli_damaxv
bli_damaxv_ex bli_damaxv_ex
bli_damaxv_zen_int
bli_dasumv bli_dasumv
bli_dasumv_ex bli_dasumv_ex
bli_dasumv_unb_var1 bli_dasumv_unb_var1
@@ -603,14 +600,11 @@ bli_daxpyd
bli_daxpyd_ex bli_daxpyd_ex
bli_daxpyf bli_daxpyf
bli_daxpyf_ex bli_daxpyf_ex
bli_daxpyf_zen_int_8
bli_daxpym bli_daxpym
bli_daxpym_ex bli_daxpym_ex
bli_daxpym_unb_var1 bli_daxpym_unb_var1
bli_daxpyv bli_daxpyv
bli_daxpyv_ex bli_daxpyv_ex
bli_daxpyv_zen_int
bli_daxpyv_zen_int10
bli_dccastm bli_dccastm
bli_dccastnzm bli_dccastnzm
bli_dccastv bli_dccastv
@@ -640,16 +634,12 @@ bli_ddotaxpyv
bli_ddotaxpyv_ex bli_ddotaxpyv_ex
bli_ddotv bli_ddotv
bli_ddotv_ex bli_ddotv_ex
bli_ddotv_zen_int
bli_ddotv_zen_int10
bli_ddotxaxpyf bli_ddotxaxpyf
bli_ddotxaxpyf_ex bli_ddotxaxpyf_ex
bli_ddotxf bli_ddotxf
bli_ddotxf_ex bli_ddotxf_ex
bli_ddotxf_zen_int_8
bli_ddotxv bli_ddotxv
bli_ddotxv_ex bli_ddotxv_ex
bli_ddotxv_zen_int
bli_ddpackm_blk_var1_md bli_ddpackm_blk_var1_md
bli_ddpackm_cxk_1e_md bli_ddpackm_cxk_1e_md
bli_ddpackm_cxk_1r_md bli_ddpackm_cxk_1r_md
@@ -673,12 +663,8 @@ bli_dgemm4mb
bli_dgemm4mb_ker_var2 bli_dgemm4mb_ker_var2
bli_dgemm4mh bli_dgemm4mh
bli_dgemm_ex bli_dgemm_ex
bli_dgemm_haswell_asm_6x8
bli_dgemm_haswell_asm_8x6
bli_dgemm_ker_var2 bli_dgemm_ker_var2
bli_dgemmtrsm_l_haswell_asm_6x8
bli_dgemmtrsm_l_ukernel bli_dgemmtrsm_l_ukernel
bli_dgemmtrsm_u_haswell_asm_6x8
bli_dgemmtrsm_u_ukernel bli_dgemmtrsm_u_ukernel
bli_dgemm_ukernel bli_dgemm_ukernel
bli_dgemv bli_dgemv
@@ -746,11 +732,6 @@ bli_dinvertv_ex
bli_divsc bli_divsc
bli_divsc_check bli_divsc_check
bli_divsc_qfp bli_divsc_qfp
bli_dlamc1
bli_dlamc2
bli_dlamc3
bli_dlamc4
bli_dlamc5
bli_dlamch bli_dlamch
bli_dmachval bli_dmachval
bli_dmkherm bli_dmkherm
@@ -838,8 +819,6 @@ bli_dscalm_ex
bli_dscalm_unb_var1 bli_dscalm_unb_var1
bli_dscalv bli_dscalv
bli_dscalv_ex bli_dscalv_ex
bli_dscalv_zen_int
bli_dscalv_zen_int10
bli_dscastm bli_dscastm
bli_dscastnzm bli_dscastnzm
bli_dscastv bli_dscastv
@@ -1452,8 +1431,6 @@ bli_pool_init
bli_pool_print bli_pool_print
bli_pool_reinit bli_pool_reinit
bli_pool_shrink bli_pool_shrink
bli_pow_di
bli_pow_ri
bli_prime_factorization bli_prime_factorization
bli_printm bli_printm
bli_printm_ex bli_printm_ex
@@ -1510,7 +1487,6 @@ bli_saddv
bli_saddv_ex bli_saddv_ex
bli_samaxv bli_samaxv
bli_samaxv_ex bli_samaxv_ex
bli_samaxv_zen_int
bli_sasumv bli_sasumv
bli_sasumv_ex bli_sasumv_ex
bli_sasumv_unb_var1 bli_sasumv_unb_var1
@@ -1522,14 +1498,11 @@ bli_saxpyd
bli_saxpyd_ex bli_saxpyd_ex
bli_saxpyf bli_saxpyf
bli_saxpyf_ex bli_saxpyf_ex
bli_saxpyf_zen_int_8
bli_saxpym bli_saxpym
bli_saxpym_ex bli_saxpym_ex
bli_saxpym_unb_var1 bli_saxpym_unb_var1
bli_saxpyv bli_saxpyv
bli_saxpyv_ex bli_saxpyv_ex
bli_saxpyv_zen_int
bli_saxpyv_zen_int10
bli_sba_acquire bli_sba_acquire
bli_sba_checkin_array bli_sba_checkin_array
bli_sba_checkout_array bli_sba_checkout_array
@@ -1591,16 +1564,12 @@ bli_sdotaxpyv
bli_sdotaxpyv_ex bli_sdotaxpyv_ex
bli_sdotv bli_sdotv
bli_sdotv_ex bli_sdotv_ex
bli_sdotv_zen_int
bli_sdotv_zen_int10
bli_sdotxaxpyf bli_sdotxaxpyf
bli_sdotxaxpyf_ex bli_sdotxaxpyf_ex
bli_sdotxf bli_sdotxf
bli_sdotxf_ex bli_sdotxf_ex
bli_sdotxf_zen_int_8
bli_sdotxv bli_sdotxv
bli_sdotxv_ex bli_sdotxv_ex
bli_sdotxv_zen_int
bli_sdpackm_blk_var1_md bli_sdpackm_blk_var1_md
bli_sdpackm_cxk_1e_md bli_sdpackm_cxk_1e_md
bli_sdpackm_cxk_1r_md bli_sdpackm_cxk_1r_md
@@ -1643,12 +1612,8 @@ bli_sgemm4mb
bli_sgemm4mb_ker_var2 bli_sgemm4mb_ker_var2
bli_sgemm4mh bli_sgemm4mh
bli_sgemm_ex bli_sgemm_ex
bli_sgemm_haswell_asm_16x6
bli_sgemm_haswell_asm_6x16
bli_sgemm_ker_var2 bli_sgemm_ker_var2
bli_sgemmtrsm_l_haswell_asm_6x16
bli_sgemmtrsm_l_ukernel bli_sgemmtrsm_l_ukernel
bli_sgemmtrsm_u_haswell_asm_6x16
bli_sgemmtrsm_u_ukernel bli_sgemmtrsm_u_ukernel
bli_sgemm_ukernel bli_sgemm_ukernel
bli_sgemv bli_sgemv
@@ -1717,11 +1682,6 @@ bli_sinvertd_ex
bli_sinvertsc bli_sinvertsc
bli_sinvertv bli_sinvertv
bli_sinvertv_ex bli_sinvertv_ex
bli_slamc1
bli_slamc2
bli_slamc3
bli_slamc4
bli_slamc5
bli_slamch bli_slamch
bli_sleep bli_sleep
bli_smachval bli_smachval
@@ -1793,8 +1753,6 @@ bli_sscalm_ex
bli_sscalm_unb_var1 bli_sscalm_unb_var1
bli_sscalv bli_sscalv
bli_sscalv_ex bli_sscalv_ex
bli_sscalv_zen_int
bli_sscalv_zen_int10
bli_sscastm bli_sscastm
bli_sscastnzm bli_sscastnzm
bli_sscastv bli_sscastv
@@ -2245,8 +2203,6 @@ bli_zgemm4mb
bli_zgemm4mb_ker_var2 bli_zgemm4mb_ker_var2
bli_zgemm4mh bli_zgemm4mh
bli_zgemm_ex bli_zgemm_ex
bli_zgemm_haswell_asm_3x4
bli_zgemm_haswell_asm_4x3
bli_zgemm_ker_var2 bli_zgemm_ker_var2
bli_zgemm_md_c2r_ref bli_zgemm_md_c2r_ref
bli_zgemmtrsm_l_ukernel bli_zgemmtrsm_l_ukernel
@@ -2528,19 +2484,6 @@ bli_zzpackm_struc_cxk_md
bli_zzxpbym_md bli_zzxpbym_md
bli_zzxpbym_md_ex bli_zzxpbym_md_ex
bli_zzxpbym_md_unb_var1 bli_zzxpbym_md_unb_var1
bla_c_abs
bla_c_div
bla_d_abs
bla_d_cnjg
bla_d_imag
bla_d_sign
bla_f__cabs
bla_r_abs
bla_r_cnjg
bla_r_imag
bla_r_sign
bla_z_abs
bla_z_div
sasum_ sasum_
sasumsub_ sasumsub_
saxpy_ saxpy_

View File

@@ -506,9 +506,9 @@ SOFLAGS := -shared
ifeq ($(IS_WIN),yes) ifeq ($(IS_WIN),yes)
# Windows shared library link flags. # Windows shared library link flags.
ifeq ($(CC_VENDOR),clang) ifeq ($(CC_VENDOR),clang)
SOFLAGS += -Wl,-def:build/libblis-symbols.def -Wl,-implib:$(BASE_LIB_PATH)/$(LIBBLIS).lib SOFLAGS += -Wl,-implib:$(BASE_LIB_PATH)/$(LIBBLIS).lib
else else
SOFLAGS += -Wl,--export-all-symbols -Wl,--out-implib,$(BASE_LIB_PATH)/$(LIBBLIS).dll.a SOFLAGS += -Wl,--out-implib,$(BASE_LIB_PATH)/$(LIBBLIS).dll.a
endif endif
else else
# Linux shared library link flags. # Linux shared library link flags.

View File

@@ -41,7 +41,7 @@
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* chi, \ obj_t* chi, \
obj_t* psi \ obj_t* psi \
@@ -61,7 +61,7 @@ GENFRONT( subsc )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* chi \ obj_t* chi \
) \ ) \
@@ -75,7 +75,7 @@ GENFRONT( invertsc )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* chi, \ obj_t* chi, \
obj_t* norm \ obj_t* norm \

View File

@@ -40,7 +40,7 @@
#undef GENTPROT #undef GENTPROT
#define GENTPROT( opname ) \ #define GENTPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* chi, \ obj_t* chi, \
obj_t* psi \ obj_t* psi \
@@ -57,7 +57,7 @@ GENTPROT( subsc )
#undef GENTPROT #undef GENTPROT
#define GENTPROT( opname ) \ #define GENTPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* chi \ obj_t* chi \
); );
@@ -68,7 +68,7 @@ GENTPROT( invertsc )
#undef GENTPROT #undef GENTPROT
#define GENTPROT( opname ) \ #define GENTPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* chi, \ obj_t* chi, \
obj_t* absq \ obj_t* absq \
@@ -81,7 +81,7 @@ GENTPROT( normfsc )
#undef GENTPROT #undef GENTPROT
#define GENTPROT( opname ) \ #define GENTPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* chi, \ obj_t* chi, \
double* zeta_r, \ double* zeta_r, \
@@ -94,7 +94,7 @@ GENTPROT( getsc )
#undef GENTPROT #undef GENTPROT
#define GENTPROT( opname ) \ #define GENTPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
double zeta_r, \ double zeta_r, \
double zeta_i, \ double zeta_i, \
@@ -107,7 +107,7 @@ GENTPROT( setsc )
#undef GENTPROT #undef GENTPROT
#define GENTPROT( opname ) \ #define GENTPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* chi, \ obj_t* chi, \
obj_t* zeta_r, \ obj_t* zeta_r, \
@@ -120,7 +120,7 @@ GENTPROT( unzipsc )
#undef GENTPROT #undef GENTPROT
#define GENTPROT( opname ) \ #define GENTPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* zeta_r, \ obj_t* zeta_r, \
obj_t* zeta_i, \ obj_t* zeta_i, \
@@ -132,18 +132,18 @@ GENTPROT( zipsc )
// ----------------------------------------------------------------------------- // -----------------------------------------------------------------------------
BLIS_EXPORT_BLIS void bli_l0_xsc_check void bli_l0_xsc_check
( (
obj_t* chi obj_t* chi
); );
BLIS_EXPORT_BLIS void bli_l0_xxsc_check void bli_l0_xxsc_check
( (
obj_t* chi, obj_t* chi,
obj_t* psi obj_t* psi
); );
BLIS_EXPORT_BLIS void bli_l0_xx2sc_check void bli_l0_xx2sc_check
( (
obj_t* chi, obj_t* chi,
obj_t* norm obj_t* norm

View File

@@ -40,7 +40,7 @@
#define GENPROT( opname ) \ #define GENPROT( opname ) \
\ \
PASTECH(opname,_vft) \ PASTECH(opname,_vft) \
BLIS_EXPORT_BLIS BLIS_EXPORT_BLIS PASTEMAC(opname,_qfp)( num_t dt ); PASTEMAC(opname,_qfp)( num_t dt );
GENPROT( absqsc ) GENPROT( absqsc )
GENPROT( normfsc ) GENPROT( normfsc )

View File

@@ -41,7 +41,7 @@
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC0(opname) \ void PASTEMAC0(opname) \
( \ ( \
obj_t* chi, \ obj_t* chi, \
obj_t* absq \ obj_t* absq \
@@ -81,7 +81,7 @@ GENFRONT( normfsc )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC0(opname) \ void PASTEMAC0(opname) \
( \ ( \
obj_t* chi, \ obj_t* chi, \
obj_t* psi \ obj_t* psi \
@@ -120,7 +120,7 @@ GENFRONT( subsc )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC0(opname) \ void PASTEMAC0(opname) \
( \ ( \
obj_t* chi \ obj_t* chi \
) \ ) \
@@ -153,7 +153,7 @@ GENFRONT( invertsc )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC0(opname) \ void PASTEMAC0(opname) \
( \ ( \
obj_t* chi, \ obj_t* chi, \
obj_t* psi \ obj_t* psi \
@@ -186,7 +186,7 @@ GENFRONT( sqrtsc )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC0(opname) \ void PASTEMAC0(opname) \
( \ ( \
obj_t* chi, \ obj_t* chi, \
double* zeta_r, \ double* zeta_r, \
@@ -230,7 +230,7 @@ GENFRONT( getsc )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC0(opname) \ void PASTEMAC0(opname) \
( \ ( \
double zeta_r, \ double zeta_r, \
double zeta_i, \ double zeta_i, \
@@ -264,7 +264,7 @@ GENFRONT( setsc )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC0(opname) \ void PASTEMAC0(opname) \
( \ ( \
obj_t* chi, \ obj_t* chi, \
obj_t* zeta_r, \ obj_t* zeta_r, \
@@ -307,7 +307,7 @@ GENFRONT( unzipsc )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC0(opname) \ void PASTEMAC0(opname) \
( \ ( \
obj_t* zeta_r, \ obj_t* zeta_r, \
obj_t* zeta_i, \ obj_t* zeta_i, \

View File

@@ -41,7 +41,7 @@
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, kername ) \ #define GENTFUNC( ctype, ch, opname, kername ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
conj_t conjchi, \ conj_t conjchi, \
ctype* chi, \ ctype* chi, \
@@ -64,7 +64,7 @@ INSERT_GENTFUNC_BASIC( subsc, subs )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, kername ) \ #define GENTFUNC( ctype, ch, opname, kername ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
conj_t conjchi, \ conj_t conjchi, \
ctype* chi \ ctype* chi \
@@ -85,7 +85,7 @@ INSERT_GENTFUNC_BASIC( invertsc, inverts )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, kername ) \ #define GENTFUNC( ctype, ch, opname, kername ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
conj_t conjchi, \ conj_t conjchi, \
ctype* chi, \ ctype* chi, \
@@ -114,7 +114,7 @@ INSERT_GENTFUNC_BASIC( mulsc, scals )
#undef GENTFUNCR #undef GENTFUNCR
#define GENTFUNCR( ctype, ctype_r, ch, chr, opname ) \ #define GENTFUNCR( ctype, ctype_r, ch, chr, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
ctype* chi, \ ctype* chi, \
ctype_r* absq \ ctype_r* absq \
@@ -143,7 +143,7 @@ INSERT_GENTFUNCR_BASIC0( absqsc )
#undef GENTFUNCR #undef GENTFUNCR
#define GENTFUNCR( ctype, ctype_r, ch, chr, opname ) \ #define GENTFUNCR( ctype, ctype_r, ch, chr, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
ctype* chi, \ ctype* chi, \
ctype_r* norm \ ctype_r* norm \
@@ -161,7 +161,7 @@ INSERT_GENTFUNCR_BASIC0( normfsc )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname ) \ #define GENTFUNC( ctype, ch, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
ctype* chi, \ ctype* chi, \
ctype* psi \ ctype* psi \
@@ -179,7 +179,7 @@ INSERT_GENTFUNC_BASIC0( sqrtsc )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname ) \ #define GENTFUNC( ctype, ch, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
ctype* chi, \ ctype* chi, \
double* zeta_r, \ double* zeta_r, \
@@ -197,7 +197,7 @@ INSERT_GENTFUNC_BASIC0( getsc )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname ) \ #define GENTFUNC( ctype, ch, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
double zeta_r, \ double zeta_r, \
double zeta_i, \ double zeta_i, \
@@ -215,7 +215,7 @@ INSERT_GENTFUNC_BASIC0( setsc )
#undef GENTFUNCR #undef GENTFUNCR
#define GENTFUNCR( ctype, ctype_r, ch, chr, opname ) \ #define GENTFUNCR( ctype, ctype_r, ch, chr, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
ctype* chi, \ ctype* chi, \
ctype_r* zeta_r, \ ctype_r* zeta_r, \
@@ -233,7 +233,7 @@ INSERT_GENTFUNCR_BASIC0( unzipsc )
#undef GENTFUNCR #undef GENTFUNCR
#define GENTFUNCR( ctype, ctype_r, ch, chr, opname ) \ #define GENTFUNCR( ctype, ctype_r, ch, chr, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
ctype_r* zeta_r, \ ctype_r* zeta_r, \
ctype_r* zeta_i, \ ctype_r* zeta_i, \

View File

@@ -55,7 +55,7 @@ static FUNCPTR_T GENARRAY2_ALL(ftypes,copysc);
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC0(opname) \ void PASTEMAC0(opname) \
( \ ( \
obj_t* chi, \ obj_t* chi, \
obj_t* psi \ obj_t* psi \
@@ -103,7 +103,7 @@ GENFRONT( copysc )
#undef GENTFUNC2 #undef GENTFUNC2
#define GENTFUNC2( ctype_x, ctype_y, chx, chy, varname ) \ #define GENTFUNC2( ctype_x, ctype_y, chx, chy, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(chx,chy,varname) \ void PASTEMAC2(chx,chy,varname) \
( \ ( \
conj_t conjchi, \ conj_t conjchi, \
void* chi, \ void* chi, \

View File

@@ -41,7 +41,7 @@
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* x, \ obj_t* x, \
obj_t* y \ obj_t* y \
@@ -59,7 +59,7 @@ GENFRONT( swapv )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* x, \ obj_t* x, \
obj_t* index \ obj_t* index \
@@ -74,7 +74,7 @@ GENFRONT( amaxv )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x, \ obj_t* x, \
@@ -91,7 +91,7 @@ GENFRONT( axpbyv )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x, \ obj_t* x, \
@@ -108,7 +108,7 @@ GENFRONT( scal2v )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* x, \ obj_t* x, \
obj_t* y, \ obj_t* y, \
@@ -124,7 +124,7 @@ GENFRONT( dotv )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x, \ obj_t* x, \
@@ -142,7 +142,7 @@ GENFRONT( dotxv )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* x \ obj_t* x \
) \ ) \
@@ -156,7 +156,7 @@ GENFRONT( invertv )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x \ obj_t* x \
@@ -172,7 +172,7 @@ GENFRONT( setv )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* x, \ obj_t* x, \
obj_t* beta, \ obj_t* beta, \

View File

@@ -40,7 +40,7 @@
#undef GENTPROT #undef GENTPROT
#define GENTPROT( opname ) \ #define GENTPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* x, \ obj_t* x, \
obj_t* y \ obj_t* y \
@@ -55,7 +55,7 @@ GENTPROT( swapv )
#undef GENTPROT #undef GENTPROT
#define GENTPROT( opname ) \ #define GENTPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* x, \ obj_t* x, \
obj_t* index \ obj_t* index \
@@ -67,7 +67,7 @@ GENTPROT( amaxv )
#undef GENTPROT #undef GENTPROT
#define GENTPROT( opname ) \ #define GENTPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x, \ obj_t* x, \
@@ -81,7 +81,7 @@ GENTPROT( axpbyv )
#undef GENTPROT #undef GENTPROT
#define GENTPROT( opname ) \ #define GENTPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x, \ obj_t* x, \
@@ -95,7 +95,7 @@ GENTPROT( scal2v )
#undef GENTPROT #undef GENTPROT
#define GENTPROT( opname ) \ #define GENTPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* x, \ obj_t* x, \
obj_t* y, \ obj_t* y, \
@@ -108,7 +108,7 @@ GENTPROT( dotv )
#undef GENTPROT #undef GENTPROT
#define GENTPROT( opname ) \ #define GENTPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x, \ obj_t* x, \
@@ -123,7 +123,7 @@ GENTPROT( dotxv )
#undef GENTPROT #undef GENTPROT
#define GENTPROT( opname ) \ #define GENTPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* x \ obj_t* x \
); );
@@ -134,7 +134,7 @@ GENTPROT( invertv )
#undef GENTPROT #undef GENTPROT
#define GENTPROT( opname ) \ #define GENTPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x \ obj_t* x \
@@ -147,7 +147,7 @@ GENTPROT( setv )
#undef GENTPROT #undef GENTPROT
#define GENTPROT( opname ) \ #define GENTPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* x, \ obj_t* x, \
obj_t* beta, \ obj_t* beta, \
@@ -160,27 +160,27 @@ GENTPROT( xpbyv )
// ----------------------------------------------------------------------------- // -----------------------------------------------------------------------------
BLIS_EXPORT_BLIS void bli_l1v_xy_check void bli_l1v_xy_check
( (
obj_t* x, obj_t* x,
obj_t* y obj_t* y
); );
BLIS_EXPORT_BLIS void bli_l1v_axy_check void bli_l1v_axy_check
( (
obj_t* alpha, obj_t* alpha,
obj_t* x, obj_t* x,
obj_t* y obj_t* y
); );
BLIS_EXPORT_BLIS void bli_l1v_xby_check void bli_l1v_xby_check
( (
obj_t* x, obj_t* x,
obj_t* beta, obj_t* beta,
obj_t* y obj_t* y
); );
BLIS_EXPORT_BLIS void bli_l1v_axby_check void bli_l1v_axby_check
( (
obj_t* alpha, obj_t* alpha,
obj_t* x, obj_t* x,
@@ -188,7 +188,7 @@ BLIS_EXPORT_BLIS void bli_l1v_axby_check
obj_t* y obj_t* y
); );
BLIS_EXPORT_BLIS void bli_l1v_dot_check void bli_l1v_dot_check
( (
obj_t* alpha, obj_t* alpha,
obj_t* x, obj_t* x,
@@ -197,18 +197,18 @@ BLIS_EXPORT_BLIS void bli_l1v_dot_check
obj_t* rho obj_t* rho
); );
BLIS_EXPORT_BLIS void bli_l1v_x_check void bli_l1v_x_check
( (
obj_t* x obj_t* x
); );
BLIS_EXPORT_BLIS void bli_l1v_ax_check void bli_l1v_ax_check
( (
obj_t* alpha, obj_t* alpha,
obj_t* x obj_t* x
); );
BLIS_EXPORT_BLIS void bli_l1v_xi_check void bli_l1v_xi_check
( (
obj_t* x, obj_t* x,
obj_t* index obj_t* index

View File

@@ -40,7 +40,7 @@
#define GENPROT( opname ) \ #define GENPROT( opname ) \
\ \
PASTECH2(opname,BLIS_TAPI_EX_SUF,_vft) \ PASTECH2(opname,BLIS_TAPI_EX_SUF,_vft) \
BLIS_EXPORT_BLIS BLIS_EXPORT_BLIS PASTEMAC2(opname,BLIS_TAPI_EX_SUF,_qfp)( num_t dt ); PASTEMAC2(opname,BLIS_TAPI_EX_SUF,_qfp)( num_t dt );
GENPROT( addv ) GENPROT( addv )
GENPROT( copyv ) GENPROT( copyv )

View File

@@ -39,7 +39,7 @@
#define ADDV_KER_PROT( ctype, ch, opname ) \ #define ADDV_KER_PROT( ctype, ch, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
conj_t conjx, \ conj_t conjx, \
dim_t n, \ dim_t n, \
@@ -51,7 +51,7 @@ BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \
#define AMAXV_KER_PROT( ctype, ch, opname ) \ #define AMAXV_KER_PROT( ctype, ch, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
dim_t n, \ dim_t n, \
ctype* restrict x, inc_t incx, \ ctype* restrict x, inc_t incx, \
@@ -62,7 +62,7 @@ BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \
#define AXPBYV_KER_PROT( ctype, ch, opname ) \ #define AXPBYV_KER_PROT( ctype, ch, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
conj_t conjx, \ conj_t conjx, \
dim_t n, \ dim_t n, \
@@ -76,7 +76,7 @@ BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \
#define AXPYV_KER_PROT( ctype, ch, opname ) \ #define AXPYV_KER_PROT( ctype, ch, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
conj_t conjx, \ conj_t conjx, \
dim_t n, \ dim_t n, \
@@ -89,7 +89,7 @@ BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \
#define COPYV_KER_PROT( ctype, ch, opname ) \ #define COPYV_KER_PROT( ctype, ch, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
conj_t conjx, \ conj_t conjx, \
dim_t n, \ dim_t n, \
@@ -101,7 +101,7 @@ BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \
#define DOTV_KER_PROT( ctype, ch, opname ) \ #define DOTV_KER_PROT( ctype, ch, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
conj_t conjx, \ conj_t conjx, \
conj_t conjy, \ conj_t conjy, \
@@ -115,7 +115,7 @@ BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \
#define DOTXV_KER_PROT( ctype, ch, opname ) \ #define DOTXV_KER_PROT( ctype, ch, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
conj_t conjx, \ conj_t conjx, \
conj_t conjy, \ conj_t conjy, \
@@ -131,7 +131,7 @@ BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \
#define INVERTV_KER_PROT( ctype, ch, opname ) \ #define INVERTV_KER_PROT( ctype, ch, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
dim_t n, \ dim_t n, \
ctype* restrict x, inc_t incx, \ ctype* restrict x, inc_t incx, \
@@ -141,7 +141,7 @@ BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \
#define SCALV_KER_PROT( ctype, ch, opname ) \ #define SCALV_KER_PROT( ctype, ch, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
conj_t conjalpha, \ conj_t conjalpha, \
dim_t n, \ dim_t n, \
@@ -153,7 +153,7 @@ BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \
#define SCAL2V_KER_PROT( ctype, ch, opname ) \ #define SCAL2V_KER_PROT( ctype, ch, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
conj_t conjx, \ conj_t conjx, \
dim_t n, \ dim_t n, \
@@ -166,7 +166,7 @@ BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \
#define SETV_KER_PROT( ctype, ch, opname ) \ #define SETV_KER_PROT( ctype, ch, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
conj_t conjalpha, \ conj_t conjalpha, \
dim_t n, \ dim_t n, \
@@ -178,7 +178,7 @@ BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \
#define SUBV_KER_PROT( ctype, ch, opname ) \ #define SUBV_KER_PROT( ctype, ch, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
conj_t conjx, \ conj_t conjx, \
dim_t n, \ dim_t n, \
@@ -190,7 +190,7 @@ BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \
#define SWAPV_KER_PROT( ctype, ch, opname ) \ #define SWAPV_KER_PROT( ctype, ch, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
dim_t n, \ dim_t n, \
ctype* restrict x, inc_t incx, \ ctype* restrict x, inc_t incx, \
@@ -201,7 +201,7 @@ BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \
#define XPBYV_KER_PROT( ctype, ch, opname ) \ #define XPBYV_KER_PROT( ctype, ch, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
conj_t conjx, \ conj_t conjx, \
dim_t n, \ dim_t n, \

View File

@@ -43,7 +43,7 @@
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* x, \ obj_t* x, \
obj_t* y \ obj_t* y \
@@ -90,7 +90,7 @@ GENFRONT( subv )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* x, \ obj_t* x, \
obj_t* index \ obj_t* index \
@@ -133,7 +133,7 @@ GENFRONT( amaxv )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x, \ obj_t* x, \
@@ -197,7 +197,7 @@ GENFRONT( axpbyv )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x, \ obj_t* x, \
@@ -255,7 +255,7 @@ GENFRONT( scal2v )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* x, \ obj_t* x, \
obj_t* y, \ obj_t* y, \
@@ -305,7 +305,7 @@ GENFRONT( dotv )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x, \ obj_t* x, \
@@ -374,7 +374,7 @@ GENFRONT( dotxv )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* x \ obj_t* x \
BLIS_OAPI_EX_PARAMS \ BLIS_OAPI_EX_PARAMS \
@@ -413,7 +413,7 @@ GENFRONT( invertv )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x \ obj_t* x \
@@ -467,7 +467,7 @@ GENFRONT( setv )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* x, \ obj_t* x, \
obj_t* y \ obj_t* y \
@@ -510,7 +510,7 @@ GENFRONT( swapv )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* x, \ obj_t* x, \
obj_t* beta, \ obj_t* beta, \

View File

@@ -43,7 +43,7 @@
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, kerid ) \ #define GENTFUNC( ctype, ch, opname, kerid ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(ch,opname,EX_SUF) \ void PASTEMAC2(ch,opname,EX_SUF) \
( \ ( \
conj_t conjx, \ conj_t conjx, \
dim_t n, \ dim_t n, \
@@ -81,7 +81,7 @@ INSERT_GENTFUNC_BASIC( subv, BLIS_SUBV_KER )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, kerid ) \ #define GENTFUNC( ctype, ch, opname, kerid ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(ch,opname,EX_SUF) \ void PASTEMAC2(ch,opname,EX_SUF) \
( \ ( \
dim_t n, \ dim_t n, \
ctype* x, inc_t incx, \ ctype* x, inc_t incx, \
@@ -115,7 +115,7 @@ INSERT_GENTFUNC_BASIC( amaxv, BLIS_AMAXV_KER )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, kerid ) \ #define GENTFUNC( ctype, ch, opname, kerid ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(ch,opname,EX_SUF) \ void PASTEMAC2(ch,opname,EX_SUF) \
( \ ( \
conj_t conjx, \ conj_t conjx, \
dim_t n, \ dim_t n, \
@@ -155,7 +155,7 @@ INSERT_GENTFUNC_BASIC( axpbyv, BLIS_AXPBYV_KER )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, kerid ) \ #define GENTFUNC( ctype, ch, opname, kerid ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(ch,opname,EX_SUF) \ void PASTEMAC2(ch,opname,EX_SUF) \
( \ ( \
conj_t conjx, \ conj_t conjx, \
dim_t n, \ dim_t n, \
@@ -195,7 +195,7 @@ INSERT_GENTFUNC_BASIC( scal2v, BLIS_SCAL2V_KER )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, kerid ) \ #define GENTFUNC( ctype, ch, opname, kerid ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(ch,opname,EX_SUF) \ void PASTEMAC2(ch,opname,EX_SUF) \
( \ ( \
conj_t conjx, \ conj_t conjx, \
conj_t conjy, \ conj_t conjy, \
@@ -235,7 +235,7 @@ INSERT_GENTFUNC_BASIC( dotv, BLIS_DOTV_KER )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, kerid ) \ #define GENTFUNC( ctype, ch, opname, kerid ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(ch,opname,EX_SUF) \ void PASTEMAC2(ch,opname,EX_SUF) \
( \ ( \
conj_t conjx, \ conj_t conjx, \
conj_t conjy, \ conj_t conjy, \
@@ -279,7 +279,7 @@ INSERT_GENTFUNC_BASIC( dotxv, BLIS_DOTXV_KER )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, kerid ) \ #define GENTFUNC( ctype, ch, opname, kerid ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(ch,opname,EX_SUF) \ void PASTEMAC2(ch,opname,EX_SUF) \
( \ ( \
dim_t n, \ dim_t n, \
ctype* x, inc_t incx \ ctype* x, inc_t incx \
@@ -311,7 +311,7 @@ INSERT_GENTFUNC_BASIC( invertv, BLIS_INVERTV_KER )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, kerid ) \ #define GENTFUNC( ctype, ch, opname, kerid ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(ch,opname,EX_SUF) \ void PASTEMAC2(ch,opname,EX_SUF) \
( \ ( \
conj_t conjalpha, \ conj_t conjalpha, \
dim_t n, \ dim_t n, \
@@ -348,7 +348,7 @@ INSERT_GENTFUNC_BASIC( setv, BLIS_SETV_KER )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, kerid ) \ #define GENTFUNC( ctype, ch, opname, kerid ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(ch,opname,EX_SUF) \ void PASTEMAC2(ch,opname,EX_SUF) \
( \ ( \
dim_t n, \ dim_t n, \
ctype* x, inc_t incx, \ ctype* x, inc_t incx, \
@@ -381,7 +381,7 @@ INSERT_GENTFUNC_BASIC( swapv, BLIS_SWAPV_KER )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, kerid ) \ #define GENTFUNC( ctype, ch, opname, kerid ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(ch,opname,EX_SUF) \ void PASTEMAC2(ch,opname,EX_SUF) \
( \ ( \
conj_t conjx, \ conj_t conjx, \
dim_t n, \ dim_t n, \

View File

@@ -32,7 +32,7 @@
*/ */
BLIS_EXPORT_BLIS void bli_packv_check void bli_packv_check
( (
obj_t* c, obj_t* c,
obj_t* p, obj_t* p,

View File

@@ -56,7 +56,7 @@ typedef struct packv_params_s packv_params_t;
// ----------------------------------------------------------------------------- // -----------------------------------------------------------------------------
BLIS_EXPORT_BLIS cntl_t* bli_packv_cntl_obj_create cntl_t* bli_packv_cntl_obj_create
( (
void* var_func, void* var_func,
void* packv_var_func, void* packv_var_func,

View File

@@ -32,7 +32,7 @@
*/ */
BLIS_EXPORT_BLIS void bli_packv_init void bli_packv_init
( (
obj_t* a, obj_t* a,
obj_t* p, obj_t* p,
@@ -40,7 +40,7 @@ BLIS_EXPORT_BLIS void bli_packv_init
packv_t* cntl packv_t* cntl
); );
BLIS_EXPORT_BLIS siz_t bli_packv_init_pack siz_t bli_packv_init_pack
( (
pack_t pack_schema, pack_t pack_schema,
bszid_t bmult_id, bszid_t bmult_id,

View File

@@ -32,7 +32,7 @@
*/ */
BLIS_EXPORT_BLIS void bli_packv_int void bli_packv_int
( (
obj_t* c, obj_t* c,
obj_t* p, obj_t* p,

View File

@@ -81,7 +81,7 @@ void bli_packv_unb_var1( obj_t* c,
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, varname ) \ #define GENTFUNC( ctype, ch, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
dim_t m, \ dim_t m, \
void* c, inc_t incc, \ void* c, inc_t incc, \

View File

@@ -32,7 +32,7 @@
*/ */
BLIS_EXPORT_BLIS void bli_packv_unb_var1( obj_t* c, void bli_packv_unb_var1( obj_t* c,
obj_t* p, obj_t* p,
cntx_t* cntx, cntx_t* cntx,
packv_t* cntl ); packv_t* cntl );
@@ -40,7 +40,7 @@ BLIS_EXPORT_BLIS void bli_packv_unb_var1( obj_t* c,
#undef GENTPROT #undef GENTPROT
#define GENTPROT( ctype, ch, varname ) \ #define GENTPROT( ctype, ch, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
dim_t m, \ dim_t m, \
void* c, inc_t incc, \ void* c, inc_t incc, \

View File

@@ -41,11 +41,11 @@ typedef struct scalv_s scalv_t;
#define bli_cntl_sub_scalv( cntl ) cntl->sub_scalv #define bli_cntl_sub_scalv( cntl ) cntl->sub_scalv
BLIS_EXPORT_BLIS void bli_scalv_cntl_init( void ); void bli_scalv_cntl_init( void );
BLIS_EXPORT_BLIS void bli_scalv_cntl_finalize( void ); void bli_scalv_cntl_finalize( void );
BLIS_EXPORT_BLIS scalv_t* bli_scalv_cntl_obj_create( impl_t impl_type, scalv_t* bli_scalv_cntl_obj_create( impl_t impl_type,
varnum_t var_num ); varnum_t var_num );
BLIS_EXPORT_BLIS void bli_scalv_cntl_obj_init( scalv_t* cntl, void bli_scalv_cntl_obj_init( scalv_t* cntl,
impl_t impl_type, impl_t impl_type,
varnum_t var_num ); varnum_t var_num );

View File

@@ -32,7 +32,7 @@
*/ */
BLIS_EXPORT_BLIS void bli_scalv_int( obj_t* alpha, void bli_scalv_int( obj_t* alpha,
obj_t* x, obj_t* x,
cntx_t* cntx, cntx_t* cntx,
scalv_t* cntl ); scalv_t* cntl );

View File

@@ -32,7 +32,7 @@
*/ */
BLIS_EXPORT_BLIS void bli_unpackv_check void bli_unpackv_check
( (
obj_t* p, obj_t* p,
obj_t* a, obj_t* a,

View File

@@ -45,11 +45,11 @@ typedef struct unpackv_s unpackv_t;
#define bli_cntl_sub_unpackv_y( cntl ) cntl->sub_unpackv_y #define bli_cntl_sub_unpackv_y( cntl ) cntl->sub_unpackv_y
#define bli_cntl_sub_unpackv_y1( cntl ) cntl->sub_unpackv_y1 #define bli_cntl_sub_unpackv_y1( cntl ) cntl->sub_unpackv_y1
BLIS_EXPORT_BLIS void bli_unpackv_cntl_init( void ); void bli_unpackv_cntl_init( void );
BLIS_EXPORT_BLIS void bli_unpackv_cntl_finalize( void ); void bli_unpackv_cntl_finalize( void );
BLIS_EXPORT_BLIS unpackv_t* bli_unpackv_cntl_obj_create( impl_t impl_type, unpackv_t* bli_unpackv_cntl_obj_create( impl_t impl_type,
varnum_t var_num ); varnum_t var_num );
BLIS_EXPORT_BLIS void bli_unpackv_cntl_obj_init( unpackv_t* cntl, void bli_unpackv_cntl_obj_init( unpackv_t* cntl,
impl_t impl_type, impl_t impl_type,
varnum_t var_num ); varnum_t var_num );

View File

@@ -32,13 +32,13 @@
*/ */
BLIS_EXPORT_BLIS void bli_unpackv_int( obj_t* p, void bli_unpackv_int( obj_t* p,
obj_t* a, obj_t* a,
cntx_t* cntx, cntx_t* cntx,
unpackv_t* cntl ); unpackv_t* cntl );
/* /*
BLIS_EXPORT_BLIS void bli_unpackv_init_cast( obj_t* p, void bli_unpackv_init_cast( obj_t* p,
obj_t* a, obj_t* a,
obj_t* c ); obj_t* c );
*/ */

View File

@@ -81,7 +81,7 @@ void bli_unpackv_unb_var1( obj_t* p,
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, varname ) \ #define GENTFUNC( ctype, ch, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
dim_t m, \ dim_t m, \
void* p, inc_t incp, \ void* p, inc_t incp, \

View File

@@ -32,7 +32,7 @@
*/ */
BLIS_EXPORT_BLIS void bli_unpackv_unb_var1( obj_t* p, void bli_unpackv_unb_var1( obj_t* p,
obj_t* c, obj_t* c,
cntx_t* cntx, cntx_t* cntx,
unpackv_t* cntl ); unpackv_t* cntl );
@@ -40,7 +40,7 @@ BLIS_EXPORT_BLIS void bli_unpackv_unb_var1( obj_t* p,
#undef GENTPROT #undef GENTPROT
#define GENTPROT( ctype, ch, varname ) \ #define GENTPROT( ctype, ch, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
dim_t m, \ dim_t m, \
void* p, inc_t incp, \ void* p, inc_t incp, \

View File

@@ -41,7 +41,7 @@
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* x, \ obj_t* x, \
obj_t* y \ obj_t* y \
@@ -58,7 +58,7 @@ GENFRONT( subd )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x, \ obj_t* x, \
@@ -75,7 +75,7 @@ GENFRONT( scal2d )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* x \ obj_t* x \
) \ ) \
@@ -89,7 +89,7 @@ GENFRONT( invertd )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x \ obj_t* x \
@@ -107,7 +107,7 @@ GENFRONT( shiftd )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* x, \ obj_t* x, \
obj_t* beta, \ obj_t* beta, \

View File

@@ -40,7 +40,7 @@
#undef GENTPROT #undef GENTPROT
#define GENTPROT( opname ) \ #define GENTPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* x, \ obj_t* x, \
obj_t* y \ obj_t* y \
@@ -54,7 +54,7 @@ GENTPROT( subd )
#undef GENTPROT #undef GENTPROT
#define GENTPROT( opname ) \ #define GENTPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x, \ obj_t* x, \
@@ -68,7 +68,7 @@ GENTPROT( scal2d )
#undef GENTPROT #undef GENTPROT
#define GENTPROT( opname ) \ #define GENTPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* x \ obj_t* x \
); );
@@ -79,7 +79,7 @@ GENTPROT( invertd )
#undef GENTPROT #undef GENTPROT
#define GENTPROT( opname ) \ #define GENTPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x \ obj_t* x \
@@ -94,7 +94,7 @@ GENTPROT( shiftd )
#undef GENTPROT #undef GENTPROT
#define GENTPROT( opname ) \ #define GENTPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* x, \ obj_t* x, \
obj_t* beta, \ obj_t* beta, \
@@ -106,25 +106,25 @@ GENTPROT( xpbyd )
// ----------------------------------------------------------------------------- // -----------------------------------------------------------------------------
BLIS_EXPORT_BLIS void bli_l1d_xy_check void bli_l1d_xy_check
( (
obj_t* x, obj_t* x,
obj_t* y obj_t* y
); );
BLIS_EXPORT_BLIS void bli_l1d_axy_check void bli_l1d_axy_check
( (
obj_t* alpha, obj_t* alpha,
obj_t* x, obj_t* x,
obj_t* y obj_t* y
); );
BLIS_EXPORT_BLIS void bli_l1d_x_check void bli_l1d_x_check
( (
obj_t* x obj_t* x
); );
BLIS_EXPORT_BLIS void bli_l1d_ax_check void bli_l1d_ax_check
( (
obj_t* alpha, obj_t* alpha,
obj_t* x obj_t* x

View File

@@ -40,7 +40,7 @@
#define GENPROT( opname ) \ #define GENPROT( opname ) \
\ \
PASTECH2(opname,BLIS_TAPI_EX_SUF,_vft) \ PASTECH2(opname,BLIS_TAPI_EX_SUF,_vft) \
BLIS_EXPORT_BLIS BLIS_EXPORT_BLIS PASTEMAC2(opname,BLIS_TAPI_EX_SUF,_qfp)( num_t dt ); PASTEMAC2(opname,BLIS_TAPI_EX_SUF,_qfp)( num_t dt );
GENPROT( addd ) GENPROT( addd )
GENPROT( copyd ) GENPROT( copyd )

View File

@@ -43,7 +43,7 @@
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* x, \ obj_t* x, \
obj_t* y \ obj_t* y \
@@ -98,7 +98,7 @@ GENFRONT( subd )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x, \ obj_t* x, \
@@ -164,7 +164,7 @@ GENFRONT( scal2d )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* x \ obj_t* x \
BLIS_OAPI_EX_PARAMS \ BLIS_OAPI_EX_PARAMS \
@@ -208,7 +208,7 @@ GENFRONT( invertd )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x \ obj_t* x \
@@ -267,7 +267,7 @@ GENFRONT( setd )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x \ obj_t* x \
@@ -315,7 +315,7 @@ GENFRONT( setid )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x \ obj_t* x \
@@ -371,7 +371,7 @@ GENFRONT( shiftd )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* x, \ obj_t* x, \
obj_t* beta, \ obj_t* beta, \

View File

@@ -43,7 +43,7 @@
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, kername, kerid ) \ #define GENTFUNC( ctype, ch, opname, kername, kerid ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(ch,opname,EX_SUF) \ void PASTEMAC2(ch,opname,EX_SUF) \
( \ ( \
doff_t diagoffx, \ doff_t diagoffx, \
diag_t diagx, \ diag_t diagx, \
@@ -121,7 +121,7 @@ INSERT_GENTFUNC_BASIC2( subd, subv, BLIS_SUBV_KER )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, kername, kerid ) \ #define GENTFUNC( ctype, ch, opname, kername, kerid ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(ch,opname,EX_SUF) \ void PASTEMAC2(ch,opname,EX_SUF) \
( \ ( \
doff_t diagoffx, \ doff_t diagoffx, \
diag_t diagx, \ diag_t diagx, \
@@ -200,7 +200,7 @@ INSERT_GENTFUNC_BASIC2( scal2d, scal2v, BLIS_SCAL2V_KER )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, kername, kerid ) \ #define GENTFUNC( ctype, ch, opname, kername, kerid ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(ch,opname,EX_SUF) \ void PASTEMAC2(ch,opname,EX_SUF) \
( \ ( \
doff_t diagoffx, \ doff_t diagoffx, \
dim_t m, \ dim_t m, \
@@ -255,7 +255,7 @@ INSERT_GENTFUNC_BASIC2( invertd, invertv, BLIS_INVERTV_KER )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, kername, kerid ) \ #define GENTFUNC( ctype, ch, opname, kername, kerid ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(ch,opname,EX_SUF) \ void PASTEMAC2(ch,opname,EX_SUF) \
( \ ( \
conj_t conjalpha, \ conj_t conjalpha, \
doff_t diagoffx, \ doff_t diagoffx, \
@@ -315,7 +315,7 @@ INSERT_GENTFUNC_BASIC2( setd, setv, BLIS_SETV_KER )
#undef GENTFUNCR #undef GENTFUNCR
#define GENTFUNCR( ctype, ctype_r, ch, chr, opname, kername, kerid ) \ #define GENTFUNCR( ctype, ctype_r, ch, chr, opname, kername, kerid ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(ch,opname,EX_SUF) \ void PASTEMAC2(ch,opname,EX_SUF) \
( \ ( \
doff_t diagoffx, \ doff_t diagoffx, \
dim_t m, \ dim_t m, \
@@ -390,7 +390,7 @@ INSERT_GENTFUNCR_BASIC2( setid, setv, BLIS_SETV_KER )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, kername, kerid ) \ #define GENTFUNC( ctype, ch, opname, kername, kerid ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(ch,opname,EX_SUF) \ void PASTEMAC2(ch,opname,EX_SUF) \
( \ ( \
doff_t diagoffx, \ doff_t diagoffx, \
dim_t m, \ dim_t m, \
@@ -448,7 +448,7 @@ INSERT_GENTFUNC_BASIC2( shiftd, addv, BLIS_ADDV_KER )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, kername, kerid ) \ #define GENTFUNC( ctype, ch, opname, kername, kerid ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(ch,opname,EX_SUF) \ void PASTEMAC2(ch,opname,EX_SUF) \
( \ ( \
doff_t diagoffx, \ doff_t diagoffx, \
diag_t diagx, \ diag_t diagx, \

View File

@@ -40,7 +40,7 @@
#undef GENTPROT #undef GENTPROT
#define GENTPROT( opname ) \ #define GENTPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* alphax, \ obj_t* alphax, \
obj_t* alphay, \ obj_t* alphay, \
@@ -55,7 +55,7 @@ GENTPROT( axpy2v )
#undef GENTPROT #undef GENTPROT
#define GENTPROT( opname ) \ #define GENTPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* a, \ obj_t* a, \
@@ -69,7 +69,7 @@ GENTPROT( axpyf )
#undef GENTPROT #undef GENTPROT
#define GENTPROT( opname ) \ #define GENTPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* xt, \ obj_t* xt, \
@@ -85,7 +85,7 @@ GENTPROT( dotaxpyv )
#undef GENTPROT #undef GENTPROT
#define GENTPROT( opname ) \ #define GENTPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* at, \ obj_t* at, \
@@ -103,7 +103,7 @@ GENTPROT( dotxaxpyf )
#undef GENTPROT #undef GENTPROT
#define GENTPROT( opname ) \ #define GENTPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* a, \ obj_t* a, \

View File

@@ -40,7 +40,7 @@
#define GENPROT( opname ) \ #define GENPROT( opname ) \
\ \
PASTECH2(opname,BLIS_TAPI_EX_SUF,_vft) \ PASTECH2(opname,BLIS_TAPI_EX_SUF,_vft) \
BLIS_EXPORT_BLIS PASTEMAC2(opname,BLIS_TAPI_EX_SUF,_qfp)( num_t dt ); PASTEMAC2(opname,BLIS_TAPI_EX_SUF,_qfp)( num_t dt );
GENPROT( axpy2v ) GENPROT( axpy2v )
GENPROT( axpyf ) GENPROT( axpyf )

View File

@@ -39,7 +39,7 @@
#define AXPY2V_KER_PROT( ctype, ch, opname ) \ #define AXPY2V_KER_PROT( ctype, ch, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
conj_t conjx, \ conj_t conjx, \
conj_t conjy, \ conj_t conjy, \
@@ -55,7 +55,7 @@ BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \
#define AXPYF_KER_PROT( ctype, ch, opname ) \ #define AXPYF_KER_PROT( ctype, ch, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
conj_t conja, \ conj_t conja, \
conj_t conjx, \ conj_t conjx, \
@@ -71,7 +71,7 @@ BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \
#define DOTAXPYV_KER_PROT( ctype, ch, opname ) \ #define DOTAXPYV_KER_PROT( ctype, ch, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
conj_t conjxt, \ conj_t conjxt, \
conj_t conjx, \ conj_t conjx, \
@@ -88,7 +88,7 @@ BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \
#define DOTXAXPYF_KER_PROT( ctype, ch, opname ) \ #define DOTXAXPYF_KER_PROT( ctype, ch, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
conj_t conjat, \ conj_t conjat, \
conj_t conja, \ conj_t conja, \
@@ -109,7 +109,7 @@ BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \
#define DOTXF_KER_PROT( ctype, ch, opname ) \ #define DOTXF_KER_PROT( ctype, ch, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
conj_t conjat, \ conj_t conjat, \
conj_t conjx, \ conj_t conjx, \

View File

@@ -43,7 +43,7 @@
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* alphax, \ obj_t* alphax, \
obj_t* alphay, \ obj_t* alphay, \
@@ -113,7 +113,7 @@ GENFRONT( axpy2v )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* a, \ obj_t* a, \
@@ -182,7 +182,7 @@ GENFRONT( axpyf )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* xt, \ obj_t* xt, \
@@ -251,7 +251,7 @@ GENFRONT( dotaxpyv )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* at, \ obj_t* at, \
@@ -340,7 +340,7 @@ GENFRONT( dotxaxpyf )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* a, \ obj_t* a, \

View File

@@ -43,7 +43,7 @@
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, kerid ) \ #define GENTFUNC( ctype, ch, opname, kerid ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(ch,opname,EX_SUF) \ void PASTEMAC2(ch,opname,EX_SUF) \
( \ ( \
conj_t conjx, \ conj_t conjx, \
conj_t conjy, \ conj_t conjy, \
@@ -87,7 +87,7 @@ INSERT_GENTFUNC_BASIC( axpy2v, BLIS_AXPY2V_KER )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, kerid ) \ #define GENTFUNC( ctype, ch, opname, kerid ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(ch,opname,EX_SUF) \ void PASTEMAC2(ch,opname,EX_SUF) \
( \ ( \
conj_t conja, \ conj_t conja, \
conj_t conjx, \ conj_t conjx, \
@@ -131,7 +131,7 @@ INSERT_GENTFUNC_BASIC( axpyf, BLIS_AXPYF_KER )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, kerid ) \ #define GENTFUNC( ctype, ch, opname, kerid ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(ch,opname,EX_SUF) \ void PASTEMAC2(ch,opname,EX_SUF) \
( \ ( \
conj_t conjxt, \ conj_t conjxt, \
conj_t conjx, \ conj_t conjx, \
@@ -177,7 +177,7 @@ INSERT_GENTFUNC_BASIC( dotaxpyv, BLIS_DOTAXPYV_KER )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, kerid ) \ #define GENTFUNC( ctype, ch, opname, kerid ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(ch,opname,EX_SUF) \ void PASTEMAC2(ch,opname,EX_SUF) \
( \ ( \
conj_t conjat, \ conj_t conjat, \
conj_t conja, \ conj_t conja, \
@@ -231,7 +231,7 @@ INSERT_GENTFUNC_BASIC( dotxaxpyf, BLIS_DOTXAXPYF_KER )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, kerid ) \ #define GENTFUNC( ctype, ch, opname, kerid ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(ch,opname,EX_SUF) \ void PASTEMAC2(ch,opname,EX_SUF) \
( \ ( \
conj_t conjat, \ conj_t conjat, \
conj_t conjx, \ conj_t conjx, \

View File

@@ -41,7 +41,7 @@
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* x, \ obj_t* x, \
obj_t* y \ obj_t* y \
@@ -58,7 +58,7 @@ GENFRONT( subm )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x, \ obj_t* x, \
@@ -75,7 +75,7 @@ GENFRONT( scal2m )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x \ obj_t* x \
@@ -91,7 +91,7 @@ GENFRONT( setm )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* x, \ obj_t* x, \
obj_t* beta, \ obj_t* beta, \

View File

@@ -40,7 +40,7 @@
#undef GENPROT #undef GENPROT
#define GENPROT( opname ) \ #define GENPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* x, \ obj_t* x, \
obj_t* y \ obj_t* y \
@@ -54,7 +54,7 @@ GENPROT( subm )
#undef GENPROT #undef GENPROT
#define GENPROT( opname ) \ #define GENPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x, \ obj_t* x, \
@@ -68,7 +68,7 @@ GENPROT( scal2m )
#undef GENPROT #undef GENPROT
#define GENPROT( opname ) \ #define GENPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x \ obj_t* x \
@@ -81,7 +81,7 @@ GENPROT( setm )
#undef GENPROT #undef GENPROT
#define GENPROT( opname ) \ #define GENPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* x, \ obj_t* x, \
obj_t* beta, \ obj_t* beta, \
@@ -93,20 +93,20 @@ GENPROT( xpbym )
// ----------------------------------------------------------------------------- // -----------------------------------------------------------------------------
BLIS_EXPORT_BLIS void bli_l1m_xy_check void bli_l1m_xy_check
( (
obj_t* x, obj_t* x,
obj_t* y obj_t* y
); );
BLIS_EXPORT_BLIS void bli_l1m_axy_check void bli_l1m_axy_check
( (
obj_t* alpha, obj_t* alpha,
obj_t* x, obj_t* x,
obj_t* y obj_t* y
); );
BLIS_EXPORT_BLIS void bli_l1m_ax_check void bli_l1m_ax_check
( (
obj_t* alpha, obj_t* alpha,
obj_t* x obj_t* x

View File

@@ -40,7 +40,7 @@
#define GENPROT( opname ) \ #define GENPROT( opname ) \
\ \
PASTECH2(opname,BLIS_TAPI_EX_SUF,_vft) \ PASTECH2(opname,BLIS_TAPI_EX_SUF,_vft) \
BLIS_EXPORT_BLIS PASTEMAC2(opname,BLIS_TAPI_EX_SUF,_qfp)( num_t dt ); PASTEMAC2(opname,BLIS_TAPI_EX_SUF,_qfp)( num_t dt );
GENPROT( addm ) GENPROT( addm )
GENPROT( copym ) GENPROT( copym )
@@ -55,7 +55,7 @@ GENPROT( xpbym )
#define GENPROT( opname ) \ #define GENPROT( opname ) \
\ \
PASTECH2(opname,BLIS_TAPI_EX_SUF,_vft) \ PASTECH2(opname,BLIS_TAPI_EX_SUF,_vft) \
BLIS_EXPORT_BLIS PASTEMAC2(opname,BLIS_TAPI_EX_SUF,_qfp2)( num_t dtx, num_t dty ); PASTEMAC2(opname,BLIS_TAPI_EX_SUF,_qfp2)( num_t dtx, num_t dty );
GENPROT( xpbym_md ) GENPROT( xpbym_md )

View File

@@ -41,7 +41,7 @@
#define PACKM_KER_PROT( ctype, ch, varname ) \ #define PACKM_KER_PROT( ctype, ch, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
conj_t conja, \ conj_t conja, \
dim_t cdim, \ dim_t cdim, \
@@ -58,7 +58,7 @@ BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \
#define UNPACKM_KER_PROT( ctype, ch, varname ) \ #define UNPACKM_KER_PROT( ctype, ch, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
conj_t conja, \ conj_t conja, \
dim_t n, \ dim_t n, \
@@ -73,7 +73,7 @@ BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \
#define PACKM_3MIS_KER_PROT( ctype, ch, varname ) \ #define PACKM_3MIS_KER_PROT( ctype, ch, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
conj_t conja, \ conj_t conja, \
dim_t cdim, \ dim_t cdim, \
@@ -90,7 +90,7 @@ BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \
#define PACKM_4MI_KER_PROT( ctype, ch, varname ) \ #define PACKM_4MI_KER_PROT( ctype, ch, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
conj_t conja, \ conj_t conja, \
dim_t cdim, \ dim_t cdim, \
@@ -107,7 +107,7 @@ BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \
#define PACKM_RIH_KER_PROT( ctype, ch, varname ) \ #define PACKM_RIH_KER_PROT( ctype, ch, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
conj_t conja, \ conj_t conja, \
pack_t schema, \ pack_t schema, \
@@ -125,7 +125,7 @@ BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \
#define PACKM_1ER_KER_PROT( ctype, ch, varname ) \ #define PACKM_1ER_KER_PROT( ctype, ch, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
conj_t conja, \ conj_t conja, \
pack_t schema, \ pack_t schema, \

View File

@@ -43,7 +43,7 @@
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* x, \ obj_t* x, \
obj_t* y \ obj_t* y \
@@ -100,7 +100,7 @@ GENFRONT( subm )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x, \ obj_t* x, \
@@ -168,7 +168,7 @@ GENFRONT( scal2m )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x \ obj_t* x \
@@ -243,7 +243,7 @@ GENFRONT( scalm )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x \ obj_t* x \
@@ -305,7 +305,7 @@ GENFRONT( setm )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* x, \ obj_t* x, \
obj_t* beta, \ obj_t* beta, \
@@ -375,7 +375,7 @@ GENFRONT( xpbym )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* x, \ obj_t* x, \
obj_t* beta, \ obj_t* beta, \

View File

@@ -43,7 +43,7 @@
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, auxker ) \ #define GENTFUNC( ctype, ch, opname, auxker ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(ch,opname,EX_SUF) \ void PASTEMAC2(ch,opname,EX_SUF) \
( \ ( \
doff_t diagoffx, \ doff_t diagoffx, \
diag_t diagx, \ diag_t diagx, \
@@ -108,7 +108,7 @@ INSERT_GENTFUNC_BASIC( subm, subd )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname ) \ #define GENTFUNC( ctype, ch, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(ch,opname,EX_SUF) \ void PASTEMAC2(ch,opname,EX_SUF) \
( \ ( \
doff_t diagoffx, \ doff_t diagoffx, \
diag_t diagx, \ diag_t diagx, \
@@ -177,7 +177,7 @@ INSERT_GENTFUNC_BASIC0( copym )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname ) \ #define GENTFUNC( ctype, ch, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(ch,opname,EX_SUF) \ void PASTEMAC2(ch,opname,EX_SUF) \
( \ ( \
doff_t diagoffx, \ doff_t diagoffx, \
diag_t diagx, \ diag_t diagx, \
@@ -247,7 +247,7 @@ INSERT_GENTFUNC_BASIC0( axpym )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname ) \ #define GENTFUNC( ctype, ch, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(ch,opname,EX_SUF) \ void PASTEMAC2(ch,opname,EX_SUF) \
( \ ( \
doff_t diagoffx, \ doff_t diagoffx, \
diag_t diagx, \ diag_t diagx, \
@@ -339,7 +339,7 @@ INSERT_GENTFUNC_BASIC0( scal2m )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname ) \ #define GENTFUNC( ctype, ch, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(ch,opname,EX_SUF) \ void PASTEMAC2(ch,opname,EX_SUF) \
( \ ( \
conj_t conjalpha, \ conj_t conjalpha, \
doff_t diagoffx, \ doff_t diagoffx, \
@@ -385,7 +385,7 @@ INSERT_GENTFUNC_BASIC0( setm )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname ) \ #define GENTFUNC( ctype, ch, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(ch,opname,EX_SUF) \ void PASTEMAC2(ch,opname,EX_SUF) \
( \ ( \
doff_t diagoffx, \ doff_t diagoffx, \
diag_t diagx, \ diag_t diagx, \
@@ -472,7 +472,7 @@ INSERT_GENTFUNC_BASIC0( xpbym )
#undef GENTFUNC2 #undef GENTFUNC2
#define GENTFUNC2( ctype_x, ctype_y, chx, chy, opname ) \ #define GENTFUNC2( ctype_x, ctype_y, chx, chy, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC3(chx,chy,opname,EX_SUF) \ void PASTEMAC3(chx,chy,opname,EX_SUF) \
( \ ( \
doff_t diagoffx, \ doff_t diagoffx, \
diag_t diagx, \ diag_t diagx, \

View File

@@ -41,7 +41,7 @@
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, kername, kerid ) \ #define GENTFUNC( ctype, ch, opname, kername, kerid ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
doff_t diagoffx, \ doff_t diagoffx, \
diag_t diagx, \ diag_t diagx, \
@@ -157,7 +157,7 @@ INSERT_GENTFUNC_BASIC2( subm_unb_var1, subv, BLIS_SUBV_KER )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, kername, kerid ) \ #define GENTFUNC( ctype, ch, opname, kername, kerid ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
doff_t diagoffx, \ doff_t diagoffx, \
diag_t diagx, \ diag_t diagx, \
@@ -276,7 +276,7 @@ INSERT_GENTFUNC_BASIC2( scal2m_unb_var1, scal2v, BLIS_SCAL2V_KER )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, kername, kerid ) \ #define GENTFUNC( ctype, ch, opname, kername, kerid ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
conj_t conjalpha, \ conj_t conjalpha, \
doff_t diagoffx, \ doff_t diagoffx, \
@@ -382,7 +382,7 @@ INSERT_GENTFUNC_BASIC2( setm_unb_var1, setv, BLIS_SETV_KER )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, kername, kerid ) \ #define GENTFUNC( ctype, ch, opname, kername, kerid ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
doff_t diagoffx, \ doff_t diagoffx, \
diag_t diagx, \ diag_t diagx, \
@@ -500,7 +500,7 @@ INSERT_GENTFUNC_BASIC2( xpbym_unb_var1, xpbyv, BLIS_XPBYV_KER )
#undef GENTFUNC2 #undef GENTFUNC2
#define GENTFUNC2( ctype_x, ctype_y, chx, chy, opname ) \ #define GENTFUNC2( ctype_x, ctype_y, chx, chy, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(chx,chy,opname) \ void PASTEMAC2(chx,chy,opname) \
( \ ( \
doff_t diagoffx, \ doff_t diagoffx, \
diag_t diagx, \ diag_t diagx, \

View File

@@ -33,7 +33,7 @@
*/ */
BLIS_EXPORT_BLIS cntl_t* bli_scalm_cntl_create_node cntl_t* bli_scalm_cntl_create_node
( (
void* var_func, void* var_func,
cntl_t* sub_node cntl_t* sub_node

View File

@@ -32,7 +32,7 @@
*/ */
BLIS_EXPORT_BLIS void bli_scalm_int( obj_t* alpha, void bli_scalm_int( obj_t* alpha,
obj_t* x, obj_t* x,
cntx_t* cntx, cntx_t* cntx,
scalm_t* cntl ); scalm_t* cntl );

View File

@@ -276,7 +276,7 @@ void bli_packm_blk_var1
#undef GENTFUNCR #undef GENTFUNCR
#define GENTFUNCR( ctype, ctype_r, ch, chr, opname, varname ) \ #define GENTFUNCR( ctype, ctype_r, ch, chr, opname, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffc, \ doff_t diagoffc, \

View File

@@ -57,7 +57,7 @@ typedef void (*FUNCPTR_T)(
static FUNCPTR_T GENARRAY2_ALL(ftypes,packm_blk_var1_md); static FUNCPTR_T GENARRAY2_ALL(ftypes,packm_blk_var1_md);
BLIS_EXPORT_BLIS void bli_packm_blk_var1_md void bli_packm_blk_var1_md
( (
obj_t* c, obj_t* c,
obj_t* p, obj_t* p,
@@ -164,7 +164,7 @@ BLIS_EXPORT_BLIS void bli_packm_blk_var1_md
#undef GENTFUNC2 #undef GENTFUNC2
#define GENTFUNC2( ctype_c, ctype_p, chc, chp, varname ) \ #define GENTFUNC2( ctype_c, ctype_p, chc, chp, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(chc,chp,varname) \ void PASTEMAC2(chc,chp,varname) \
( \ ( \
trans_t transc, \ trans_t transc, \
pack_t schema, \ pack_t schema, \

View File

@@ -32,7 +32,7 @@
*/ */
BLIS_EXPORT_BLIS void bli_packm_blk_var1_md void bli_packm_blk_var1_md
( (
obj_t* c, obj_t* c,
obj_t* p, obj_t* p,
@@ -45,7 +45,7 @@ BLIS_EXPORT_BLIS void bli_packm_blk_var1_md
#undef GENTPROT2 #undef GENTPROT2
#define GENTPROT2( ctype_c, ctype_p, chc, chp, varname ) \ #define GENTPROT2( ctype_c, ctype_p, chc, chp, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(chc,chp,varname) \ void PASTEMAC2(chc,chp,varname) \
( \ ( \
trans_t transc, \ trans_t transc, \
pack_t schema, \ pack_t schema, \

View File

@@ -35,7 +35,7 @@
#include "blis.h" #include "blis.h"
BLIS_EXPORT_BLIS void bli_packm_init_check void bli_packm_init_check
( (
obj_t* a, obj_t* a,
obj_t* p, obj_t* p,
@@ -57,7 +57,7 @@ BLIS_EXPORT_BLIS void bli_packm_init_check
//bli_check_error_code( e_val ); //bli_check_error_code( e_val );
} }
BLIS_EXPORT_BLIS void bli_packm_int_check void bli_packm_int_check
( (
obj_t* a, obj_t* a,
obj_t* p, obj_t* p,

View File

@@ -32,14 +32,14 @@
*/ */
BLIS_EXPORT_BLIS void bli_packm_init_check void bli_packm_init_check
( (
obj_t* a, obj_t* a,
obj_t* p, obj_t* p,
cntx_t* cntx cntx_t* cntx
); );
BLIS_EXPORT_BLIS void bli_packm_int_check void bli_packm_int_check
( (
obj_t* a, obj_t* a,
obj_t* p, obj_t* p,

View File

@@ -89,7 +89,7 @@ static packbuf_t bli_cntl_packm_params_pack_buf_type( cntl_t* cntl )
// ----------------------------------------------------------------------------- // -----------------------------------------------------------------------------
BLIS_EXPORT_BLIS cntl_t* bli_packm_cntl_create_node cntl_t* bli_packm_cntl_create_node
( (
rntm_t* rntm, rntm_t* rntm,
void* var_func, void* var_func,

View File

@@ -37,7 +37,7 @@
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname ) \ #define GENTFUNC( ctype, ch, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
conj_t conja, \ conj_t conja, \
dim_t panel_dim, \ dim_t panel_dim, \

View File

@@ -36,7 +36,7 @@
#undef GENTPROT #undef GENTPROT
#define GENTPROT( ctype, ch, varname ) \ #define GENTPROT( ctype, ch, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
conj_t conja, \ conj_t conja, \
dim_t panel_dim, \ dim_t panel_dim, \

View File

@@ -37,7 +37,7 @@
#undef GENTFUNCCO #undef GENTFUNCCO
#define GENTFUNCCO( ctype, ctype_r, ch, chr, opname ) \ #define GENTFUNCCO( ctype, ctype_r, ch, chr, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
conj_t conja, \ conj_t conja, \
pack_t schema, \ pack_t schema, \

View File

@@ -36,7 +36,7 @@
#undef GENTPROTCO #undef GENTPROTCO
#define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \ #define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
conj_t conja, \ conj_t conja, \
pack_t schema, \ pack_t schema, \

View File

@@ -37,7 +37,7 @@
#undef GENTFUNCCO #undef GENTFUNCCO
#define GENTFUNCCO( ctype, ctype_r, ch, chr, opname ) \ #define GENTFUNCCO( ctype, ctype_r, ch, chr, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
conj_t conja, \ conj_t conja, \
dim_t panel_dim, \ dim_t panel_dim, \

View File

@@ -36,7 +36,7 @@
#undef GENTPROTCO #undef GENTPROTCO
#define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \ #define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
conj_t conja, \ conj_t conja, \
dim_t panel_dim, \ dim_t panel_dim, \

View File

@@ -37,7 +37,7 @@
#undef GENTFUNCCO #undef GENTFUNCCO
#define GENTFUNCCO( ctype, ctype_r, ch, chr, opname ) \ #define GENTFUNCCO( ctype, ctype_r, ch, chr, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
conj_t conja, \ conj_t conja, \
dim_t panel_dim, \ dim_t panel_dim, \

View File

@@ -36,7 +36,7 @@
#undef GENTPROTCO #undef GENTPROTCO
#define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \ #define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
conj_t conja, \ conj_t conja, \
dim_t panel_dim, \ dim_t panel_dim, \

View File

@@ -37,7 +37,7 @@
#undef GENTFUNCCO #undef GENTFUNCCO
#define GENTFUNCCO( ctype, ctype_r, ch, chr, opname ) \ #define GENTFUNCCO( ctype, ctype_r, ch, chr, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
conj_t conja, \ conj_t conja, \
pack_t schema, \ pack_t schema, \

View File

@@ -36,7 +36,7 @@
#undef GENTPROTCO #undef GENTPROTCO
#define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \ #define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
conj_t conja, \ conj_t conja, \
pack_t schema, \ pack_t schema, \

View File

@@ -32,7 +32,7 @@
*/ */
BLIS_EXPORT_BLIS siz_t bli_packm_init siz_t bli_packm_init
( (
obj_t* a, obj_t* a,
obj_t* p, obj_t* p,
@@ -40,7 +40,7 @@ BLIS_EXPORT_BLIS siz_t bli_packm_init
cntl_t* cntl cntl_t* cntl
); );
BLIS_EXPORT_BLIS siz_t bli_packm_init_pack siz_t bli_packm_init_pack
( (
invdiag_t invert_diag, invdiag_t invert_diag,
pack_t schema, pack_t schema,

View File

@@ -34,7 +34,7 @@
#include "blis.h" #include "blis.h"
BLIS_EXPORT_BLIS void bli_packm_int void bli_packm_int
( (
obj_t* a, obj_t* a,
obj_t* p, obj_t* p,

View File

@@ -32,7 +32,7 @@
*/ */
BLIS_EXPORT_BLIS void bli_packm_int void bli_packm_int
( (
obj_t* a, obj_t* a,
obj_t* p, obj_t* p,

View File

@@ -38,7 +38,7 @@
// -- Matrix partitioning ------------------------------------------------------ // -- Matrix partitioning ------------------------------------------------------
BLIS_EXPORT_BLIS void bli_packm_acquire_mpart_t2b( subpart_t requested_part, void bli_packm_acquire_mpart_t2b( subpart_t requested_part,
dim_t i, dim_t i,
dim_t b, dim_t b,
obj_t* obj, obj_t* obj,
@@ -110,7 +110,7 @@ BLIS_EXPORT_BLIS void bli_packm_acquire_mpart_t2b( subpart_t requested_part,
BLIS_EXPORT_BLIS void bli_packm_acquire_mpart_l2r( subpart_t requested_part, void bli_packm_acquire_mpart_l2r( subpart_t requested_part,
dim_t j, dim_t j,
dim_t b, dim_t b,
obj_t* obj, obj_t* obj,
@@ -186,7 +186,7 @@ BLIS_EXPORT_BLIS void bli_packm_acquire_mpart_l2r( subpart_t requested_part,
BLIS_EXPORT_BLIS void bli_packm_acquire_mpart_tl2br( subpart_t requested_part, void bli_packm_acquire_mpart_tl2br( subpart_t requested_part,
dim_t ij, dim_t ij,
dim_t b, dim_t b,
obj_t* obj, obj_t* obj,

View File

@@ -34,23 +34,23 @@
// -- Matrix partitioning ------------------------------------------------------ // -- Matrix partitioning ------------------------------------------------------
BLIS_EXPORT_BLIS void bli_packm_acquire_mpart_t2b( subpart_t requested_part, void bli_packm_acquire_mpart_t2b( subpart_t requested_part,
dim_t i, dim_t i,
dim_t b, dim_t b,
obj_t* obj, obj_t* obj,
obj_t* sub_obj ); obj_t* sub_obj );
BLIS_EXPORT_BLIS void bli_packm_acquire_mpart_l2r( subpart_t requested_part, void bli_packm_acquire_mpart_l2r( subpart_t requested_part,
dim_t j, dim_t j,
dim_t b, dim_t b,
obj_t* obj, obj_t* obj,
obj_t* sub_obj ); obj_t* sub_obj );
BLIS_EXPORT_BLIS void bli_packm_acquire_mpart_tl2br( subpart_t requested_part, void bli_packm_acquire_mpart_tl2br( subpart_t requested_part,
dim_t ij, dim_t ij,
dim_t b, dim_t b,
obj_t* obj, obj_t* obj,
obj_t* sub_obj ); obj_t* sub_obj );
BLIS_EXPORT_BLIS dim_t bli_packm_offset_to_panel_for( dim_t offmn, obj_t* p ); dim_t bli_packm_offset_to_panel_for( dim_t offmn, obj_t* p );

View File

@@ -37,7 +37,7 @@
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, varname, kername ) \ #define GENTFUNC( ctype, ch, varname, kername ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffc, \ doff_t diagoffc, \
@@ -278,7 +278,7 @@ INSERT_GENTFUNC_BASIC( packm_struc_cxk, packm_cxk )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, varname, kername ) \ #define GENTFUNC( ctype, ch, varname, kername ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffc, \ doff_t diagoffc, \
@@ -532,7 +532,7 @@ INSERT_GENTFUNC_BASIC( packm_herm_cxk, packm_cxk )
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, varname, kername ) \ #define GENTFUNC( ctype, ch, varname, kername ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffp, \ doff_t diagoffp, \

View File

@@ -35,7 +35,7 @@
#undef GENTPROT #undef GENTPROT
#define GENTPROT( ctype, ch, varname ) \ #define GENTPROT( ctype, ch, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffp, \ doff_t diagoffp, \
@@ -62,7 +62,7 @@ INSERT_GENTPROT_BASIC0( packm_struc_cxk )
#undef GENTPROT #undef GENTPROT
#define GENTPROT( ctype, ch, varname ) \ #define GENTPROT( ctype, ch, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffc, \ doff_t diagoffc, \
@@ -92,7 +92,7 @@ INSERT_GENTPROT_BASIC0( packm_herm_cxk )
#undef GENTPROT #undef GENTPROT
#define GENTPROT( ctype, ch, varname ) \ #define GENTPROT( ctype, ch, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffc, \ doff_t diagoffc, \

View File

@@ -37,7 +37,7 @@
#undef GENTFUNCCO #undef GENTFUNCCO
#define GENTFUNCCO( ctype, ctype_r, ch, chr, varname, kername ) \ #define GENTFUNCCO( ctype, ctype_r, ch, chr, varname, kername ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffc, \ doff_t diagoffc, \
@@ -274,7 +274,7 @@ INSERT_GENTFUNCCO_BASIC( packm_struc_cxk_1er, packm_cxk_1er )
#undef GENTFUNCCO #undef GENTFUNCCO
#define GENTFUNCCO( ctype, ctype_r, ch, chr, varname, kername ) \ #define GENTFUNCCO( ctype, ctype_r, ch, chr, varname, kername ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffc, \ doff_t diagoffc, \
@@ -520,7 +520,7 @@ INSERT_GENTFUNCCO_BASIC( packm_herm_cxk_1er, packm_cxk_1er )
#undef GENTFUNCCO #undef GENTFUNCCO
#define GENTFUNCCO( ctype, ctype_r, ch, chr, varname, kername ) \ #define GENTFUNCCO( ctype, ctype_r, ch, chr, varname, kername ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffp, \ doff_t diagoffp, \

View File

@@ -35,7 +35,7 @@
#undef GENTPROTCO #undef GENTPROTCO
#define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \ #define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffp, \ doff_t diagoffp, \
@@ -62,7 +62,7 @@ INSERT_GENTPROTCO_BASIC0( packm_struc_cxk_1er )
#undef GENTPROTCO #undef GENTPROTCO
#define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \ #define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffc, \ doff_t diagoffc, \
@@ -92,7 +92,7 @@ INSERT_GENTPROTCO_BASIC0( packm_herm_cxk_1er )
#undef GENTPROTCO #undef GENTPROTCO
#define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \ #define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffc, \ doff_t diagoffc, \

View File

@@ -37,7 +37,7 @@
#undef GENTFUNCCO #undef GENTFUNCCO
#define GENTFUNCCO( ctype, ctype_r, ch, chr, varname, kername ) \ #define GENTFUNCCO( ctype, ctype_r, ch, chr, varname, kername ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffc, \ doff_t diagoffc, \
@@ -338,7 +338,7 @@ INSERT_GENTFUNCCO_BASIC( packm_struc_cxk_3mis, packm_cxk_3mis )
#undef GENTFUNCCO #undef GENTFUNCCO
#define GENTFUNCCO( ctype, ctype_r, ch, chr, varname, kername ) \ #define GENTFUNCCO( ctype, ctype_r, ch, chr, varname, kername ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffc, \ doff_t diagoffc, \
@@ -657,7 +657,7 @@ INSERT_GENTFUNCCO_BASIC( packm_herm_cxk_3mis, packm_cxk_3mis )
#undef GENTFUNCCO #undef GENTFUNCCO
#define GENTFUNCCO( ctype, ctype_r, ch, chr, varname, kername ) \ #define GENTFUNCCO( ctype, ctype_r, ch, chr, varname, kername ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffp, \ doff_t diagoffp, \

View File

@@ -35,7 +35,7 @@
#undef GENTPROTCO #undef GENTPROTCO
#define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \ #define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffp, \ doff_t diagoffp, \
@@ -62,7 +62,7 @@ INSERT_GENTPROTCO_BASIC0( packm_struc_cxk_3mis )
#undef GENTPROTCO #undef GENTPROTCO
#define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \ #define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffc, \ doff_t diagoffc, \
@@ -92,7 +92,7 @@ INSERT_GENTPROTCO_BASIC0( packm_herm_cxk_3mis )
#undef GENTPROTCO #undef GENTPROTCO
#define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \ #define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffc, \ doff_t diagoffc, \

View File

@@ -37,7 +37,7 @@
#undef GENTFUNCCO #undef GENTFUNCCO
#define GENTFUNCCO( ctype, ctype_r, ch, chr, varname, kername ) \ #define GENTFUNCCO( ctype, ctype_r, ch, chr, varname, kername ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffc, \ doff_t diagoffc, \
@@ -308,7 +308,7 @@ INSERT_GENTFUNCCO_BASIC( packm_struc_cxk_4mi, packm_cxk_4mi )
#undef GENTFUNCCO #undef GENTFUNCCO
#define GENTFUNCCO( ctype, ctype_r, ch, chr, varname, kername ) \ #define GENTFUNCCO( ctype, ctype_r, ch, chr, varname, kername ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffc, \ doff_t diagoffc, \
@@ -612,7 +612,7 @@ INSERT_GENTFUNCCO_BASIC( packm_herm_cxk_4mi, packm_cxk_4mi )
#undef GENTFUNCCO #undef GENTFUNCCO
#define GENTFUNCCO( ctype, ctype_r, ch, chr, varname, kername ) \ #define GENTFUNCCO( ctype, ctype_r, ch, chr, varname, kername ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffp, \ doff_t diagoffp, \

View File

@@ -35,7 +35,7 @@
#undef GENTPROTCO #undef GENTPROTCO
#define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \ #define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffp, \ doff_t diagoffp, \
@@ -62,7 +62,7 @@ INSERT_GENTPROTCO_BASIC0( packm_struc_cxk_4mi )
#undef GENTPROTCO #undef GENTPROTCO
#define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \ #define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffc, \ doff_t diagoffc, \
@@ -92,7 +92,7 @@ INSERT_GENTPROTCO_BASIC0( packm_herm_cxk_4mi )
#undef GENTPROTCO #undef GENTPROTCO
#define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \ #define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffc, \ doff_t diagoffc, \

View File

@@ -39,7 +39,7 @@
#undef GENTFUNC2 #undef GENTFUNC2
#define GENTFUNC2( ctype_c, ctype_p, chc, chp, varname ) \ #define GENTFUNC2( ctype_c, ctype_p, chc, chp, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(chc,chp,varname) \ void PASTEMAC2(chc,chp,varname) \
( \ ( \
conj_t conjc, \ conj_t conjc, \
pack_t schema, \ pack_t schema, \
@@ -313,7 +313,7 @@ INSERT_GENTFUNC2_MIXDP0( packm_struc_cxk_md )
#undef GENTFUNC2 #undef GENTFUNC2
#define GENTFUNC2( ctype_a, ctype_p, cha, chp, opname ) \ #define GENTFUNC2( ctype_a, ctype_p, cha, chp, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(cha,chp,opname) \ void PASTEMAC2(cha,chp,opname) \
( \ ( \
conj_t conja, \ conj_t conja, \
dim_t m, \ dim_t m, \
@@ -440,7 +440,7 @@ INSERT_GENTFUNC2_MIXDP0( packm_cxk_1r_md )
#undef GENTFUNC2 #undef GENTFUNC2
#define GENTFUNC2( ctype_a, ctype_p, cha, chp, opname ) \ #define GENTFUNC2( ctype_a, ctype_p, cha, chp, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(cha,chp,opname) \ void PASTEMAC2(cha,chp,opname) \
( \ ( \
conj_t conja, \ conj_t conja, \
dim_t m, \ dim_t m, \

View File

@@ -35,7 +35,7 @@
#undef GENTPROT2 #undef GENTPROT2
#define GENTPROT2( ctype_c, ctype_p, chc, chp, varname ) \ #define GENTPROT2( ctype_c, ctype_p, chc, chp, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(chc,chp,varname) \ void PASTEMAC2(chc,chp,varname) \
( \ ( \
conj_t conjc, \ conj_t conjc, \
pack_t schema, \ pack_t schema, \
@@ -57,7 +57,7 @@ INSERT_GENTPROT2_MIXDP0( packm_struc_cxk_md )
#undef GENTPROT2 #undef GENTPROT2
#define GENTPROT2( ctype_a, ctype_p, cha, chp, opname ) \ #define GENTPROT2( ctype_a, ctype_p, cha, chp, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC2(cha,chp,opname) \ void PASTEMAC2(cha,chp,opname) \
( \ ( \
conj_t conja, \ conj_t conja, \
dim_t m, \ dim_t m, \

View File

@@ -37,7 +37,7 @@
#undef GENTFUNCCO #undef GENTFUNCCO
#define GENTFUNCCO( ctype, ctype_r, ch, chr, varname, kername ) \ #define GENTFUNCCO( ctype, ctype_r, ch, chr, varname, kername ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffc, \ doff_t diagoffc, \
@@ -269,7 +269,7 @@ INSERT_GENTFUNCCO_BASIC( packm_struc_cxk_rih, packm_cxk_rih )
#undef GENTFUNCCO #undef GENTFUNCCO
#define GENTFUNCCO( ctype, ctype_r, ch, chr, varname, kername ) \ #define GENTFUNCCO( ctype, ctype_r, ch, chr, varname, kername ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffc, \ doff_t diagoffc, \
@@ -522,7 +522,7 @@ INSERT_GENTFUNCCO_BASIC( packm_herm_cxk_rih, packm_cxk_rih )
#undef GENTFUNCCO #undef GENTFUNCCO
#define GENTFUNCCO( ctype, ctype_r, ch, chr, varname, kername ) \ #define GENTFUNCCO( ctype, ctype_r, ch, chr, varname, kername ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffp, \ doff_t diagoffp, \

View File

@@ -35,7 +35,7 @@
#undef GENTPROTCO #undef GENTPROTCO
#define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \ #define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffp, \ doff_t diagoffp, \
@@ -62,7 +62,7 @@ INSERT_GENTPROTCO_BASIC0( packm_struc_cxk_rih )
#undef GENTPROTCO #undef GENTPROTCO
#define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \ #define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffc, \ doff_t diagoffc, \
@@ -92,7 +92,7 @@ INSERT_GENTPROTCO_BASIC0( packm_herm_cxk_rih )
#undef GENTPROTCO #undef GENTPROTCO
#define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \ #define GENTPROTCO( ctype, ctype_r, ch, chr, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffc, \ doff_t diagoffc, \

View File

@@ -35,7 +35,7 @@
#include "blis.h" #include "blis.h"
BLIS_EXPORT_BLIS void bli_packm_thrinfo_init void bli_packm_thrinfo_init
( (
thrinfo_t* thread, thrinfo_t* thread,
thrcomm_t* ocomm, thrcomm_t* ocomm,
@@ -57,7 +57,7 @@ BLIS_EXPORT_BLIS void bli_packm_thrinfo_init
); );
} }
BLIS_EXPORT_BLIS void bli_packm_thrinfo_init_single void bli_packm_thrinfo_init_single
( (
thrinfo_t* thread thrinfo_t* thread
) )

View File

@@ -70,7 +70,7 @@
// //
#if 0 #if 0
BLIS_EXPORT_BLIS thrinfo_t* bli_packm_thrinfo_create thrinfo_t* bli_packm_thrinfo_create
( (
thrcomm_t* ocomm, thrcomm_t* ocomm,
dim_t ocomm_id, dim_t ocomm_id,
@@ -80,7 +80,7 @@ BLIS_EXPORT_BLIS thrinfo_t* bli_packm_thrinfo_create
); );
#endif #endif
BLIS_EXPORT_BLIS void bli_packm_thrinfo_init void bli_packm_thrinfo_init
( (
thrinfo_t* thread, thrinfo_t* thread,
thrcomm_t* ocomm, thrcomm_t* ocomm,
@@ -91,13 +91,13 @@ BLIS_EXPORT_BLIS void bli_packm_thrinfo_init
thrinfo_t* sub_node thrinfo_t* sub_node
); );
BLIS_EXPORT_BLIS void bli_packm_thrinfo_init_single void bli_packm_thrinfo_init_single
( (
thrinfo_t* thread thrinfo_t* thread
); );
#if 0 #if 0
BLIS_EXPORT_BLIS void bli_packm_thrinfo_free void bli_packm_thrinfo_free
( (
thrinfo_t* thread thrinfo_t* thread
); );

View File

@@ -125,7 +125,7 @@ void bli_packm_unb_var1
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, varname ) \ #define GENTFUNC( ctype, ch, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffc, \ doff_t diagoffc, \

View File

@@ -32,7 +32,7 @@
*/ */
BLIS_EXPORT_BLIS void bli_packm_unb_var1 void bli_packm_unb_var1
( (
obj_t* c, obj_t* c,
obj_t* p, obj_t* p,
@@ -45,7 +45,7 @@ BLIS_EXPORT_BLIS void bli_packm_unb_var1
#undef GENTPROT #undef GENTPROT
#define GENTPROT( ctype, ch, varname ) \ #define GENTPROT( ctype, ch, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffc, \ doff_t diagoffc, \

View File

@@ -40,7 +40,7 @@
#undef GENPROT #undef GENPROT
#define GENPROT( opname ) \ #define GENPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC0(opname) \ void PASTEMAC0(opname) \
( \ ( \
obj_t* c, \ obj_t* c, \
obj_t* p, \ obj_t* p, \
@@ -59,7 +59,7 @@ GENPROT( packm_blk_var1 )
#undef GENTPROT #undef GENTPROT
#define GENTPROT( ctype, ch, varname ) \ #define GENTPROT( ctype, ch, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffc, \ doff_t diagoffc, \
@@ -81,7 +81,7 @@ INSERT_GENTPROT_BASIC0( packm_unb_var1 )
#undef GENTPROT #undef GENTPROT
#define GENTPROT( ctype, ch, varname ) \ #define GENTPROT( ctype, ch, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffc, \ doff_t diagoffc, \

View File

@@ -55,7 +55,7 @@ typedef void (*FUNCPTR_T)(
static FUNCPTR_T GENARRAY(ftypes,unpackm_blk_var1); static FUNCPTR_T GENARRAY(ftypes,unpackm_blk_var1);
BLIS_EXPORT_BLIS void bli_unpackm_blk_var1 void bli_unpackm_blk_var1
( (
obj_t* p, obj_t* p,
obj_t* c, obj_t* c,
@@ -126,7 +126,7 @@ BLIS_EXPORT_BLIS void bli_unpackm_blk_var1
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, varname ) \ #define GENTFUNC( ctype, ch, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffc, \ doff_t diagoffc, \

View File

@@ -32,7 +32,7 @@
*/ */
BLIS_EXPORT_BLIS void bli_unpackm_blk_var1 void bli_unpackm_blk_var1
( (
obj_t* p, obj_t* p,
obj_t* c, obj_t* c,
@@ -45,7 +45,7 @@ BLIS_EXPORT_BLIS void bli_unpackm_blk_var1
#undef GENTPROT #undef GENTPROT
#define GENTPROT( ctype, ch, varname ) \ #define GENTPROT( ctype, ch, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
struc_t strucc, \ struc_t strucc, \
doff_t diagoffc, \ doff_t diagoffc, \

View File

@@ -34,7 +34,7 @@
#include "blis.h" #include "blis.h"
BLIS_EXPORT_BLIS void bli_unpackm_int_check void bli_unpackm_int_check
( (
obj_t* p, obj_t* p,
obj_t* a, obj_t* a,

View File

@@ -32,7 +32,7 @@
*/ */
BLIS_EXPORT_BLIS void bli_unpackm_int_check void bli_unpackm_int_check
( (
obj_t* p, obj_t* p,
obj_t* a, obj_t* a,

View File

@@ -46,7 +46,7 @@ typedef struct unpackm_params_s unpackm_params_t;
// ----------------------------------------------------------------------------- // -----------------------------------------------------------------------------
BLIS_EXPORT_BLIS cntl_t* bli_unpackm_cntl_create_node cntl_t* bli_unpackm_cntl_create_node
( (
rntm_t* rntm, rntm_t* rntm,
void* var_func, void* var_func,

View File

@@ -37,7 +37,7 @@
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname ) \ #define GENTFUNC( ctype, ch, opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,opname) \ void PASTEMAC(ch,opname) \
( \ ( \
conj_t conjp, \ conj_t conjp, \
dim_t panel_dim, \ dim_t panel_dim, \

View File

@@ -36,7 +36,7 @@
#undef GENTPROT #undef GENTPROT
#define GENTPROT( ctype, ch, varname ) \ #define GENTPROT( ctype, ch, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
conj_t conjp, \ conj_t conjp, \
dim_t panel_dim, \ dim_t panel_dim, \

View File

@@ -34,7 +34,7 @@
#include "blis.h" #include "blis.h"
BLIS_EXPORT_BLIS void bli_unpackm_int void bli_unpackm_int
( (
obj_t* p, obj_t* p,
obj_t* a, obj_t* a,

View File

@@ -32,7 +32,7 @@
*/ */
BLIS_EXPORT_BLIS void bli_unpackm_int void bli_unpackm_int
( (
obj_t* p, obj_t* p,
obj_t* a, obj_t* a,

View File

@@ -50,7 +50,7 @@ typedef void (*FUNCPTR_T)(
static FUNCPTR_T GENARRAY(ftypes,unpackm_unb_var1); static FUNCPTR_T GENARRAY(ftypes,unpackm_unb_var1);
BLIS_EXPORT_BLIS void bli_unpackm_unb_var1 void bli_unpackm_unb_var1
( (
obj_t* p, obj_t* p,
obj_t* c, obj_t* c,
@@ -98,7 +98,7 @@ BLIS_EXPORT_BLIS void bli_unpackm_unb_var1
#undef GENTFUNC #undef GENTFUNC
#define GENTFUNC( ctype, ch, opname, varname ) \ #define GENTFUNC( ctype, ch, opname, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname)( \ void PASTEMAC(ch,varname)( \
doff_t diagoffp, \ doff_t diagoffp, \
uplo_t uplop, \ uplo_t uplop, \
trans_t transp, \ trans_t transp, \

View File

@@ -32,7 +32,7 @@
*/ */
BLIS_EXPORT_BLIS void bli_unpackm_unb_var1 void bli_unpackm_unb_var1
( (
obj_t* p, obj_t* p,
obj_t* c, obj_t* c,
@@ -44,7 +44,7 @@ BLIS_EXPORT_BLIS void bli_unpackm_unb_var1
#undef GENTPROT #undef GENTPROT
#define GENTPROT( ctype, ch, varname ) \ #define GENTPROT( ctype, ch, varname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(ch,varname) \ void PASTEMAC(ch,varname) \
( \ ( \
doff_t diagoffp, \ doff_t diagoffp, \
uplo_t uplop, \ uplo_t uplop, \

View File

@@ -40,7 +40,7 @@
#undef GENPROT #undef GENPROT
#define GENPROT( opname ) \ #define GENPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* a, \ obj_t* a, \
@@ -57,7 +57,7 @@ GENPROT( symv )
#undef GENPROT #undef GENPROT
#define GENPROT( opname ) \ #define GENPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x, \ obj_t* x, \
@@ -73,7 +73,7 @@ GENPROT( syr2 )
#undef GENPROT #undef GENPROT
#define GENPROT( opname ) \ #define GENPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x, \ obj_t* x, \
@@ -87,7 +87,7 @@ GENPROT( syr )
#undef GENPROT #undef GENPROT
#define GENPROT( opname ) \ #define GENPROT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,_check) \ void PASTEMAC(opname,_check) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* a, \ obj_t* a, \
@@ -100,7 +100,7 @@ GENPROT( trsv )
// ----------------------------------------------------------------------------- // -----------------------------------------------------------------------------
BLIS_EXPORT_BLIS void bli_xxmv_check void bli_xxmv_check
( (
obj_t* alpha, obj_t* alpha,
obj_t* a, obj_t* a,
@@ -109,7 +109,7 @@ BLIS_EXPORT_BLIS void bli_xxmv_check
obj_t* y obj_t* y
); );
BLIS_EXPORT_BLIS void bli_xxr_check void bli_xxr_check
( (
obj_t* alpha, obj_t* alpha,
obj_t* x, obj_t* x,

View File

@@ -40,7 +40,7 @@
#define GENPROT( opname ) \ #define GENPROT( opname ) \
\ \
PASTECH2(opname,BLIS_TAPI_EX_SUF,_vft) \ PASTECH2(opname,BLIS_TAPI_EX_SUF,_vft) \
BLIS_EXPORT_BLIS PASTEMAC2(opname,BLIS_TAPI_EX_SUF,_qfp)( num_t dt ); PASTEMAC2(opname,BLIS_TAPI_EX_SUF,_qfp)( num_t dt );
GENPROT( gemv ) GENPROT( gemv )
GENPROT( ger ) GENPROT( ger )
@@ -61,7 +61,7 @@ GENPROT( trsv )
#define GENPROT( opname, varname ) \ #define GENPROT( opname, varname ) \
\ \
PASTECH2(opname,_unb,_vft) \ PASTECH2(opname,_unb,_vft) \
BLIS_EXPORT_BLIS PASTEMAC(varname,_qfp)( num_t dt ); PASTEMAC(varname,_qfp)( num_t dt );
GENPROT( gemv, gemv_unb_var1 ) GENPROT( gemv, gemv_unb_var1 )
GENPROT( gemv, gemv_unb_var2 ) GENPROT( gemv, gemv_unb_var2 )

View File

@@ -43,7 +43,7 @@
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* a, \ obj_t* a, \
@@ -116,7 +116,7 @@ GENFRONT( gemv )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x, \ obj_t* x, \
@@ -182,7 +182,7 @@ GENFRONT( ger )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* a, \ obj_t* a, \
@@ -256,7 +256,7 @@ GENFRONT( symv )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x, \ obj_t* x, \
@@ -317,7 +317,7 @@ GENFRONT( syr )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* x, \ obj_t* x, \
@@ -384,7 +384,7 @@ GENFRONT( syr2 )
#undef GENFRONT #undef GENFRONT
#define GENFRONT( opname ) \ #define GENFRONT( opname ) \
\ \
BLIS_EXPORT_BLIS void PASTEMAC(opname,EX_SUF) \ void PASTEMAC(opname,EX_SUF) \
( \ ( \
obj_t* alpha, \ obj_t* alpha, \
obj_t* a, \ obj_t* a, \

Some files were not shown because too many files have changed in this diff Show More