1
1
mirror of https://github.com/github/semantic.git synced 2024-12-30 02:14:20 +03:00

Eta-reduce.

This commit is contained in:
Rob Rix 2017-06-24 14:33:10 -04:00
parent 854e4fbcc2
commit 04bde799fd

View File

@ -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