diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2002-10-23 09:55:13 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2002-10-23 09:55:13 (GMT) |
commit | 77a18596d7c565b3bc303059ca71fcb6be07ba95 (patch) | |
tree | 0c3855a285316911c8de6770d5e5d6d1f309ebf3 /generic | |
parent | 7f3b35ca1686f77e0da2d493f29614bdcbd04e86 (diff) | |
download | tcl-77a18596d7c565b3bc303059ca71fcb6be07ba95.zip tcl-77a18596d7c565b3bc303059ca71fcb6be07ba95.tar.gz tcl-77a18596d7c565b3bc303059ca71fcb6be07ba95.tar.bz2 |
Removed obsolete history-related structures.
Diffstat (limited to 'generic')
-rw-r--r-- | generic/tclInt.h | 40 |
1 files changed, 1 insertions, 39 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index 2c8f413..e5e6408 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -12,7 +12,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclInt.h,v 1.111 2002/08/14 17:31:43 msofer Exp $ + * RCS: @(#) $Id: tclInt.h,v 1.112 2002/10/23 09:55:14 dkf Exp $ */ #ifndef _TCLINT @@ -766,44 +766,6 @@ typedef VOID **TclHandle; /* *---------------------------------------------------------------- - * Data structures related to history. These are used primarily - * in tclHistory.c - *---------------------------------------------------------------- - */ - -/* - * The structure below defines one history event (a previously-executed - * command that can be re-executed in whole or in part). - */ - -typedef struct { - char *command; /* String containing previously-executed - * command. */ - int bytesAvl; /* Total # of bytes available at *event (not - * all are necessarily in use now). */ -} HistoryEvent; - -/* - * The structure below defines a pending revision to the most recent - * history event. Changes are linked together into a list and applied - * during the next call to Tcl_RecordHistory. See the comments at the - * beginning of tclHistory.c for information on revisions. - */ - -typedef struct HistoryRev { - int firstIndex; /* Index of the first byte to replace in - * current history event. */ - int lastIndex; /* Index of last byte to replace in - * current history event. */ - int newSize; /* Number of bytes in newBytes. */ - char *newBytes; /* Replacement for the range given by - * firstIndex and lastIndex (malloced). */ - struct HistoryRev *nextPtr; /* Next in chain of revisions to apply, or - * NULL for end of list. */ -} HistoryRev; - -/* - *---------------------------------------------------------------- * Data structures related to expressions. These are used only in * tclExpr.c. *---------------------------------------------------------------- |