mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-16 16:29:32 -06:00
Merge branch 'master' into majestic
This commit is contained in:
@@ -44,7 +44,10 @@ getOptions = do
|
||||
mainOpts :: Options -> [FilePath] -> IO ()
|
||||
mainOpts opts files =
|
||||
case flag optMode opts of
|
||||
ModeVersion -> putStrLn $ "Grammatical Framework (GF) version " ++ showVersion version ++ "\n" ++ buildInfo
|
||||
ModeVersion -> do datadir <- getDataDir
|
||||
putStrLn $ "Grammatical Framework (GF) version " ++ showVersion version ++ "\n" ++
|
||||
buildInfo ++ "\n" ++
|
||||
"Shared folder: " ++ datadir
|
||||
ModeHelp -> putStrLn helpMessage
|
||||
ModeServer port -> mainServerGFI opts port files
|
||||
ModeCompiler -> mainGFC opts files
|
||||
|
||||
3
src/runtime/haskell/Setup.hs
Normal file
3
src/runtime/haskell/Setup.hs
Normal file
@@ -0,0 +1,3 @@
|
||||
import Distribution.Simple
|
||||
|
||||
main = defaultMain
|
||||
4
src/server/Setup.hs
Normal file
4
src/server/Setup.hs
Normal file
@@ -0,0 +1,4 @@
|
||||
import Distribution.Simple(defaultMain)
|
||||
|
||||
main :: IO ()
|
||||
main = defaultMain
|
||||
Reference in New Issue
Block a user