@@ -326,7 +326,7 @@ declToPatches moduleName (A.A (region,_) decl) =
326 D.TypeAlias name tvars alias ->
326 D.TypeAlias name tvars alias ->
327 ( Just (node region name tvars alias)
327 ( Just (node region name tvars alias)
328 , case alias of
328 , case alias of
329− A.A _ (Type.RRecord _ _) ->
329+ A.A _ (Type.RRecord _ Nothing) ->
330 [topLevel Env.Value name]
330 [topLevel Env.Value name]