diff --git a/control/descriptor.h b/control/descriptor.h index 2981f9685da6ebc709d790a88aa9c95fa784845a..b41ddbc1d9212703e016fab1fa938d61896335f0 100644 --- a/control/descriptor.h +++ b/control/descriptor.h @@ -208,13 +208,16 @@ inline static int morse_desc_islocal( const MORSE_desc_t *A, int m, int n ) unsigned __morse_need_submit = 0; #define MORSE_ACCESS_R(A, Am, An) \ - if (morse_desc_islocal(A, Am, An)) __morse_need_submit = 1; + if (morse_desc_islocal(A, Am, An)) __morse_need_submit = 1; \ + RUNTIME_ACCESS_R(A, Am, An) #define MORSE_ACCESS_W(A, Am, An) \ - if (morse_desc_islocal(A, Am, An)) __morse_need_submit = 1; + if (morse_desc_islocal(A, Am, An)) __morse_need_submit = 1; \ + RUNTIME_ACCESS_W(A, Am, An) #define MORSE_ACCESS_RW(A, Am, An) \ - if (morse_desc_islocal(A, Am, An)) __morse_need_submit = 1; + if (morse_desc_islocal(A, Am, An)) __morse_need_submit = 1; \ + RUNTIME_ACCESS_RW(A, Am, An) #define MORSE_RANK_CHANGED __morse_need_submit = 1; diff --git a/runtime/parsec/include/morse_parsec.h b/runtime/parsec/include/morse_parsec.h index 00acf344e789a31b773c2c253c006f1470a67db7..81f377211a393a8feed3a6fa93e0ef1a192ac211 100644 --- a/runtime/parsec/include/morse_parsec.h +++ b/runtime/parsec/include/morse_parsec.h @@ -24,4 +24,10 @@ typedef struct morse_parsec_desc_s morse_parsec_desc_t; */ #define RTBLKADDR( desc, type, m, n ) ( dague_dtd_tile_of( DAGUE_dtd_handle, (desc)->schedopt, m, n ) ) +#define RUNTIME_ACCESS_R(A, Am, An) + +#define RUNTIME_ACCESS_W(A, Am, An) + +#define RUNTIME_ACCESS_RW(A, Am, An) + #endif /* _MORSE_PARSEC_H_ */ diff --git a/runtime/quark/include/morse_quark.h b/runtime/quark/include/morse_quark.h index 648c2c4875d42b1d95862002bbb817bcb87cf821..51c976e271ab5c29a8c134eff4daa64f0de29b4b 100644 --- a/runtime/quark/include/morse_quark.h +++ b/runtime/quark/include/morse_quark.h @@ -47,4 +47,10 @@ typedef struct quark_option_s { */ #define RTBLKADDR( desc, type, m, n ) ( (type*)RUNTIME_desc_getaddr( desc, m, n ) ) +#define RUNTIME_ACCESS_R(A, Am, An) + +#define RUNTIME_ACCESS_W(A, Am, An) + +#define RUNTIME_ACCESS_RW(A, Am, An) + #endif /* _MORSE_QUARK_H_ */ diff --git a/runtime/starpu/include/morse_starpu.h b/runtime/starpu/include/morse_starpu.h index 2f0ff0356241975c1082f3648fe69acb95e2d63c..8fc3650ca227367d87d25530919e7a5cf3860664 100644 --- a/runtime/starpu/include/morse_starpu.h +++ b/runtime/starpu/include/morse_starpu.h @@ -86,4 +86,10 @@ typedef struct starpu_conf starpu_conf_t; void RUNTIME_set_reduction_methods(starpu_data_handle_t handle, MORSE_enum dtyp); +#define RUNTIME_ACCESS_R(A, Am, An) + +#define RUNTIME_ACCESS_W(A, Am, An) + +#define RUNTIME_ACCESS_RW(A, Am, An) + #endif /* _MORSE_STARPU_H_ */