@@ -292,6 +292,18 @@ void PREFIX(send_to_remote)(caf_token_t token, gfc_descriptor_t *opt_dst_desc,
292
292
const int setter_index , void * add_data ,
293
293
const size_t add_data_size , int * stat ,
294
294
caf_team_t * team , int * team_number );
295
+
296
+ void PREFIX (transfer_between_remotes )(
297
+ caf_token_t dst_token , gfc_descriptor_t * opt_dst_desc ,
298
+ size_t * opt_dst_charlen , const int dst_image_index ,
299
+ const int dst_access_index , void * dst_add_data ,
300
+ const size_t dst_add_data_size , caf_token_t src_token ,
301
+ const gfc_descriptor_t * opt_src_desc , const size_t * opt_src_charlen ,
302
+ const int src_image_index , const int src_access_index , void * src_add_data ,
303
+ const size_t src_add_data_size , const size_t src_size ,
304
+ const bool scalar_transfer , int * dst_stat , int * src_stat ,
305
+ caf_team_t * dst_team , int * dst_team_number , caf_team_t * src_team ,
306
+ int * src_team_number );
295
307
#endif
296
308
#ifdef GCC_GE_8
297
309
void PREFIX (get_by_ref )(caf_token_t , int , gfc_descriptor_t * dst ,
0 commit comments