mirror of
https://github.com/github/semantic.git
synced 2024-12-25 07:55:12 +03:00
no strictness
This commit is contained in:
parent
bd3c3eaf83
commit
5b34a0e196
@ -133,7 +133,7 @@ instance Evaluatable Let where
|
|||||||
|
|
||||||
-- AugmentedAssignment
|
-- AugmentedAssignment
|
||||||
|
|
||||||
newtype AugmentedAssignment a = AugmentedAssignment { augmentedAssignmentTarget :: !a }
|
newtype AugmentedAssignment a = AugmentedAssignment { augmentedAssignmentTarget :: a }
|
||||||
deriving (Diffable, Foldable, FreeVariables1, Functor, Generic1, Hashable1, ToJSONFields1, Traversable)
|
deriving (Diffable, Foldable, FreeVariables1, Functor, Generic1, Hashable1, ToJSONFields1, Traversable)
|
||||||
|
|
||||||
instance Eq1 AugmentedAssignment where liftEq = genericLiftEq
|
instance Eq1 AugmentedAssignment where liftEq = genericLiftEq
|
||||||
|
Loading…
Reference in New Issue
Block a user