added dimension check

Author: matbesancon

src/linalg.jl

@@ -189,6 +189,11 @@ function _A_mul_Bt_or_Bc!(tfun::Function, C::StridedMatrix, A::AbstractMatrix, B
 end
 
 function *(A::Diagonal, b::AbstractSparseVector)
+    if size(A, 2) != length(b)
+        throw(
+            DimensionMismatch("The dimension of the matrix A $(size(A)) and of the vector b $(length(b))")
+        )
+    end
     T = promote_eltype(A, b)
     res = similar(b, T)
     nzind_b = nonzeroinds(b)

test/linalg.jl

@@ -683,6 +683,8 @@ end
         Ac = Diagonal(randn(Complex{Float64}, 10))
         @test norm(Ac * b - Ac * Vector(b)) <= 10eps()
         @test norm(Ac * b - Array(Ac) * b) <= 10eps()
+        @test_throws DimensionMismatch A * [b; 1]
+        @test_throws DimensionMismatch A * b[1:end-1]
     end
 end