mirror of
https://github.com/github/semantic.git
synced 2024-12-23 14:54:16 +03:00
Rename the Rule type and constructors.
This commit is contained in:
parent
91f85d3dfd
commit
1c4b5b394e
@ -39,8 +39,8 @@ type Program = Freer
|
||||
|
||||
|
||||
-- | Statically-known rules corresponding to symbols in the grammar.
|
||||
data Rule = ProgramRule | UninterpretedRule
|
||||
data Grammar = Program | Uninterpreted
|
||||
|
||||
-- | Assignment onto a program in Ruby’s syntax.
|
||||
assignment :: Assignment Rule (Program Ruby (Maybe ()))
|
||||
assignment = foldr (>>) (return Nothing) <$> rule ProgramRule
|
||||
assignment :: Assignment Grammar (Program Ruby (Maybe ()))
|
||||
assignment = foldr (>>) (return Nothing) <$> rule Program
|
||||
|
Loading…
Reference in New Issue
Block a user