Skip to content

Commit 8bc33a4

Browse files
committed
Add support for is_present... and send_to_remote.
1 parent f1b32b0 commit 8bc33a4

File tree

3 files changed

+926
-300
lines changed

3 files changed

+926
-300
lines changed

src/application-binary-interface/libcaf.h

Lines changed: 23 additions & 9 deletions
Original file line numberDiff line numberDiff line change
@@ -264,20 +264,34 @@ void PREFIX(caf_sendget)(caf_token_t, size_t, int, gfc_descriptor_t *,
264264

265265
#ifdef GCC_GE_15
266266
void PREFIX(register_accessor)(const int hash,
267-
void (*accessor)(void **, int32_t *, void *,
268-
void *, size_t *, size_t *));
267+
void (*accessor)(void *, const int *, void **,
268+
int32_t *, void *, caf_token_t,
269+
const size_t, size_t *,
270+
const size_t *));
269271

270272
void PREFIX(register_accessors_finish)();
271273

272274
int PREFIX(get_remote_function_index)(const int hash);
273275

274-
void PREFIX(get_by_ct)(caf_token_t token, const gfc_descriptor_t *opt_src_desc,
275-
const size_t *opt_src_charlen, const int image_index,
276-
const size_t dst_size, void **dst_data,
277-
size_t *opt_dst_charlen, gfc_descriptor_t *opt_dst_desc,
278-
const bool may_realloc_dst, const int getter_index,
279-
void *get_data, const size_t get_data_size, int *stat,
280-
caf_team_t *team, int *team_number);
276+
void PREFIX(get_from_remote)(
277+
caf_token_t token, const gfc_descriptor_t *opt_src_desc,
278+
const size_t *opt_src_charlen, const int image_index, const size_t dst_size,
279+
void **dst_data, size_t *opt_dst_charlen, gfc_descriptor_t *opt_dst_desc,
280+
const bool may_realloc_dst, const int getter_index, void *get_data,
281+
const size_t get_data_size, int *stat, caf_team_t *team, int *team_number);
282+
283+
int32_t PREFIX(is_present_on_remote)(caf_token_t token, const int image_index,
284+
const int is_present_index, void *add_data,
285+
const size_t add_data_size);
286+
287+
void PREFIX(send_to_remote)(caf_token_t token, gfc_descriptor_t *opt_dst_desc,
288+
const size_t *opt_dst_charlen,
289+
const int image_index, const size_t src_size,
290+
const void *src_data, size_t *opt_src_charlen,
291+
const gfc_descriptor_t *opt_src_desc,
292+
const int setter_index, void *add_data,
293+
const size_t add_data_size, int *stat,
294+
caf_team_t *team, int *team_number);
281295
#endif
282296
#ifdef GCC_GE_8
283297
void PREFIX(get_by_ref)(caf_token_t, int, gfc_descriptor_t *dst,

0 commit comments

Comments
 (0)