Import CuArray showing tests.

Author: maleadt

src/abstractarray.jl

@@ -16,8 +16,11 @@ struct LocalMemory{T} <: GPUArray{T, 1}
     LocalMemory{T}(x::Integer) where T = new{T}(x)
 end
 
-############################################
-# serialization
+
+# input/output
+
+## serialization
+
 import Serialization: AbstractSerializer, serialize, deserialize, serialize_type
 
 function serialize(s::AbstractSerializer, t::T) where T <: GPUArray
@@ -53,6 +56,14 @@ function to_cartesian(A, indices::Tuple)
     CartesianIndices(start, stop)
 end
 
+## showing
+
+Base.print_array(io::IO, x::GPUArray) = Base.print_array(io, collect(x))
+Base.print_array(io::IO, x::LinearAlgebra.Adjoint{<:Any,<:GPUArray}) = Base.print_array(io, LinearAlgebra.adjoint(collect(x.parent)))
+Base.print_array(io::IO, x::LinearAlgebra.Transpose{<:Any,<:GPUArray}) = Base.print_array(io, LinearAlgebra.transpose(collect(x.parent)))
+
+
+# memory operations
 
 ## basic copy methods that dispatch to unsafe_copyto! for linear copies
 

src/array.jl

@@ -28,12 +28,6 @@ size(x::JLArray) = x.size
 
 pointer(x::JLArray) = pointer(x.data)
 
-
-## I/O
-Base.print_array(io::IO, x::GPUArray) = Base.print_array(io, collect(x))B
-Base.print_array(io::IO, x::LinearAlgebra.Adjoint{<:Any,<:GPUArray}) = Base.print_array(io, LinearAlgebra.adjoint(collect(x.parent)))
-Base.print_array(io::IO, x::LinearAlgebra.Transpose{<:Any,<:GPUArray}) = Base.print_array(io, LinearAlgebra.transpose(collect(x.parent)))
-
 ## other
 
 """

src/testsuite.jl

@@ -46,6 +46,7 @@ include("testsuite/base.jl")
 include("testsuite/indexing.jl")
 include("testsuite/vector.jl")
 include("testsuite/random.jl")
+include("testsuite/io.jl")
 
 function supported_eltypes()
     (Float32, Float64, Int32, Int64, ComplexF32, ComplexF64)

src/testsuite/io.jl

@@ -0,0 +1,16 @@
+function test_io(Typ)
+    @testset "i/o" begin
+        @testset "Showing" begin
+          io = IOBuffer()
+          A = Typ([1])
+
+          show(io, MIME("text/plain"), A)
+          seekstart(io)
+          @test String(take!(io)) == "1-element $Typ{Int64,1}:\n 1"
+
+          show(io, MIME("text/plain"), A')
+          seekstart(io)
+          @test String(take!(io)) == "1×1 LinearAlgebra.Adjoint{Int64,$Typ{Int64,1}}:\n 1"
+        end
+    end
+end