Update interface of prif_end_team based on latest design doc

choices.
BerkeleyLab · Dec 13, 2023 · 153e652 · 153e652
1 parent b71366a
commit 153e652
Showing 1 changed file with 5 additions and 1 deletion.
diff --git a/src/caffeine/team_type_m.f90 b/src/caffeine/team_type_m.f90
@@ -34,7 +34,11 @@ module subroutine prif_change_team(team, stat, errmsg, errmsg_alloc)
       character(len=:), intent(inout), allocatable, optional :: errmsg_alloc
     end subroutine
 
-    module subroutine prif_end_team()
+    module subroutine prif_end_team(stat, errmsg, errmsg_alloc)
+      implicit none
+      integer(c_int), intent(out), optional :: stat
+      character(len=*), intent(inout), optional :: errmsg
+      character(len=:), intent(inout), allocatable, optional :: errmsg_alloc
     end subroutine
 
   end interface