Mentions légales du service

Skip to content
Snippets Groups Projects
Commit 5fe41d5b authored by Mathieu Faverge's avatar Mathieu Faverge
Browse files

Merge branch 'fix_leading_dimensions' into 'master'

Fix leading dimensions

See merge request !159
parents 2be2ccd3 b94e4481
No related branches found
No related tags found
1 merge request!159Fix leading dimensions
...@@ -35,7 +35,6 @@ static void cl_zgessm_cpu_func(void *descr[], void *cl_arg) ...@@ -35,7 +35,6 @@ static void cl_zgessm_cpu_func(void *descr[], void *cl_arg)
int k; int k;
int ib; int ib;
int *IPIV; int *IPIV;
int ldL;
CHAMELEON_Complex64_t *D; CHAMELEON_Complex64_t *D;
int ldD; int ldD;
CHAMELEON_Complex64_t *A; CHAMELEON_Complex64_t *A;
...@@ -44,7 +43,6 @@ static void cl_zgessm_cpu_func(void *descr[], void *cl_arg) ...@@ -44,7 +43,6 @@ static void cl_zgessm_cpu_func(void *descr[], void *cl_arg)
D = (CHAMELEON_Complex64_t *)STARPU_MATRIX_GET_PTR(descr[1]); D = (CHAMELEON_Complex64_t *)STARPU_MATRIX_GET_PTR(descr[1]);
A = (CHAMELEON_Complex64_t *)STARPU_MATRIX_GET_PTR(descr[2]); A = (CHAMELEON_Complex64_t *)STARPU_MATRIX_GET_PTR(descr[2]);
ldL = STARPU_MATRIX_GET_LD( descr[0] );
ldD = STARPU_MATRIX_GET_LD( descr[1] ); ldD = STARPU_MATRIX_GET_LD( descr[1] );
ldA = STARPU_MATRIX_GET_LD( descr[2] ); ldA = STARPU_MATRIX_GET_LD( descr[2] );
......
...@@ -35,7 +35,7 @@ static void cl_zgetrf_incpiv_cpu_func(void *descr[], void *cl_arg) ...@@ -35,7 +35,7 @@ static void cl_zgetrf_incpiv_cpu_func(void *descr[], void *cl_arg)
int n; int n;
int ib; int ib;
CHAMELEON_Complex64_t *A; CHAMELEON_Complex64_t *A;
int ldA, ldL; int ldA;
int *IPIV; int *IPIV;
cham_bool_t check_info; cham_bool_t check_info;
int iinfo; int iinfo;
...@@ -45,7 +45,6 @@ static void cl_zgetrf_incpiv_cpu_func(void *descr[], void *cl_arg) ...@@ -45,7 +45,6 @@ static void cl_zgetrf_incpiv_cpu_func(void *descr[], void *cl_arg)
A = (CHAMELEON_Complex64_t *)STARPU_MATRIX_GET_PTR(descr[0]); A = (CHAMELEON_Complex64_t *)STARPU_MATRIX_GET_PTR(descr[0]);
ldA = STARPU_MATRIX_GET_LD( descr[0] ); ldA = STARPU_MATRIX_GET_LD( descr[0] );
ldL = STARPU_MATRIX_GET_LD( descr[1] );
starpu_codelet_unpack_args(cl_arg, &m, &n, &ib, &IPIV, &check_info, &iinfo, &h_work, &sequence, &request); starpu_codelet_unpack_args(cl_arg, &m, &n, &ib, &IPIV, &check_info, &iinfo, &h_work, &sequence, &request);
CORE_zgetrf_incpiv(m, n, ib, A, ldA, IPIV, &info); CORE_zgetrf_incpiv(m, n, ib, A, ldA, IPIV, &info);
......
...@@ -70,7 +70,7 @@ static void cl_zsyrk_cuda_func(void *descr[], void *cl_arg) ...@@ -70,7 +70,7 @@ static void cl_zsyrk_cuda_func(void *descr[], void *cl_arg)
A = (const cuDoubleComplex *)STARPU_MATRIX_GET_PTR(descr[0]); A = (const cuDoubleComplex *)STARPU_MATRIX_GET_PTR(descr[0]);
C = (cuDoubleComplex *)STARPU_MATRIX_GET_PTR(descr[1]); C = (cuDoubleComplex *)STARPU_MATRIX_GET_PTR(descr[1]);
ldA = STARPU_MATRIX_GET_LD( descr[0] ); ldA = STARPU_MATRIX_GET_LD( descr[0] );
ldA = STARPU_MATRIX_GET_LD( descr[1] ); ldC = STARPU_MATRIX_GET_LD( descr[1] );
starpu_codelet_unpack_args(cl_arg, &uplo, &trans, &n, &k, &alpha, &beta); starpu_codelet_unpack_args(cl_arg, &uplo, &trans, &n, &k, &alpha, &beta);
RUNTIME_getStream(stream); RUNTIME_getStream(stream);
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment