Commit 0f2ad71b authored by Mathieu Faverge's avatar Mathieu Faverge

Add missing flushes

parent 0101bbb6
......@@ -517,7 +517,11 @@ void chameleon_pzlange_generic( cham_normtype_t norm, cham_uplo_t uplo, cham_dia
}
}
if ( wcol_init ) {
CHAMELEON_Desc_Flush( &Wcol, sequence );
}
CHAMELEON_Desc_Flush( &Welt, sequence );
CHAMELEON_Desc_Flush( A, sequence );
RUNTIME_sequence_wait(chamctxt, sequence);
*result = *((double *)Welt.get_blkaddr( &Welt, A->myrank / A->q, A->myrank % A->q ));
......
......@@ -423,7 +423,11 @@ void chameleon_pzlansy_generic( cham_normtype_t norm, cham_uplo_t uplo, cham_tra
}
}
if ( wcol_init ) {
CHAMELEON_Desc_Flush( &Wcol, sequence );
}
CHAMELEON_Desc_Flush( &Welt, sequence );
CHAMELEON_Desc_Flush( A, sequence );
RUNTIME_sequence_wait(chamctxt, sequence);
*result = *(double *)Welt.get_blkaddr( &Welt, A->myrank / A->q, A->myrank % A->q );
......
......@@ -188,7 +188,7 @@ double CHAMELEON_zlange(cham_normtype_t norm, int M, int N,
* @sa CHAMELEON_slange_Tile
*
*/
double CHAMELEON_zlange_Tile(cham_normtype_t norm, CHAM_desc_t *A )
double CHAMELEON_zlange_Tile( cham_normtype_t norm, CHAM_desc_t *A )
{
CHAM_context_t *chamctxt;
RUNTIME_sequence_t *sequence = 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