summaryrefslogtreecommitdiffstats
path: root/generic/tclOOInt.h
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2018-05-14 20:55:40 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2018-05-14 20:55:40 (GMT)
commitbd706be303307bc4bdeacf15c1af1a43f1585d6b (patch)
treef87d640e805454a2c847c8924004a30449d45d13 /generic/tclOOInt.h
parent5eef06ea24f7486a2dcca559a64b3ec08f0c6710 (diff)
downloadtcl-bd706be303307bc4bdeacf15c1af1a43f1585d6b.zip
tcl-bd706be303307bc4bdeacf15c1af1a43f1585d6b.tar.gz
tcl-bd706be303307bc4bdeacf15c1af1a43f1585d6b.tar.bz2
Make sure that [self call] reports useful info.
Diffstat (limited to 'generic/tclOOInt.h')
-rw-r--r--generic/tclOOInt.h4
1 files changed, 4 insertions, 0 deletions
diff --git a/generic/tclOOInt.h b/generic/tclOOInt.h
index 43e2709..e81bbf9 100644
--- a/generic/tclOOInt.h
+++ b/generic/tclOOInt.h
@@ -236,6 +236,10 @@ typedef struct Object {
* other spots). */
#define FORCE_UNKNOWN 0x10000 /* States that we are *really* looking up the
* unknown method handler at that point. */
+#define HAS_PRIVATE_METHODS 0x20000
+ /* Object/class has (or had) private methods,
+ * and so shouldn't be cached so
+ * aggressively. */
/*
* And the definition of a class. Note that every class also has an associated