ok, thanks. I hoped there was a function ...
get symbols = Function( {},
{default local},
Names Default To Here( 1 );
nsNames = Get Namespace Names();
Insert Into( nsNames, "global" );
allSymbols = Transform Each( {NS}, nsNames,
tmp = Associative Array();
tmp["NS"] = NS;
tmp["content"] = Namespace( NS ) << get contents;
tmp;
);
allSymbols
);
get symbols()