Posted to tcl by colin at Mon Mar 23 06:24:55 GMT 2009view pretty
interp create I
I eval {
proc x {args} {return "Moop $args"}
}
interp hide I x
puts [I invokehidden x 1]
interp create I
I eval {
proc x {args} {return "Moop $args"}
}
interp hide I x
puts [I invokehidden x 1]