Commit 06f3666c authored by Michel Juillard's avatar Michel Juillard

fix stride of transposed matrix

parent 894881b1
g# This file is machine-generated - editing it directly is not advised
# This file is machine-generated - editing it directly is not advised
[[Libdl]]
uuid = "8f399da3-3557-5675-b5ff-fb832c97cbdb"
......
......@@ -94,7 +94,7 @@ for (geqrf, ormqr, elty) in
m = Ref{BlasInt}(mm)
n = Ref{BlasInt}(nn)
k = Ref{BlasInt}(length(ws.tau))
RldA = Ref{BlasInt}(max(1,stride(A,2)))
RldA = Ref{BlasInt}(max(1,stride(A.parent,2)))
RldC = Ref{BlasInt}(max(1,stride(C,2)))
ccall((@blasfunc($ormqr), liblapack), Nothing,
(Ref{UInt8},Ref{UInt8},Ref{BlasInt},Ref{BlasInt},Ref{BlasInt},Ptr{$elty},Ref{BlasInt},
......@@ -143,7 +143,7 @@ for (geqrf, ormqr, elty) in
m = Ref{BlasInt}(mm)
n = Ref{BlasInt}(nn)
k = Ref{BlasInt}(length(ws.tau))
RldA = Ref{BlasInt}(max(1,stride(A,2)))
RldA = Ref{BlasInt}(max(1,stride(A.parent,2)))
RldC = Ref{BlasInt}(max(1,stride(C,2)))
ccall((@blasfunc($ormqr), liblapack), Nothing,
(Ref{UInt8},Ref{UInt8},Ref{BlasInt},Ref{BlasInt},Ref{BlasInt},Ptr{$elty},Ref{BlasInt},
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment