diff options
| author | nea <nea@nea.moe> | 2023-01-24 17:29:45 +0100 |
|---|---|---|
| committer | nea <nea@nea.moe> | 2023-01-24 17:29:45 +0100 |
| commit | 5f74d9f5bc9bf58e1608bd94ad23c79d016e4256 (patch) | |
| tree | 947f1edd05ec35c69e9f2a3029cadbbfa0a8838a /src/main/frege/examples | |
| parent | d3c7f67bce284c8829ac53387dec0f863569fac6 (diff) | |
| download | buildclient-5f74d9f5bc9bf58e1608bd94ad23c79d016e4256.tar.gz buildclient-5f74d9f5bc9bf58e1608bd94ad23c79d016e4256.tar.bz2 buildclient-5f74d9f5bc9bf58e1608bd94ad23c79d016e4256.zip | |
Better error reporting
Diffstat (limited to 'src/main/frege/examples')
| -rw-r--r-- | src/main/frege/examples/HelloFrege.fr | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/src/main/frege/examples/HelloFrege.fr b/src/main/frege/examples/HelloFrege.fr index ff80635..6fe88f7 100644 --- a/src/main/frege/examples/HelloFrege.fr +++ b/src/main/frege/examples/HelloFrege.fr @@ -1,10 +1,7 @@ module examples.HelloFrege where import Test.QuickCheck -import buildclient.config.BuildParser (parseShortDirective, lexer, runParser, parseFile, findDirective) -import buildclient.config.BuildConfig (findSource, findBuildSystem, parseBuildConfig) +import buildclient.config.BuildConfig (parseBuildConfigStr) main = do text <- readFile "src/main/resources/testconfig.bcc" - let lexed = lexer text - let (Right d) = runParser parseFile lexed - println $ show $ parseBuildConfig d + println $ show $ parseBuildConfigStr text |