github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2025-01-05 14:11:33 +03:00
Code Issues Projects Releases Wiki Activity

Correct the docs for Algorithm.

Browse Source
This commit is contained in:
Rob Rix 2017-09-19 10:52:47 -04:00
parent 5a0c44971e
commit 0747f9474a
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Algorithm.hs
View File

@ -33,7 +33,7 @@ data AlgorithmF term diff result where
-- | An 'Algorithm' to try one of two alternatives. -- | An 'Algorithm' to try one of two alternatives.
Alt :: a -> a -> AlgorithmF term diff a Alt :: a -> a -> AlgorithmF term diff a
-- | The free applicative for 'AlgorithmF'. This enables us to construct diff values using <$> and <*> notation. -- | The free(r) monad for 'AlgorithmF'. This enables us to construct algorithms to diff using '<$>', '<*>', '>>=', and do-notation.
type Algorithm term diff = Freer (AlgorithmF term diff) type Algorithm term diff = Freer (AlgorithmF term diff)