Tcl Source Code

Check-in [c522399ab8]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Remove unused struct InterpList.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: c522399ab82d6ed966eae1f72501e364e6596161
User & Date: dgp 2013-02-25 16:00:48
Context
2013-02-25
16:41
LimitHandler struct used only locally. Remove from tclInt.h check-in: bf6457d2fe user: dgp tags: trunk
16:05
merge trunk. Unicode 6.3 does not have that many spaces..... check-in: 7087b32fea user: jan.nijtmans tags: novem
16:05
merge trunk check-in: 73e2db1b36 user: dgp tags: dgp-refactor
16:03
Merge trunk. Unicode 6.3 does not have that many spaces..... check-in: 0e5e775003 user: jan.nijtmans tags: tip-389-impl
16:00
Remove unused struct InterpList. check-in: c522399ab8 user: dgp tags: trunk
15:57
Remove unused struct InterpList. check-in: 163559dc25 user: dgp tags: core-8-5-branch
15:45
Array Search struct used only locally. Remove from tclInt.h. check-in: d37e373c83 user: dgp tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to generic/tclInt.h.

2173
2174
2175
2176
2177
2178
2179
2180
2181
2182
2183
2184
2185
2186
2187
2188
2189
2190
2191
2192
2193
2194
2195
2196
2197
    if ((cancelFlags) & TCL_CANCEL_UNWIND) {   \
        (iPtr)->flags |= TCL_CANCEL_UNWIND;    \
    }

#define TclUnsetCancelFlags(iPtr) \
    (iPtr)->flags &= (~(CANCELED | TCL_CANCEL_UNWIND))

/*
 * General list of interpreters. Doubly linked for easier removal of items
 * deep in the list.
 */

typedef struct InterpList {
    Interp *interpPtr;
    struct InterpList *prevPtr;
    struct InterpList *nextPtr;
} InterpList;

/*
 * Macros for splicing into and out of doubly linked lists. They assume
 * existence of struct items 'prevPtr' and 'nextPtr'.
 *
 * a = element to add or remove.
 * b = list head.
 *







<
<
<
<
<
<
<
<
<
<
<







2173
2174
2175
2176
2177
2178
2179











2180
2181
2182
2183
2184
2185
2186
    if ((cancelFlags) & TCL_CANCEL_UNWIND) {   \
        (iPtr)->flags |= TCL_CANCEL_UNWIND;    \
    }

#define TclUnsetCancelFlags(iPtr) \
    (iPtr)->flags &= (~(CANCELED | TCL_CANCEL_UNWIND))












/*
 * Macros for splicing into and out of doubly linked lists. They assume
 * existence of struct items 'prevPtr' and 'nextPtr'.
 *
 * a = element to add or remove.
 * b = list head.
 *