1 2 3 4 5 6 7 8 9 10 11 12 13 14
module Lib ( someFunc ) 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 ()