Lines Matching defs:tokenPtr
433 Tcl_Token *tokenPtr, const char *cmd, int len,
1099 * Returns true if the tokenPtr argument points to a word value that is
1116 Tcl_Token *tokenPtr, /* Points to Tcl_Token we should check */
1121 int numComponents = tokenPtr->numComponents;
1124 if (tokenPtr->type == TCL_TOKEN_SIMPLE_WORD) {
1126 Tcl_AppendToObj(valuePtr, tokenPtr[1].start, tokenPtr[1].size);
1130 if (tokenPtr->type != TCL_TOKEN_WORD) {
1133 tokenPtr++;
1139 switch (tokenPtr->type) {
1142 Tcl_AppendToObj(tempPtr, tokenPtr->start, tokenPtr->size);
1149 int length = Tcl_UtfBackslash(tokenPtr->start, NULL, utfBuf);
1160 tokenPtr++;
1210 Tcl_Token *tokenPtr;
1309 for (wordIdx = 0, tokenPtr = parsePtr->tokenPtr;
1311 wordIdx++, tokenPtr += (tokenPtr->numComponents + 1)) {
1312 if (tokenPtr->type == TCL_TOKEN_EXPAND_WORD) {
1346 parsePtr->tokenPtr, parsePtr->commandStart,
1356 for (wordIdx = 0, tokenPtr = parsePtr->tokenPtr;
1358 tokenPtr += (tokenPtr->numComponents + 1)) {
1363 if (tokenPtr->type != TCL_TOKEN_SIMPLE_WORD) {
1368 TclCompileTokens(interp, tokenPtr+1,
1369 tokenPtr->numComponents, envPtr);
1370 if (tokenPtr->type == TCL_TOKEN_EXPAND_WORD) {
1393 Tcl_DStringAppend(&ds, tokenPtr[1].start,tokenPtr[1].size);
1498 tokenPtr[1].start, tokenPtr[1].size);
1522 tokenPtr[1].start, tokenPtr[1].size);
1526 tokenPtr[1].start - envPtr->source,
1657 Tcl_Token *tokenPtr, /* Pointer to first in an array of tokens to
1659 int count, /* Number of tokens to consider at tokenPtr.
1694 if ((tokenPtr[i].type != TCL_TOKEN_TEXT) &&
1695 (tokenPtr[i].type != TCL_TOKEN_BS)) {
1708 for ( ; count > 0; count--, tokenPtr++) {
1709 switch (tokenPtr->type) {
1711 Tcl_DStringAppend(&textBuffer, tokenPtr->start, tokenPtr->size);
1715 length = Tcl_UtfBackslash(tokenPtr->start, NULL, buffer);
1734 (tokenPtr->start[1] == '\n')) {
1770 TclCompileScript(interp, tokenPtr->start+1,
1771 tokenPtr->size-2, envPtr);
1800 name = tokenPtr[1].start;
1801 nameBytes = tokenPtr[1].size;
1810 && (tokenPtr->numComponents == 1)
1837 if (tokenPtr->numComponents == 1) {
1846 TclCompileTokens(interp, tokenPtr+2,
1847 tokenPtr->numComponents-1, envPtr);
1857 count -= tokenPtr->numComponents;
1858 tokenPtr += tokenPtr->numComponents;
1863 tokenPtr->type, tokenPtr->size, tokenPtr->start);
1942 Tcl_Token *tokenPtr, /* Pointer to first in an array of tokens for
1944 int count, /* Number of tokens to consider at tokenPtr.
1948 if ((count == 1) && (tokenPtr->type == TCL_TOKEN_TEXT)) {
1954 TclCompileScript(interp, tokenPtr->start, tokenPtr->size, envPtr);
1962 TclCompileTokens(interp, tokenPtr, count, envPtr);
1992 Tcl_Token *tokenPtr, /* Points to first in an array of word tokens
1995 int numWords, /* Number of word tokens starting at tokenPtr.
2008 if ((numWords == 1) && (tokenPtr->type == TCL_TOKEN_SIMPLE_WORD)) {
2009 TclCompileExpr(interp, tokenPtr[1].start, tokenPtr[1].size, envPtr, 1);
2018 wordPtr = tokenPtr;
2065 Tcl_Token *tokenPtr;
2069 tokenPtr = parsePtr->tokenPtr;
2071 tokenPtr = tokenPtr + tokenPtr->numComponents + 1;
2074 if (tokenPtr->type != TCL_TOKEN_SIMPLE_WORD) {
2075 TclCompileTokens(interp, tokenPtr+1, tokenPtr->numComponents,
2557 Tcl_Token *tokenPtr,
2597 wordIdx++, tokenPtr += tokenPtr->numComponents + 1) {
2598 TclAdvanceLines (&wordLine, last, tokenPtr->start);
2600 tokenPtr->start - envPtr->source);
2602 (TclWordKnownAtCompileTime(tokenPtr, NULL) ? wordLine : -1);
2605 last = tokenPtr->start;