7 lines
148 B
Plaintext
7 lines
148 B
Plaintext
|
/* delcmd.swg : Tcl object deletion method */
|
||
|
|
|
||
|
|
static void TclDelete@CLASS@(ClientData clientData) {
|
||
|
|
@DESTRUCTOR@((@CLASSTYPE@) clientData);
|
||
|
|
}
|
||
|
|
|