aboutsummaryrefslogtreecommitdiff
path: root/bootstrap/test
diff options
context:
space:
mode:
Diffstat (limited to 'bootstrap/test')
-rw-r--r--bootstrap/test/Spec.hs38
1 files changed, 32 insertions, 6 deletions
diff --git a/bootstrap/test/Spec.hs b/bootstrap/test/Spec.hs
index 6fb4006..4e660e7 100644
--- a/bootstrap/test/Spec.hs
+++ b/bootstrap/test/Spec.hs
@@ -15,27 +15,53 @@ main = do
testCircular
testWithMakefile
testMakefileComplex
+ testSubmodule
testHelloWorld :: IO ()
testHelloWorld =
- withCurrentDirectory (example_path </> "hello_world") $ start $ Arguments (Run "") False ""
+ withCurrentDirectory (example_path </> "hello_world") $ start $ Arguments
+ (Run "")
+ False
+ ""
testHelloComplex :: IO ()
testHelloComplex =
- withCurrentDirectory (example_path </> "hello_complex") $ start $ Arguments (Test "") False ""
+ withCurrentDirectory (example_path </> "hello_complex") $ start $ Arguments
+ (Test "")
+ False
+ ""
testHelloFpm :: IO ()
testHelloFpm =
- withCurrentDirectory (example_path </> "hello_fpm") $ start $ Arguments (Run "") False ""
+ withCurrentDirectory (example_path </> "hello_fpm") $ start $ Arguments
+ (Run "")
+ False
+ ""
testCircular :: IO ()
testCircular =
- withCurrentDirectory (example_path </> "circular_example") $ start $ Arguments (Test "") False ""
+ withCurrentDirectory (example_path </> "circular_example") $ start $ Arguments
+ (Test "")
+ False
+ ""
testWithMakefile :: IO ()
testWithMakefile =
- withCurrentDirectory (example_path </> "with_makefile") $ start $ Arguments (Build) False ""
+ withCurrentDirectory (example_path </> "with_makefile") $ start $ Arguments
+ (Build)
+ False
+ ""
testMakefileComplex :: IO ()
testMakefileComplex =
- withCurrentDirectory (example_path </> "makefile_complex") $ start $ Arguments (Run "") False ""
+ withCurrentDirectory (example_path </> "makefile_complex") $ start $ Arguments
+ (Run "")
+ False
+ ""
+
+testSubmodule :: IO ()
+testSubmodule =
+ withCurrentDirectory (example_path </> "submodules") $ start $ Arguments
+ (Build)
+ False
+ ""