Merge pull request #11 from jdegoes/ready/char-instances

added essential instances for Char; fully backward compatible

Author: paf31

README.md

@@ -7,6 +7,15 @@
     newtype Char
 
 
+### Type Class Instances
+
+    instance eqChar :: Eq Char
+
+    instance ordChar :: Ord Char
+
+    instance showChar :: Show Char
+
+
 ### Values
 
     charString :: Char -> String

src/Data/Char/Char.purs

@@ -20,3 +20,13 @@ module Data.Char
     \   return String.fromCharCode(c);\
     \}" :: Number -> Char
 
+  instance eqChar :: Eq Char where
+    (==) (Char a) (Char b) = a == b
+
+    (/=) a b = not (a == b)
+
+  instance ordChar :: Ord Char where
+    compare (Char a) (Char b) = a `compare` b
+
+  instance showChar :: Show Char where
+    show (Char s) = "Char " ++ show s