Updates for 0.7

Author: paf31

src/Global.js

@@ -0,0 +1,12 @@
+// module Global
+
+exports.infinity = Infinity;
+
+exports.readInt = function(radix) {
+  return function(n) {
+    return parseInt(n, radix);
+  };
+};
+
+exports.readFloat = parseFloat;
+

src/Global.purs

@@ -11,27 +11,20 @@ module Global
   ) where
 
 -- | Not a number (NaN)
-foreign import nan "var nan = NaN;" :: Number
+foreign import nan :: Number
 
 -- | Test whether a number is NaN
 foreign import isNaN :: Number -> Boolean
 
 -- | Positive infinity
-foreign import infinity "var infinity = Infinity;" :: Number
+foreign import infinity :: Number
 
 -- | Test whether a number is finite
 foreign import isFinite :: Number -> Boolean
 
 -- | Parse an integer from a `String` in the specified base
-foreign import readInt
-  """
-  function readInt(radix) {
-    return function(n) {
-      return parseInt(n, radix);
-    };
-  }
-  """ :: Number -> String -> Number
+foreign import readInt :: Number -> String -> Number
 
 -- | Parse a floating point value from a `String`
-foreign import readFloat "var readFloat = parseFloat;" :: String -> Number
+foreign import readFloat :: String -> Number