diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2015-11-21 22:22:49 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2015-11-21 22:22:49 (GMT) |
commit | 6b4bc6bb8d46722088d73bd4a93f51e7fc65dbf4 (patch) | |
tree | 0eeb703224f6ae757ab409e4196bc4b0ceb50199 /generic/tclOOInt.h | |
parent | 67929efb233a934a2d625216ee8d3b1d8022d33e (diff) | |
download | tcl-6b4bc6bb8d46722088d73bd4a93f51e7fc65dbf4.zip tcl-6b4bc6bb8d46722088d73bd4a93f51e7fc65dbf4.tar.gz tcl-6b4bc6bb8d46722088d73bd4a93f51e7fc65dbf4.tar.bz2 |
[3d96b7076e] Prevent crashes when destroying an object's class inside a method call.
Diffstat (limited to 'generic/tclOOInt.h')
-rw-r--r-- | generic/tclOOInt.h | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/generic/tclOOInt.h b/generic/tclOOInt.h index 208e32c..b75ffdb 100644 --- a/generic/tclOOInt.h +++ b/generic/tclOOInt.h @@ -193,6 +193,9 @@ typedef struct Object { * destroyed. */ #define DESTRUCTOR_CALLED 2 /* Flag to say that the destructor has been * called. */ +#define CLASS_GONE 4 /* Indicates that the class of this object has + * been deleted, and so the object should not + * attempt to remove itself from its class. */ #define ROOT_OBJECT 0x1000 /* Flag to say that this object is the root of * the class hierarchy and should be treated * specially during teardown. */ |