From 8e402fb48f1a672d737c5bdc79acdc1aa7900b01 Mon Sep 17 00:00:00 2001
From: Mathieu Faverge <mathieu.faverge@inria.fr>
Date: Mon, 11 Oct 2021 22:09:57 +0200
Subject: [PATCH] gcc/parsec: silent warnings
---
control/descriptor.h | 2 --
runtime/parsec/codelets/codelet_zgeadd.c | 2 +-
runtime/parsec/codelets/codelet_zgemm.c | 4 ++--
runtime/parsec/codelets/codelet_zgram.c | 4 ++--
runtime/parsec/codelets/codelet_zhe2ge.c | 2 +-
runtime/parsec/codelets/codelet_zhemm.c | 4 ++--
runtime/parsec/codelets/codelet_zher2k.c | 4 ++--
runtime/parsec/codelets/codelet_zherfb.c | 2 +-
runtime/parsec/codelets/codelet_zherk.c | 4 ++--
runtime/parsec/codelets/codelet_zlacpy.c | 2 +-
runtime/parsec/codelets/codelet_zlange.c | 2 +-
runtime/parsec/codelets/codelet_zlanhe.c | 4 ++--
runtime/parsec/codelets/codelet_zlansy.c | 4 ++--
runtime/parsec/codelets/codelet_zlantr.c | 10 ++++++----
runtime/parsec/codelets/codelet_zlascal.c | 2 +-
runtime/parsec/codelets/codelet_zlaset.c | 2 +-
runtime/parsec/codelets/codelet_zlaset2.c | 2 +-
runtime/parsec/codelets/codelet_zlatro.c | 4 ++--
runtime/parsec/codelets/codelet_zlauum.c | 2 +-
runtime/parsec/codelets/codelet_zplssq.c | 1 -
runtime/parsec/codelets/codelet_zpotrf.c | 2 +-
runtime/parsec/codelets/codelet_zsymm.c | 4 ++--
runtime/parsec/codelets/codelet_zsyr2k.c | 4 ++--
runtime/parsec/codelets/codelet_zsyrk.c | 4 ++--
runtime/parsec/codelets/codelet_zsyssq.c | 2 +-
runtime/parsec/codelets/codelet_zsytrf_nopiv.c | 2 +-
runtime/parsec/codelets/codelet_ztpmlqt.c | 4 ++--
runtime/parsec/codelets/codelet_ztpmqrt.c | 4 ++--
runtime/parsec/codelets/codelet_ztradd.c | 4 ++--
runtime/parsec/codelets/codelet_ztrasm.c | 4 ++--
runtime/parsec/codelets/codelet_ztrmm.c | 8 ++++----
runtime/parsec/codelets/codelet_ztrsm.c | 17 ++++++++++-------
runtime/parsec/codelets/codelet_ztrssq.c | 4 ++--
runtime/parsec/codelets/codelet_ztrtri.c | 4 ++--
runtime/parsec/codelets/codelet_ztsmlq_hetra1.c | 4 ++--
runtime/parsec/codelets/codelet_ztsmqr_hetra1.c | 4 ++--
runtime/parsec/codelets/codelet_zunmlq.c | 4 ++--
runtime/parsec/codelets/codelet_zunmqr.c | 4 ++--
runtime/parsec/control/runtime_async.c | 3 +--
runtime/parsec/control/runtime_context.c | 5 ++++-
runtime/parsec/control/runtime_control.c | 2 --
runtime/parsec/control/runtime_descriptor.c | 4 ++--
runtime/parsec/control/runtime_options.c | 2 --
runtime/parsec/include/chameleon_parsec.h | 7 ++-----
44 files changed, 83 insertions(+), 86 deletions(-)
diff --git a/control/descriptor.h b/control/descriptor.h
index c788bcb43..6bf6d9a81 100644
--- a/control/descriptor.h
+++ b/control/descriptor.h
@@ -81,8 +81,6 @@ CHAM_desc_t* chameleon_desc_submatrix( CHAM_desc_t *descA, int i, int j, int m,
void chameleon_desc_destroy ( CHAM_desc_t *desc );
int chameleon_desc_check ( const CHAM_desc_t *desc );
-#define BLKLDD(A, k) A->get_blkldd( A, k )
-
/**
* Internal function to return address of block (m,n) with m,n = block indices
*/
diff --git a/runtime/parsec/codelets/codelet_zgeadd.c b/runtime/parsec/codelets/codelet_zgeadd.c
index 8941ac88e..cb1053a6a 100644
--- a/runtime/parsec/codelets/codelet_zgeadd.c
+++ b/runtime/parsec/codelets/codelet_zgeadd.c
@@ -110,7 +110,7 @@ void INSERT_TASK_zgeadd( const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_zgeadd_parsec, options->priority, "geadd",
- sizeof(int), &trans, VALUE,
+ sizeof(cham_trans_t), &trans, VALUE,
sizeof(int), &m, VALUE,
sizeof(int), &n, VALUE,
sizeof(CHAMELEON_Complex64_t), &alpha, VALUE,
diff --git a/runtime/parsec/codelets/codelet_zgemm.c b/runtime/parsec/codelets/codelet_zgemm.c
index 61740552d..2c92f7e82 100644
--- a/runtime/parsec/codelets/codelet_zgemm.c
+++ b/runtime/parsec/codelets/codelet_zgemm.c
@@ -72,8 +72,8 @@ void INSERT_TASK_zgemm( const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_zgemm_parsec, options->priority, "Gemm",
- sizeof(int), &transA, VALUE,
- sizeof(int), &transB, VALUE,
+ sizeof(cham_trans_t), &transA, VALUE,
+ sizeof(cham_trans_t), &transB, VALUE,
sizeof(int), &m, VALUE,
sizeof(int), &n, VALUE,
sizeof(int), &k, VALUE,
diff --git a/runtime/parsec/codelets/codelet_zgram.c b/runtime/parsec/codelets/codelet_zgram.c
index 6d180bc74..55c60abdf 100644
--- a/runtime/parsec/codelets/codelet_zgram.c
+++ b/runtime/parsec/codelets/codelet_zgram.c
@@ -97,7 +97,7 @@ void INSERT_TASK_zgram( const RUNTIME_option_t *options,
if (ptrDi == ptrDj) {
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_zsygram_parsec, options->priority, "sygram",
- sizeof(int), &uplo, VALUE,
+ sizeof(cham_uplo_t), &uplo, VALUE,
sizeof(int), &m, VALUE,
sizeof(int), &n, VALUE,
sizeof(int), &mt, VALUE,
@@ -111,7 +111,7 @@ void INSERT_TASK_zgram( const RUNTIME_option_t *options,
} else {
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_zgegram_parsec, options->priority, "gegram",
- sizeof(int), &uplo, VALUE,
+ sizeof(cham_uplo_t), &uplo, VALUE,
sizeof(int), &m, VALUE,
sizeof(int), &n, VALUE,
sizeof(int), &mt, VALUE,
diff --git a/runtime/parsec/codelets/codelet_zhe2ge.c b/runtime/parsec/codelets/codelet_zhe2ge.c
index 10598ce39..8e48b096a 100644
--- a/runtime/parsec/codelets/codelet_zhe2ge.c
+++ b/runtime/parsec/codelets/codelet_zhe2ge.c
@@ -56,7 +56,7 @@ void INSERT_TASK_zhe2ge(const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_zhe2ge_parsec, options->priority, "he2ge",
- sizeof(int), &uplo, VALUE,
+ sizeof(cham_uplo_t), &uplo, VALUE,
sizeof(int), &m, VALUE,
sizeof(int), &n, VALUE,
PASSED_BY_REF, RTBLKADDR(A, CHAMELEON_Complex64_t, Am, An), INPUT ,
diff --git a/runtime/parsec/codelets/codelet_zhemm.c b/runtime/parsec/codelets/codelet_zhemm.c
index 9b9338a37..066e45054 100644
--- a/runtime/parsec/codelets/codelet_zhemm.c
+++ b/runtime/parsec/codelets/codelet_zhemm.c
@@ -65,8 +65,8 @@ void INSERT_TASK_zhemm(const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_zhemm_parsec, options->priority, "hemm",
- sizeof(int), &side, VALUE,
- sizeof(int), &uplo, VALUE,
+ sizeof(cham_side_t), &side, VALUE,
+ sizeof(cham_uplo_t), &uplo, VALUE,
sizeof(int), &m, VALUE,
sizeof(int), &n, VALUE,
sizeof(CHAMELEON_Complex64_t), &alpha, VALUE,
diff --git a/runtime/parsec/codelets/codelet_zher2k.c b/runtime/parsec/codelets/codelet_zher2k.c
index 6088fd99e..958155b40 100644
--- a/runtime/parsec/codelets/codelet_zher2k.c
+++ b/runtime/parsec/codelets/codelet_zher2k.c
@@ -65,8 +65,8 @@ void INSERT_TASK_zher2k(const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_zher2k_parsec, options->priority, "her2k",
- sizeof(int), &uplo, VALUE,
- sizeof(int), &trans, VALUE,
+ sizeof(cham_uplo_t), &uplo, VALUE,
+ sizeof(cham_trans_t), &trans, VALUE,
sizeof(int), &n, VALUE,
sizeof(int), &k, VALUE,
sizeof(CHAMELEON_Complex64_t), &alpha, VALUE,
diff --git a/runtime/parsec/codelets/codelet_zherfb.c b/runtime/parsec/codelets/codelet_zherfb.c
index 252e7cc83..fe703f09a 100644
--- a/runtime/parsec/codelets/codelet_zherfb.c
+++ b/runtime/parsec/codelets/codelet_zherfb.c
@@ -65,7 +65,7 @@ void INSERT_TASK_zherfb(const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_zherfb_parsec, options->priority, "herfb",
- sizeof(int), &uplo, VALUE,
+ sizeof(cham_uplo_t), &uplo, VALUE,
sizeof(int), &n, VALUE,
sizeof(int), &k, VALUE,
sizeof(int), &ib, VALUE,
diff --git a/runtime/parsec/codelets/codelet_zherk.c b/runtime/parsec/codelets/codelet_zherk.c
index 95ea7d858..83a8873e7 100644
--- a/runtime/parsec/codelets/codelet_zherk.c
+++ b/runtime/parsec/codelets/codelet_zherk.c
@@ -60,8 +60,8 @@ void INSERT_TASK_zherk(const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_zherk_parsec, options->priority, "herk",
- sizeof(int), &uplo, VALUE,
- sizeof(int), &trans, VALUE,
+ sizeof(cham_uplo_t), &uplo, VALUE,
+ sizeof(cham_trans_t), &trans, VALUE,
sizeof(int), &n, VALUE,
sizeof(int), &k, VALUE,
sizeof(double), &alpha, VALUE,
diff --git a/runtime/parsec/codelets/codelet_zlacpy.c b/runtime/parsec/codelets/codelet_zlacpy.c
index d1fd86a72..1c2b732f9 100644
--- a/runtime/parsec/codelets/codelet_zlacpy.c
+++ b/runtime/parsec/codelets/codelet_zlacpy.c
@@ -56,7 +56,7 @@ void INSERT_TASK_zlacpyx( const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_zlacpyx_parsec, options->priority, "lacpy",
- sizeof(int), &uplo, VALUE,
+ sizeof(cham_uplo_t), &uplo, VALUE,
sizeof(int), &m, VALUE,
sizeof(int), &n, VALUE,
sizeof(int), &displA, VALUE,
diff --git a/runtime/parsec/codelets/codelet_zlange.c b/runtime/parsec/codelets/codelet_zlange.c
index ee4209b9e..32dfc6a94 100644
--- a/runtime/parsec/codelets/codelet_zlange.c
+++ b/runtime/parsec/codelets/codelet_zlange.c
@@ -55,7 +55,7 @@ void INSERT_TASK_zlange(const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_zlange_parsec, options->priority, "lange",
- sizeof(int), &norm, VALUE,
+ sizeof(cham_normtype_t), &norm, VALUE,
sizeof(int), &M, VALUE,
sizeof(int), &N, VALUE,
PASSED_BY_REF, RTBLKADDR( A, CHAMELEON_Complex64_t, Am, An ), chameleon_parsec_get_arena_index( A ) | INPUT,
diff --git a/runtime/parsec/codelets/codelet_zlanhe.c b/runtime/parsec/codelets/codelet_zlanhe.c
index c0cdac9cf..b4e556d9f 100644
--- a/runtime/parsec/codelets/codelet_zlanhe.c
+++ b/runtime/parsec/codelets/codelet_zlanhe.c
@@ -54,8 +54,8 @@ void INSERT_TASK_zlanhe(const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_zlanhe_parsec, options->priority, "LANHE",
- sizeof(int), &norm, VALUE,
- sizeof(int), &uplo, VALUE,
+ sizeof(cham_normtype_t), &norm, VALUE,
+ sizeof(cham_uplo_t), &uplo, VALUE,
sizeof(int), &N, VALUE,
PASSED_BY_REF, RTBLKADDR( A, CHAMELEON_Complex64_t, Am, An ), chameleon_parsec_get_arena_index( A ) | INPUT,
sizeof(int), &(tileA->ld), VALUE,
diff --git a/runtime/parsec/codelets/codelet_zlansy.c b/runtime/parsec/codelets/codelet_zlansy.c
index 1374e383c..12373a0d4 100644
--- a/runtime/parsec/codelets/codelet_zlansy.c
+++ b/runtime/parsec/codelets/codelet_zlansy.c
@@ -54,8 +54,8 @@ void INSERT_TASK_zlansy(const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_zlansy_parsec, options->priority, "lansy",
- sizeof(int), &norm, VALUE,
- sizeof(int), &uplo, VALUE,
+ sizeof(cham_normtype_t), &norm, VALUE,
+ sizeof(cham_uplo_t), &uplo, VALUE,
sizeof(int), &N, VALUE,
PASSED_BY_REF, RTBLKADDR( A, CHAMELEON_Complex64_t, Am, An ), chameleon_parsec_get_arena_index( A ) | INPUT,
sizeof(int), &(tileA->ld), VALUE,
diff --git a/runtime/parsec/codelets/codelet_zlantr.c b/runtime/parsec/codelets/codelet_zlantr.c
index 897214150..84c9dfa0a 100644
--- a/runtime/parsec/codelets/codelet_zlantr.c
+++ b/runtime/parsec/codelets/codelet_zlantr.c
@@ -26,7 +26,9 @@ static inline int
CORE_zlantr_parsec( parsec_execution_stream_t *context,
parsec_task_t *this_task )
{
- cham_normtype_t norm, uplo, diag;
+ cham_normtype_t norm;
+ cham_uplo_t uplo;
+ cham_diag_t diag;
int M;
int N;
CHAMELEON_Complex64_t *A;
@@ -55,9 +57,9 @@ void INSERT_TASK_zlantr(const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_zlantr_parsec, options->priority, "lantr",
- sizeof(int), &norm, VALUE,
- sizeof(int), &uplo, VALUE,
- sizeof(int), &diag, VALUE,
+ sizeof(cham_normtype_t), &norm, VALUE,
+ sizeof(cham_uplo_t), &uplo, VALUE,
+ sizeof(cham_diag_t), &diag, VALUE,
sizeof(int), &M, VALUE,
sizeof(int), &N, VALUE,
PASSED_BY_REF, RTBLKADDR( A, CHAMELEON_Complex64_t, Am, An ), chameleon_parsec_get_arena_index( A ) | INPUT,
diff --git a/runtime/parsec/codelets/codelet_zlascal.c b/runtime/parsec/codelets/codelet_zlascal.c
index df009c833..eded3f550 100644
--- a/runtime/parsec/codelets/codelet_zlascal.c
+++ b/runtime/parsec/codelets/codelet_zlascal.c
@@ -56,7 +56,7 @@ void INSERT_TASK_zlascal(const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_zlascal_parsec, options->priority, "lascal",
- sizeof(int), &uplo, VALUE,
+ sizeof(cham_uplo_t), &uplo, VALUE,
sizeof(int), &m, VALUE,
sizeof(int), &n, VALUE,
sizeof(CHAMELEON_Complex64_t), &alpha, VALUE,
diff --git a/runtime/parsec/codelets/codelet_zlaset.c b/runtime/parsec/codelets/codelet_zlaset.c
index 8ffbde8c0..fea7c911e 100644
--- a/runtime/parsec/codelets/codelet_zlaset.c
+++ b/runtime/parsec/codelets/codelet_zlaset.c
@@ -53,7 +53,7 @@ void INSERT_TASK_zlaset(const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_zlaset_parsec, options->priority, "laset",
- sizeof(int), &uplo, VALUE,
+ sizeof(cham_uplo_t), &uplo, VALUE,
sizeof(int), &M, VALUE,
sizeof(int), &N, VALUE,
sizeof(CHAMELEON_Complex64_t), &alpha, VALUE,
diff --git a/runtime/parsec/codelets/codelet_zlaset2.c b/runtime/parsec/codelets/codelet_zlaset2.c
index de189dea2..fef44ec1b 100644
--- a/runtime/parsec/codelets/codelet_zlaset2.c
+++ b/runtime/parsec/codelets/codelet_zlaset2.c
@@ -51,7 +51,7 @@ void INSERT_TASK_zlaset2(const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_zlaset2_parsec, options->priority, "laset2",
- sizeof(int), &uplo, VALUE,
+ sizeof(cham_uplo_t), &uplo, VALUE,
sizeof(int), &M, VALUE,
sizeof(int), &N, VALUE,
sizeof(int), &alpha, VALUE,
diff --git a/runtime/parsec/codelets/codelet_zlatro.c b/runtime/parsec/codelets/codelet_zlatro.c
index 2ab3a491a..8e03d0914 100644
--- a/runtime/parsec/codelets/codelet_zlatro.c
+++ b/runtime/parsec/codelets/codelet_zlatro.c
@@ -57,8 +57,8 @@ void INSERT_TASK_zlatro(const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_zlatro_parsec, options->priority, "latro",
- sizeof(int), &uplo, VALUE,
- sizeof(int), &trans, VALUE,
+ sizeof(cham_uplo_t), &uplo, VALUE,
+ sizeof(cham_trans_t), &trans, VALUE,
sizeof(int), &m, VALUE,
sizeof(int), &n, VALUE,
PASSED_BY_REF, RTBLKADDR(A, CHAMELEON_Complex64_t, Am, An), INPUT,
diff --git a/runtime/parsec/codelets/codelet_zlauum.c b/runtime/parsec/codelets/codelet_zlauum.c
index 5ac6dc657..c2f7efe3b 100644
--- a/runtime/parsec/codelets/codelet_zlauum.c
+++ b/runtime/parsec/codelets/codelet_zlauum.c
@@ -49,7 +49,7 @@ void INSERT_TASK_zlauum(const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_zlauum_parsec, options->priority, "lauum",
- sizeof(int), &uplo, VALUE,
+ sizeof(cham_uplo_t), &uplo, VALUE,
sizeof(int), &n, VALUE,
PASSED_BY_REF, RTBLKADDR( A, CHAMELEON_Complex64_t, Am, An ), chameleon_parsec_get_arena_index( A ) | INOUT | AFFINITY,
sizeof(int), &(tileA->ld), VALUE,
diff --git a/runtime/parsec/codelets/codelet_zplssq.c b/runtime/parsec/codelets/codelet_zplssq.c
index bebbdbfb7..1231b5304 100644
--- a/runtime/parsec/codelets/codelet_zplssq.c
+++ b/runtime/parsec/codelets/codelet_zplssq.c
@@ -19,7 +19,6 @@
* @precisions normal z -> c d s
*
*/
-#include <math.h>
#include "chameleon_parsec.h"
#include "chameleon/tasks_z.h"
#include "coreblas/coreblas_z.h"
diff --git a/runtime/parsec/codelets/codelet_zpotrf.c b/runtime/parsec/codelets/codelet_zpotrf.c
index 3e0791ff1..5d7a76242 100644
--- a/runtime/parsec/codelets/codelet_zpotrf.c
+++ b/runtime/parsec/codelets/codelet_zpotrf.c
@@ -63,7 +63,7 @@ void INSERT_TASK_zpotrf(const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_zpotrf_parsec, options->priority, "potrf",
- sizeof(int), &uplo, VALUE,
+ sizeof(cham_uplo_t), &uplo, VALUE,
sizeof(int), &n, VALUE,
PASSED_BY_REF, RTBLKADDR( A, CHAMELEON_Complex64_t, Am, An ), chameleon_parsec_get_arena_index( A ) | INOUT | AFFINITY,
sizeof(int), &(tileA->ld), VALUE,
diff --git a/runtime/parsec/codelets/codelet_zsymm.c b/runtime/parsec/codelets/codelet_zsymm.c
index 195c8797d..93ef4c5e9 100644
--- a/runtime/parsec/codelets/codelet_zsymm.c
+++ b/runtime/parsec/codelets/codelet_zsymm.c
@@ -65,8 +65,8 @@ void INSERT_TASK_zsymm(const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_zsymm_parsec, options->priority, "symm",
- sizeof(int), &side, VALUE,
- sizeof(int), &uplo, VALUE,
+ sizeof(cham_side_t), &side, VALUE,
+ sizeof(cham_uplo_t), &uplo, VALUE,
sizeof(int), &m, VALUE,
sizeof(int), &n, VALUE,
sizeof(CHAMELEON_Complex64_t), &alpha, VALUE,
diff --git a/runtime/parsec/codelets/codelet_zsyr2k.c b/runtime/parsec/codelets/codelet_zsyr2k.c
index 5f5febf89..41da64f3f 100644
--- a/runtime/parsec/codelets/codelet_zsyr2k.c
+++ b/runtime/parsec/codelets/codelet_zsyr2k.c
@@ -65,8 +65,8 @@ void INSERT_TASK_zsyr2k(const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_zsyr2k_parsec, options->priority, "syr2k",
- sizeof(int), &uplo, VALUE,
- sizeof(int), &trans, VALUE,
+ sizeof(cham_uplo_t), &uplo, VALUE,
+ sizeof(cham_trans_t), &trans, VALUE,
sizeof(int), &n, VALUE,
sizeof(int), &k, VALUE,
sizeof(CHAMELEON_Complex64_t), &alpha, VALUE,
diff --git a/runtime/parsec/codelets/codelet_zsyrk.c b/runtime/parsec/codelets/codelet_zsyrk.c
index 2e4a724ec..3e0d22d04 100644
--- a/runtime/parsec/codelets/codelet_zsyrk.c
+++ b/runtime/parsec/codelets/codelet_zsyrk.c
@@ -60,8 +60,8 @@ void INSERT_TASK_zsyrk(const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_zsyrk_parsec, options->priority, "syrk",
- sizeof(int), &uplo, VALUE,
- sizeof(int), &trans, VALUE,
+ sizeof(cham_uplo_t), &uplo, VALUE,
+ sizeof(cham_trans_t), &trans, VALUE,
sizeof(int), &n, VALUE,
sizeof(int), &k, VALUE,
sizeof(CHAMELEON_Complex64_t), &alpha, VALUE,
diff --git a/runtime/parsec/codelets/codelet_zsyssq.c b/runtime/parsec/codelets/codelet_zsyssq.c
index d9b102981..cb95d4bd5 100644
--- a/runtime/parsec/codelets/codelet_zsyssq.c
+++ b/runtime/parsec/codelets/codelet_zsyssq.c
@@ -54,7 +54,7 @@ void INSERT_TASK_zsyssq( const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_zsyssq_parsec, options->priority, "syssq",
sizeof(cham_store_t), &storev, VALUE,
- sizeof(int), &uplo, VALUE,
+ sizeof(cham_uplo_t), &uplo, VALUE,
sizeof(int), &n, VALUE,
PASSED_BY_REF, RTBLKADDR( A, CHAMELEON_Complex64_t, Am, An ), chameleon_parsec_get_arena_index( A ) | INPUT,
sizeof(int), &(tileA->ld), VALUE,
diff --git a/runtime/parsec/codelets/codelet_zsytrf_nopiv.c b/runtime/parsec/codelets/codelet_zsytrf_nopiv.c
index d41a88eb6..0a9033c48 100644
--- a/runtime/parsec/codelets/codelet_zsytrf_nopiv.c
+++ b/runtime/parsec/codelets/codelet_zsytrf_nopiv.c
@@ -51,7 +51,7 @@ void INSERT_TASK_zsytrf_nopiv(const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_zsytrf_nopiv_parsec, options->priority, "sytrf_nopiv",
- sizeof(int), &uplo, VALUE,
+ sizeof(cham_uplo_t), &uplo, VALUE,
sizeof(int), &n, VALUE,
PASSED_BY_REF, RTBLKADDR( A, CHAMELEON_Complex64_t, Am, An ), chameleon_parsec_get_arena_index( A ) | INOUT | AFFINITY,
sizeof(int), &(tileA->ld), VALUE,
diff --git a/runtime/parsec/codelets/codelet_ztpmlqt.c b/runtime/parsec/codelets/codelet_ztpmlqt.c
index f4c81c436..8b220f70e 100644
--- a/runtime/parsec/codelets/codelet_ztpmlqt.c
+++ b/runtime/parsec/codelets/codelet_ztpmlqt.c
@@ -68,8 +68,8 @@ void INSERT_TASK_ztpmlqt( const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_ztpmlqt_parsec, options->priority, "tpmlqt",
- sizeof(int), &side, VALUE,
- sizeof(int), &trans, VALUE,
+ sizeof(cham_side_t), &side, VALUE,
+ sizeof(cham_trans_t), &trans, VALUE,
sizeof(int), &M, VALUE,
sizeof(int), &N, VALUE,
sizeof(int), &K, VALUE,
diff --git a/runtime/parsec/codelets/codelet_ztpmqrt.c b/runtime/parsec/codelets/codelet_ztpmqrt.c
index e8140490f..75ffdeb94 100644
--- a/runtime/parsec/codelets/codelet_ztpmqrt.c
+++ b/runtime/parsec/codelets/codelet_ztpmqrt.c
@@ -68,8 +68,8 @@ void INSERT_TASK_ztpmqrt( const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_ztpmqrt_parsec, options->priority, "tpmqrt",
- sizeof(int), &side, VALUE,
- sizeof(int), &trans, VALUE,
+ sizeof(cham_side_t), &side, VALUE,
+ sizeof(cham_trans_t), &trans, VALUE,
sizeof(int), &M, VALUE,
sizeof(int), &N, VALUE,
sizeof(int), &K, VALUE,
diff --git a/runtime/parsec/codelets/codelet_ztradd.c b/runtime/parsec/codelets/codelet_ztradd.c
index 4b9694047..f7de42bf7 100644
--- a/runtime/parsec/codelets/codelet_ztradd.c
+++ b/runtime/parsec/codelets/codelet_ztradd.c
@@ -116,8 +116,8 @@ void INSERT_TASK_ztradd( const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_ztradd_parsec, options->priority, "tradd",
- sizeof(int), &uplo, VALUE,
- sizeof(int), &trans, VALUE,
+ sizeof(cham_uplo_t), &uplo, VALUE,
+ sizeof(cham_trans_t), &trans, VALUE,
sizeof(int), &m, VALUE,
sizeof(int), &n, VALUE,
sizeof(CHAMELEON_Complex64_t), &alpha, VALUE,
diff --git a/runtime/parsec/codelets/codelet_ztrasm.c b/runtime/parsec/codelets/codelet_ztrasm.c
index 370f2362f..8de5a5f09 100644
--- a/runtime/parsec/codelets/codelet_ztrasm.c
+++ b/runtime/parsec/codelets/codelet_ztrasm.c
@@ -55,8 +55,8 @@ void INSERT_TASK_ztrasm(const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_ztrasm_parsec, options->priority, "trasm",
sizeof(int), &storev, VALUE,
- sizeof(int), &uplo, VALUE,
- sizeof(int), &diag, VALUE,
+ sizeof(cham_uplo_t), &uplo, VALUE,
+ sizeof(cham_diag_t), &diag, VALUE,
sizeof(int), &M, VALUE,
sizeof(int), &N, VALUE,
PASSED_BY_REF, RTBLKADDR( A, CHAMELEON_Complex64_t, Am, An ), chameleon_parsec_get_arena_index( A ) | INPUT,
diff --git a/runtime/parsec/codelets/codelet_ztrmm.c b/runtime/parsec/codelets/codelet_ztrmm.c
index 8383f3111..978ffa8bc 100644
--- a/runtime/parsec/codelets/codelet_ztrmm.c
+++ b/runtime/parsec/codelets/codelet_ztrmm.c
@@ -63,10 +63,10 @@ void INSERT_TASK_ztrmm(const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_ztrmm_parsec, options->priority, "trmm",
- sizeof(int), &side, VALUE,
- sizeof(int), &uplo, VALUE,
- sizeof(int), &transA, VALUE,
- sizeof(int), &diag, VALUE,
+ sizeof(cham_side_t), &side, VALUE,
+ sizeof(cham_uplo_t), &uplo, VALUE,
+ sizeof(cham_trans_t), &transA, VALUE,
+ sizeof(cham_diag_t), &diag, VALUE,
sizeof(int), &m, VALUE,
sizeof(int), &n, VALUE,
sizeof(CHAMELEON_Complex64_t), &alpha, VALUE,
diff --git a/runtime/parsec/codelets/codelet_ztrsm.c b/runtime/parsec/codelets/codelet_ztrsm.c
index 71fcf9e89..4ab4c6846 100644
--- a/runtime/parsec/codelets/codelet_ztrsm.c
+++ b/runtime/parsec/codelets/codelet_ztrsm.c
@@ -26,7 +26,10 @@ static inline int
CORE_ztrsm_parsec( parsec_execution_stream_t *context,
parsec_task_t *this_task )
{
- cham_side_t side, uplo, trans, diag;
+ cham_side_t side;
+ cham_uplo_t uplo;
+ cham_trans_t trans;
+ cham_diag_t diag;
int tempmm, nb, ldak, ldam;
CHAMELEON_Complex64_t alpha;
CHAMELEON_Complex64_t *T;
@@ -55,12 +58,12 @@ void INSERT_TASK_ztrsm(const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_ztrsm_parsec, options->priority, "Trsm",
- sizeof(int), &side, VALUE,
- sizeof(int), &uplo, VALUE,
- sizeof(int), &transA, VALUE,
- sizeof(int), &diag, VALUE,
- sizeof(int), &m, VALUE,
- sizeof(int), &n, VALUE,
+ sizeof(cham_side_t), &side, VALUE,
+ sizeof(cham_uplo_t), &uplo, VALUE,
+ sizeof(cham_trans_t), &transA, VALUE,
+ sizeof(cham_diag_t), &diag, VALUE,
+ sizeof(int), &m, VALUE,
+ sizeof(int), &n, VALUE,
sizeof(CHAMELEON_Complex64_t), &alpha, VALUE,
PASSED_BY_REF, RTBLKADDR( A, CHAMELEON_Complex64_t, Am, An ), chameleon_parsec_get_arena_index( A ) | INPUT,
sizeof(int), &(tileA->ld), VALUE,
diff --git a/runtime/parsec/codelets/codelet_ztrssq.c b/runtime/parsec/codelets/codelet_ztrssq.c
index cb1041877..1c3683d51 100644
--- a/runtime/parsec/codelets/codelet_ztrssq.c
+++ b/runtime/parsec/codelets/codelet_ztrssq.c
@@ -54,8 +54,8 @@ void INSERT_TASK_ztrssq( const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_ztrssq_parsec, options->priority, "trssq",
- sizeof(int), &uplo, VALUE,
- sizeof(int), &diag, VALUE,
+ sizeof(cham_uplo_t), &uplo, VALUE,
+ sizeof(cham_diag_t), &diag, VALUE,
sizeof(int), &m, VALUE,
sizeof(int), &n, VALUE,
PASSED_BY_REF, RTBLKADDR( A, CHAMELEON_Complex64_t, Am, An ), chameleon_parsec_get_arena_index( A ) | INPUT,
diff --git a/runtime/parsec/codelets/codelet_ztrtri.c b/runtime/parsec/codelets/codelet_ztrtri.c
index 80b70fb98..f1a23bcd7 100644
--- a/runtime/parsec/codelets/codelet_ztrtri.c
+++ b/runtime/parsec/codelets/codelet_ztrtri.c
@@ -61,8 +61,8 @@ void INSERT_TASK_ztrtri( const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_ztrtri_parsec, options->priority, "trtri",
- sizeof(int), &uplo, VALUE,
- sizeof(int), &diag, VALUE,
+ sizeof(cham_uplo_t), &uplo, VALUE,
+ sizeof(cham_diag_t), &diag, VALUE,
sizeof(int), &n, VALUE,
PASSED_BY_REF, RTBLKADDR( A, CHAMELEON_Complex64_t, Am, An ), chameleon_parsec_get_arena_index( A ) | INOUT | AFFINITY,
sizeof(int), &(tileA->ld), VALUE,
diff --git a/runtime/parsec/codelets/codelet_ztsmlq_hetra1.c b/runtime/parsec/codelets/codelet_ztsmlq_hetra1.c
index 7b08661b8..26635d221 100644
--- a/runtime/parsec/codelets/codelet_ztsmlq_hetra1.c
+++ b/runtime/parsec/codelets/codelet_ztsmlq_hetra1.c
@@ -76,8 +76,8 @@ void INSERT_TASK_ztsmlq_hetra1(const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_ztsmlq_hetra1_parsec, options->priority, "tsmlq_hetra1",
- sizeof(int), &side, VALUE,
- sizeof(int), &trans, VALUE,
+ sizeof(cham_side_t), &side, VALUE,
+ sizeof(cham_trans_t), &trans, VALUE,
sizeof(int), &m1, VALUE,
sizeof(int), &n1, VALUE,
sizeof(int), &m2, VALUE,
diff --git a/runtime/parsec/codelets/codelet_ztsmqr_hetra1.c b/runtime/parsec/codelets/codelet_ztsmqr_hetra1.c
index 4d8814d4d..fbc00f607 100644
--- a/runtime/parsec/codelets/codelet_ztsmqr_hetra1.c
+++ b/runtime/parsec/codelets/codelet_ztsmqr_hetra1.c
@@ -76,8 +76,8 @@ void INSERT_TASK_ztsmqr_hetra1(const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_ztsmqr_hetra1_parsec, options->priority, "tsmqr_hetra1",
- sizeof(int), &side, VALUE,
- sizeof(int), &trans, VALUE,
+ sizeof(cham_side_t), &side, VALUE,
+ sizeof(cham_trans_t), &trans, VALUE,
sizeof(int), &m1, VALUE,
sizeof(int), &n1, VALUE,
sizeof(int), &m2, VALUE,
diff --git a/runtime/parsec/codelets/codelet_zunmlq.c b/runtime/parsec/codelets/codelet_zunmlq.c
index addb8401f..f5f5c1785 100644
--- a/runtime/parsec/codelets/codelet_zunmlq.c
+++ b/runtime/parsec/codelets/codelet_zunmlq.c
@@ -65,8 +65,8 @@ void INSERT_TASK_zunmlq(const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_zunmlq_parsec, options->priority, "unmlq",
- sizeof(int), &side, VALUE,
- sizeof(int), &trans, VALUE,
+ sizeof(cham_side_t), &side, VALUE,
+ sizeof(cham_trans_t), &trans, VALUE,
sizeof(int), &m, VALUE,
sizeof(int), &n, VALUE,
sizeof(int), &k, VALUE,
diff --git a/runtime/parsec/codelets/codelet_zunmqr.c b/runtime/parsec/codelets/codelet_zunmqr.c
index dfdfe204c..579f5eee5 100644
--- a/runtime/parsec/codelets/codelet_zunmqr.c
+++ b/runtime/parsec/codelets/codelet_zunmqr.c
@@ -65,8 +65,8 @@ void INSERT_TASK_zunmqr(const RUNTIME_option_t *options,
parsec_dtd_taskpool_insert_task(
PARSEC_dtd_taskpool, CORE_zunmqr_parsec, options->priority, "unmqr",
- sizeof(int), &side, VALUE,
- sizeof(int), &trans, VALUE,
+ sizeof(cham_side_t), &side, VALUE,
+ sizeof(cham_trans_t), &trans, VALUE,
sizeof(int), &m, VALUE,
sizeof(int), &n, VALUE,
sizeof(int), &k, VALUE,
diff --git a/runtime/parsec/control/runtime_async.c b/runtime/parsec/control/runtime_async.c
index 2be61345c..792e18c10 100644
--- a/runtime/parsec/control/runtime_async.c
+++ b/runtime/parsec/control/runtime_async.c
@@ -18,7 +18,6 @@
* @date 2020-04-22
*
*/
-#include <stdlib.h>
#include "chameleon_parsec.h"
/**
@@ -120,4 +119,4 @@ int RUNTIME_request_set( CHAM_context_t *chamctxt,
(void)param;
(void)value;
return CHAMELEON_SUCCESS;
-}
\ No newline at end of file
+}
diff --git a/runtime/parsec/control/runtime_context.c b/runtime/parsec/control/runtime_context.c
index 7e143f58b..6b51b5e9a 100644
--- a/runtime/parsec/control/runtime_context.c
+++ b/runtime/parsec/control/runtime_context.c
@@ -17,7 +17,6 @@
* @date 2020-03-03
*
*/
-#include <stdlib.h>
#include "chameleon_parsec.h"
/**
@@ -59,6 +58,8 @@ void RUNTIME_enable( void *runtime_ctxt, int lever )
default:
return;
}
+
+ (void)runtime_ctxt;
return;
}
@@ -82,5 +83,7 @@ void RUNTIME_disable( void *runtime_ctxt, int lever )
default:
return;
}
+
+ (void)runtime_ctxt;
return;
}
diff --git a/runtime/parsec/control/runtime_control.c b/runtime/parsec/control/runtime_control.c
index e673bdcef..f4c20c35d 100644
--- a/runtime/parsec/control/runtime_control.c
+++ b/runtime/parsec/control/runtime_control.c
@@ -18,8 +18,6 @@
* @date 2020-03-03
*
*/
-#include <stdio.h>
-#include <stdlib.h>
#include "chameleon_parsec.h"
#if defined(CHAMELEON_USE_MPI)
diff --git a/runtime/parsec/control/runtime_descriptor.c b/runtime/parsec/control/runtime_descriptor.c
index ef92ded5c..be2a095c1 100644
--- a/runtime/parsec/control/runtime_descriptor.c
+++ b/runtime/parsec/control/runtime_descriptor.c
@@ -19,7 +19,6 @@
* @date 2020-03-03
*
*/
-#include <stdlib.h>
#include "chameleon_parsec.h"
#include <parsec/data.h>
#include <parsec/datatype.h>
@@ -280,7 +279,8 @@ void RUNTIME_desc_create( CHAM_desc_t *mdesc )
case ChamRealDouble: datatype = parsec_datatype_double_t; break;
case ChamComplexFloat: datatype = parsec_datatype_complex_t; break;
case ChamComplexDouble: datatype = parsec_datatype_double_complex_t; break;
- default: chameleon_fatal_error("CHAMELEON_Element_Size", "undefined type"); break;
+ default: chameleon_fatal_error("CHAMELEON_Element_Size", "undefined type");
+ return;
}
/* Register the new arena */
diff --git a/runtime/parsec/control/runtime_options.c b/runtime/parsec/control/runtime_options.c
index 7a4f1df29..e851318b2 100644
--- a/runtime/parsec/control/runtime_options.c
+++ b/runtime/parsec/control/runtime_options.c
@@ -17,8 +17,6 @@
* @date 2020-03-03
*
*/
-#include <stdio.h>
-#include <stdlib.h>
#include "chameleon_parsec.h"
void RUNTIME_options_init( RUNTIME_option_t *options, CHAM_context_t *chamctxt,
diff --git a/runtime/parsec/include/chameleon_parsec.h b/runtime/parsec/include/chameleon_parsec.h
index b941b60b6..fdec33ac6 100644
--- a/runtime/parsec/include/chameleon_parsec.h
+++ b/runtime/parsec/include/chameleon_parsec.h
@@ -22,15 +22,12 @@
#ifndef _chameleon_parsec_h_
#define _chameleon_parsec_h_
+#include "control/common.h"
+
#include <parsec.h>
#include <parsec/interfaces/superscalar/insert_function.h>
#include <parsec/data_dist/matrix/matrix.h>
-/* Undefined PaRSEC definition of BLKLDD */
-#undef BLKLDD
-
-#include "control/common.h"
-
struct chameleon_parsec_desc_s {
parsec_data_collection_t super;
int arena_index;
--
GitLab