@@ -29,9 +29,6 @@ constrain region literal tipe =
2929 Lit.Str _ ->
3030 return $ T.CEqual stringError region T.string tipe
3131
32− Lit.Boolean _ ->
33− return $ T.CEqual boolError region T.bool tipe
34−
3532
3633
3734-- LITERAL ERRORS
@@ -59,9 +56,3 @@ charError =
5956stringError :: Error.Hint
6057stringError =
6158 Error.Literal "string"
62−
63−
64−{-# NOINLINE boolError #-}
65−boolError :: Error.Hint
66−boolError =
67− Error.Literal "boolean"