add Garg.Utils.Array

04db7efe · James Laver · 0fe04fc9 · 04db7efe · 04db7efe
Commit 04db7efe authored Apr 09, 2019 by James Laver
Hide whitespace changes
Inline Side-by-side

Showing with 14 additions and 0 deletions

Array.js src/Gargantext/Utils/Array.js +4 -0

Array.purs src/Gargantext/Utils/Array.purs +10 -0

No files found.
--- a/src/Gargantext/Utils/Array.js
+++ b/src/Gargantext/Utils/Array.js
+function _push(a, i) { a.push(i); }
+module.exports={
+    _push: _push
+};
--- a/src/Gargantext/Utils/Array.purs
+++ b/src/Gargantext/Utils/Array.purs
+module Gargantext.Utils.Array (push) where
+
+import Effect (Effect)
+import Data.Unit (Unit)
+import Effect.Uncurried (EffectFn2, runEffectFn2)
+
+foreign import _push :: forall a. EffectFn2 (Array a) a Unit
+
+push :: forall a. Array a -> a -> Effect Unit
+push = runEffectFn2 _push