Make tests for sparse broadcast over combinations including structured matrices check return type.

Author: Sacha0

test/sparse/higherorderfns.jl

@@ -298,20 +298,20 @@ end
     structuredarrays = (D, B, T, S)
     fstructuredarrays = map(Array, structuredarrays)
     for (X, fX) in zip(structuredarrays, fstructuredarrays)
-        @test broadcast(sin, X) == sparse(broadcast(sin, fX))
+        @test (Q = broadcast(sin, X); Q isa SparseMatrixCSC && Q == sparse(broadcast(sin, fX)))
         @test broadcast!(sin, Z, X) == sparse(broadcast(sin, fX))
-        @test broadcast(cos, X) == sparse(broadcast(cos, fX))
+        @test (Q = broadcast(cos, X); Q isa SparseMatrixCSC && Q == sparse(broadcast(cos, fX)))
         @test broadcast!(cos, Z, X) == sparse(broadcast(cos, fX))
-        @test broadcast(*, s, X) == sparse(broadcast(*, s, fX))
+        @test (Q = broadcast(*, s, X); Q isa SparseMatrixCSC && Q == sparse(broadcast(*, s, fX)))
         @test broadcast!(*, Z, s, X) == sparse(broadcast(*, s, fX))
-        @test broadcast(+, V, A, X) == sparse(broadcast(+, V, A, X))
+        @test (Q = broadcast(+, V, A, X); Q isa SparseMatrixCSC && Q == sparse(broadcast(+, V, A, X)))
         @test broadcast!(+, Z, V, A, X) == sparse(broadcast(+, V, A, X))
-        @test broadcast(*, s, V, A, X) == sparse(broadcast(*, s, fV, fA, fX))
+        @test (Q = broadcast(*, s, V, A, X); Q isa SparseMatrixCSC && Q == sparse(broadcast(*, s, fV, fA, fX)))
         @test broadcast!(*, Z, s, V, A, X) == sparse(broadcast(*, s, fV, fA, fX))
         for (Y, fY) in zip(structuredarrays, fstructuredarrays)
-            @test broadcast(+, X, Y) == sparse(broadcast(+, fX, fY))
+            @test (Q = broadcast(+, X, Y); Q isa SparseMatrixCSC && Q == sparse(broadcast(+, fX, fY)))
             @test broadcast!(+, Z, X, Y) == sparse(broadcast(+, fX, fY))
-            @test broadcast(*, X, Y) == sparse(broadcast(*, fX, fY))
+            @test (Q = broadcast(*, X, Y); Q isa SparseMatrixCSC && Q == sparse(broadcast(*, fX, fY)))
             @test broadcast!(*, Z, X, Y) == sparse(broadcast(*, fX, fY))
         end
     end