on master help sign in
Mark fields as unused
a91c117Evan Czaplicki
src/Type/Unify.hs+2−2
@@ -278,8 +278,8 @@ diffFields fields1 fields2 =
278
278
279
279
280data ExpandedRecord = ExpandedRecord
280data ExpandedRecord = ExpandedRecord
281− { fields :: Map.Map String [Variable]
281+ { _fields :: Map.Map String [Variable]
282− , extension :: Extension
282+ , _extension :: Extension
283 }
283 }
284
284
285data Extension = Empty Variable | Extension Variable
285data Extension = Empty Variable | Extension Variable