use check_eltype

Author: vchuravy

src/array.jl

@@ -231,6 +231,7 @@ end
 function Base.unsafe_wrap(::Type{CuArray{T,N,M}},
                           ptr::CuPtr{T}, dims::NTuple{N,Int};
                           own::Bool=false, ctx::CuContext=context()) where {T,N,M}
+  check_eltype("unsafe_wrap(CuArray, ...)", T)
   sz = prod(dims) * sizeof(T)
 
   # create a memory object