@@ -158,7 +158,7 @@ renameInValue (ObjectLiteral vs) =
158renameInValue (Accessor prop v) =
158renameInValue (Accessor prop v) =
159 Accessor prop <$> renameInValue v
159 Accessor prop <$> renameInValue v
160renameInValue (ObjectUpdate obj vs) =
160renameInValue (ObjectUpdate obj vs) =
161− ObjectUpdate obj <$> mapM (\(name, v) -> (,) name <$> renameInValue v) vs
161+ ObjectUpdate <$> renameInValue obj <*> mapM (\(name, v) -> (,) name <$> renameInValue v) vs
162renameInValue (Abs (Left name) v) =
162renameInValue (Abs (Left name) v) =
163 newScope $ Abs . Left <$> updateScope name <*> renameInValue v
163 newScope $ Abs . Left <$> updateScope name <*> renameInValue v
164renameInValue (App v1 v2) =
164renameInValue (App v1 v2) =