Posted to tcl by pooryorick at Tue Jul 19 06:02:17 GMT 2016view pretty
#! /bin/env tclsh apply [list args { dict for {key val} $args {} puts $args foreach key $args { puts [::tcl::unsupported::representation $key] } } [namespace current]] {*}[list [expr 1] one [expr 2] two]