@@ -26,24 +26,23 @@ allocate:
2626```
2727"""
2828macro wrappedallocs (expr)
29- argnames = [gensym () for a in expr. args]
30- quote
31- function g ($ (argnames... ))
32- @allocated $ (Expr (expr. head, argnames... ))
33- end
34- $ (Expr (:call , :g , [esc (a) for a in expr. args]. .. ))
29+ argnames = [gensym () for a in expr. args]
30+ quote
31+ function g ($ (argnames... ))
32+ @allocated $ (Expr (expr. head, argnames... ))
3533 end
34+ $ (Expr (:call , :g , [esc (a) for a in expr. args]. .. ))
35+ end
3636end
3737
38-
3938# Test non allocating solve!
4039@testset " allocs" begin
41- for (h, h_name) ∈ ((NormL0 (λ), " l0" ), (NormL1 (λ), " l1" ))
42- for solver ∈ (:R2Solver , )
43- reg_nlp = RegularizedNLPModel (bpdn, h)
44- solver = eval (solver)(reg_nlp)
45- stats = GenericExecutionStats (bpdn, solver_specific = Dict {Symbol, Float64} ())
46- @test @wrappedallocs (solve! (solver, reg_nlp, stats)) == 0
47- end
40+ for (h, h_name) ∈ ((NormL0 (λ), " l0" ), (NormL1 (λ), " l1" ))
41+ for solver ∈ (:R2Solver ,)
42+ reg_nlp = RegularizedNLPModel (bpdn, h)
43+ solver = eval (solver)(reg_nlp)
44+ stats = GenericExecutionStats (bpdn, solver_specific = Dict {Symbol, Float64} ())
45+ @test @wrappedallocs (solve! (solver, reg_nlp, stats)) == 0
4846 end
47+ end
4948end
0 commit comments