Fixes found with JETLS (#416)

* Some fixes found by JETLS

* Whitespace

Author: christiangnrd

lib/cl/event.jl

@@ -153,7 +153,7 @@ function Base.wait(evts::Vector{AbstractEvent})
     isempty(evts) && return evts
     evt_ids = [pointer(evt) for evt in evts]
     GC.@preserve evts begin
-        clWaitForEvents(ength(evt_ids), evt_ids)
+        clWaitForEvents(length(evt_ids), evt_ids)
     end
     return evts
 end

lib/cl/kernel.jl

@@ -311,7 +311,7 @@ end
 
 # From `julia/base/reflection.jl`, adjusted to add specialization on `t`.
 function _to_tuple_type(t)
-    if isa(t, Tuple) || isa(t, AbstractArray) || isa(t, SimpleVector)
+    if isa(t, Tuple) || isa(t, AbstractArray) || isa(t, Core.SimpleVector)
         t = Tuple{t...}
     end
     if isa(t, Type) && t <: Tuple

src/device/array.jl

@@ -236,17 +236,17 @@ Base.show(io::IO, mime::MIME"text/plain", a::CLDeviceArray) = show(io, a)
 end
 
 function Base.reinterpret(::Type{T}, a::CLDeviceArray{S,N,A}) where {T,S,N,A}
-  err = _reinterpret_exception(T, a)
-  err === nothing || throw(err)
+    err = GPUArrays._reinterpret_exception(T, a)
+    err === nothing || throw(err)
 
-  if sizeof(T) == sizeof(S) # fast case
-    return CLDeviceArray{T,N,A}(size(a), reinterpret(LLVMPtr{T,A}, a.ptr), a.maxsize)
-  end
+    if sizeof(T) == sizeof(S) # fast case
+        return CLDeviceArray{T,N,A}(size(a), reinterpret(LLVMPtr{T,A}, a.ptr), a.maxsize)
+    end
 
-  isize = size(a)
-  size1 = div(isize[1]*sizeof(S), sizeof(T))
-  osize = tuple(size1, Base.tail(isize)...)
-  return CLDeviceArray{T,N,A}(osize, reinterpret(LLVMPtr{T,A}, a.ptr), a.maxsize)
+    isize = size(a)
+    size1 = div(isize[1]*sizeof(S), sizeof(T))
+    osize = tuple(size1, Base.tail(isize)...)
+    return CLDeviceArray{T,N,A}(osize, reinterpret(LLVMPtr{T,A}, a.ptr), a.maxsize)
 end