Files
2010-01-29 14:27:55 +00:00

31 lines
790 B
Diff

--- tcLex.c.orig 2010-01-27 14:01:19.000000000 -0500
+++ tcLex.c 2010-01-27 14:38:20.000000000 -0500
@@ -15,14 +15,16 @@
*
*/
+#ifndef HAVE_UNISTD_H
+#define HAVE_UNISTD_H
+#endif
+
#include "tcLex.h"
#include "tcLexInt.h"
#include "tcLexRE.h"
#include <tclInt.h>
-
-
/*******************************************************
* *
* Conditions management functions *
@@ -1145,7 +1147,7 @@
currentLexer = LexerGetCurrent(interp);
if (currentLexer) {
- if (((Command*)currentLexer->command)->deleted)
+ if (((Command*)currentLexer->command)->flags==CMD_IS_DELETED)
/* If command has been deleted, the token is meaningless. Return no result */
Tcl_ResetResult(interp);
else