b/gigaparsec
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Rewrite Map in terms of Bind and Return

Browse Source
This commit is contained in:
Brandon Dyck 2024-09-10 14:38:18 -06:00
parent 14d2418d2c
commit adc85b5572
1 changed files with 3 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
gigaparsec.go
View File

@ -190,16 +190,7 @@ func Try[In, Out any](p Parser[In, Out]) Parser[In, Out] {
}
func Map[In, Out1, Out2 any](p Parser[In, Out1], f func(Out1) Out2) Parser[In, Out2] {
return func(input State[In]) (bool, Result[In, Out2], error) {
consumed, reply, err := p(input)
if err != nil {
return consumed, Result[In, Out2]{}, err
}
reply2 := Result[In, Out2]{
Value: f(reply.Value),
State: reply.State,
Message: reply.Message,
}
return consumed, reply2, nil
}
return Bind(p, func(out Out1) Parser[In, Out2] {
return Return[In](f(out))
})
}