use Foreign.Object instead of Map String ...

Author: Nils Petersohn

bower.json

@@ -16,9 +16,9 @@
     "output"
   ],
   "dependencies": {
-    "purescript-prelude": "^4.0.0",
+    "purescript-prelude": "^4.1.0",
     "purescript-datetime": "^4.0.0",
-    "purescript-ordered-collections": "^1.0.0"
+    "purescript-foreign-object": "^1.0.0"
   },
   "devDependencies": {
     "purescript-psci-support": "^4.0.0"

src/Node/OS.purs

@@ -24,7 +24,7 @@ import Prelude
 import Data.Array ((!!))
 import Data.Maybe (Maybe(..), fromMaybe)
 import Data.Time.Duration (Milliseconds, Seconds)
-import Data.Map (Map, update) 
+import Foreign.Object (Object, update)  
 import Effect (Effect)
 
 type NetworkInterface = { address :: String
@@ -132,10 +132,10 @@ foreign import totalmem :: Effect Number
 foreign import ostype :: Effect String
 foreign import uptime :: Effect Seconds
 foreign import networkInterfaces
-  :: Effect (Map String (Array NetworkInterface))
-foreign import userInfoImpl
+  :: Effect (Object (Array NetworkInterface))
+foreign import userInfoImpl 
   :: forall a 
-   . ((a -> Maybe a) -> Map String a -> Map String a)
+   . ((a -> Maybe a) -> Object a -> Object a)
   -> Maybe a
   -> (a -> Maybe a)
   -> {encoding :: String}

test/Main.purs

@@ -1,9 +1,9 @@
 module Test.Main where
 
 import Prelude (Unit)
-import Control.Monad.Eff (Eff)
-import Control.Monad.Eff.Console (CONSOLE, log)
+import Effect (Effect)
+import Effect.Console (log)
 
-main :: forall e. Eff (console :: CONSOLE | e) Unit
+main :: Effect Unit
 main = do
   log "You should add some tests."