Tcl Library Source Code

It would be interesting to add the boolean type to huddle. Specially for converting huddle objects to json.

Also inside the procedure "::huddle::_dict_setting", I think that the subcommand "create" is wrong:

"
        create { ; # $args: all arguments after "huddle create"
            if {[llength $args] % 2} {error {wrong # args: should be "huddle create ?key value ...?"}}
            set resultL {}
            foreach {key value} $args {
                lappend resultL $key [huddle to_node $value]
            }
            return [huddle wrap D $resultL]
        }
"

I would replace lappend with "dict set":
"            if {[llength $args] % 2} {error {wrong # args: should be "huddle create ?key value ...?"}}
            set resultL {}
            foreach {key value} $args {
                dict set resultL $key [huddle to_node $value]
            }
            return [huddle wrap D $resultL]
        }
"