Lines Matching defs:argument
45 #define PARSE_BADFMTARG 5 /* argument is not an integer or char */
57 #define GENERIC_BADSTRING 3 /* argument is not a string */
58 #define GENERIC_BADLIST 4 /* argument is not a list */
107 LispObj *base_arguments; /* pointer to first format argument */
115 * last argument list, hint for upandout */
254 FmtArg *argument;
257 argument = &(arguments->arguments[0]);
258 for (count = 0; count < defaults->count; count++, argument++, defaul++) {
260 argument->specified = 0;
261 if (argument->specified) {
262 if (argument->achar != defaul->achar) {
264 arguments->offset = argument->offset;
269 argument->specified = 0;
270 argument->achar = defaul->achar;
271 argument->value = defaul->value;
288 FmtArg *argument;
294 argument = &(arguments->arguments[0]);
307 argument->achar = argument->specified = 1;
308 argument->value = *ptr++;
311 argument->achar = 0;
312 argument->specified = 0;
317 argument->achar = 0;
318 argument->specified = 1;
320 argument->value = *num_objects;
323 *ptr == 'V') { /* format object argument is value */
334 argument->achar = 0;
335 argument->specified = 1;
336 argument->value = FIXNUM_VALUE(object);
339 argument->achar = argument->specified = 1;
340 argument->value = SCHAR_VALUE(object);
354 argument->achar = 0;
355 argument->specified = 1;
365 argument->value = *ptr++ - '0';
367 argument->value = (argument->value * 10) + (*ptr++ - '0');
368 if (argument->value > 65536) {
376 argument->value = -argument->value;
385 argument->offset = arguments->offset;
386 argument++;
437 "argument is not a fixnum integer or a character",
451 "argument must be a character",
452 "argument must be a fixnum integer",
465 "argument must be a string",
466 "argument must be a list",
880 /* next argument is the recursive call arguments */
1159 /* one argument always consumed */
1169 /* argument consumed only if nil, but one must be available */
1186 /* one argument consumed, it is the index in the available formats */
1261 /* next argument is the argument list for the iteration */
1263 /* fetch argument list, must exist */
1317 /* every following argument is the argument list for the iteration */
1327 /* fetch argument list, must exist */
1374 /* next argument is a list of lists */
1379 /* fetch argument list, must exist */
1404 /* fetch argument list, must exist */
1451 /* current argument list is used */
1840 /* check if an argument is required by directive */
1847 /* if collon specified, plural is the last print argument */
1917 /* if a single argument specified */
2088 /* initialize plural/argument info */