add Garg.Utils.Array

f17c98df · James Laver · Alexandre Delanoë · 6cb50a8c · f17c98df · f17c98df
Commit f17c98df authored Apr 09, 2019 by James Laver Committed by Alexandre Delanoë Apr 28, 2019
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