@@ -238,13 +238,14 @@ void PREFIX (register) (size_t, caf_register_t, caf_token_t *,
238238 gfc_descriptor_t * , int * , char * , charlen_t );
239239void PREFIX (deregister ) (caf_token_t * , int , int * , char * , charlen_t );
240240#else
241- void * PREFIX (register) (size_t , caf_register_t , caf_token_t * ,
242- int * , char * , int );
241+ void * PREFIX (register) (size_t , caf_register_t , caf_token_t * , int * , char * ,
242+ int );
243243void PREFIX (deregister ) (caf_token_t * , int * , char * , int );
244244#endif
245245
246246void PREFIX (caf_get ) (caf_token_t , size_t , int , gfc_descriptor_t * ,
247- caf_vector_t * , gfc_descriptor_t * , int , int , bool , int * );
247+ caf_vector_t * , gfc_descriptor_t * , int , int , bool ,
248+ int * );
248249void PREFIX (caf_send ) (caf_token_t , size_t , int , gfc_descriptor_t * ,
249250 caf_vector_t * , gfc_descriptor_t * , int , int , bool ,
250251 int * );
@@ -264,10 +265,11 @@ void PREFIX(send_by_ref) (caf_token_t token, int image_index,
264265 int dst_kind , int src_kind , bool may_require_tmp ,
265266 bool dst_reallocatable , int * stat , int dst_type );
266267void PREFIX (sendget_by_ref ) (caf_token_t dst_token , int dst_image_index ,
267- caf_reference_t * dst_refs , caf_token_t src_token , int src_image_index ,
268- caf_reference_t * src_refs , int dst_kind , int src_kind ,
269- bool may_require_tmp , int * dst_stat , int * src_stat ,
270- int dst_type , int src_type );
268+ caf_reference_t * dst_refs , caf_token_t src_token ,
269+ int src_image_index , caf_reference_t * src_refs ,
270+ int dst_kind , int src_kind , bool may_require_tmp ,
271+ int * dst_stat , int * src_stat , int dst_type ,
272+ int src_type );
271273#elif defined(GCC_GE_7 )
272274void PREFIX (get_by_ref ) (caf_token_t , int ,
273275 gfc_descriptor_t * dst , caf_reference_t * refs ,
@@ -278,9 +280,10 @@ void PREFIX(send_by_ref) (caf_token_t token, int image_index,
278280 int dst_kind , int src_kind , bool may_require_tmp ,
279281 bool dst_reallocatable , int * stat );
280282void PREFIX (sendget_by_ref ) (caf_token_t dst_token , int dst_image_index ,
281- caf_reference_t * dst_refs , caf_token_t src_token , int src_image_index ,
282- caf_reference_t * src_refs , int dst_kind , int src_kind ,
283- bool may_require_tmp , int * dst_stat , int * src_stat );
283+ caf_reference_t * dst_refs , caf_token_t src_token ,
284+ int src_image_index , caf_reference_t * src_refs ,
285+ int dst_kind , int src_kind , bool may_require_tmp ,
286+ int * dst_stat , int * src_stat );
284287#endif
285288#ifdef GCC_GE_7
286289int PREFIX (is_present ) (caf_token_t , int , caf_reference_t * refs );
0 commit comments