From ba00f66b2e1016b642a63dbd98997fea82595e62 Mon Sep 17 00:00:00 2001
From: Jorge Acereda <jacereda@gmail.com>
Date: Sun, 29 Mar 2015 22:32:42 +0200
Subject: [PATCH] Faster copyImpl using slice().

---
 src/Data/Array/ST.purs | 6 +-----
 1 file changed, 1 insertion(+), 5 deletions(-)

diff --git a/src/Data/Array/ST.purs b/src/Data/Array/ST.purs
index d73ccdff..4adac11e 100644
--- a/src/Data/Array/ST.purs
+++ b/src/Data/Array/ST.purs
@@ -118,11 +118,7 @@ spliceSTArray = runFn4 spliceSTArrayImpl
 foreign import copyImpl """
   function copyImpl(arr) {
     return function(){
-      var n = arr.length;
-      var as = new Array(n);
-      for (var i = 0; i < n; i++)
-        as[i] = arr[i];
-      return as;
+      return arr.slice();
     };
   }""" :: forall a b h r. a -> Eff (st :: ST h | r) b