implement compiler test suite

Author: perazz

test/fpm_test/main.f90

@@ -3,6 +3,7 @@ program fpm_testing
     use, intrinsic :: iso_fortran_env, only : error_unit
     use testsuite, only : run_testsuite, new_testsuite, testsuite_t, select_suite, run_selected
     use test_toml, only : collect_toml
+    use test_compiler, only : collect_compiler
     use test_manifest, only : collect_manifest
     use test_filesystem, only : collect_filesystem
     use test_source_parsing, only : collect_source_parsing
@@ -24,6 +25,7 @@ program fpm_testing
 
     suite = [ &
         & new_testsuite("fpm_toml", collect_toml), &
+        & new_testsuite("fpm_compiler", collect_compiler), &
         & new_testsuite("fpm_manifest", collect_manifest), &
         & new_testsuite("fpm_filesystem", collect_filesystem), &
         & new_testsuite("fpm_source_parsing", collect_source_parsing), &

test/fpm_test/test_compiler.f90

@@ -0,0 +1,33 @@
+!> Define tests for the `fpm_compiler` module
+module test_compiler
+    use testsuite, only : new_unittest, unittest_t, error_t, test_failed, &
+        & check_string
+    use fpm_environment, only : OS_WINDOWS, OS_LINUX
+    use fpm_compiler   , only : compiler_t
+    implicit none
+    private
+
+    public :: collect_compiler
+
+
+contains
+
+    !> Collect all exported unit tests
+    subroutine collect_compiler(testsuite)
+        !> Collection of tests
+        type(unittest_t), allocatable, intent(out) :: testsuite(:)
+
+        testsuite = [ &
+            & new_unittest("check-fortran-source-runs", test_check_fortran_source_runs)]
+
+    end subroutine collect_compiler
+    
+    subroutine test_check_fortran_source_runs(error)
+        !> Error handling
+        type(error_t), allocatable, intent(out) :: error
+
+
+    end subroutine test_check_fortran_source_runs    
+
+
+end module test_compiler