Fix failing array specs

Author: aardvark179

spec/tags/core/array/append_tags.txt

@@ -8,6 +8,7 @@
 []
 []=
 any?
+append
 assoc
 at
 bsearch
@@ -24,6 +25,7 @@ cycle
 delete
 delete_at
 delete_if
+difference
 dig
 drop
 drop_while
@@ -33,6 +35,8 @@ empty?
 eql?
 fetch
 fill
+filter
+filter!
 find_index
 first
 flatten
@@ -54,6 +58,7 @@ min
 pack
 permutation
 pop
+prepend
 product
 push
 rassoc
@@ -88,6 +93,7 @@ to_ary
 to_h
 to_s
 transpose
+union
 uniq
 uniq!
 unshift

spec/tags/core/array/difference_tags.txt

@@ -1654,7 +1654,7 @@ public DynamicObject append(DynamicObject array, Object value) {
 
     }
 
-    @CoreMethod(names = "push", rest = true, optional = 1, raiseIfFrozenSelf = true)
+    @CoreMethod(names = { "push", "append" }, rest = true, optional = 1, raiseIfFrozenSelf = true)
     public abstract static class PushNode extends ArrayCoreMethodNode {
 
         @Child private ArrayAppendOneNode appendOneNode = ArrayAppendOneNode.create();

spec/tags/core/array/filter_tags.txt

@@ -354,6 +354,12 @@ def delete_if(&block)
     self
   end
 
+  def difference(*others)
+    other = []
+    others.each { |a| other = other | a }
+    self - other
+  end
+
   def dig(idx, *more)
     result = self.at(idx)
     if result.nil? || more.empty?
@@ -495,6 +501,8 @@ def fetch(idx, default=undefined)
     self
   end
 
+  alias_method :filter, :select
+
   def first(n = undefined)
     return at(0) if undefined.equal?(n)
 
@@ -1120,6 +1128,8 @@ def select!(&block)
     Truffle.invoke_primitive(:steal_array_storage, self, ary) unless size == ary.size
   end
 
+  alias_method :filter!, :select!
+
   def shuffle(options = undefined)
     return dup.shuffle!(options) if instance_of? Array
     Array.new(self).shuffle!(options)
@@ -1173,8 +1183,8 @@ def to_ary
     self
   end
 
-  def to_h
-    super
+  def to_h &block
+    super(*self, &block)
   end
 
   def transpose
@@ -1199,6 +1209,12 @@ def transpose
     out
   end
 
+  def union(*others)
+    res = Array.new(self).uniq
+    others.each { |other| res = res | other }
+    res
+  end
+
   def unshift(*values)
     Truffle.check_frozen
 
@@ -1207,6 +1223,8 @@ def unshift(*values)
     self
   end
 
+  alias_method :prepend, :unshift
+
   def values_at(*args)
     out = []
 

spec/tags/core/array/flatten_tags.txt

@@ -324,7 +324,7 @@ def self.check_funcall_default(recv, meth, args, default)
       respond = check_funcall_respond_to(recv, meth, true)
       return default if respond == 0
       unless check_funcall_callable(recv, meth)
-        return check_funcall_missing(recv, meth, args, respond, default);
+        return check_funcall_missing(recv, meth, args, respond, default, true);
       end
       recv.__send__(meth)
     end
@@ -339,8 +339,8 @@ def self.check_funcall_respond_to(obj, meth, priv)
       end
     end
 
-    def self.check_funcall_missing(recv, meth, args, respond, default)
-      ret = basic_obj_respond_to_missing(recv, meth, false) #PRIV false
+    def self.check_funcall_missing(recv, meth, args, respond, default, priv = false)
+      ret = basic_obj_respond_to_missing(recv, meth, priv)
       respond_to_missing = !undefined.equal?(ret)
       return default if respond_to_missing and !ret
       ret = default