seperate haskell und purescript directories
This commit is contained in:
36
haskell/vindinium/src/Codingame.hs
Normal file
36
haskell/vindinium/src/Codingame.hs
Normal file
@@ -0,0 +1,36 @@
|
||||
module Codingame
|
||||
( bundle
|
||||
) where
|
||||
|
||||
import Codingame.WebServices
|
||||
import Codingame.SourcePackager
|
||||
import Language.Haskell.Exts
|
||||
|
||||
import BotRunner
|
||||
import Player
|
||||
import Debug
|
||||
|
||||
|
||||
sourcePath = "src/Player.hs"
|
||||
|
||||
parseMode :: ParseMode
|
||||
parseMode = ParseMode {
|
||||
parseFilename = "<unknown>.hs",
|
||||
baseLanguage = Haskell2010,
|
||||
extensions = [EnableExtension ScopedTypeVariables, EnableExtension LambdaCase, EnableExtension MultiWayIf],
|
||||
ignoreLanguagePragmas = False,
|
||||
ignoreLinePragmas = True,
|
||||
fixities = Just preludeFixities,
|
||||
ignoreFunctionArity = False
|
||||
}
|
||||
|
||||
bundle :: IO ()
|
||||
bundle = do
|
||||
source <- createMonolithicSourceWithMode parseMode sourcePath
|
||||
credentials <- readCredentials "credentials.json"
|
||||
|
||||
putStrLn source
|
||||
|
||||
let file = "Bundled.hs"
|
||||
writeFile file $ "{-# LANGUAGE ScopedTypeVariables, LambdaCase, MultiWayIf #-}\n" ++ source
|
||||
|
||||
Reference in New Issue
Block a user