Lines Matching defs:src
162 * in place of the backslash sequence that starts at src. If
173 Tcl_Backslash(src, readPtr)
174 char *src; /* Points to the backslash character of
177 * from src, unless NULL. */
179 register char *p = src+1;
220 count = end - src;
231 count = p - src;
311 register char *src, *dst, c;
313 src = string;
327 c = *src;
328 src++;
332 *termPtr = src;
343 value = Tcl_ParseVar(interp, src-1, termPtr);
347 src = *termPtr;
361 result = TclParseNestedCmd(interp, src, flags, termPtr, pvPtr);
365 src = *termPtr;
371 src--;
372 *dst = Tcl_Backslash(src, &numRead);
374 src += numRead;
496 register char *src, *dst, *end;
499 src = string;
510 c = *src;
511 src++;
539 if (*src == '\n') {
540 dst[-1] = Tcl_Backslash(src-1, &count);
541 src += count - 1;
543 (void) Tcl_Backslash(src-1, &count);
551 *dst = *src;
553 src++;
566 *termPtr = src;
628 register char *src, *dst;
635 src = string;
646 c = *src;
649 src++;
650 c = *src;
676 src++;
683 value = Tcl_ParseVar(interp, src, termPtr);
687 src = *termPtr;
710 result = TclParseNestedCmd(interp, src+1, flags, termPtr,
715 src = *termPtr;
720 *dst = Tcl_Backslash(src, &numRead);
729 if (src[1] == '\n') {
730 src += numRead;
733 src += numRead;
738 c = *src;
769 result = TclParseQuotes(interp, src+1, '"', flags,
772 result = TclParseBraces(interp, src+1, termPtr, pvPtr);
773 } else if ((type == TCL_BACKSLASH) && (src[1] == '\n')) {
780 src += 2;
804 if (*src == '"') {
816 src = *termPtr;
841 *termPtr = src;