From: tkoenig Date: Tue, 18 Sep 2018 19:59:46 +0000 (+0000) Subject: 2018-09-18 Thomas Koenig X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=13847df5068e129238ca532521ca6f90742d07d7;p=thirdparty%2Fgcc.git 2018-09-18 Thomas Koenig PR fortran/29550 * gfortran.h (gfc_expr): Add external_blas flag. * frontend-passes.c (matrix_case): Add case A2TB2T. (optimize_namespace): Handle flag_external_blas by calling call_external_blas. (get_array_inq_function): Add argument okind. If it is nonzero, use it as the kind of argument to be used. (inline_limit_check): Remove m_case argument, add limit argument instead. Remove assert about m_case. Set the limit for inlining from the limit argument. (matmul_lhs_realloc): Handle case A2TB2T. (inline_matmul_assign): Handle inline limit for other cases with two rank-two matrices. Remove no-op calls to inline_limit_check. (call_external_blas): New function. * trans-intrinsic.c (gfc_conv_intrinsic_funcall): Do not add argument to external BLAS if external_blas is already set. 2018-09-18 Thomas Koenig PR fortran/29550 * gfortran.dg/inline_matmul_13.f90: Adjust count for _gfortran_matmul. * gfortran.dg/inline_matmul_16.f90: Likewise. * gfortran.dg/promotion_2.f90: Add -fblas-matmul-limit=1. Scan for dgemm instead of dgemm_. Add call to random_number to make standard conforming. * gfortran.dg/matmul_blas_1.f90: New test. * gfortran.dg/matmul_bounds_14.f: New test. * gfortran.dg/matmul_bounds_15.f: New test. * gfortran.dg/matmul_bounds_16.f: New test. * gfortran.dg/blas_gemm_routines.f: New test / additional file for preceding tests. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@264411 138bc75d-0d04-0410-961f-82ee72b054a4 --- diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index b89ecf8980f9..4557bc2a5c89 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,23 @@ +2018-09-18 Thomas Koenig + + PR fortran/29550 + * gfortran.h (gfc_expr): Add external_blas flag. + * frontend-passes.c (matrix_case): Add case A2TB2T. + (optimize_namespace): Handle flag_external_blas by + calling call_external_blas. + (get_array_inq_function): Add argument okind. If + it is nonzero, use it as the kind of argument + to be used. + (inline_limit_check): Remove m_case argument, add + limit argument instead. Remove assert about m_case. + Set the limit for inlining from the limit argument. + (matmul_lhs_realloc): Handle case A2TB2T. + (inline_matmul_assign): Handle inline limit for other cases with + two rank-two matrices. Remove no-op calls to inline_limit_check. + (call_external_blas): New function. + * trans-intrinsic.c (gfc_conv_intrinsic_funcall): Do not add + argument to external BLAS if external_blas is already set. + 2018-09-18 Paul Thomas PR fortran/87239 diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 2be64615b8ba..29946077ecde 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,19 @@ +2018-09-18 Thomas Koenig + + PR fortran/29550 + * gfortran.dg/inline_matmul_13.f90: Adjust count for + _gfortran_matmul. + * gfortran.dg/inline_matmul_16.f90: Likewise. + * gfortran.dg/promotion_2.f90: Add -fblas-matmul-limit=1. Scan + for dgemm instead of dgemm_. Add call to random_number to make + standard conforming. + * gfortran.dg/matmul_blas_1.f90: New test. + * gfortran.dg/matmul_bounds_14.f: New test. + * gfortran.dg/matmul_bounds_15.f: New test. + * gfortran.dg/matmul_bounds_16.f: New test. + * gfortran.dg/blas_gemm_routines.f: New test / additional file for + preceding tests. + 2018-09-18 Paul Thomas PR fortran/87239