diff --git a/compute/pzbuild.c b/compute/pzbuild.c index 9489200da873878a98628ef8021951b03619b82f..2dc7586d7e68eb0712c222475f089a994e553f88 100644 --- a/compute/pzbuild.c +++ b/compute/pzbuild.c @@ -76,9 +76,9 @@ void morse_pzbuild( MORSE_enum uplo, MORSE_desc_t *A, void *user_data, void* use ldam = BLKLDD(A, m); for (n = 0; n < A->nt; n++) { - if ( uplo == MorseUpper && m <= n || - uplo == MorseLower && m >= n || - uplo == MorseUpperLower) + if ( ( uplo == MorseUpper && m <= n ) || + ( uplo == MorseLower && m >= n ) || + ( uplo == MorseUpperLower ) ) MORSE_TASK_zbuild( &options, A(m, n), ldam, diff --git a/compute/pzgelqf.c b/compute/pzgelqf.c index f8969bc0bcedc0cb57cb9e8f5eecad5ea3968ae6..1e2a17ccf7feb1b3d7996b5b49c3fa7631eae4e6 100644 --- a/compute/pzgelqf.c +++ b/compute/pzgelqf.c @@ -53,7 +53,7 @@ void morse_pzgelqf(MORSE_desc_t *A, MORSE_desc_t *T, int k, m, n; int ldak, ldam; int tempkm, tempkn, tempmm, tempnn; - int ib, minMT; + int ib; morse = morse_context_self(); if (sequence->status != MORSE_SUCCESS) @@ -62,12 +62,6 @@ void morse_pzgelqf(MORSE_desc_t *A, MORSE_desc_t *T, ib = MORSE_IB; - if (A->m > A->n) { - minMT = A->nt; - } else { - minMT = A->mt; - } - /* * zgelqt = A->nb * (ib+1) * zunmlq = A->nb * ib diff --git a/example/out_of_core/out_of_core.c b/example/out_of_core/out_of_core.c index cf468ad45d455a428d2f6214d8e7be9fc0687fe5..a2551f1fac3e64fc5e6c773cb132bccaa379e4f8 100644 --- a/example/out_of_core/out_of_core.c +++ b/example/out_of_core/out_of_core.c @@ -97,6 +97,10 @@ int main(int argc, char *argv[]) { if (iparam[IPARAM_OUTOFCORE] > 0) { int new_dd = starpu_disk_register (&starpu_disk_unistd_o_direct_ops, (void*) "./ooc/", 1024*1024*10); + if (new_dd == -ENOENT){ + fprintf(stderr, "Can't write on ./ooc/\n"); + return EXIT_FAILURE; + } } MORSE_Desc_Create_User(&descA, NULL, MorseRealDouble, diff --git a/runtime/starpu/codelets/codelet_zbuild.c b/runtime/starpu/codelets/codelet_zbuild.c index 8adaed7c477ad694c8e9b3153c2f29de11c798ea..0768ad62b8d04fefee7ddbf22188b2933eca47db 100644 --- a/runtime/starpu/codelets/codelet_zbuild.c +++ b/runtime/starpu/codelets/codelet_zbuild.c @@ -69,8 +69,6 @@ void MORSE_TASK_zbuild( MORSE_option_t *options, static void cl_zbuild_cpu_func(void *descr[], void *cl_arg) { - int Am; - int An; MORSE_Complex64_t *A; int ld; void *user_data; diff --git a/runtime/starpu/control/runtime_descriptor.c b/runtime/starpu/control/runtime_descriptor.c index 313ceff097d9e928bccddca4d8f49f5d99630602..0182d776f7a7ca789b3bdefc28899084357526a4 100644 --- a/runtime/starpu/control/runtime_descriptor.c +++ b/runtime/starpu/control/runtime_descriptor.c @@ -112,8 +112,6 @@ void RUNTIME_desc_create( MORSE_desc_t *desc ) */ { static int _tag_mpi_initialized_ = 0; - MORSE_context_t *morse; - int myrank = desc->myrank; if (!_tag_mpi_initialized_) { int *tag_ub = NULL;