diff --git a/runtime/parsec/codelets/codelet_zgetrf.c b/runtime/parsec/codelets/codelet_zgetrf.c index b86c128adc7f1b403eedd35e8fc4145b87697e32..93502b3c3f022f72f3947c0c9ba8a9245a79a621 100644 --- a/runtime/parsec/codelets/codelet_zgetrf.c +++ b/runtime/parsec/codelets/codelet_zgetrf.c @@ -29,7 +29,7 @@ CORE_zgetrf_parsec( parsec_execution_stream_t *context, CHAMELEON_Complex64_t *A; int lda; int *IPIV; - CHAMELEON_bool *check_info; + cham_bool_t *check_info; int iinfo; int info; @@ -46,7 +46,7 @@ void INSERT_TASK_zgetrf(const RUNTIME_option_t *options, int m, int n, int nb, const CHAM_desc_t *A, int Am, int An, int lda, int *IPIV, - CHAMELEON_bool check_info, int iinfo) + cham_bool_t check_info, int iinfo) { parsec_taskpool_t* PARSEC_dtd_taskpool = (parsec_taskpool_t *)(options->sequence->schedopt); @@ -57,7 +57,7 @@ void INSERT_TASK_zgetrf(const RUNTIME_option_t *options, PASSED_BY_REF, RTBLKADDR( A, CHAMELEON_Complex64_t, Am, An ), morse_parsec_get_arena_index( A ) | INOUT | AFFINITY, sizeof(int), &lda, VALUE, sizeof(int)*nb, IPIV, SCRATCH, - sizeof(CHAMELEON_bool), &check_info, VALUE, + sizeof(cham_bool_t), &check_info, VALUE, sizeof(int), &iinfo, VALUE, PARSEC_DTD_ARG_END ); } diff --git a/runtime/parsec/codelets/codelet_zgetrf_incpiv.c b/runtime/parsec/codelets/codelet_zgetrf_incpiv.c index 11a2386fee850978f49c6b3b814d615c9f56259e..1076b1e74af86290f321d79efbbd6084a722e7c2 100644 --- a/runtime/parsec/codelets/codelet_zgetrf_incpiv.c +++ b/runtime/parsec/codelets/codelet_zgetrf_incpiv.c @@ -84,7 +84,7 @@ CORE_zgetrf_incpiv_parsec( parsec_execution_stream_t *context, CHAMELEON_Complex64_t *A; int lda; int *IPIV; - CHAMELEON_bool *check_info; + cham_bool_t *check_info; int iinfo; int info; @@ -103,7 +103,7 @@ void INSERT_TASK_zgetrf_incpiv( const RUNTIME_option_t *options, const CHAM_desc_t *A, int Am, int An, int lda, const CHAM_desc_t *L, int Lm, int Ln, int ldl, int *IPIV, - CHAMELEON_bool check_info, int iinfo ) + cham_bool_t check_info, int iinfo ) { parsec_taskpool_t* PARSEC_dtd_taskpool = (parsec_taskpool_t *)(options->sequence->schedopt); diff --git a/runtime/parsec/codelets/codelet_ztstrf.c b/runtime/parsec/codelets/codelet_ztstrf.c index 8714b6e0dd447880ed847d632317aa6144c84349..913a88304f24c97b720029d5b873d23f0592b749 100644 --- a/runtime/parsec/codelets/codelet_ztstrf.c +++ b/runtime/parsec/codelets/codelet_ztstrf.c @@ -37,7 +37,7 @@ CORE_ztstrf_parsec( parsec_execution_stream_t *context, int *IPIV; CHAMELEON_Complex64_t *WORK; int ldwork; - CHAMELEON_bool *check_info; + cham_bool_t *check_info; int iinfo; int info; @@ -57,7 +57,7 @@ void INSERT_TASK_ztstrf(const RUNTIME_option_t *options, const CHAM_desc_t *A, int Am, int An, int lda, const CHAM_desc_t *L, int Lm, int Ln, int ldl, int *IPIV, - CHAMELEON_bool check_info, int iinfo) + cham_bool_t check_info, int iinfo) { parsec_taskpool_t* PARSEC_dtd_taskpool = (parsec_taskpool_t *)(options->sequence->schedopt); diff --git a/runtime/parsec/control/runtime_options.c b/runtime/parsec/control/runtime_options.c index 7514534934c1f20c65277b479b03a4dffc8bf482..4b9d0e649992f479431550caa5eae87b64b61e3a 100644 --- a/runtime/parsec/control/runtime_options.c +++ b/runtime/parsec/control/runtime_options.c @@ -29,7 +29,6 @@ void RUNTIME_options_init( RUNTIME_option_t *options, CHAM_context_t *morse, options->profiling = CHAMELEON_PROFILING == CHAMELEON_TRUE; options->parallel = CHAMELEON_PARALLEL == CHAMELEON_TRUE; options->priority = RUNTIME_PRIORITY_MIN; - options->nb = CHAMELEON_NB; options->ws_wsize = 0; options->ws_hsize = 0; options->ws_worker = NULL; diff --git a/runtime/quark/codelets/codelet_zgetrf.c b/runtime/quark/codelets/codelet_zgetrf.c index 1cfb95f4ee3a89de18c3dc152ae8239b076b57d7..021a2a8fc1cecad03781702e121c5355791298fc 100644 --- a/runtime/quark/codelets/codelet_zgetrf.c +++ b/runtime/quark/codelets/codelet_zgetrf.c @@ -34,7 +34,7 @@ void CORE_zgetrf_quark(Quark *quark) int *IPIV; RUNTIME_sequence_t *sequence; RUNTIME_request_t *request; - CHAMELEON_bool check_info; + cham_bool_t check_info; int iinfo; int info; @@ -49,7 +49,7 @@ void INSERT_TASK_zgetrf(const RUNTIME_option_t *options, int m, int n, int nb, const CHAM_desc_t *A, int Am, int An, int lda, int *IPIV, - CHAMELEON_bool check_info, int iinfo) + cham_bool_t check_info, int iinfo) { quark_option_t *opt = (quark_option_t*)(options->schedopt); DAG_CORE_GETRF; @@ -61,7 +61,7 @@ void INSERT_TASK_zgetrf(const RUNTIME_option_t *options, sizeof(int)*nb, IPIV, OUTPUT, sizeof(RUNTIME_sequence_t*), &(options->sequence), VALUE, sizeof(RUNTIME_request_t*), &(options->request), VALUE, - sizeof(CHAMELEON_bool), &check_info, VALUE, + sizeof(cham_bool_t), &check_info, VALUE, sizeof(int), &iinfo, VALUE, 0); } diff --git a/runtime/quark/codelets/codelet_zgetrf_incpiv.c b/runtime/quark/codelets/codelet_zgetrf_incpiv.c index bcc4281e6ea1d644488453661bb24d7fff2ca803..e12c22263747c9a5c3c8938e22de116847d27d3e 100644 --- a/runtime/quark/codelets/codelet_zgetrf_incpiv.c +++ b/runtime/quark/codelets/codelet_zgetrf_incpiv.c @@ -37,7 +37,7 @@ void CORE_zgetrf_incpiv_quark(Quark *quark) int *IPIV; RUNTIME_sequence_t *sequence; RUNTIME_request_t *request; - CHAMELEON_bool check_info; + cham_bool_t check_info; int iinfo; int info; @@ -108,7 +108,7 @@ void INSERT_TASK_zgetrf_incpiv(const RUNTIME_option_t *options, const CHAM_desc_t *A, int Am, int An, int lda, const CHAM_desc_t *L, int Lm, int Ln, int ldl, int *IPIV, - CHAMELEON_bool check_info, int iinfo) + cham_bool_t check_info, int iinfo) { quark_option_t *opt = (quark_option_t*)(options->schedopt); DAG_CORE_GETRF; @@ -121,7 +121,7 @@ void INSERT_TASK_zgetrf_incpiv(const RUNTIME_option_t *options, sizeof(int)*nb, IPIV, OUTPUT, sizeof(RUNTIME_sequence_t*), &(options->sequence), VALUE, sizeof(RUNTIME_request_t*), &(options->request), VALUE, - sizeof(CHAMELEON_bool), &check_info, VALUE, + sizeof(cham_bool_t), &check_info, VALUE, sizeof(int), &iinfo, VALUE, 0); diff --git a/runtime/quark/codelets/codelet_ztrasm.c b/runtime/quark/codelets/codelet_ztrasm.c index ea9abf4b052256d0eebbd17b712317de17f9e5d5..ae01e0c2d0a024069555690faa0dbdde8909b748 100644 --- a/runtime/quark/codelets/codelet_ztrasm.c +++ b/runtime/quark/codelets/codelet_ztrasm.c @@ -44,7 +44,7 @@ void INSERT_TASK_ztrasm(const RUNTIME_option_t *options, const CHAM_desc_t *B, int Bm, int Bn) { quark_option_t *opt = (quark_option_t*)(options->schedopt); - int szeW = uplo == ChamRowwise ? M : N ; + int szeW = storev == ChamRowwise ? M : N ; QUARK_Insert_Task(opt->quark, CORE_ztrasm_quark, (Quark_Task_Flags*)opt, sizeof(int), &storev, VALUE, sizeof(int), &uplo, VALUE, diff --git a/runtime/quark/codelets/codelet_ztstrf.c b/runtime/quark/codelets/codelet_ztstrf.c index f5a3f4da8d195f4d7dff2b7aba7c6d5a8c39ecce..ce327fab1e1418d8355c5b88c4e7220872e2c217 100644 --- a/runtime/quark/codelets/codelet_ztstrf.c +++ b/runtime/quark/codelets/codelet_ztstrf.c @@ -46,7 +46,7 @@ void CORE_ztstrf_quark(Quark *quark) int ldwork; RUNTIME_sequence_t *sequence; RUNTIME_request_t *request; - CHAMELEON_bool check_info; + cham_bool_t check_info; int iinfo; int info; @@ -130,7 +130,7 @@ void INSERT_TASK_ztstrf(const RUNTIME_option_t *options, const CHAM_desc_t *A, int Am, int An, int lda, const CHAM_desc_t *L, int Lm, int Ln, int ldl, int *IPIV, - CHAMELEON_bool check_info, int iinfo) + cham_bool_t check_info, int iinfo) { quark_option_t *opt = (quark_option_t*)(options->schedopt); DAG_CORE_TSTRF; @@ -150,7 +150,7 @@ void INSERT_TASK_ztstrf(const RUNTIME_option_t *options, sizeof(int), &nb, VALUE, sizeof(RUNTIME_sequence_t*), &(options->sequence), VALUE, sizeof(RUNTIME_request_t*), &(options->request), VALUE, - sizeof(CHAMELEON_bool), &check_info, VALUE, + sizeof(cham_bool_t), &check_info, VALUE, sizeof(int), &iinfo, VALUE, 0); } diff --git a/runtime/quark/control/runtime_options.c b/runtime/quark/control/runtime_options.c index d40698f4df81543f8ca6ccb30397efbf763b5481..1f830d5c46a91c1ded9bb3a3957367af6b6553da 100644 --- a/runtime/quark/control/runtime_options.c +++ b/runtime/quark/control/runtime_options.c @@ -40,8 +40,6 @@ void RUNTIME_options_init( RUNTIME_option_t *options, CHAM_context_t *morse, options->parallel = CHAMELEON_PARALLEL == CHAMELEON_TRUE; options->priority = RUNTIME_PRIORITY_MIN; - options->nb = CHAMELEON_NB; - options->ws_wsize = 0; options->ws_hsize = 0; options->ws_worker = NULL;