diff --git a/src/BC/Types.hs b/src/BC/Types.hs index 9f10a18..1e5197f 100644 --- a/src/BC/Types.hs +++ b/src/BC/Types.hs @@ -103,6 +103,7 @@ precedence "<=" = 2 precedence ">=" = 2 precedence "==" = 2 precedence "!=" = 2 +precedence _ = 6 contains :: Eq a => [a] -> a -> Bool