@@ -264,20 +264,34 @@ void PREFIX(caf_sendget)(caf_token_t, size_t, int, gfc_descriptor_t *,
264
264
265
265
#ifdef GCC_GE_15
266
266
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 * ));
269
271
270
272
void PREFIX (register_accessors_finish )();
271
273
272
274
int PREFIX (get_remote_function_index )(const int hash );
273
275
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 );
281
295
#endif
282
296
#ifdef GCC_GE_8
283
297
void PREFIX (get_by_ref )(caf_token_t , int , gfc_descriptor_t * dst ,
0 commit comments