summaryrefslogtreecommitdiffstats
path: root/generic/tcl.h
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2003-04-05 01:25:08 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2003-04-05 01:25:08 (GMT)
commitfdae48118c13223e176a192699aad3cd2643d30e (patch)
treeebe2a533e59c1223387882653bd2ee98bf67da3f /generic/tcl.h
parent677e85edc90d09942a06fc0f7ee0885669caa5e0 (diff)
downloadtcl-fdae48118c13223e176a192699aad3cd2643d30e.zip
tcl-fdae48118c13223e176a192699aad3cd2643d30e.tar.gz
tcl-fdae48118c13223e176a192699aad3cd2643d30e.tar.bz2
Build support for dicts on Unix and Windows, plus public API (structure
declaration and stubs entries.)
Diffstat (limited to 'generic/tcl.h')
-rw-r--r--generic/tcl.h15
1 files changed, 14 insertions, 1 deletions
diff --git a/generic/tcl.h b/generic/tcl.h
index a7443b2..c34f84a 100644
--- a/generic/tcl.h
+++ b/generic/tcl.h
@@ -13,7 +13,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tcl.h,v 1.155 2003/03/12 19:21:24 dgp Exp $
+ * RCS: @(#) $Id: tcl.h,v 1.156 2003/04/05 01:25:10 dkf Exp $
*/
#ifndef _TCL
@@ -488,6 +488,7 @@ typedef struct Tcl_Trace_ *Tcl_Trace;
typedef struct Tcl_Var_ *Tcl_Var;
typedef struct Tcl_ChannelTypeVersion_ *Tcl_ChannelTypeVersion;
typedef struct Tcl_LoadHandle_ *Tcl_LoadHandle;
+typedef struct Tcl_Dict_ *Tcl_Dict;
/*
* Definition of the interface to procedures implementing threads.
@@ -1334,6 +1335,18 @@ typedef struct Tcl_HashSearch {
Tcl_InitHashTableEx(tablePtr, keyType, NULL)
#endif /* TCL_PRESERVE_BINARY_COMPATABILITY */
+/*
+ * Structure definition for information used to keep track of searches
+ * through dictionaries. These fields should not be accessed by code
+ * outside tclDictObj.c
+ */
+
+typedef struct {
+ Tcl_HashSearch search;
+ int epoch;
+ Tcl_Dict dictionaryPtr;
+} Tcl_DictSearch;
+
/*
* Flag values to pass to Tcl_DoOneEvent to disable searches