order-stable params

This commit is contained in:
Mike J Innes 2017-10-10 12:16:32 +01:00
parent ef6d10886d
commit c6556a29e6

View File

@ -19,7 +19,7 @@ forparams(f, x) = (mapparams(x -> (f(x); x), x); return)
using DataFlow: OSet
function params(m)
ps = OSet()
forparams(p -> push!(ps, p), m)
return collect(ps)
ps, seen = [], OSet()
forparams(p -> p seen && (push!(ps, p); push!(seen, p)), m)
return ps
end