blob: fe6f99cf11116f1e8803ab92b0cd1298dc5173d2 (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
import Development.Shake.FilePath ( (</>) )
import System.Directory ( withCurrentDirectory )
import System.Process ( callCommand )
main :: IO ()
main = do
testExampleProject
testExampleProject :: IO ()
testExampleProject =
withCurrentDirectory "example_project" $ callCommand "stack run -- build"
|