@@ -64,13 +64,13 @@ function test_linalg(AT)
6464 @testset " $T gemv y := $f (A) * x * a + y * b" for f in (identity, transpose, adjoint), T in supported_eltypes ()
6565 @test compare (* , AT, f (rand (T, 4 , 4 )), rand (T, 4 ))
6666 @test compare (mul!, AT, rand (T, 4 ), f (rand (T, 4 , 4 )), rand (T, 4 ))
67- @test compare (mul!, AT, rand (T, 4 ), f (rand (T, 4 , 4 )), rand (T, 4 ), T (4 ), T (5 ))
67+ @test compare (mul!, AT, rand (T, 4 ), f (rand (T, 4 , 4 )), rand (T, 4 ), Ref ( T (4 )), Ref ( T (5 ) ))
6868 end
6969
7070 @testset " $T gemm C := $f (A) * $g (B) * a + C * b" for f in (identity, transpose, adjoint), g in (identity, transpose, adjoint), T in supported_eltypes ()
7171 @test compare (* , AT, f (rand (T, 4 , 4 )), g (rand (T, 4 , 4 )))
7272 @test compare (mul!, AT, rand (T, 4 , 4 ), f (rand (T, 4 , 4 )), g (rand (T, 4 , 4 )))
73- @test compare (mul!, AT, rand (T, 4 , 4 ), f (rand (T, 4 , 4 )), g (rand (T, 4 , 4 )), T (4 ), T (5 ))
73+ @test compare (mul!, AT, rand (T, 4 , 4 ), f (rand (T, 4 , 4 )), g (rand (T, 4 , 4 )), Ref ( T (4 )), Ref ( T (5 ) ))
7474 end
7575
7676 @testset " lmul! and rmul!" for (a,b) in [((3 ,4 ),(4 ,3 )), ((3 ,), (1 ,3 )), ((1 ,3 ), (3 ))], T in supported_eltypes ()
0 commit comments