self in class context for 8.6

[rene]

Hello

Iirc the "self" command (without args) was introduced in 8.7.
In 8.7 I can write oo::class create ::C {puts [self]}
Is there a way to get the class self command in 8.6.

Thank you
Rene

[YuriyKovalenko]

self exists in 8.6 also. Try
oo::class create ::C {constructor {} {puts [self]}}
or
oo::class create ::D {method foo {} {puts [self]}}

[Alan Grunwald]

As far as I recall, [self] is the same as [self object]. Does [self
object] work, and do what you want/expect in the contexts where [self]
isn't doing the trick?

[greg]

https://www.tcl.tk/man/tcl8.6/TclCmd/self.html
https://www.tcl.tk/man/tcl8.7/TclCmd/self.html


...
if omitted the result will be the same as if self object was invoked.

[rene]

Answering myself:

[self] == [lindex [uplevel 1 {info level -1}] 1]