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

Lines Matching defs:command
4  *	This file contains the top-level command routines for most of
31  * The variables below are used to implement the "lsort" command.
39 static Tcl_Interp *sortInterp = NULL;	/* Interpreter for "lsort" command. 
44 					 * user-defined command for
46 static Tcl_DString sortCmd;		/* Holds command if mode is COMMAND.
48 					 * command. */
53 					 * executing a comparison command, so
69  *	This procedure is invoked to process the "if" Tcl command.
124 	 * The expression evaluated to false.  Skip the command, then
163  *	This procedure is invoked to process the "incr" Tcl command.
229  *	This procedure is invoked to process the "join" Tcl command.
283  *	This procedure is invoked to process the "lindex" Tcl command.
356  *	This procedure is invoked to process the "linsert" Tcl command.
444  *	This procedure is invoked to process the "list" Tcl command.
477  *	This procedure is invoked to process the "llength" Tcl command.
525  *	This procedure is invoked to process the "lrange" Tcl command.
632  *	This procedure is invoked to process the "lreplace" Tcl command.
765  *	This procedure is invoked to process the "lsearch" Tcl command.
847  *	This procedure is invoked to process the "lsort" Tcl command.
870     char *command = NULL;		/* Initialization needed only to
876 		" ?-command string? list\"", (char *) NULL);
899 		    " -decreasing, or -command", (char *) NULL);
906 	} else if ((c == 'c') && (strncmp(argv[i], "-command", length) == 0)) {
908 		Tcl_AppendResult(interp, "\"-command\" must be",
909 			" followed by comparison command", (char *) NULL);
914 	    command = argv[i+1];
934 	Tcl_DStringAppend(&sortCmd, command, -1);
973  *	None, unless a user-defined comparison command does something
1033 	 * Generate and evaluate a command to determine which string comes
1044 		    "\n    (user-defined comparison command)");
1049 	 * Parse the result of the command.
1056 		    "comparison command returned non-numeric result",