Cross Reference: /ast/src/lib/libtksh/tcl/tclParse.c

Lines Matching refs:result
180     char result;
191 	 * could result in non-portable Tcl scripts.
195 	    result = 0x7;
198 	    result = 0x8;
201 	    result = 0xc;
204 	    result = 0xa;
207 	    result = 0xd;
210 	    result = 0x9;
213 	    result = 0xb;
219 		result = (char) strtoul(p+1, &end, 16);
223 		result = 'x';
230 	    result = ' ';
234 	    result = '\\';
239 		result = (char)(*p - '0');
245 		result = (char)((result << 3) + (*p - '0'));
251 		result = (char)((result << 3) + (*p - '0'));
254 	    result = *p;
262     return result;
278  *	The return value is a standard Tcl result, which is
280  *	quoted string.  If an error occurs then interp->result
309 				 * fully-substituted result of parse. */
358 	    int result;
361 	    result = TclParseNestedCmd(interp, src, flags, termPtr, pvPtr);
362 	    if (result != TCL_OK) {
363 		return result;
378 	    sprintf(interp->result, "missing %c", termChar);
394  *	brackets, returning the result of the command.
397  *	The return value is a standard Tcl result, which is
399  *	nested command.  If an error occurs then interp->result
405  *	(a missing close bracket is an error).  The result returned
425 				 * result of command. */
427     int result, length, shortfall;
431     result = Tcl_Eval(interp, string);
433     if (result != TCL_OK) {
442 	return result;
445     length = strlen(iPtr->result);
450     strcpy(pvPtr->next, iPtr->result);
453     iPtr->result = iPtr->resultSpace;
468  *	The return value is a standard Tcl result, which is
470  *	If an error occurs then interp->result contains a
493 				 * result of command. */
505      * Copy the characters one at a time to the result area, stopping
581  *	The return value is a standard Tcl result.
595  *	of an error (if the result is not TCL_OK).
602  *	interp->result and the information at *argv, *argcPtr,
630     int type, result, argc;
710 		    result = TclParseNestedCmd(interp, src+1, flags, termPtr,
712 		    if (result != TCL_OK) {
713 			return result;
769 		result = TclParseQuotes(interp, src+1, '"', flags,
772 		result = TclParseBraces(interp, src+1, termPtr, pvPtr);
785 	    if (result != TCL_OK) {
786 		return result;
854  *	more space for the result of a parse.
1251  *	an error message will be left in interp->result.
1269     char *name1, *name1End, c, *result;
1345 		result = NULL;
1366     result = Tcl_GetVar2(interp, name1, name2, TCL_LEAVE_ERR_MSG);
1373     return result;