diff options
| author | Brad Richardson <everythingfunctional@protonmail.com> | 2020-10-22 16:43:58 -0500 |
|---|---|---|
| committer | Brad Richardson <everythingfunctional@protonmail.com> | 2020-10-22 16:43:58 -0500 |
| commit | 03c9efc756568ce9c74fdb9dc9df216975e5cd69 (patch) | |
| tree | e549595bde6fae88b1cd79e6a005ff8e3ca2126f /bootstrap/unit_test/SubmoduleToCompileInfoTest.hs | |
| parent | f196336df68d0431876d558352149d009935a05a (diff) | |
| download | fpm-03c9efc756568ce9c74fdb9dc9df216975e5cd69.tar.gz fpm-03c9efc756568ce9c74fdb9dc9df216975e5cd69.zip | |
Add test with submodule example project and fix .smod naming convention
Diffstat (limited to 'bootstrap/unit_test/SubmoduleToCompileInfoTest.hs')
| -rw-r--r-- | bootstrap/unit_test/SubmoduleToCompileInfoTest.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/bootstrap/unit_test/SubmoduleToCompileInfoTest.hs b/bootstrap/unit_test/SubmoduleToCompileInfoTest.hs index 4b3f474..d5d3ad8 100644 --- a/bootstrap/unit_test/SubmoduleToCompileInfoTest.hs +++ b/bootstrap/unit_test/SubmoduleToCompileInfoTest.hs @@ -37,6 +37,7 @@ exampleSubmodule = Submodule { submoduleSourceFileName = submoduleSourceFileName' , submoduleObjectFileName = \bd -> bd </> "some_file_somewhere.f90.o" , submoduleModulesUsed = ["module1", "module2", "module3"] + , submoduleBaseModuleName = "base_module" , submoduleParentName = "base_module@parent" , submoduleName = "some_submodule" } @@ -62,7 +63,7 @@ checkObjectFileName cti = assertEquals checkOtherFilesProduced :: CompileTimeInfo -> Result checkOtherFilesProduced cti = assertEquals - ["build_dir" </> "base_module@parent@some_submodule.smod"] + ["build_dir" </> "base_module@some_submodule.smod"] (compileTimeInfoOtherFilesProduced cti) checkDirectDependencies :: CompileTimeInfo -> Result |