From b5b16cf826d468e79b4087500192a4a9e07c140f Mon Sep 17 00:00:00 2001 From: Brad Richardson Date: Wed, 14 Oct 2020 09:24:55 -0500 Subject: Better organize example packages and bootstrap tests --- test/Spec.hs | 41 ----------------------------------------- 1 file changed, 41 deletions(-) delete mode 100644 test/Spec.hs (limited to 'test/Spec.hs') diff --git a/test/Spec.hs b/test/Spec.hs deleted file mode 100644 index 6fb4006..0000000 --- a/test/Spec.hs +++ /dev/null @@ -1,41 +0,0 @@ -import Development.Shake.FilePath ( () ) -import Fpm ( Arguments(..) - , Command(..) - , start - ) -import System.Directory ( withCurrentDirectory ) - -example_path = "test" "example_packages" - -main :: IO () -main = do - testHelloWorld - testHelloComplex - testHelloFpm - testCircular - testWithMakefile - testMakefileComplex - -testHelloWorld :: IO () -testHelloWorld = - withCurrentDirectory (example_path "hello_world") $ start $ Arguments (Run "") False "" - -testHelloComplex :: IO () -testHelloComplex = - withCurrentDirectory (example_path "hello_complex") $ start $ Arguments (Test "") False "" - -testHelloFpm :: IO () -testHelloFpm = - withCurrentDirectory (example_path "hello_fpm") $ start $ Arguments (Run "") False "" - -testCircular :: IO () -testCircular = - withCurrentDirectory (example_path "circular_example") $ start $ Arguments (Test "") False "" - -testWithMakefile :: IO () -testWithMakefile = - withCurrentDirectory (example_path "with_makefile") $ start $ Arguments (Build) False "" - -testMakefileComplex :: IO () -testMakefileComplex = - withCurrentDirectory (example_path "makefile_complex") $ start $ Arguments (Run "") False "" -- cgit v1.2.3