Update src/implementations/truncation.jl

Co-authored-by: Jutho <[email protected]>

Author: kshyatt

src/implementations/truncation.jl

@@ -96,7 +96,7 @@ function _truncerr_impl(values::AbstractVector, I; atol::Real = 0, rtol::Real =
     # fast path to avoid checking all values
     ϵᵖ ≥ Nᵖ && return Base.OneTo(0)
 
-    truncerrᵖ_array = cumsum(map(by, values[reverse(I)]))
+    truncerrᵖ_array = accumulate((x,y)->(x + by(y)), reverse(view(values, I)); init=by(zero(eltype(values))))
     rank = length(values) - (findfirst(≥(ϵᵖ), truncerrᵖ_array) - 1)
     return Base.OneTo(rank)
 end