diff options
author | dgp <dgp@users.sourceforge.net> | 2013-06-18 15:45:37 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2013-06-18 15:45:37 (GMT) |
commit | 82ddd74eabd7128c1cade876043358da01914398 (patch) | |
tree | 3fc06b6b85bbe32644397b191f5be3fa998095f0 | |
parent | 9e364e8934208145764edf2ba379c14f9ea102e5 (diff) | |
download | tcl-82ddd74eabd7128c1cade876043358da01914398.zip tcl-82ddd74eabd7128c1cade876043358da01914398.tar.gz tcl-82ddd74eabd7128c1cade876043358da01914398.tar.bz2 |
Make the (cosmetic) change to 4-state system, separating RISING and FALLING.
-rw-r--r-- | generic/tclEvent.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclEvent.c b/generic/tclEvent.c index d0ad7fd..732a7d6 100644 --- a/generic/tclEvent.c +++ b/generic/tclEvent.c @@ -934,7 +934,7 @@ Tcl_Exit( #define INITDEBUG 1 typedef enum { - DOWN, CHANGING, UP + DOWN, RISING, FALLING, UP } State; static State initState = DOWN; @@ -959,8 +959,8 @@ TclInitSubsystems(void) /* Did we win? */ if (initState == DOWN) { - /* Yes! Record that we are CHANGING the state */ - initState = CHANGING; + /* Yes! Record that we are bring the state up */ + initState = RISING; changer = Tcl_GetCurrentThread(); /* @@ -1077,7 +1077,7 @@ Tcl_Finalize(void) TclpInitLock(); if (initState == UP) { - initState = CHANGING; + initState = FALLING; changer = Tcl_GetCurrentThread(); /* |