Commit de9035f4 authored by THIBAULT Samuel's avatar THIBAULT Samuel
Browse files

constify desc parameter in task functions

parent a651c05f
......@@ -28,8 +28,8 @@
void MORSE_TASK_zaxpy(const MORSE_option_t *options,
int M, MORSE_Complex64_t *alpha,
MORSE_desc_t *A, int Am, int An, int incA,
MORSE_desc_t *B, int Bm, int Bn, int incB)
const MORSE_desc_t *A, int Am, int An, int incA,
const MORSE_desc_t *B, int Bm, int Bn, int incB)
{
quark_option_t *opt = (quark_option_t*)(options->schedopt);
DAG_CORE_AXPY;
......
......@@ -34,7 +34,7 @@
void MORSE_TASK_zbuild( const MORSE_option_t *options,
MORSE_desc_t *A, int Am, int An, int lda,
const MORSE_desc_t *A, int Am, int An, int lda,
void *user_data, void* user_build_callback )
{
quark_option_t *opt = (quark_option_t*)(options->schedopt);
......
......@@ -101,8 +101,8 @@ void CORE_zgeadd_quark(Quark *quark)
******************************************************************************/
void MORSE_TASK_zgeadd(const MORSE_option_t *options,
MORSE_enum trans, int m, int n, int nb,
MORSE_Complex64_t alpha, MORSE_desc_t *A, int Am, int An, int lda,
MORSE_Complex64_t beta, MORSE_desc_t *B, int Bm, int Bn, int ldb)
MORSE_Complex64_t alpha, const MORSE_desc_t *A, int Am, int An, int lda,
MORSE_Complex64_t beta, const MORSE_desc_t *B, int Bm, int Bn, int ldb)
{
quark_option_t *opt = (quark_option_t*)(options->schedopt);
DAG_CORE_GEADD;
......
......@@ -95,8 +95,8 @@
void MORSE_TASK_zgelqt(const MORSE_option_t *options,
int m, int n, int ib, int nb,
MORSE_desc_t *A, int Am, int An, int lda,
MORSE_desc_t *T, int Tm, int Tn, int ldt)
const MORSE_desc_t *A, int Am, int An, int lda,
const MORSE_desc_t *T, int Tm, int Tn, int ldt)
{
quark_option_t *opt = (quark_option_t*)(options->schedopt);
DAG_CORE_GELQT;
......
......@@ -39,9 +39,9 @@
void MORSE_TASK_zgemm(const MORSE_option_t *options,
MORSE_enum transA, int transB,
int m, int n, int k, int nb,
MORSE_Complex64_t alpha, MORSE_desc_t *A, int Am, int An, int lda,
MORSE_desc_t *B, int Bm, int Bn, int ldb,
MORSE_Complex64_t beta, MORSE_desc_t *C, int Cm, int Cn, int ldc)
MORSE_Complex64_t alpha, const MORSE_desc_t *A, int Am, int An, int lda,
const MORSE_desc_t *B, int Bm, int Bn, int ldb,
MORSE_Complex64_t beta, const MORSE_desc_t *C, int Cm, int Cn, int ldc)
{
quark_option_t *opt = (quark_option_t*)(options->schedopt);
DAG_CORE_GEMM;
......
......@@ -96,8 +96,8 @@
void MORSE_TASK_zgeqrt(const MORSE_option_t *options,
int m, int n, int ib, int nb,
MORSE_desc_t *A, int Am, int An, int lda,
MORSE_desc_t *T, int Tm, int Tn, int ldt)
const MORSE_desc_t *A, int Am, int An, int lda,
const MORSE_desc_t *T, int Tm, int Tn, int ldt)
{
quark_option_t *opt = (quark_option_t*)(options->schedopt);
DAG_CORE_GEQRT;
......
......@@ -81,9 +81,9 @@
void MORSE_TASK_zgessm(const MORSE_option_t *options,
int m, int n, int k, int ib, int nb,
int *IPIV,
MORSE_desc_t *L, int Lm, int Ln, int ldl,
MORSE_desc_t *D, int Dm, int Dn, int ldd,
MORSE_desc_t *A, int Am, int An, int lda)
const MORSE_desc_t *L, int Lm, int Ln, int ldl,
const MORSE_desc_t *D, int Dm, int Dn, int ldd,
const MORSE_desc_t *A, int Am, int An, int lda)
{
quark_option_t *opt = (quark_option_t*)(options->schedopt);
DAG_CORE_GESSM;
......
......@@ -28,8 +28,8 @@
void MORSE_TASK_zgessq( const MORSE_option_t *options,
int m, int n,
MORSE_desc_t *A, int Am, int An, int lda,
MORSE_desc_t *SCALESUMSQ, int SCALESUMSQm, int SCALESUMSQn )
const MORSE_desc_t *A, int Am, int An, int lda,
const MORSE_desc_t *SCALESUMSQ, int SCALESUMSQm, int SCALESUMSQn )
{
quark_option_t *opt = (quark_option_t*)(options->schedopt);
QUARK_Insert_Task(opt->quark, CORE_zgessq_quark, (Quark_Task_Flags*)opt,
......
......@@ -31,7 +31,7 @@
void MORSE_TASK_zgetrf(const MORSE_option_t *options,
int m, int n, int nb,
MORSE_desc_t *A, int Am, int An, int lda,
const MORSE_desc_t *A, int Am, int An, int lda,
int *IPIV,
MORSE_bool check_info, int iinfo)
{
......
......@@ -88,8 +88,8 @@
void MORSE_TASK_zgetrf_incpiv(const MORSE_option_t *options,
int m, int n, int ib, int nb,
MORSE_desc_t *A, int Am, int An, int lda,
MORSE_desc_t *L, int Lm, int Ln, int ldl,
const MORSE_desc_t *A, int Am, int An, int lda,
const MORSE_desc_t *L, int Lm, int Ln, int ldl,
int *IPIV,
MORSE_bool check_info, int iinfo)
{
......
......@@ -77,7 +77,7 @@
void MORSE_TASK_zgetrf_nopiv(const MORSE_option_t *options,
int m, int n, int ib, int nb,
MORSE_desc_t *A, int Am, int An, int lda,
const MORSE_desc_t *A, int Am, int An, int lda,
int iinfo)
{
quark_option_t *opt = (quark_option_t*)(options->schedopt);
......
......@@ -42,9 +42,9 @@
void MORSE_TASK_zhemm(const MORSE_option_t *options,
MORSE_enum side, MORSE_enum uplo,
int m, int n, int nb,
MORSE_Complex64_t alpha, MORSE_desc_t *A, int Am, int An, int lda,
MORSE_desc_t *B, int Bm, int Bn, int ldb,
MORSE_Complex64_t beta, MORSE_desc_t *C, int Cm, int Cn, int ldc)
MORSE_Complex64_t alpha, const MORSE_desc_t *A, int Am, int An, int lda,
const MORSE_desc_t *B, int Bm, int Bn, int ldb,
MORSE_Complex64_t beta, const MORSE_desc_t *C, int Cm, int Cn, int ldc)
{
quark_option_t *opt = (quark_option_t*)(options->schedopt);
DAG_CORE_HEMM;
......
......@@ -42,9 +42,9 @@
void MORSE_TASK_zher2k(const MORSE_option_t *options,
MORSE_enum uplo, MORSE_enum trans,
int n, int k, int nb,
MORSE_Complex64_t alpha, MORSE_desc_t *A, int Am, int An, int lda,
MORSE_desc_t *B, int Bm, int Bn, int ldb,
double beta, MORSE_desc_t *C, int Cm, int Cn, int ldc)
MORSE_Complex64_t alpha, const MORSE_desc_t *A, int Am, int An, int lda,
const MORSE_desc_t *B, int Bm, int Bn, int ldb,
double beta, const MORSE_desc_t *C, int Cm, int Cn, int ldc)
{
quark_option_t *opt = (quark_option_t*)(options->schedopt);
DAG_CORE_HER2K;
......
......@@ -42,8 +42,8 @@
void MORSE_TASK_zherk(const MORSE_option_t *options,
MORSE_enum uplo, MORSE_enum trans,
int n, int k, int nb,
double alpha, MORSE_desc_t *A, int Am, int An, int lda,
double beta, MORSE_desc_t *C, int Cm, int Cn, int ldc)
double alpha, const MORSE_desc_t *A, int Am, int An, int lda,
double beta, const MORSE_desc_t *C, int Cm, int Cn, int ldc)
{
quark_option_t *opt = (quark_option_t*)(options->schedopt);
DAG_CORE_HERK;
......
......@@ -28,8 +28,8 @@
void MORSE_TASK_zhessq( const MORSE_option_t *options,
MORSE_enum uplo, int n,
MORSE_desc_t *A, int Am, int An, int lda,
MORSE_desc_t *SCALESUMSQ, int SCALESUMSQm, int SCALESUMSQn )
const MORSE_desc_t *A, int Am, int An, int lda,
const MORSE_desc_t *SCALESUMSQ, int SCALESUMSQm, int SCALESUMSQn )
{
quark_option_t *opt = (quark_option_t*)(options->schedopt);
QUARK_Insert_Task(opt->quark, CORE_zhessq_quark, (Quark_Task_Flags*)opt,
......
......@@ -39,8 +39,8 @@
void MORSE_TASK_zlacpy(const MORSE_option_t *options,
MORSE_enum uplo, int m, int n, int nb,
MORSE_desc_t *A, int Am, int An, int lda,
MORSE_desc_t *B, int Bm, int Bn, int ldb)
const MORSE_desc_t *A, int Am, int An, int lda,
const MORSE_desc_t *B, int Bm, int Bn, int ldb)
{
quark_option_t *opt = (quark_option_t*)(options->schedopt);
DAG_CORE_LACPY;
......
......@@ -36,8 +36,8 @@
**/
void MORSE_TASK_zlag2c(const MORSE_option_t *options,
int m, int n, int nb,
MORSE_desc_t *A, int Am, int An, int lda,
MORSE_desc_t *B, int Bm, int Bn, int ldb)
const MORSE_desc_t *A, int Am, int An, int lda,
const MORSE_desc_t *B, int Bm, int Bn, int ldb)
{
quark_option_t *opt = (quark_option_t*)(options->schedopt);
DAG_CORE_LAG2C;
......@@ -81,8 +81,8 @@ void CORE_zlag2c_quark(Quark *quark)
void MORSE_TASK_clag2z(const MORSE_option_t *options,
int m, int n, int nb,
MORSE_desc_t *A, int Am, int An, int lda,
MORSE_desc_t *B, int Bm, int Bn, int ldb)
const MORSE_desc_t *A, int Am, int An, int lda,
const MORSE_desc_t *B, int Bm, int Bn, int ldb)
{
QUARK_Insert_Task(opt->quark, CORE_clag2z_quark, (Quark_Task_Flags*)opt,
sizeof(int), &m, VALUE,
......
......@@ -31,8 +31,8 @@
void MORSE_TASK_zlange(const MORSE_option_t *options,
MORSE_enum norm, int M, int N, int NB,
MORSE_desc_t *A, int Am, int An, int LDA,
MORSE_desc_t *B, int Bm, int Bn)
const MORSE_desc_t *A, int Am, int An, int LDA,
const MORSE_desc_t *B, int Bm, int Bn)
{
quark_option_t *opt = (quark_option_t*)(options->schedopt);
DAG_CORE_LANGE;
......@@ -64,8 +64,8 @@ void CORE_zlange_quark(Quark *quark)
void MORSE_TASK_zlange_max(const MORSE_option_t *options,
MORSE_desc_t *A, int Am, int An,
MORSE_desc_t *B, int Bm, int Bn)
const MORSE_desc_t *A, int Am, int An,
const MORSE_desc_t *B, int Bm, int Bn)
{
quark_option_t *opt = (quark_option_t*)(options->schedopt);
DAG_CORE_LANGE_MAX;
......
......@@ -31,8 +31,8 @@
void MORSE_TASK_zlanhe(const MORSE_option_t *options,
MORSE_enum norm, MORSE_enum uplo, int N, int NB,
MORSE_desc_t *A, int Am, int An, int LDA,
MORSE_desc_t *B, int Bm, int Bn)
const MORSE_desc_t *A, int Am, int An, int LDA,
const MORSE_desc_t *B, int Bm, int Bn)
{
quark_option_t *opt = (quark_option_t*)(options->schedopt);
DAG_CORE_LANHE;
......
......@@ -31,8 +31,8 @@
void MORSE_TASK_zlansy(const MORSE_option_t *options,
MORSE_enum norm, MORSE_enum uplo, int N, int NB,
MORSE_desc_t *A, int Am, int An, int LDA,
MORSE_desc_t *B, int Bm, int Bn)
const MORSE_desc_t *A, int Am, int An, int LDA,
const MORSE_desc_t *B, int Bm, int Bn)
{
quark_option_t *opt = (quark_option_t*)(options->schedopt);
DAG_CORE_LANSY;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment