@@ -1390,4 +1390,26 @@ end
1390
1390
@test arr == adapt (Array, s_arr)
1391
1391
end
1392
1392
1393
+ @testset " Pointer" begin
1394
+ a = OffsetVector (collect (10 : 20 ), 9 );
1395
+ @test 12 == a[12 ] == unsafe_load (pointer (a), 12 + (1 - firstindex (a))) == unsafe_load (pointer (a, 12 ))
1396
+
1397
+ A = OffsetArray (reshape (collect (10 : 130 ), (11 ,11 )), 9 , 9 );
1398
+ @test 21 == A[12 ] == unsafe_load (pointer (A), 12 ) == unsafe_load (pointer (A, 12 ))
1399
+ @test 61 == A[52 ] == unsafe_load (pointer (A), 52 ) == unsafe_load (pointer (A, 52 ))
1400
+
1401
+ @test pointer (a) === pointer (parent (a))
1402
+ @test pointer (A) === pointer (parent (A))
1403
+ @test pointer (a, 12 ) === pointer (parent (a), 12 + (1 - firstindex (a)))
1404
+ @test pointer (A, 12 ) === pointer (parent (A), 12 )
1405
+ @test pointer (a) === pointer (a, firstindex (a))
1406
+ @test pointer (A) === pointer (A, firstindex (A))
1407
+ if VERSION ≥ v " 1.5"
1408
+ @test pointer (a' ) === pointer (parent (a))
1409
+ @test pointer (A' ) === pointer (parent (A))
1410
+ @test pointer (a' , 5 ) === pointer (parent (a), 5 )
1411
+ @test pointer (A' , 15 ) === pointer (parent (A)' , 15 )
1412
+ end
1413
+ end
1414
+
1393
1415
include (" origin.jl" )
0 commit comments