Posted to tcl by Bradipo at Wed Sep 22 18:34:38 GMT 2021view pretty
% set prop [dict create a string b 1]; set thing [dict create x another y $prop] % json::dict2json $thing {"x": another ,"y": a string b 1 }
% set prop [dict create a string b 1]; set thing [dict create x another y $prop] % json::dict2json $thing {"x": another ,"y": a string b 1 }