diff --git a/src/assert/assert_subroutine_m.F90 b/src/assert_m.F90 similarity index 98% rename from src/assert/assert_subroutine_m.F90 rename to src/assert_m.F90 index 81edb3b..7a49bd3 100644 --- a/src/assert/assert_subroutine_m.F90 +++ b/src/assert_m.F90 @@ -9,7 +9,7 @@ #include "assert_features.h" -module assert_subroutine_m +module assert_m !! summary: Utility for runtime enforcement of logical assertions. !! usage: error-terminate if the assertion fails: !! @@ -152,5 +152,5 @@ pure subroutine assert_always(assertion, description, file, line) end subroutine -end module assert_subroutine_m +end module assert_m diff --git a/src/assert_m.f90 b/src/assert_m.f90 deleted file mode 100644 index b9a95e3..0000000 --- a/src/assert_m.f90 +++ /dev/null @@ -1,6 +0,0 @@ -module assert_m - !! Public interface - use assert_subroutine_m ! DO NOT PLACE AN ONLY CLAUSE HERE! - ! All public members of assert_subroutine_m are exported - implicit none -end module