Add basic turnt setup
This commit is contained in:
parent
690985cb87
commit
8822506d41
7
Main.hs
7
Main.hs
|
|
@ -1,7 +0,0 @@
|
||||||
module Main where
|
|
||||||
|
|
||||||
import Bril
|
|
||||||
|
|
||||||
main :: IO ()
|
|
||||||
main = do
|
|
||||||
putStrLn $ "Hello World!"
|
|
||||||
|
|
@ -0,0 +1,17 @@
|
||||||
|
module Main where
|
||||||
|
|
||||||
|
import Data.Either (isRight)
|
||||||
|
import qualified Data.ByteString.Lazy as B
|
||||||
|
import System.Exit
|
||||||
|
import Bril
|
||||||
|
|
||||||
|
main :: IO ()
|
||||||
|
main = do
|
||||||
|
json <- B.getContents
|
||||||
|
let parsed = parseBrilJSON json
|
||||||
|
if isRight parsed
|
||||||
|
then do
|
||||||
|
B.putStr json
|
||||||
|
exitWith ExitSuccess
|
||||||
|
else
|
||||||
|
exitWith (ExitFailure 1)
|
||||||
|
|
@ -30,12 +30,13 @@ library eoc-lib
|
||||||
default-language: Haskell2010
|
default-language: Haskell2010
|
||||||
default-extensions: DeriveGeneric, OverloadedStrings
|
default-extensions: DeriveGeneric, OverloadedStrings
|
||||||
|
|
||||||
executable eoc
|
executable parse
|
||||||
main-is: Main.hs
|
main-is: bin/Parse.hs
|
||||||
-- other-modules:
|
-- other-modules:
|
||||||
-- other-extensions:
|
-- other-extensions:
|
||||||
build-depends:
|
build-depends:
|
||||||
base >=4.13 && <4.18,
|
base >=4.13 && <4.18,
|
||||||
|
bytestring ^>= 0.11,
|
||||||
eoc-lib
|
eoc-lib
|
||||||
-- hs-source-dirs:
|
-- hs-source-dirs:
|
||||||
default-language: Haskell2010
|
default-language: Haskell2010
|
||||||
|
|
|
||||||
|
|
@ -0,0 +1,3 @@
|
||||||
|
#!/bin/sh
|
||||||
|
|
||||||
|
turnt bril-sources/*.json
|
||||||
|
|
@ -0,0 +1 @@
|
||||||
|
command = "cabal run -v0 parse < {filename}"
|
||||||
Loading…
Reference in New Issue