Make copyto! return dest for Hankel (#82)

Author: andreasnoack

src/hankel.jl

@@ -81,7 +81,8 @@ for op in (:+, :-)
 end
 function copyto!(A::Hankel, B::Hankel)
     promote_shape(A,B)
-    copyto!(A.v,B.v)
+    copyto!(A.v, B.v)
+    return A
 end
 for fun in (:lmul!,)
     @eval function $fun(x::Number, A::Hankel)

test/runtests.jl

@@ -166,6 +166,8 @@ end
         @test H[7]  == 3
         @test diag(H) == [1,3,5,7,9]
 
+        @test copy(H) == copyto!(similar(H), H)
+
         x = ones(5)
         @test mul!(copy(x), H, x) ≈ Matrix(H)*x ≈ H*x