diff options
| author | Kevin B Kenny <kennykb@acm.org> | 2004-03-05 16:36:55 (GMT) |
|---|---|---|
| committer | Kevin B Kenny <kennykb@acm.org> | 2004-03-05 16:36:55 (GMT) |
| commit | fcfbbfde29f5232f5f08035190b90c94a8c2a89a (patch) | |
| tree | 34ad82e4789007f161b52a46cbe13b2d443f2473 /generic | |
| parent | 4e286281a296a9f2cda90be0e756e5352d2011eb (diff) | |
| download | tcl-fcfbbfde29f5232f5f08035190b90c94a8c2a89a.zip tcl-fcfbbfde29f5232f5f08035190b90c94a8c2a89a.tar.gz tcl-fcfbbfde29f5232f5f08035190b90c94a8c2a89a.tar.bz2 | |
* generic/tclTest.c: Modified TesteventObjCmd to use
a Tcl_QueuePosition in place of an 'int' for the enumerated
queue position, to avoid a compiler warning on SGI.
(Bug #771960).
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tclTest.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/generic/tclTest.c b/generic/tclTest.c index 473cb21..d29c132 100644 --- a/generic/tclTest.c +++ b/generic/tclTest.c @@ -14,7 +14,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclTest.c,v 1.77 2004/03/01 17:33:45 dgp Exp $ + * RCS: @(#) $Id: tclTest.c,v 1.78 2004/03/05 16:36:56 kennykb Exp $ */ #define TCL_TEST @@ -2056,7 +2056,8 @@ TesteventObjCmd( ClientData unused, /* Not used */ NULL }; int posIndex; /* Index of the chosen position */ - static CONST int posNum[] = { /* Interpretation of the chosen position */ + static CONST Tcl_QueuePosition posNum[] = { + /* Interpretation of the chosen position */ TCL_QUEUE_HEAD, TCL_QUEUE_TAIL, TCL_QUEUE_MARK |