Commit e0d0c8af authored by Mathieu Faverge's avatar Mathieu Faverge

Move to format used everywhere else for comments

parent 18416866
......@@ -66,7 +66,7 @@ static void cl_dzasum_cpu_func(void *descr[], void *cl_arg)
starpu_codelet_unpack_args(cl_arg, &storev, &uplo, &M, &N, &lda);
CORE_dzasum(storev, uplo, M, N, A, lda, work);
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -65,7 +65,7 @@ static void cl_zaxpy_cpu_func(void *descr[], void *cl_arg)
starpu_codelet_unpack_args(cl_arg, &M, &alpha, &incA, &incB);
CORE_zaxpy(M, alpha, A, incA, B, incB);
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -86,7 +86,7 @@ static void cl_zbuild_cpu_func(void *descr[], void *cl_arg)
user_build_callback(row_min, row_max, col_min, col_max, A, ld, user_data);
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -131,7 +131,7 @@ static void cl_zgeadd_cpu_func(void *descr[], void *cl_arg)
CORE_zgeadd(trans, M, N, alpha, A, LDA, beta, B, LDB);
return;
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -149,7 +149,7 @@ static void cl_zgelqt_cpu_func(void *descr[], void *cl_arg)
WORK = TAU + max( m, n );
CORE_zgelqt(m, n, ib, A, lda, T, ldt, TAU, WORK);
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
#if defined(CHAMELEON_USE_MAGMA)
#if !defined(CHAMELEON_SIMULATION)
......@@ -194,8 +194,8 @@ static void cl_zgelqt_cuda_func(void *descr[], void *cl_arg)
cudaThreadSynchronize();
}
#endif //defined(CHAMELEON_USE_MAGMA)
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* defined(CHAMELEON_USE_MAGMA) */
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -54,7 +54,7 @@ void MORSE_TASK_zgemm(const MORSE_option_t *options,
int rank_changed=0;
(void)execution_rank;
// force execution on the rank owning the largest data (tile)
/* force execution on the rank owning the largest data (tile) */
int threshold;
char* env = getenv("MORSE_COMM_FACTOR_THRESHOLD");
......@@ -211,7 +211,7 @@ static void cl_zgemm_cuda_func(void *descr[], void *cl_arg)
}
#endif /* CHAMELEON_USE_CUBLAS_V2 */
#endif /* CHAMELEON_USE_CUDA */
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -195,8 +195,8 @@ static void cl_zgeqrt_cuda_func(void *descr[], void *cl_arg)
cudaThreadSynchronize();
}
#endif //defined(CHAMELEON_USE_MAGMA)
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* defined(CHAMELEON_USE_MAGMA) */
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -161,8 +161,8 @@ static void cl_zgessm_cuda_func(void *descr[], void *cl_arg)
return;
}
#endif //defined(CHAMELEON_USE_MAGMA) && defined(HAVE_MAGMA_GETRF_INCPIV_GPU)
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* defined(CHAMELEON_USE_MAGMA) && defined(HAVE_MAGMA_GETRF_INCPIV_GPU) */
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -63,7 +63,7 @@ static void cl_zgessq_cpu_func(void *descr[], void *cl_arg)
starpu_codelet_unpack_args(cl_arg, &m, &n, &lda);
CORE_zgessq( m, n, A, lda, &SCALESUMSQ[0], &SCALESUMSQ[1] );
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -74,7 +74,7 @@ static void cl_zgetrf_cpu_func(void *descr[], void *cl_arg)
starpu_codelet_unpack_args(cl_arg, &m, &n, &lda, &IPIV, &check_info, &iinfo);
CORE_zgetrf( m, n, A, lda, IPIV, &info );
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -227,8 +227,8 @@ static void cl_zgetrf_incpiv_cuda_func(void *descr[], void *cl_arg)
cudaThreadSynchronize();
}
#endif //defined(CHAMELEON_USE_MAGMA) && defined(HAVE_MAGMA_GETRF_INCPIV_GPU)
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* defined(CHAMELEON_USE_MAGMA) && defined(HAVE_MAGMA_GETRF_INCPIV_GPU) */
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
......
......@@ -141,7 +141,7 @@ static void cl_zgetrf_nopiv_cuda_func(void *descr[], void *cl_arg)
cudaThreadSynchronize();
}
#endif
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -181,7 +181,7 @@ static void cl_zhemm_cuda_func(void *descr[], void *cl_arg)
}
#endif /* CHAMELEON_USE_CUBLAS_V2 */
#endif /* CHAMELEON_USE_CUDA */
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -169,7 +169,7 @@ static void cl_zher2k_cuda_func(void *descr[], void *cl_arg)
}
#endif /* CHAMELEON_USE_CUBLAS_V2 */
#endif /* CHAMELEON_USE_CUDA */
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -166,7 +166,7 @@ static void cl_zherk_cuda_func(void *descr[], void *cl_arg)
}
#endif /* CHAMELEON_USE_CUBLAS_V2 */
#endif /* CHAMELEON_USE_CUDA */
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -63,7 +63,7 @@ static void cl_zhessq_cpu_func(void *descr[], void *cl_arg)
starpu_codelet_unpack_args(cl_arg, &uplo, &n, &lda);
CORE_zhessq( uplo, n, A, lda, &SCALESUMSQ[0], &SCALESUMSQ[1] );
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -82,7 +82,7 @@ static void cl_zlacpy_cpu_func(void *descr[], void *cl_arg)
starpu_codelet_unpack_args(cl_arg, &uplo, &M, &N, &LDA, &LDB);
CORE_zlacpy(uplo, M, N, A, LDA, B, LDB);
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -76,7 +76,7 @@ static void cl_zlag2c_cpu_func(void *descr[], void *cl_arg)
starpu_codelet_unpack_args(cl_arg, &m, &n, &lda, &ldb);
CORE_zlag2c( m, n, A, lda, B, ldb);
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
void MORSE_TASK_clag2z(const MORSE_option_t *options,
int m, int n, int nb,
......@@ -120,7 +120,7 @@ static void cl_clag2z_cpu_func(void *descr[], void *cl_arg)
starpu_codelet_unpack_args(cl_arg, &m, &n, &lda, &ldb);
CORE_clag2z( m, n, A, lda, B, ldb);
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -71,7 +71,7 @@ static void cl_zlange_cpu_func(void *descr[], void *cl_arg)
starpu_codelet_unpack_args(cl_arg, &norm, &M, &N, &LDA);
CORE_zlange( norm, M, N, A, LDA, work, normA);
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......@@ -107,7 +107,7 @@ static void cl_zlange_max_cpu_func(void *descr[], void *cl_arg)
if ( *A > *normA )
*normA = *A;
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -69,7 +69,7 @@ static void cl_zlanhe_cpu_func(void *descr[], void *cl_arg)
starpu_codelet_unpack_args(cl_arg, &norm, &uplo, &N, &LDA);
CORE_zlanhe( norm, uplo, N, A, LDA, work, normA);
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -71,7 +71,7 @@ static void cl_zlansy_cpu_func(void *descr[], void *cl_arg)
starpu_codelet_unpack_args(cl_arg, &norm, &uplo, &N, &LDA);
CORE_zlansy( norm, uplo, N, A, LDA, work, normA);
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -69,7 +69,7 @@ static void cl_zlantr_cpu_func(void *descr[], void *cl_arg)
starpu_codelet_unpack_args(cl_arg, &norm, &uplo, &diag, &M, &N, &LDA);
CORE_zlantr( norm, uplo, diag, M, N, A, LDA, work, normA);
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -103,7 +103,7 @@ static void cl_zlascal_cpu_func(void *descr[], void *cl_arg)
CORE_zlascal(uplo, M, N, alpha, A, LDA);
return;
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -110,7 +110,7 @@ static void cl_zlaset_cpu_func(void *descr[], void *cl_arg)
starpu_codelet_unpack_args(cl_arg, &uplo, &M, &N, &alpha, &beta, &LDA);
CORE_zlaset(uplo, M, N, alpha, beta, A, LDA);
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -105,7 +105,7 @@ static void cl_zlaset2_cpu_func(void *descr[], void *cl_arg)
starpu_codelet_unpack_args(cl_arg, &uplo, &M, &N, &alpha, &LDA);
CORE_zlaset2(uplo, M, N, alpha, A, LDA);
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -90,7 +90,7 @@ static void cl_zlauum_cuda_func(void *descr[], void *cl_arg)
return;
}
#endif
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -31,7 +31,7 @@
#include "runtime/starpu/include/morse_starpu.h"
#include "runtime/starpu/include/runtime_codelet_z.h"
// MORSE_TASK_zplghe - Generate a tile for random hermitian (positive definite if bump is large enough) matrix.
/* MORSE_TASK_zplghe - Generate a tile for random hermitian (positive definite if bump is large enough) matrix. */
void MORSE_TASK_zplghe( const MORSE_option_t *options,
double bump, int m, int n, const MORSE_desc_t *A, int Am, int An, int lda,
......@@ -60,7 +60,7 @@ void MORSE_TASK_zplghe( const MORSE_option_t *options,
}
}
// cl_zplghe_cpu_func - Generate a tile for random hermitian (positive definite if bump is large enough) matrix.
/* cl_zplghe_cpu_func - Generate a tile for random hermitian (positive definite if bump is large enough) matrix. */
#if !defined(CHAMELEON_SIMULATION)
static void cl_zplghe_cpu_func(void *descr[], void *cl_arg)
......@@ -79,7 +79,7 @@ static void cl_zplghe_cpu_func(void *descr[], void *cl_arg)
starpu_codelet_unpack_args(cl_arg, &bump, &m, &n, &lda, &bigM, &m0, &n0, &seed );
CORE_zplghe( bump, m, n, A, lda, bigM, m0, n0, seed );
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -32,7 +32,7 @@
#include "runtime/starpu/include/runtime_codelet_z.h"
// MORSE_TASK_zplgsy - Generate a tile for random symmetric (positive definite if 'bump' is large enough) matrix.
/* MORSE_TASK_zplgsy - Generate a tile for random symmetric (positive definite if 'bump' is large enough) matrix. */
void MORSE_TASK_zplgsy( const MORSE_option_t *options,
MORSE_Complex64_t bump, int m, int n, const MORSE_desc_t *A, int Am, int An, int lda,
......@@ -61,7 +61,7 @@ void MORSE_TASK_zplgsy( const MORSE_option_t *options,
}
}
// cl_zplgsy_cpu_func - Generate a tile for random symmetric (positive definite if 'bump' is large enough) matrix.
/* cl_zplgsy_cpu_func - Generate a tile for random symmetric (positive definite if 'bump' is large enough) matrix. */
#if !defined(CHAMELEON_SIMULATION)
static void cl_zplgsy_cpu_func(void *descr[], void *cl_arg)
......@@ -80,7 +80,7 @@ static void cl_zplgsy_cpu_func(void *descr[], void *cl_arg)
starpu_codelet_unpack_args(cl_arg, &bump, &m, &n, &lda, &bigM, &m0, &n0, &seed );
CORE_zplgsy( bump, m, n, A, lda, bigM, m0, n0, seed );
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -32,7 +32,7 @@
#include "runtime/starpu/include/runtime_codelet_z.h"
// MORSE_TASK_zplrnt - Generate a tile for random matrix.
/* MORSE_TASK_zplrnt - Generate a tile for random matrix. */
void MORSE_TASK_zplrnt( const MORSE_option_t *options,
int m, int n, const MORSE_desc_t *A, int Am, int An, int lda,
......@@ -59,7 +59,7 @@ void MORSE_TASK_zplrnt( const MORSE_option_t *options,
}
}
// cl_zplrnt_cpu_func - Generate a tile for random matrix.
/* cl_zplrnt_cpu_func - Generate a tile for random matrix. */
#if !defined(CHAMELEON_SIMULATION)
static void cl_zplrnt_cpu_func(void *descr[], void *cl_arg)
......@@ -77,7 +77,7 @@ static void cl_zplrnt_cpu_func(void *descr[], void *cl_arg)
starpu_codelet_unpack_args(cl_arg, &m, &n, &lda, &bigM, &m0, &n0, &seed );
CORE_zplrnt( m, n, A, lda, bigM, m0, n0, seed );
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -93,7 +93,7 @@ static void cl_zplssq_cpu_func(void *descr[], void *cl_arg)
SCLSSQ[1] = SCLSSQ[1] + (SCALESUMSQ[1] * (( SCALESUMSQ[0] / SCLSSQ[0] ) * ( SCALESUMSQ[0] / SCLSSQ[0] )));
}
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......@@ -124,7 +124,7 @@ static void cl_zplssq2_cpu_func(void *descr[], void *cl_arg)
RESULT[0] = RESULT[0] * sqrt( RESULT[1] );
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -56,7 +56,7 @@ void MORSE_TASK_zpotrf(const MORSE_option_t *options,
STARPU_RW, RTBLKADDR(A, MORSE_Complex64_t, Am, An),
STARPU_VALUE, &lda, sizeof(int),
STARPU_VALUE, &iinfo, sizeof(int),
//STARPU_SCRATCH, options->ws_worker,
/* STARPU_SCRATCH, options->ws_worker, */
STARPU_PRIORITY, options->priority,
STARPU_CALLBACK, callback,
0);
......@@ -100,21 +100,21 @@ static void cl_zpotrf_cuda_func(void *descr[], void *cl_arg)
/* *\/ */
/* hA = (cuDoubleComplex *)STARPU_MATRIX_GET_PTR(descr[1]); */
// stream[0] = starpu_cuda_get_local_stream();
// if ( cudaStreamCreate( stream+1 ) != CUDA_SUCCESS ){
// fprintf(stderr, "Error while creating stream in codelet_zpotrf\n");
// exit(-1);
// }
/* stream[0] = starpu_cuda_get_local_stream(); */
/* if ( cudaStreamCreate( stream+1 ) != CUDA_SUCCESS ){ */
/* fprintf(stderr, "Error while creating stream in codelet_zpotrf\n"); */
/* exit(-1); */
/* } */
CUDA_zpotrf( uplo, n, A, lda, &info);
cudaThreadSynchronize();
// cudaStreamDestroy( stream[1] );
/* cudaStreamDestroy( stream[1] ); */
return;
}
#endif
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -212,7 +212,7 @@ static void cl_zssssm_cuda_func(void *descr[], void *cl_arg)
cudaThreadSynchronize();
}
#endif
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -179,7 +179,7 @@ static void cl_zsymm_cuda_func(void *descr[], void *cl_arg)
}
#endif /* CHAMELEON_USE_CUBLAS_V2 */
#endif /* CHAMELEON_USE_CUDA */
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -169,7 +169,7 @@ static void cl_zsyr2k_cuda_func(void *descr[], void *cl_arg)
}
#endif /* CHAMELEON_USE_CUBLAS_V2 */
#endif /* CHAMELEON_USE_CUDA */
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -159,7 +159,7 @@ static void cl_zsyrk_cuda_func(void *descr[], void *cl_arg)
}
#endif /* CHAMELEON_USE_CUBLAS_V2 */
#endif /* CHAMELEON_USE_CUDA */
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -63,7 +63,7 @@ static void cl_zsyssq_cpu_func(void *descr[], void *cl_arg)
starpu_codelet_unpack_args(cl_arg, &uplo, &n, &lda);
CORE_zsyssq( uplo, n, A, lda, &SCALESUMSQ[0], &SCALESUMSQ[1] );
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -50,7 +50,7 @@ void MORSE_TASK_zsytrf_nopiv(const MORSE_option_t *options,
STARPU_RW, RTBLKADDR(A, MORSE_Complex64_t, Am, An),
STARPU_VALUE, &lda, sizeof(int),
STARPU_VALUE, &iinfo, sizeof(int),
//STARPU_SCRATCH, options->ws_worker,
/* STARPU_SCRATCH, options->ws_worker, */
STARPU_PRIORITY, options->priority,
STARPU_CALLBACK, callback,
0);
......@@ -72,7 +72,7 @@ static void cl_zsytrf_nopiv_cpu_func(void *descr[], void *cl_arg)
starpu_codelet_unpack_args(cl_arg, &uplo, &n, &lda, &iinfo);
CORE_zsytf2_nopiv(uplo, n, A, lda);
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -77,7 +77,7 @@ static void cl_ztile_zero_cpu_func(void *descr[], void *cl_arg)
A[lda*x+y] = 0.0;
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -137,7 +137,7 @@ static void cl_ztradd_cpu_func(void *descr[], void *cl_arg)
CORE_ztradd(uplo, trans, M, N, alpha, A, LDA, beta, B, LDB);
return;
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -67,7 +67,7 @@ static void cl_ztrasm_cpu_func(void *descr[], void *cl_arg)
starpu_codelet_unpack_args(cl_arg, &storev, &uplo, &diag, &M, &N, &lda);
CORE_ztrasm(storev, uplo, diag, M, N, A, lda, work);
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -169,7 +169,7 @@ static void cl_ztrmm_cuda_func(void *descr[], void *cl_arg)
}
#endif /* CHAMELEON_USE_CUBLAS_V2 */
#endif /* CHAMELEON_USE_CUDA */
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
......
......@@ -52,7 +52,7 @@ void MORSE_TASK_ztrsm(const MORSE_option_t *options,
int rank_changed=0;
(void)execution_rank;
// force execution on the rank owning the largest data (tile)
/* force execution on the rank owning the largest data (tile) */
int threshold;
char* env = getenv("MORSE_COMM_FACTOR_THRESHOLD");
if (env != NULL)
......@@ -191,7 +191,7 @@ static void cl_ztrsm_cuda_func(void *descr[], void *cl_arg)
}
#endif /* CHAMELEON_USE_CUBLAS_V2 */
#endif /* CHAMELEON_USE_CUDA */
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -68,7 +68,7 @@ static void cl_ztrssq_cpu_func(void *descr[], void *cl_arg)
starpu_codelet_unpack_args(cl_arg, &uplo, &diag, &m, &n, &lda);
CORE_ztrssq( uplo, diag, m, n, A, lda, &SCALESUMSQ[0], &SCALESUMSQ[1]);
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -100,7 +100,7 @@ static void cl_ztrtri_cuda_func(void *descr[], void *cl_arg)
return;
}
#endif
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -212,7 +212,7 @@ static void cl_ztslqt_cuda_func(void *descr[], void *cl_arg)
cudaThreadSynchronize();
}
#endif
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -261,7 +261,7 @@ static void cl_ztsmlq_cuda_func(void *descr[], void *cl_arg)
#endif
}
#endif /* defined(CHAMELEON_USE_CUDA) */
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -152,7 +152,7 @@ void MORSE_TASK_ztsmqr(const MORSE_option_t *options,
int rank_changed=0;
(void)execution_rank;
// force execution on the rank owning the largest data (tile)
/* force execution on the rank owning the largest data (tile) */
int threshold;
char* env = getenv("MORSE_COMM_FACTOR_THRESHOLD");
if (env != NULL)
......@@ -293,7 +293,7 @@ static void cl_ztsmqr_cuda_func(void *descr[], void *cl_arg)
#endif
}
#endif /* defined(CHAMELEON_USE_CUDA) */
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
......
......@@ -202,7 +202,7 @@ static void cl_ztsqrt_cuda_func(void *descr[], void *cl_arg)
cudaThreadSynchronize();
}
#endif
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -260,7 +260,7 @@ static void cl_ztstrf_cuda_func(void *descr[], void *cl_arg)
cudaThreadSynchronize();
}
#endif
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -167,7 +167,7 @@ static void cl_zttlqt_cpu_func(void *descr[], void *cl_arg)
CORE_zttlqt(m, n, ib, A1, lda1, A2, lda2, T, ldt, TAU, WORK);
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -205,7 +205,7 @@ static void cl_zttmlq_cpu_func(void *descr[], void *cl_arg)
CORE_zttmlq(side, trans, m1, n1, m2, n2, k, ib, A1, lda1,
A2, lda2, V, ldv, T, ldt, WORK, ldwork);
}
#endif //!defined(CHAMELEON_SIMULATION)
#endif /* !defined(CHAMELEON_SIMULATION) */
/*
* Codelet definition
......
......@@ -145,7 +145,7 @@ void MORSE_TASK_zttmqr(const MORSE_option_t *options,
int rank_changed=0;
(void)execution_rank;
// force execution on the rank owning the largest data (tile)
/* force execution on the rank owning the largest data (tile) */
int threshold;
char* env = getenv("MORSE_COMM_FACTOR_THRESHOLD");
if (env != NULL)
......@@ -234,7 +234,7 @@ static void cl_zttmqr_cpu_func(void *descr[], void *cl_arg)
CORE_zttmqr(side, trans, m1, n1, m2, n2, k, ib,
A1, lda1, A2, lda2, V, ldv, T, ldt, WORK, ldwork);
}
#endif //!defined(CHAMELEON_SIMULATION)