Skip to content

Commit ef99131

Browse files
authored
Update use of ind2sub for recent 0.7 change (#112)
1 parent cdb9396 commit ef99131

File tree

1 file changed

+8
-2
lines changed

1 file changed

+8
-2
lines changed

src/array/subarray.jl

Lines changed: 8 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,12 +1,18 @@
11
#
22

3+
if VERSION >= v"0.7.0-DEV.1660"
4+
_maxind(A) = indmax(A).I
5+
else
6+
_maxind(A) = ind2sub(size(A), indmax(A))
7+
end
8+
39
function perf_lucompletepivCopy!(A)
410
n = size(A, 1)
511
rowpiv=zeros(Int, n-1)
612
colpiv=zeros(Int, n-1)
713
for k = 1:n-1
814
As = @compat abs.(A[k:n, k:n])
9-
μ, λ = ind2sub(size(As), indmax(As))
15+
μ, λ = _maxind(As)
1016
μ += k-1; λ += k-1
1117
rowpiv[k] = μ
1218
A[[k,μ], 1:n] = A[[μ,k], 1:n]
@@ -27,7 +33,7 @@ function perf_lucompletepivSub!(A)
2733
colpiv=zeros(Int, n-1)
2834
for k = 1:n-1
2935
As = @compat abs.(view(A, k:n, k:n))
30-
μ, λ = ind2sub(size(As), indmax(As))
36+
μ, λ = _maxind(As)
3137
μ += k-1; λ += k-1
3238
rowpiv[k] = μ
3339
A[[k,μ], 1:n] = view(A, [μ,k], 1:n)

0 commit comments

Comments
 (0)