From 3292495eabca0ea1ce753423945058cc603d9d1f Mon Sep 17 00:00:00 2001 From: Andy Stokely <117313253+amstokely@users.noreply.github.com> Date: Thu, 19 Dec 2024 14:39:25 -0700 Subject: [PATCH] Update Test_fortran_test_framework_mod.f90 --- test/fortran/Test_fortran_test_framework_mod.f90 | 11 +---------- 1 file changed, 1 insertion(+), 10 deletions(-) diff --git a/test/fortran/Test_fortran_test_framework_mod.f90 b/test/fortran/Test_fortran_test_framework_mod.f90 index c76e86f..014d6ef 100644 --- a/test/fortran/Test_fortran_test_framework_mod.f90 +++ b/test/fortran/Test_fortran_test_framework_mod.f90 @@ -33,9 +33,6 @@ end subroutine assert_mock ! - Asserts equality of integers using both the mock assertion handler (`assert_mock`) ! and the default `assert` procedure. ! - Verifies correct handling of equal and unequal integer values. - ! - ! Notes: - ! - Ensures the `assertEqual` subroutine behaves as expected for integer inputs. subroutine test_assertEqual_integer() integer :: status call assertEqual(1, 1, status, assert_mock) @@ -52,9 +49,6 @@ end subroutine test_assertEqual_integer ! - Asserts equality of logical values (`.true.` and `.false.`) using both the mock ! assertion handler (`assert_mock`) and the default `assert` procedure. ! - Verifies correct handling of equal and unequal logical values. - ! - ! Notes: - ! - Ensures the `assertEqual` subroutine behaves as expected for logical inputs. subroutine test_assertEqual_logical() integer :: status call assertEqual(.true., .true., status, assert_mock) @@ -71,9 +65,6 @@ end subroutine test_assertEqual_logical ! - Asserts equality of strings using both the mock assertion handler (`assert_mock`) ! and the default `assert` procedure. ! - Verifies correct handling of equal and unequal string values. - ! - ! Notes: - ! - Ensures the `assertEqual` subroutine behaves as expected for string inputs. subroutine test_assertEqual_string() integer :: status call assertEqual("a", "a", status, assert_mock) @@ -83,4 +74,4 @@ subroutine test_assertEqual_string() call assertEqual(1, status, status, assert) end subroutine test_assertEqual_string -end module Test_fortran_test_framework_mod \ No newline at end of file +end module Test_fortran_test_framework_mod