diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-05-19 20:26:29 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-05-19 20:26:29 (GMT) |
| commit | 1ac9419646cfa6a09fc0833febd11a0692bca193 (patch) | |
| tree | 9b32f20f3f9f59fc35ff74967c61992a71b394ff /generic/tclExecute.c | |
| parent | 643a9ae4b04a3ce5e65225f4406b1160026835a4 (diff) | |
| parent | 6880761727ec93307c01f5b484f095977b54c3bf (diff) | |
| download | tcl-1ac9419646cfa6a09fc0833febd11a0692bca193.zip tcl-1ac9419646cfa6a09fc0833febd11a0692bca193.tar.gz tcl-1ac9419646cfa6a09fc0833febd11a0692bca193.tar.bz2 | |
Don't #define VOID on VxWorks, as it is already typdef'd to void. Eliminate possibly conflicting LOCAL/OFFSET
Diffstat (limited to 'generic/tclExecute.c')
| -rw-r--r-- | generic/tclExecute.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c index 904c368..0de8e3c 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.c @@ -836,13 +836,13 @@ TclFinalizeExecution(void) (TCL_ALLOCALIGN/sizeof(Tcl_Obj *)) /* - * OFFSET computes how many words have to be skipped until the next aligned + * wordSkip computes how many words have to be skipped until the next aligned * word. Note that we are only interested in the low order bits of ptr, so * that any possible information loss in PTR2INT is of no consequence. */ static inline int -OFFSET( +wordSkip( void *ptr) { int mask = TCL_ALLOCALIGN-1; @@ -855,7 +855,7 @@ OFFSET( */ #define MEMSTART(markerPtr) \ - ((markerPtr) + OFFSET(markerPtr)) + ((markerPtr) + wordSkip(markerPtr)) /* @@ -900,7 +900,7 @@ GrowEvaluationStack( } } else { Tcl_Obj **tmpMarkerPtr = esPtr->tosPtr + 1; - int offset = OFFSET(tmpMarkerPtr); + int offset = wordSkip(tmpMarkerPtr); if (needed + offset < 0) { /* |