Specialize iteration for Array

Explicitly inline next to ensure it inlines for LinearSlow types. Fix test failure.

base/abstractarray.jl

@@ -338,9 +338,11 @@ end
 zero{T}(x::AbstractArray{T}) = fill!(similar(x), zero(T))
 
 ## iteration support for arrays ##
-
+macro _inline_meta()
+    Expr(:meta, :inline)
+end
 start(A::AbstractArray) = (itr = eachindex(A); (itr, start(itr)))
-next(A::AbstractArray,i) = ((idx, s) = next(i[1], i[2]); (A[idx], (i[1], s)))
+next(A::AbstractArray,i) = (@_inline_meta(); (idx, s) = next(i[1], i[2]); (A[idx], (i[1], s)))
 done(A::AbstractArray,i) = done(i[1], i[2])
 
 # eachindex iterates over all indices. LinearSlow is later in bootstrap

base/array.jl

@@ -297,6 +297,11 @@ end
 
 collect(itr) = collect(eltype(itr), itr)
 
+## Iteration ##
+start(A::Array) = 1
+next(a::Array,i) = (a[i],i+1)
+done(a::Array,i) = (i > length(a))
+
 ## Indexing: getindex ##
 
 getindex(a::Array) = arrayref(a,1)

base/multidimensional.jl

@@ -476,7 +476,7 @@ function copy!{T,N}(dest::AbstractArray{T,N}, src::AbstractArray{T,N})
             break
         end
     end
-    if samesize
+    if samesize && linearindexing(dest) == linearindexing(src)
         for I in eachindex(dest)
             @inbounds dest[I] = src[I]
         end