Sujet : A TclOO question De : hgiese (at) *nospam* ratiosoft.com (Helmut Giese) Groupes :comp.lang.tcl Date : 07. Apr 2025, 14:03:04 Autres entêtes Organisation : ratiosoft Message-ID :<fde7vjp95da1dv2v38fhtfqsqe8k8ep47r@4ax.com> User-Agent : Forte Free Agent 1.93/32.576 English (American)
Hello out there, look at the following sample: --- catch {Sample destroy}
oo::class create Sample { variable classVar ;# automatically exists in every instance constructor {someVar} { my variable objVar set classVar $someVar set objVar 99 } destructor { my variable objVar classVar puts "classVar: $classVar, objVar: $objVar" } }
Sample create s1 100 Sample create s2 200 s1 destroy ;# -> classVar: 100, objVar: 99 s2 destroy ;# -> classVar: 200, objVar: 99 --- My question is: What happens, if I add 'classVar', although not needed, to a 'my variable' statement - like I did in the destructor above. Is it just superfluous or can it have consequences in a more complex situation than the above example. Thank you for any enlightenment Helmut