1
1
mirror of https://github.com/github/semantic.git synced 2024-12-24 23:42:31 +03:00

no strictness

This commit is contained in:
Timothy Clem 2019-12-10 14:34:13 -08:00
parent bd3c3eaf83
commit 5b34a0e196

View File

@ -133,7 +133,7 @@ instance Evaluatable Let where
-- AugmentedAssignment
newtype AugmentedAssignment a = AugmentedAssignment { augmentedAssignmentTarget :: !a }
newtype AugmentedAssignment a = AugmentedAssignment { augmentedAssignmentTarget :: a }
deriving (Diffable, Foldable, FreeVariables1, Functor, Generic1, Hashable1, ToJSONFields1, Traversable)
instance Eq1 AugmentedAssignment where liftEq = genericLiftEq