add log effects to FromParser

This commit is contained in:
rhiannon morris 2024-04-04 18:23:50 +02:00
parent e6ad16813e
commit 861bd55f94
3 changed files with 33 additions and 28 deletions

View file

@ -68,7 +68,7 @@ parameters {c : Bool} {auto _ : Show b}
runFromParser : {default empty defs : Definitions} ->
Eff FromParserPure a -> Either FromParser.Error a
runFromParser = map fst . fromParserPure 0 defs
runFromParser = map val . fromParserPure 0 defs initStack
export
tests : Test