Fix #1192 where mismatched type alias produce bad errors
https://imgflip.com/i/1380es
commit8d41d9552d77fd1ca73b8ca88fafb8ca009bfc01
authorEvan Czaplicki <info@elm-lang.org>
dateWed 27 Apr 2016, 15:23 (11 years ago)
parent04c5e28
src/Type/Unify.hs+2−2
@@ -519,8 +519,8 @@ unifyAlias context name args realVar otherContent =
519519
520520 Alias otherName otherArgs otherRealVar ->
521521 if name == otherName then
522− do merge context otherContent
523− zipWithM_ (subUnify context) (map snd args) (map snd otherArgs)
522+ do zipWithM_ (subUnify context) (map snd args) (map snd otherArgs)
523+ merge context otherContent
524524
525525 else
526526 subUnify context realVar otherRealVar