vegowotenks/hon
1
1
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

feat: strict parser

Browse source
This commit is contained in:
vegowotenks 2025-08-23 18:18:09 +02:00
parent 58b1bbb021
commit e87cc5f16c
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/Language/Json/Parser.hs
View file

@ -9,7 +9,7 @@ import Data.Functor (($>))
newtype Parser a = Parser (Text -> Reply a) newtype Parser a = Parser (Text -> Reply a)
data Reply a data Reply a
= Done Text a -- rest, result = Done !Text !a -- rest, result
| Fail | Fail
instance Functor Reply where instance Functor Reply where