aboutsummaryrefslogtreecommitdiff
path: root/test/example_packages/hello_complex/tests
diff options
context:
space:
mode:
Diffstat (limited to 'test/example_packages/hello_complex/tests')
-rw-r--r--test/example_packages/hello_complex/tests/farewell/farewell_test.f9018
-rw-r--r--test/example_packages/hello_complex/tests/greet/greet_test.f9018
2 files changed, 0 insertions, 36 deletions
diff --git a/test/example_packages/hello_complex/tests/farewell/farewell_test.f90 b/test/example_packages/hello_complex/tests/farewell/farewell_test.f90
deleted file mode 100644
index 0f21b18..0000000
--- a/test/example_packages/hello_complex/tests/farewell/farewell_test.f90
+++ /dev/null
@@ -1,18 +0,0 @@
-program farewell_test
- use farewell_m, only: make_farewell
- use iso_fortran_env, only: error_unit, output_unit
-
- implicit none
-
- character(len=:), allocatable :: farewell
-
- allocate(character(len=0) :: farewell)
- farewell = make_farewell("World")
-
- if (farewell == "Goodbye, World!") then
- write(output_unit, *) "Passed"
- else
- write(error_unit, *) "Failed"
- call exit(1)
- end if
-end program farewell_test
diff --git a/test/example_packages/hello_complex/tests/greet/greet_test.f90 b/test/example_packages/hello_complex/tests/greet/greet_test.f90
deleted file mode 100644
index 41fa508..0000000
--- a/test/example_packages/hello_complex/tests/greet/greet_test.f90
+++ /dev/null
@@ -1,18 +0,0 @@
-program greet_test
- use greet_m, only: make_greeting
- use iso_fortran_env, only: error_unit, output_unit
-
- implicit none
-
- character(len=:), allocatable :: greeting
-
- allocate(character(len=0) :: greeting)
- greeting = make_greeting("World")
-
- if (greeting == "Hello, World!") then
- write(output_unit, *) "Passed"
- else
- write(error_unit, *) "Failed"
- call exit(1)
- end if
-end program greet_test