@@ -1595,18 +1595,21 @@ gfc_match_if (gfc_statement *if_type)
15951595 match ("assign" , gfc_match_assign , ST_LABEL_ASSIGNMENT )
15961596 match ("backspace" , gfc_match_backspace , ST_BACKSPACE )
15971597 match ("call" , gfc_match_call , ST_CALL )
1598+ match ("change team" , gfc_match_change_team , ST_CHANGE_TEAM )
15981599 match ("close" , gfc_match_close , ST_CLOSE )
15991600 match ("continue" , gfc_match_continue , ST_CONTINUE )
16001601 match ("cycle" , gfc_match_cycle , ST_CYCLE )
16011602 match ("deallocate" , gfc_match_deallocate , ST_DEALLOCATE )
16021603 match ("end file" , gfc_match_endfile , ST_END_FILE )
1604+ match ("end team" , gfc_match_end_team , ST_END_TEAM )
16031605 match ("error stop" , gfc_match_error_stop , ST_ERROR_STOP )
16041606 match ("event post" , gfc_match_event_post , ST_EVENT_POST )
16051607 match ("event wait" , gfc_match_event_wait , ST_EVENT_WAIT )
16061608 match ("exit" , gfc_match_exit , ST_EXIT )
16071609 match ("fail image" , gfc_match_fail_image , ST_FAIL_IMAGE )
16081610 match ("flush" , gfc_match_flush , ST_FLUSH )
16091611 match ("forall" , match_simple_forall , ST_FORALL )
1612+ match ("form team" , gfc_match_form_team , ST_FORM_TEAM )
16101613 match ("go to" , gfc_match_goto , ST_GOTO )
16111614 match ("if" , match_arithmetic_if , ST_ARITHMETIC_IF )
16121615 match ("inquire" , gfc_match_inquire , ST_INQUIRE )
@@ -1623,6 +1626,7 @@ gfc_match_if (gfc_statement *if_type)
16231626 match ("sync all" , gfc_match_sync_all , ST_SYNC_CALL );
16241627 match ("sync images" , gfc_match_sync_images , ST_SYNC_IMAGES );
16251628 match ("sync memory" , gfc_match_sync_memory , ST_SYNC_MEMORY );
1629+ match ("sync team" , gfc_match_sync_team , ST_SYNC_TEAM )
16261630 match ("unlock" , gfc_match_unlock , ST_UNLOCK )
16271631 match ("where" , match_simple_where , ST_WHERE )
16281632 match ("write" , gfc_match_write , ST_WRITE )
0 commit comments