Commit bf172f1a authored by Mathieu Faverge's avatar Mathieu Faverge
Browse files

Protect some unavailable debug for now

parent 4b8b9fb5
......@@ -83,7 +83,7 @@ thread_pzgetrf( int rank, void *args )
core_zgetrfsp1d( datacode, cblk, sopalin_data->diagthreshold, work );
}
#if defined(PASTIX_DEBUG_FACTO)
#if defined(PASTIX_DEBUG_FACTO) && 0
isched_barrier_wait( &(((isched_t*)(sopalin_data->sched))->barrier) );
if (rank == 0) {
coeftab_zdump( datacode, "getrf_L.txt" );
......@@ -127,6 +127,10 @@ parsec_zgetrf( pastix_data_t *pastix_data,
sparse_matrix_destroy( &desc );
dague_fini( &(pastix_data->parsec) );
#if defined(PASTIX_DEBUG_FACTO)
coeftab_zdump( pastix_data->solvmatr, "getrf_L.txt" );
#endif
}
#endif
......
......@@ -86,7 +86,7 @@ thread_pzhetrf( int rank, void *args )
work1, work2 );
}
#if defined(PASTIX_DEBUG_FACTO)
#if defined(PASTIX_DEBUG_FACTO) && 0
isched_barrier_wait( &(((isched_t*)(sopalin_data->sched))->barrier) );
if (rank == 0) {
coeftab_zdump( datacode, "hetrf_L.txt" );
......@@ -106,7 +106,7 @@ thread_zhetrf( pastix_data_t *pastix_data,
isched_parallel_call( pastix_data->isched, thread_pzhetrf, sopalin_data );
}
#if defined(PASTIX_WITH_PARSEC)
#if defined(PASTIX_WITH_PARSEC) && 0
void
parsec_zhetrf( pastix_data_t *pastix_data,
sopalin_data_t *sopalin_data )
......@@ -138,7 +138,7 @@ parsec_zhetrf( pastix_data_t *pastix_data,
static void (*zhetrf_table[4])(pastix_data_t *, sopalin_data_t *) = {
sequential_zhetrf,
thread_zhetrf,
#if defined(PASTIX_WITH_PARSEC)
#if defined(PASTIX_WITH_PARSEC) && 0
parsec_zhetrf,
#else
NULL,
......
......@@ -83,7 +83,7 @@ thread_pzpotrf( int rank, void *args )
core_zpotrfsp1d( datacode, cblk, sopalin_data->diagthreshold, work );
}
#if defined(PASTIX_DEBUG_FACTO)
#if defined(PASTIX_DEBUG_FACTO) && 0
isched_barrier_wait( &(((isched_t*)(sopalin_data->sched))->barrier) );
if (rank == 0) {
coeftab_zdump( datacode, "potrf_L.txt" );
......
......@@ -86,7 +86,7 @@ thread_pzsytrf( int rank, void *args )
work1, work2 );
}
#if defined(PASTIX_DEBUG_FACTO)
#if defined(PASTIX_DEBUG_FACTO) && 0
isched_barrier_wait( &(((isched_t*)(sopalin_data->sched))->barrier) );
if (rank == 0) {
coeftab_zdump( datacode, "sytrf_L.txt" );
......@@ -106,7 +106,7 @@ thread_zsytrf( pastix_data_t *pastix_data,
isched_parallel_call( pastix_data->isched, thread_pzsytrf, sopalin_data );
}
#if defined(PASTIX_WITH_PARSEC)
#if defined(PASTIX_WITH_PARSEC) && 0
void
parsec_zsytrf( pastix_data_t *pastix_data,
sopalin_data_t *sopalin_data )
......@@ -138,7 +138,7 @@ parsec_zsytrf( pastix_data_t *pastix_data,
static void (*zsytrf_table[4])(pastix_data_t *, sopalin_data_t *) = {
sequential_zsytrf,
thread_zsytrf,
#if defined(PASTIX_WITH_PARSEC)
#if defined(PASTIX_WITH_PARSEC) && 0
parsec_zsytrf,
#else
NULL,
......
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