742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
|
* For now, it is working.
*/
Tcl_Parse vparse;
const char *varend;
const char *varstart = &start[TclParseAllWhiteSpace(start, numBytes)];
int code, len;
code = Tcl_ParseVarName(NULL, varstart, numBytes, &vparse, 0);
len = vparse.tokenPtr[0].size;
varend = varstart+len;
Tcl_FreeParse(&vparse);
/*
* An error here just means it's not a valid variable name,
* so continue on to treat as a function
|
|
|
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
|
* For now, it is working.
*/
Tcl_Parse vparse;
const char *varend;
const char *varstart = &start[TclParseAllWhiteSpace(start, numBytes)];
int code, len;
code = Tcl_ParseVarName(NULL, varstart, numBytes, &vparse, -1);
len = vparse.tokenPtr[0].size;
varend = varstart+len;
Tcl_FreeParse(&vparse);
/*
* An error here just means it's not a valid variable name,
* so continue on to treat as a function
|