packages feed

purescript 0.2.1.1 → 0.2.1.2

raw patch · 2 files changed

+6/−2 lines, 2 filesdep ~base

Dependency ranges changed: base

Files

purescript.cabal view
@@ -1,5 +1,5 @@ name: purescript-version: 0.2.1.1+version: 0.2.1.2 cabal-version: >=1.8 build-type: Simple license: MIT
src/Language/PureScript/Scope.hs view
@@ -26,7 +26,6 @@ import Language.PureScript.Names import Language.PureScript.CodeGen.JS.AST import Data.Maybe (mapMaybe)-import Text.Read (readMaybe)  usedNames :: (Data d) => d -> [Ident] usedNames val = nub $ everything (++) (mkQ [] namesV `extQ` namesS `extQ` namesB `extQ` namesJS) val@@ -69,3 +68,8 @@   toUnknown :: Ident -> Maybe Int   toUnknown (Ident ('_' : s)) = readMaybe s   toUnknown _ = Nothing++readMaybe :: String -> Maybe Int+readMaybe s = case reads s of+                [(n, "")] -> Just n+                _ -> Nothing