Parser combinators, JSON Parser

This commit is contained in:
vegowotenks 2025-08-21 19:30:00 +02:00
commit 5324106b0d
13 changed files with 787 additions and 0 deletions

9
app/Main.hs Normal file
View file

@ -0,0 +1,9 @@
module Main (main) where
import qualified Data.Text as Text
import qualified Data.Text.IO as TextIO
import qualified Language.Json as Json
import Language.Json.Parser (runParser)
main :: IO ()
main = TextIO.interact (Text.pack . show . runParser Json.document)