Add test of return-only subroutine

ParaToolsInc · Dec 20, 2024 · 2b7de35 · 2b7de35
1 parent aed21ae
commit 2b7de35
Show file tree

Hide file tree

Showing 2 changed files with 9 additions and 1 deletion.
diff --git a/CMakeLists.txt b/CMakeLists.txt
@@ -611,6 +611,7 @@ set(FORTRAN_TESTS_SOURCES_LIST
   hello.f90
   loop_test.f90
   trivial.f90
+  return-only.f90
 )
 
 # Add a smoke test of the fparse-llvm script
@@ -701,4 +702,4 @@ foreach(test_source IN LISTS FORTRAN_TESTS_SOURCES_LIST)
       DEPENDS run_${upper_comp}_${test_source}
     )
   endforeach()
-endforeach()
+endforeach()
diff --git a/tests/fortran/return-only.f90 b/tests/fortran/return-only.f90
@@ -0,0 +1,7 @@
+      subroutine foo
+          return
+      end subroutine foo
+
+      program main
+          call foo
+      end program main