diff --git a/runtime/parsec/control/runtime_descriptor.c b/runtime/parsec/control/runtime_descriptor.c index 1bd316e2f84fc073bc939558e49f28c29ed67762..06364f173e30e3fe9d7554d0cbbde22c0361b2e7 100644 --- a/runtime/parsec/control/runtime_descriptor.c +++ b/runtime/parsec/control/runtime_descriptor.c @@ -40,10 +40,6 @@ struct morse_parsec_desc_s { int arena_index; }; -int morse_parsec_get_arena_index(const MORSE_desc_t *desc) { - return ((morse_parsec_desc_t *)desc->schedopt)->arena_index; -} - static void morse_parsec_key_to_coordinates(parsec_data_collection_t *data_collection, parsec_data_key_t key, int *m, int *n) diff --git a/runtime/parsec/include/chameleon_parsec.h b/runtime/parsec/include/chameleon_parsec.h index 0967a72878a88def884ba43dd7563f4b3da59eb4..76f515905084369d2d597eda5ee143dfac04172f 100644 --- a/runtime/parsec/include/chameleon_parsec.h +++ b/runtime/parsec/include/chameleon_parsec.h @@ -22,7 +22,8 @@ typedef struct morse_parsec_desc_s morse_parsec_desc_t; /* * Access to block pointer and leading dimension */ -#define RTBLKADDR( desc, type, m, n ) ( dague_dtd_tile_of( DAGUE_dtd_handle, (desc)->schedopt, m, n ) ) +#define RTBLKADDR( desc, type, m, n ) ( parsec_dtd_tile_of( (parsec_data_collection_t *) ((desc)->schedopt), \ + ((parsec_data_collection_t *) (desc)->schedopt)->data_key((desc)->schedopt, m, n) )) #define RUNTIME_BEGIN_ACCESS_DECLARATION