Posted to tcl by schelte at Fri Sep 13 13:56:40 GMT 2013view raw
- oo::class create foo {
- constructor {} {
- my unknown flubble
- }
- method flubble {args} {
- puts [info level 0]
- }
- }
- foo new
- # Gives: unknown method "flubble": must be <cloned>, destroy, eval, flubble, unknown, variable or varname