2676004 · rowtype-yoga/purescript-native

git.iko.soy/rowtype-yoga/purescript-native

Fix warning

commit2676004f840842157135c7804f9c6f05e43c00ce authorPhil Freeman <paf31@cantab.net> dateFri 11 Sep 2015, 15:17 (11 years ago) parent1376700

1 file changed+1−1

unifiedsplit

src/Language/PureScript/Sugar/TypeClasses.hs+1−1

@@ -292,7 +292,7 @@ typeClassMemberName :: Declaration -> String

292292typeClassMemberName (TypeDeclaration ident _) = runIdent ident

293293typeClassMemberName (ValueDeclaration ident _ _ _) = runIdent ident

294294typeClassMemberName (PositionedDeclaration _ _ d) = typeClassMemberName d

295−typeClassMemberName d = error "typeClassMemberName: Invalid declaration in type class definition"

295+typeClassMemberName _ = error "typeClassMemberName: Invalid declaration in type class definition"

296296

297297superClassDictionaryNames :: [Constraint] -> [String]

298298superClassDictionaryNames supers =