Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Jump to bottom

Use preprocessor in traditional mode #1383

Closed
wants to merge 1 commit into from
Closed

Use preprocessor in traditional mode #1383

Changes from all commits
Commits
Show all changes
1 commit
Select commit
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
337 changes: 171 additions & 166 deletions runtime/flang/mmul_dir.h
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -7,175 +7,180 @@

! directives.h -- contains preprocessor directives for F90 rte files

#define PREFIX(x) f90##x
#define _PREFIX(x) _f90##x
! This file was using
!
! #define f90x f90##x
! #define _f90x _f90##x
!
! which is cool and good loooking, but unfortunately is not a *traditional*
! preprocessor, which Fortran compiler is supposed to use.

#ifdef DESC_I8
#define DESC_INT INTEGER(8)
#define F90_matmul_cplx16_contmxm PREFIX(_mm_cplx16_contmxm_i8)
#define F90_matmul_cplx16_contmxv PREFIX(_mm_cplx16_contmxv_i8)
#define F90_matmul_cplx16_contvxm PREFIX(_mm_cplx16_contvxm_i8)
#define F90_matmul_cplx16_str1 PREFIX(_mm_cplx16_str1_i8)
#define F90_matmul_cplx16_str1_mxv PREFIX(_mm_cplx16_str1_mxv_i8)
#define F90_matmul_cplx16_str1_mxv_t PREFIX(_mm_cplx16_str1_mxv_t_i8)
#define F90_matmul_cplx16_str1_vxm PREFIX(_mm_cplx16_str1_vxm_i8)
#define F90_matmul_cplx32_contmxm PREFIX(_mm_cplx32_contmxm_i8)
#define F90_matmul_cplx32_contmxv PREFIX(_mm_cplx32_contmxv_i8)
#define F90_matmul_cplx32_contvxm PREFIX(_mm_cplx32_contvxm_i8)
#define F90_matmul_cplx32_str1 PREFIX(_mm_cplx32_str1_i8)
#define F90_matmul_cplx32_str1_mxv PREFIX(_mm_cplx32_str1_mxv_i8)
#define F90_matmul_cplx8_contmxm PREFIX(_mm_cplx8_contmxm_i8)
#define F90_matmul_cplx8_contmxv PREFIX(_mm_cplx8_contmxv_i8)
#define F90_matmul_cplx8_contvxm PREFIX(_mm_cplx8_contvxm_i8)
#define F90_matmul_cplx8_str1 PREFIX(_mm_cplx8_str1_i8)
#define F90_matmul_cplx8_str1_mxv PREFIX(_mm_cplx8_str1_mxv_i8)
#define F90_matmul_cplx8_str1_mxv_t PREFIX(_mm_cplx8_str1_mxv_t_i8)
#define F90_matmul_cplx8_str1_t PREFIX(_mm_cplx8_str1_t_i8)
#define F90_matmul_cplx8_str1_vxm PREFIX(_mm_cplx8_str1_vxm_i8)
#define F90_matmul_int1_contmxm PREFIX(_mm_int1_contmxm_i8)
#define F90_matmul_int1_contmxv PREFIX(_mm_int1_contmxv_i8)
#define F90_matmul_int1_contvxm PREFIX(_mm_int1_contvxm_i8)
#define F90_matmul_int1_str1 PREFIX(_mm_int1_str1_i8)
#define F90_matmul_int1_str1_mxv PREFIX(_mm_int1_str1_mxv_i8)
#define F90_matmul_int1_str1_vxm PREFIX(_mm_int1_str1_vxm_i8)
#define F90_matmul_int2_contmxm PREFIX(_mm_int2_contmxm_i8)
#define F90_matmul_int2_contmxv PREFIX(_mm_int2_contmxv_i8)
#define F90_matmul_int2_contvxm PREFIX(_mm_int2_contvxm_i8)
#define F90_matmul_int2_str1 PREFIX(_mm_int2_str1_i8)
#define F90_matmul_int2_str1_mxv PREFIX(_mm_int2_str1_mxv_i8)
#define F90_matmul_int2_str1_vxm PREFIX(_mm_int2_str1_vxm_i8)
#define F90_matmul_int4_contmxm PREFIX(_mm_int4_contmxm_i8)
#define F90_matmul_int4_contmxv PREFIX(_mm_int4_contmxv_i8)
#define F90_matmul_int4_contvxm PREFIX(_mm_int4_contvxm_i8)
#define F90_matmul_int4_str1 PREFIX(_mm_int4_str1_i8)
#define F90_matmul_int4_str1_mxv PREFIX(_mm_int4_str1_mxv_i8)
#define F90_matmul_int4_str1_vxm PREFIX(_mm_int4_str1_vxm_i8)
#define F90_matmul_int8_contmxm PREFIX(_mm_int8_contmxm_i8)
#define F90_matmul_int8_contmxv PREFIX(_mm_int8_contmxv_i8)
#define F90_matmul_int8_contvxm PREFIX(_mm_int8_contvxm_i8)
#define F90_matmul_int8_str1 PREFIX(_mm_int8_str1_i8)
#define F90_matmul_int8_str1_mxv PREFIX(_mm_int8_str1_mxv_i8)
#define F90_matmul_int8_str1_vxm PREFIX(_mm_int8_str1_vxm_i8)
#define F90_matmul_log1_contmxm PREFIX(_mm_log1_contmxm_i8)
#define F90_matmul_log1_contmxv PREFIX(_mm_log1_contmxv_i8)
#define F90_matmul_log1_contvxm PREFIX(_mm_log1_contvxm_i8)
#define F90_matmul_log2_contmxm PREFIX(_mm_log2_contmxm_i8)
#define F90_matmul_log2_contmxv PREFIX(_mm_log2_contmxv_i8)
#define F90_matmul_log2_contvxm PREFIX(_mm_log2_contvxm_i8)
#define F90_matmul_log4_contmxm PREFIX(_mm_log4_contmxm_i8)
#define F90_matmul_log4_contmxv PREFIX(_mm_log4_contmxv_i8)
#define F90_matmul_log4_contvxm PREFIX(_mm_log4_contvxm_i8)
#define F90_matmul_log8_contmxm PREFIX(_mm_log8_contmxm_i8)
#define F90_matmul_log8_contmxv PREFIX(_mm_log8_contmxv_i8)
#define F90_matmul_log8_contvxm PREFIX(_mm_log8_contvxm_i8)
#define F90_matmul_real16_contmxm PREFIX(_mm_real16_contmxm_i8)
#define F90_matmul_real16_contmxv PREFIX(_mm_real16_contmxv_i8)
#define F90_matmul_real16_contvxm PREFIX(_mm_real16_contvxm_i8)
#define F90_matmul_real16_str1 PREFIX(_mm_real16_str1_i8)
#define _F90_matmul_real16_str1a _PREFIX(_mm_real16_str1a_i8)
#define F90_matmul_real16_str1_mxv PREFIX(_mm_real16_str1_mxv_i8)
#define F90_matmul_real16_str1_mxv_t PREFIX(_mm_real16_str1_mxv_t_i8)
#define F90_matmul_real16_str1_vxm PREFIX(_mm_real16_str1_vxm_i8)
#define F90_matmul_real4_contmxm PREFIX(_mm_real4_contmxm_i8)
#define F90_matmul_real4_contmxv PREFIX(_mm_real4_contmxv_i8)
#define F90_matmul_real4_contvxm PREFIX(_mm_real4_contvxm_i8)
#define F90_matmul_real4_str1 PREFIX(_mm_real4_str1_i8)
#define F90_matmul_real4_str1_mxv PREFIX(_mm_real4_str1_mxv_i8)
#define F90_matmul_real4_str1_mxv_t PREFIX(_mm_real4_str1_mxv_t_i8)
#define F90_matmul_real4_str1_t PREFIX(_mm_real4_str1_t_i8)
#define F90_matmul_real4_str1_vxm PREFIX(_mm_real4_str1_vxm_i8)
#define F90_matmul_real8_contmxm PREFIX(_mm_real8_contmxm_i8)
#define F90_matmul_real8_contmxv PREFIX(_mm_real8_contmxv_i8)
#define F90_matmul_real8_contvxm PREFIX(_mm_real8_contvxm_i8)
#define F90_matmul_real8_str1 PREFIX(_mm_real8_str1_i8)
#define _F90_matmul_real8_str1a _PREFIX(_mm_real8_str1a_i8)
#define _F90_matmul_real8_str1b _PREFIX(_mm_real8_str1b_i8)
#define _F90_matmul_real8_str1c _PREFIX(_mm_real8_str1c_i8)
#define F90_matmul_real8_str1_mxv PREFIX(_mm_real8_str1_mxv_i8)
#define F90_matmul_real8_str1_mxv_t PREFIX(_mm_real8_str1_mxv_t_i8)
#define F90_matmul_real8_str1_vxm PREFIX(_mm_real8_str1_vxm_i8)
#define F90_matmul_cplx16_contmxm f90_mm_cplx16_contmxm_i8
#define F90_matmul_cplx16_contmxv f90_mm_cplx16_contmxv_i8
#define F90_matmul_cplx16_contvxm f90_mm_cplx16_contvxm_i8
#define F90_matmul_cplx16_str1 f90_mm_cplx16_str1_i8
#define F90_matmul_cplx16_str1_mxv f90_mm_cplx16_str1_mxv_i8
#define F90_matmul_cplx16_str1_mxv_t f90_mm_cplx16_str1_mxv_t_i8
#define F90_matmul_cplx16_str1_vxm f90_mm_cplx16_str1_vxm_i8
#define F90_matmul_cplx32_contmxm f90_mm_cplx32_contmxm_i8
#define F90_matmul_cplx32_contmxv f90_mm_cplx32_contmxv_i8
#define F90_matmul_cplx32_contvxm f90_mm_cplx32_contvxm_i8
#define F90_matmul_cplx32_str1 f90_mm_cplx32_str1_i8
#define F90_matmul_cplx32_str1_mxv f90_mm_cplx32_str1_mxv_i8
#define F90_matmul_cplx8_contmxm f90_mm_cplx8_contmxm_i8
#define F90_matmul_cplx8_contmxv f90_mm_cplx8_contmxv_i8
#define F90_matmul_cplx8_contvxm f90_mm_cplx8_contvxm_i8
#define F90_matmul_cplx8_str1 f90_mm_cplx8_str1_i8
#define F90_matmul_cplx8_str1_mxv f90_mm_cplx8_str1_mxv_i8
#define F90_matmul_cplx8_str1_mxv_t f90_mm_cplx8_str1_mxv_t_i8
#define F90_matmul_cplx8_str1_t f90_mm_cplx8_str1_t_i8
#define F90_matmul_cplx8_str1_vxm f90_mm_cplx8_str1_vxm_i8
#define F90_matmul_int1_contmxm f90_mm_int1_contmxm_i8
#define F90_matmul_int1_contmxv f90_mm_int1_contmxv_i8
#define F90_matmul_int1_contvxm f90_mm_int1_contvxm_i8
#define F90_matmul_int1_str1 f90_mm_int1_str1_i8
#define F90_matmul_int1_str1_mxv f90_mm_int1_str1_mxv_i8
#define F90_matmul_int1_str1_vxm f90_mm_int1_str1_vxm_i8
#define F90_matmul_int2_contmxm f90_mm_int2_contmxm_i8
#define F90_matmul_int2_contmxv f90_mm_int2_contmxv_i8
#define F90_matmul_int2_contvxm f90_mm_int2_contvxm_i8
#define F90_matmul_int2_str1 f90_mm_int2_str1_i8
#define F90_matmul_int2_str1_mxv f90_mm_int2_str1_mxv_i8
#define F90_matmul_int2_str1_vxm f90_mm_int2_str1_vxm_i8
#define F90_matmul_int4_contmxm f90_mm_int4_contmxm_i8
#define F90_matmul_int4_contmxv f90_mm_int4_contmxv_i8
#define F90_matmul_int4_contvxm f90_mm_int4_contvxm_i8
#define F90_matmul_int4_str1 f90_mm_int4_str1_i8
#define F90_matmul_int4_str1_mxv f90_mm_int4_str1_mxv_i8
#define F90_matmul_int4_str1_vxm f90_mm_int4_str1_vxm_i8
#define F90_matmul_int8_contmxm f90_mm_int8_contmxm_i8
#define F90_matmul_int8_contmxv f90_mm_int8_contmxv_i8
#define F90_matmul_int8_contvxm f90_mm_int8_contvxm_i8
#define F90_matmul_int8_str1 f90_mm_int8_str1_i8
#define F90_matmul_int8_str1_mxv f90_mm_int8_str1_mxv_i8
#define F90_matmul_int8_str1_vxm f90_mm_int8_str1_vxm_i8
#define F90_matmul_log1_contmxm f90_mm_log1_contmxm_i8
#define F90_matmul_log1_contmxv f90_mm_log1_contmxv_i8
#define F90_matmul_log1_contvxm f90_mm_log1_contvxm_i8
#define F90_matmul_log2_contmxm f90_mm_log2_contmxm_i8
#define F90_matmul_log2_contmxv f90_mm_log2_contmxv_i8
#define F90_matmul_log2_contvxm f90_mm_log2_contvxm_i8
#define F90_matmul_log4_contmxm f90_mm_log4_contmxm_i8
#define F90_matmul_log4_contmxv f90_mm_log4_contmxv_i8
#define F90_matmul_log4_contvxm f90_mm_log4_contvxm_i8
#define F90_matmul_log8_contmxm f90_mm_log8_contmxm_i8
#define F90_matmul_log8_contmxv f90_mm_log8_contmxv_i8
#define F90_matmul_log8_contvxm f90_mm_log8_contvxm_i8
#define F90_matmul_real16_contmxm f90_mm_real16_contmxm_i8
#define F90_matmul_real16_contmxv f90_mm_real16_contmxv_i8
#define F90_matmul_real16_contvxm f90_mm_real16_contvxm_i8
#define F90_matmul_real16_str1 f90_mm_real16_str1_i8
#define _F90_matmul_real16_str1a _f90_mm_real16_str1a_i8
#define F90_matmul_real16_str1_mxv f90_mm_real16_str1_mxv_i8
#define F90_matmul_real16_str1_mxv_t f90_mm_real16_str1_mxv_t_i8
#define F90_matmul_real16_str1_vxm f90_mm_real16_str1_vxm_i8
#define F90_matmul_real4_contmxm f90_mm_real4_contmxm_i8
#define F90_matmul_real4_contmxv f90_mm_real4_contmxv_i8
#define F90_matmul_real4_contvxm f90_mm_real4_contvxm_i8
#define F90_matmul_real4_str1 f90_mm_real4_str1_i8
#define F90_matmul_real4_str1_mxv f90_mm_real4_str1_mxv_i8
#define F90_matmul_real4_str1_mxv_t f90_mm_real4_str1_mxv_t_i8
#define F90_matmul_real4_str1_t f90_mm_real4_str1_t_i8
#define F90_matmul_real4_str1_vxm f90_mm_real4_str1_vxm_i8
#define F90_matmul_real8_contmxm f90_mm_real8_contmxm_i8
#define F90_matmul_real8_contmxv f90_mm_real8_contmxv_i8
#define F90_matmul_real8_contvxm f90_mm_real8_contvxm_i8
#define F90_matmul_real8_str1 f90_mm_real8_str1_i8
#define _F90_matmul_real8_str1a _f90_mm_real8_str1a_i8
#define _F90_matmul_real8_str1b _f90_mm_real8_str1b_i8
#define _F90_matmul_real8_str1c _f90_mm_real8_str1c_i8
#define F90_matmul_real8_str1_mxv f90_mm_real8_str1_mxv_i8
#define F90_matmul_real8_str1_mxv_t f90_mm_real8_str1_mxv_t_i8
#define F90_matmul_real8_str1_vxm f90_mm_real8_str1_vxm_i8
#else
#define DESC_INT INTEGER(4)
#define F90_matmul_cplx16_contmxm PREFIX(_mm_cplx16_contmxm)
#define F90_matmul_cplx16_contmxv PREFIX(_mm_cplx16_contmxv)
#define F90_matmul_cplx16_contvxm PREFIX(_mm_cplx16_contvxm)
#define F90_matmul_cplx16_str1 PREFIX(_mm_cplx16_str1)
#define F90_matmul_cplx16_str1_mxv PREFIX(_mm_cplx16_str1_mxv)
#define F90_matmul_cplx16_str1_mxv_t PREFIX(_mm_cplx16_str1_mxv_t)
#define F90_matmul_cplx16_str1_vxm PREFIX(_mm_cplx16_str1_vxm)
#define F90_matmul_cplx32_contmxm PREFIX(_mm_cplx32_contmxm)
#define F90_matmul_cplx32_contmxv PREFIX(_mm_cplx32_contmxv)
#define F90_matmul_cplx32_contvxm PREFIX(_mm_cplx32_contvxm)
#define F90_matmul_cplx32_str1 PREFIX(_mm_cplx32_str1)
#define F90_matmul_cplx32_str1_mxv PREFIX(_mm_cplx32_str1_mxv)
#define F90_matmul_cplx8_contmxm PREFIX(_mm_cplx8_contmxm)
#define F90_matmul_cplx8_contmxv PREFIX(_mm_cplx8_contmxv)
#define F90_matmul_cplx8_contvxm PREFIX(_mm_cplx8_contvxm)
#define F90_matmul_cplx8_str1 PREFIX(_mm_cplx8_str1)
#define F90_matmul_cplx8_str1_mxv PREFIX(_mm_cplx8_str1_mxv)
#define F90_matmul_cplx8_str1_mxv_t PREFIX(_mm_cplx8_str1_mxv_t)
#define F90_matmul_cplx8_str1_t PREFIX(_mm_cplx8_str1_t)
#define F90_matmul_cplx8_str1_vxm PREFIX(_mm_cplx8_str1_vxm)
#define F90_matmul_int1_contmxm PREFIX(_mm_int1_contmxm)
#define F90_matmul_int1_contmxv PREFIX(_mm_int1_contmxv)
#define F90_matmul_int1_contvxm PREFIX(_mm_int1_contvxm)
#define F90_matmul_int1_str1 PREFIX(_mm_int1_str1)
#define F90_matmul_int1_str1_mxv PREFIX(_mm_int1_str1_mxv)
#define F90_matmul_int1_str1_vxm PREFIX(_mm_int1_str1_vxm)
#define F90_matmul_int2_contmxm PREFIX(_mm_int2_contmxm)
#define F90_matmul_int2_contmxv PREFIX(_mm_int2_contmxv)
#define F90_matmul_int2_contvxm PREFIX(_mm_int2_contvxm)
#define F90_matmul_int2_str1 PREFIX(_mm_int2_str1)
#define F90_matmul_int2_str1_mxv PREFIX(_mm_int2_str1_mxv)
#define F90_matmul_int2_str1_vxm PREFIX(_mm_int2_str1_vxm)
#define F90_matmul_int4_contmxm PREFIX(_mm_int4_contmxm)
#define F90_matmul_int4_contmxv PREFIX(_mm_int4_contmxv)
#define F90_matmul_int4_contvxm PREFIX(_mm_int4_contvxm)
#define F90_matmul_int4_str1 PREFIX(_mm_int4_str1)
#define F90_matmul_int4_str1_mxv PREFIX(_mm_int4_str1_mxv)
#define F90_matmul_int4_str1_vxm PREFIX(_mm_int4_str1_vxm)
#define F90_matmul_int8_contmxm PREFIX(_mm_int8_contmxm)
#define F90_matmul_int8_contmxv PREFIX(_mm_int8_contmxv)
#define F90_matmul_int8_contvxm PREFIX(_mm_int8_contvxm)
#define F90_matmul_int8_str1 PREFIX(_mm_int8_str1)
#define F90_matmul_int8_str1_mxv PREFIX(_mm_int8_str1_mxv)
#define F90_matmul_int8_str1_vxm PREFIX(_mm_int8_str1_vxm)
#define F90_matmul_log1_contmxm PREFIX(_mm_log1_contmxm)
#define F90_matmul_log1_contmxv PREFIX(_mm_log1_contmxv)
#define F90_matmul_log1_contvxm PREFIX(_mm_log1_contvxm)
#define F90_matmul_log2_contmxm PREFIX(_mm_log2_contmxm)
#define F90_matmul_log2_contmxv PREFIX(_mm_log2_contmxv)
#define F90_matmul_log2_contvxm PREFIX(_mm_log2_contvxm)
#define F90_matmul_log4_contmxm PREFIX(_mm_log4_contmxm)
#define F90_matmul_log4_contmxv PREFIX(_mm_log4_contmxv)
#define F90_matmul_log4_contvxm PREFIX(_mm_log4_contvxm)
#define F90_matmul_log8_contmxm PREFIX(_mm_log8_contmxm)
#define F90_matmul_log8_contmxv PREFIX(_mm_log8_contmxv)
#define F90_matmul_log8_contvxm PREFIX(_mm_log8_contvxm)
#define F90_matmul_real16_contmxm PREFIX(_mm_real16_contmxm)
#define F90_matmul_real16_contmxv PREFIX(_mm_real16_contmxv)
#define F90_matmul_real16_contvxm PREFIX(_mm_real16_contvxm)
#define F90_matmul_real16_str1 PREFIX(_mm_real16_str1)
#define _F90_matmul_real16_str1a _PREFIX(_mm_real16_str1a)
#define F90_matmul_real16_str1_mxv PREFIX(_mm_real16_str1_mxv)
#define F90_matmul_real16_str1_mxv_t PREFIX(_mm_real16_str1_mxv_t)
#define F90_matmul_real16_str1_vxm PREFIX(_mm_real16_str1_vxm)
#define F90_matmul_real4_contmxm PREFIX(_mm_real4_contmxm)
#define F90_matmul_real4_contmxv PREFIX(_mm_real4_contmxv)
#define F90_matmul_real4_contvxm PREFIX(_mm_real4_contvxm)
#define F90_matmul_real4_str1 PREFIX(_mm_real4_str1)
#define F90_matmul_real4_str1_mxv PREFIX(_mm_real4_str1_mxv)
#define F90_matmul_real4_str1_mxv_t PREFIX(_mm_real4_str1_mxv_t)
#define F90_matmul_real4_str1_t PREFIX(_mm_real4_str1_t)
#define F90_matmul_real4_str1_vxm PREFIX(_mm_real4_str1_vxm)
#define F90_matmul_real8_contmxm PREFIX(_mm_real8_contmxm)
#define F90_matmul_real8_contmxv PREFIX(_mm_real8_contmxv)
#define F90_matmul_real8_contvxm PREFIX(_mm_real8_contvxm)
#define F90_matmul_real8_str1 PREFIX(_mm_real8_str1)
#define _F90_matmul_real8_str1a _PREFIX(_mm_real8_str1a)
#define _F90_matmul_real8_str1b _PREFIX(_mm_real8_str1b)
#define _F90_matmul_real8_str1c _PREFIX(_mm_real8_str1c)
#define F90_matmul_real8_str1_mxv PREFIX(_mm_real8_str1_mxv)
#define F90_matmul_real8_str1_mxv_t PREFIX(_mm_real8_str1_mxv_t)
#define F90_matmul_real8_str1_vxm PREFIX(_mm_real8_str1_vxm)
#define F90_matmul_cplx16_contmxm f90_mm_cplx16_contmxm
#define F90_matmul_cplx16_contmxv f90_mm_cplx16_contmxv
#define F90_matmul_cplx16_contvxm f90_mm_cplx16_contvxm
#define F90_matmul_cplx16_str1 f90_mm_cplx16_str1
#define F90_matmul_cplx16_str1_mxv f90_mm_cplx16_str1_mxv
#define F90_matmul_cplx16_str1_mxv_t f90_mm_cplx16_str1_mxv_t
#define F90_matmul_cplx16_str1_vxm f90_mm_cplx16_str1_vxm
#define F90_matmul_cplx32_contmxm f90_mm_cplx32_contmxm
#define F90_matmul_cplx32_contmxv f90_mm_cplx32_contmxv
#define F90_matmul_cplx32_contvxm f90_mm_cplx32_contvxm
#define F90_matmul_cplx32_str1 f90_mm_cplx32_str1
#define F90_matmul_cplx32_str1_mxv f90_mm_cplx32_str1_mxv
#define F90_matmul_cplx8_contmxm f90_mm_cplx8_contmxm
#define F90_matmul_cplx8_contmxv f90_mm_cplx8_contmxv
#define F90_matmul_cplx8_contvxm f90_mm_cplx8_contvxm
#define F90_matmul_cplx8_str1 f90_mm_cplx8_str1
#define F90_matmul_cplx8_str1_mxv f90_mm_cplx8_str1_mxv
#define F90_matmul_cplx8_str1_mxv_t f90_mm_cplx8_str1_mxv_t
#define F90_matmul_cplx8_str1_t f90_mm_cplx8_str1_t
#define F90_matmul_cplx8_str1_vxm f90_mm_cplx8_str1_vxm
#define F90_matmul_int1_contmxm f90_mm_int1_contmxm
#define F90_matmul_int1_contmxv f90_mm_int1_contmxv
#define F90_matmul_int1_contvxm f90_mm_int1_contvxm
#define F90_matmul_int1_str1 f90_mm_int1_str1
#define F90_matmul_int1_str1_mxv f90_mm_int1_str1_mxv
#define F90_matmul_int1_str1_vxm f90_mm_int1_str1_vxm
#define F90_matmul_int2_contmxm f90_mm_int2_contmxm
#define F90_matmul_int2_contmxv f90_mm_int2_contmxv
#define F90_matmul_int2_contvxm f90_mm_int2_contvxm
#define F90_matmul_int2_str1 f90_mm_int2_str1
#define F90_matmul_int2_str1_mxv f90_mm_int2_str1_mxv
#define F90_matmul_int2_str1_vxm f90_mm_int2_str1_vxm
#define F90_matmul_int4_contmxm f90_mm_int4_contmxm
#define F90_matmul_int4_contmxv f90_mm_int4_contmxv
#define F90_matmul_int4_contvxm f90_mm_int4_contvxm
#define F90_matmul_int4_str1 f90_mm_int4_str1
#define F90_matmul_int4_str1_mxv f90_mm_int4_str1_mxv
#define F90_matmul_int4_str1_vxm f90_mm_int4_str1_vxm
#define F90_matmul_int8_contmxm f90_mm_int8_contmxm
#define F90_matmul_int8_contmxv f90_mm_int8_contmxv
#define F90_matmul_int8_contvxm f90_mm_int8_contvxm
#define F90_matmul_int8_str1 f90_mm_int8_str1
#define F90_matmul_int8_str1_mxv f90_mm_int8_str1_mxv
#define F90_matmul_int8_str1_vxm f90_mm_int8_str1_vxm
#define F90_matmul_log1_contmxm f90_mm_log1_contmxm
#define F90_matmul_log1_contmxv f90_mm_log1_contmxv
#define F90_matmul_log1_contvxm f90_mm_log1_contvxm
#define F90_matmul_log2_contmxm f90_mm_log2_contmxm
#define F90_matmul_log2_contmxv f90_mm_log2_contmxv
#define F90_matmul_log2_contvxm f90_mm_log2_contvxm
#define F90_matmul_log4_contmxm f90_mm_log4_contmxm
#define F90_matmul_log4_contmxv f90_mm_log4_contmxv
#define F90_matmul_log4_contvxm f90_mm_log4_contvxm
#define F90_matmul_log8_contmxm f90_mm_log8_contmxm
#define F90_matmul_log8_contmxv f90_mm_log8_contmxv
#define F90_matmul_log8_contvxm f90_mm_log8_contvxm
#define F90_matmul_real16_contmxm f90_mm_real16_contmxm
#define F90_matmul_real16_contmxv f90_mm_real16_contmxv
#define F90_matmul_real16_contvxm f90_mm_real16_contvxm
#define F90_matmul_real16_str1 f90_mm_real16_str1
#define _F90_matmul_real16_str1a _f90_mm_real16_str1a
#define F90_matmul_real16_str1_mxv f90_mm_real16_str1_mxv
#define F90_matmul_real16_str1_mxv_t f90_mm_real16_str1_mxv_t
#define F90_matmul_real16_str1_vxm f90_mm_real16_str1_vxm
#define F90_matmul_real4_contmxm f90_mm_real4_contmxm
#define F90_matmul_real4_contmxv f90_mm_real4_contmxv
#define F90_matmul_real4_contvxm f90_mm_real4_contvxm
#define F90_matmul_real4_str1 f90_mm_real4_str1
#define F90_matmul_real4_str1_mxv f90_mm_real4_str1_mxv
#define F90_matmul_real4_str1_mxv_t f90_mm_real4_str1_mxv_t
#define F90_matmul_real4_str1_t f90_mm_real4_str1_t
#define F90_matmul_real4_str1_vxm f90_mm_real4_str1_vxm
#define F90_matmul_real8_contmxm f90_mm_real8_contmxm
#define F90_matmul_real8_contmxv f90_mm_real8_contmxv
#define F90_matmul_real8_contvxm f90_mm_real8_contvxm
#define F90_matmul_real8_str1 f90_mm_real8_str1
#define _F90_matmul_real8_str1a _f90_mm_real8_str1a
#define _F90_matmul_real8_str1b _f90_mm_real8_str1b
#define _F90_matmul_real8_str1c _f90_mm_real8_str1c
#define F90_matmul_real8_str1_mxv f90_mm_real8_str1_mxv
#define F90_matmul_real8_str1_mxv_t f90_mm_real8_str1_mxv_t
#define F90_matmul_real8_str1_vxm f90_mm_real8_str1_vxm
#endif /* DESC_I8 */
Loading