git.iko.soy/elk
on master help sign in
Fix error messages for patterns with bad arity
3415241Evan Czaplicki
compiler/src/Canonicalize/Pattern.hs+1−1
compare with master
unifiedsplit
@@ -130,7 +130,7 @@ canonicalizeCtor env region name patterns ctor =
130 Result.ok (Can.PCtor home tipe union name index cargs)
130 Result.ok (Can.PCtor home tipe union name index cargs)
131
131
132 Index.LengthMismatch actualLength expectedLength ->
132 Index.LengthMismatch actualLength expectedLength ->
133− Result.throw (Error.BadArity region Error.PatternArity name actualLength expectedLength)
133+ Result.throw (Error.BadArity region Error.PatternArity name expectedLength actualLength)
134
134
135 Env.RecordCtor _ _ _ ->
135 Env.RecordCtor _ _ _ ->
136 Result.throw (Error.PatternHasRecordCtor region name)
136 Result.throw (Error.PatternHasRecordCtor region name)