diff options
| author | dgp <dgp@users.sourceforge.net> | 2013-07-11 04:00:57 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2013-07-11 04:00:57 (GMT) |
| commit | ac62d0c4970dfe3fa03f4fa77c05d23943a20671 (patch) | |
| tree | dd314bf04dc89630af6697fd178f26dde3d2cad7 /generic/tclCompile.h | |
| parent | f3a1a26516d79b15224325941f72deb7dfda25f6 (diff) | |
| download | tcl-ac62d0c4970dfe3fa03f4fa77c05d23943a20671.zip tcl-ac62d0c4970dfe3fa03f4fa77c05d23943a20671.tar.gz tcl-ac62d0c4970dfe3fa03f4fa77c05d23943a20671.tar.bz2 | |
Revert the revised macros used in developing the new tests.tip280_test_coverage
Diffstat (limited to 'generic/tclCompile.h')
| -rw-r--r-- | generic/tclCompile.h | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/generic/tclCompile.h b/generic/tclCompile.h index 5043f65..9af4911 100644 --- a/generic/tclCompile.h +++ b/generic/tclCompile.h @@ -1537,13 +1537,10 @@ MODULE_SCOPE Tcl_Obj *TclNewInstNameObj(unsigned char inst); ExtCmdLoc *mapPtr = envPtr->extCmdMapPtr; \ int eclIndex = mapPtr->nuloc - 1 -#define LineInformation(word) \ +#define SetLineInformation(word) \ envPtr->line = mapPtr->loc[eclIndex].line[(word)]; \ envPtr->clNext = mapPtr->loc[eclIndex].next[(word)] -#define SetLineInformation(word) - - #define PushVarNameWord(i,v,e,f,l,sc,word) \ TclPushVarName(i,v,e,f,l,sc, \ mapPtr->loc[eclIndex].line[(word)], \ |