blob: 3d4aede41824ad25dc5dc47172fddb938d5f0ff4 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
module Lib
( someFunc,
someFunc2
) where
import Development.Shake.FilePath ((</>))
import System.Process (callCommand)
someFunc :: IO ()
someFunc = do
putStrLn "someFunc"
a <- callCommand "gfortran test/test1.f90 -o test1"
a <- callCommand $ "." </> "test1"
return ()
someFunc2 :: IO ()
someFunc2 = do
putStrLn "example"
a <- callCommand "cd example_project && stack run -- build"
return ()
|
