Posted to tcl by hypnotoad at Fri Apr 05 17:28:07 GMT 2019view pretty
oo::class create Bar {} oo::objdefine Bar method new_value name { # Build your template as the variable $body oo::objdefine [self] method $name args $body }
oo::class create Bar {} oo::objdefine Bar method new_value name { # Build your template as the variable $body oo::objdefine [self] method $name args $body }