mirror of
https://github.com/github/semantic.git
synced 2025-01-03 04:51:57 +03:00
Stub in a datatype of named decorators.
This commit is contained in:
parent
7081b3f8b8
commit
bbc7b78f39
@ -75,6 +75,8 @@ data TaskF output where
|
||||
type Task = Freer TaskF
|
||||
|
||||
|
||||
data NamedDecorator = IdentifierDecorator
|
||||
|
||||
parse :: Parser term -> Source -> Task term
|
||||
parse parser source = Parse parser source `Then` return
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user