ensemble serialization

::foreach _cmnd [::info commands [::namespace current]::*] {
    ::if {[::namespace ensemble exists $_cmnd]} {
        ::array set _cfg [::namespace ensemble configure $_cmnd]
        ::set _enns $_cfg(-namespace)
        ::unset _cfg(-namespace)
        ::set _encmd [::list namespace ensemble create -command $_cmnd {*}[::array get _cfg]]
        ::append _ensembles [::list namespace eval $_enns $_encmd] \n
    }   
}