mirror of
https://github.com/github/semantic.git
synced 2024-12-30 02:14:20 +03:00
Eta-reduce.
This commit is contained in:
parent
854e4fbcc2
commit
04bde799fd
@ -284,7 +284,7 @@ data AssignmentState ast = AssignmentState
|
|||||||
deriving (Eq, Show)
|
deriving (Eq, Show)
|
||||||
|
|
||||||
makeState :: Source.Source -> [ast] -> AssignmentState ast
|
makeState :: Source.Source -> [ast] -> AssignmentState ast
|
||||||
makeState source nodes = AssignmentState 0 (Info.Pos 1 1) source nodes
|
makeState = AssignmentState 0 (Info.Pos 1 1)
|
||||||
|
|
||||||
|
|
||||||
-- Instances
|
-- Instances
|
||||||
|
Loading…
Reference in New Issue
Block a user