Update for PureScript 0.12. voteliquid#8

statebox · Aug 29, 2018 · 8bb0d86 · 8bb0d86
1 parent 064b653
commit 8bb0d86
Show file tree

Hide file tree

Showing 4 changed files with 7 additions and 7 deletions.
diff --git a/psc-package.json b/psc-package.json
@@ -1,10 +1,10 @@
 {
     "name": "purescript-xml",
-    "set": "psc-0.11.6",
+    "set": "psc-0.12.0-20180819",
     "source": "https://github.com/purescript/package-sets.git",
     "depends": [
         "prelude",
-        "maps",
+        "unordered-collections",
         "lists",
         "parsing",
         "integers"

diff --git a/src/Data/XML/Parse.purs b/src/Data/XML/Parse.purs
@@ -7,7 +7,7 @@ import Data.Array (fromFoldable, many, (:))
 import Data.Char.Unicode (isAlpha, isAlphaNum)
 import Data.Either (Either)
 import Data.List (List(..), reverse)
-import Data.String (fromCharArray)
+import Data.String.CodeUnits (fromCharArray)
 import Data.String.Unsafe (char) as Data.String.Unsafe
 import Data.Tuple (Tuple(..))
 import Data.XML.Types (XML(..), XMLAttribute)

diff --git a/src/Data/XML/XPath/Parse.purs b/src/Data/XML/XPath/Parse.purs
@@ -6,7 +6,7 @@ import Control.Alternative ((<|>))
 import Data.Array (many, (:))
 import Data.Char.Unicode (isAlpha, isAlphaNum)
 import Data.Maybe (Maybe(..))
-import Data.String (fromCharArray)
+import Data.String.CodeUnits (fromCharArray)
 import Data.String.Unsafe (char) as Data.String.Unsafe
 import Data.XML.Types (Axis(..), LocationStep(..), NodeTest(..), XPath(..))
 import Text.Parsing.Parser (Parser)

diff --git a/test/Main.purs b/test/Main.purs
@@ -1,15 +1,15 @@
 module Main where
 
 import Prelude
-import Control.Monad.Eff (Eff)
-import Control.Monad.Eff.Console (CONSOLE, log)
+import Effect (Effect)
+import Effect.Class.Console (log)
 import Data.Either (Either(..))
 import Data.Identity (Identity(..))
 import Data.Newtype (un)
 import Data.XML (parseXML)
 import Text.Parsing.Parser (parseErrorMessage, parseErrorPosition, runParserT)
 
-main :: ∀ e. Eff (console :: CONSOLE | e) Unit
+main :: Effect Unit
 main =
   case parseXML testXML of
     Left err -> do