Apply suggestions from code review

Co-authored-by: Katherine Rasmussen <[email protected]>
BerkeleyLab · Jan 13, 2025 · 5b332d0 · 5b332d0
1 parent d4eca55
commit 5b332d0
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/test/caf_teams_test.f90 b/test/caf_teams_test.f90
@@ -68,13 +68,13 @@ function check_teams() result(result_)
         call prif_get_team(level=PRIF_CURRENT_TEAM, team=t)
         call prif_team_number(team=t, team_number=n)
         result_ = result_ .and. &
-          assert_equals(int(n), -1, "prif_get_team(PRIF_CURRENT_TEAM) retrieves initial team")
+          assert_equals(int(n), -1, "prif_get_team(PRIF_CURRENT_TEAM) retrieves initial team when current team is initial team")
 
         t = prif_team_type() ; n = 0 ! clear outputs
         call prif_get_team(level=PRIF_PARENT_TEAM, team=t)
         call prif_team_number(team=t, team_number=n)
         result_ = result_ .and. &
-          assert_equals(int(n), -1, "prif_get_team(PRIF_PARENT_TEAM) retrieves initial team")
+          assert_equals(int(n), -1, "prif_get_team(PRIF_PARENT_TEAM) retrieves initial team when parent team is initial team")
 
         which_team = merge(1_c_int64_t, 2_c_int64_t, mod(me, 2) == 0)
         element_size = int(storage_size(dummy_element)/8, c_size_t)
@@ -132,7 +132,7 @@ function check_teams() result(result_)
             call prif_get_team(level=PRIF_PARENT_TEAM, team=t)
             call prif_team_number(team=t, team_number=n)
             result_ = result_ .and. &
-              assert_equals(int(n), -1, "prif_get_team(PRIF_PARENT_TEAM) retrieves initial team")
+              assert_equals(int(n), -1, "prif_get_team(PRIF_PARENT_TEAM) retrieves initial team when parent team is initial team")
 
             x = 0 ! clear outputs
             call prif_num_images_with_team(team=initial_team, num_images=x)