Merge pull request #42 from andyarvanitis/ffi_int_bounds

#1251: move Int bounds to FFI

Author: paf31

src/Prelude.js

@@ -174,6 +174,9 @@ exports.unsafeCompareImpl = function (lt) {
 
 //- Bounded --------------------------------------------------------------------
 
+exports.topInt = 2147483647;
+exports.bottomInt = -2147483648;
+
 exports.topChar = String.fromCharCode(65535);
 exports.bottomChar = String.fromCharCode(0);
 

src/Prelude.purs

@@ -734,8 +734,8 @@ instance boundedOrdering :: Bounded Ordering where
   bottom = LT
 
 instance boundedInt :: Bounded Int where
-  top = 2147483647
-  bottom = -2147483648
+  top = topInt
+  bottom = bottomInt
 
 -- | Characters fall within the Unicode range.
 instance boundedChar :: Bounded Char where
@@ -746,6 +746,9 @@ instance boundedFn :: (Bounded b) => Bounded (a -> b) where
   top _ = top
   bottom _ = bottom
 
+foreign import topInt :: Int
+foreign import bottomInt :: Int
+
 foreign import topChar :: Char
 foreign import bottomChar :: Char