HomeSort by: relevance | last modified time | path
    Searched refs:CONS (Results 1 - 22 of 22) sorted by relevancy

  /xsrc/external/mit/libX11/dist/src/xlibi18n/
XimThai.h 71 #define CONS 2 /* consonants */
  /xsrc/external/mit/xedit/dist/lisp/modules/
psql.c 552 cdr = EVAL(CONS(ATOM("MAKE-PG-POINT"),
553 CONS(KEYWORD("X"),
554 CONS(REAL(polygon->boundbox.high.x),
555 CONS(KEYWORD("Y"),
556 CONS(REAL(polygon->boundbox.high.y), NIL))))));
557 obj = EVAL(CONS(ATOM("MAKE-PG-POINT"),
558 CONS(KEYWORD("X"),
559 CONS(REAL(polygon->boundbox.low.x),
560 CONS(KEYWORD("Y"),
561 CONS(REAL(polygon->boundbox.low.y), NIL))))))
    [all...]
xt.c 290 code = CONS(CDR(CDR(args->data)), CONS(OPAQUE(w, xtWidget_t),
291 CONS(CAR(CDR(args->data)), CONS(OPAQUE(call_data, 0), NIL))));
293 COD = CONS(code, COD);
318 code = CONS(CDR(CDR(args->data)), CONS(CAR(CDR(args->data)),
319 CONS(INTEGER(*source), CONS(CAR(args->data), NIL))));
321 COD = CONS(code, COD)
337 LispObj *cons, *widget_list, *result; local
855 LispObj *list, *object = NIL, *result, *cons = NIL; local
    [all...]
xaw.c 301 code = CONS(ATOM("MAKE-XAW-LIST-RETURN-STRUCT"),
302 CONS(KEYWORD("STRING"),
303 CONS(STRING(retlist->string),
304 CONS(KEYWORD("INDEX"),
305 CONS(INTEGER(retlist->list_index), NIL)))));
306 COD = CONS(code, COD);
576 data->object = CONS(owidget, olist);
  /xsrc/external/mit/xedit/dist/lisp/
debugger.c 181 DBG = CONS(CONS(name, CONS(arg, CONS(FIXNUM(lisp__data.stack.base),
182 CONS(FIXNUM(lisp__data.env.length),
551 obj = CONS(ATOM(arg),
552 CONS(FIXNUM(i),
553 CONS(FIXNUM(LispDebugBreakFunction),
554 CONS(FIXNUM(0), NIL))));
556 BRK = CONS(obj, NIL)
    [all...]
regex.c 179 result = CONS(CONS(FIXNUM(match[0].rm_so),
184 LispObj *cons = result; local
190 RPLACD(cons, CONS(CONS(FIXNUM(match[i].rm_so),
192 cons = CDR(cons);
pathname.c 179 LispObj *pathname, *all, *if_cannot_read, *result, *cons, *object; local
186 cons = NIL;
425 result = cons = CONS(object, NIL);
429 RPLACD(cons, CONS(object, NIL));
430 cons = CDR(cons);
485 LispObj *cons, *cdr; local
521 result = cons = CONS(NIL, NIL)
709 LispObj *result, *cdr, *cons; local
    [all...]
require.c 144 MOD = CONS(module, NIL);
146 RPLACD(MOD, CONS(CAR(MOD), CDR(MOD)));
package.c 454 result = CONS(atom->object, NIL);
460 RPLACD(result, CONS(CAR(result), CDR(result)));
621 LispObj *list, *package, *nicks, *cons, *savepackage; local
643 nicks = cons = NIL;
656 nicks = cons = CONS(package, NIL);
660 RPLACD(cons, CONS(package, NIL));
661 cons = CDR(cons);
752 LispObj *package, *use, *cons; local
786 LispObj *package, *other, *used, *cons, *list; local
    [all...]
core.c 222 return (CONS(CONS(key, datum), alist));
264 return (CONS(item, list));
291 LispObj *result, *cons, *list; local
312 result = cons = CONS(CAR(list), NIL);
315 RPLACD(cons, CONS(CAR(list), NIL));
316 cons = CDR(cons);
541 LispObj *cons; local
642 LispObj *result, *cons, *list, *ocount; local
896 LispObj *result, *cons; local
2124 LispObj *init, *body, *pair, *result, *list, *cons = NIL; local
2253 LispObj *result, *cons; local
2343 *item, *clist1, *clist2, *cons, *cdr; local
2859 LispObj *result, *cons; local
2943 LispObj *cons, *head, *tail; local
2984 LispObj *result = NIL, *cons, *arguments, *acons, *rest, *alist, *value; local
3096 LispObj *result = NIL, *cons, *arguments, *acons, *rest, *alist, *value; local
3335 LispObj *arguments, *cons, *result; local
3382 LispObj *values, *cons; local
3431 LispObj *form, *result, *cons; local
3494 LispObj *list, *lists, *cons, *head, *tail; local
3702 LispObj *result, *cons; local
4419 LispObj *lambda, *result, *cons, *compare; local
4971 LispObj *cons = NIL; local
5261 LispObj *cons; local
5736 LispObj *arguments, *cons; local
5813 LispObj *arguments, *cons; local
5937 LispObj *list1, *list2, *left, *right, *result, *cons; local
6037 LispObj *list, *work, *cons = NULL; local
6121 LispObj *cons; local
    [all...]
time.c 81 form = CONS(form, NIL);
82 COD = CONS(form, COD);
struct.c 59 LispObj *list, *cons, *object, *definition, *documentation; local
95 cons = list;
101 cons = object;
110 CAR(cons) = KEYWORD(ATOMID(object)->value);
128 definition = CONS(oname, description);
184 LispObj *definition, *object, *field, *fields, *value = NIL, *cons, *list; local
190 field = cons = NIL;
249 fields = cons = CONS(value, NIL);
255 RPLACD(cons, CONS(value, NIL))
    [all...]
lisp.c 246 {LispFunction, Lisp_Cons, "cons car cdr", 0, 0, Com_Cons},
897 /* Protect cons cell */
1664 CONS(key, CONS(NIL, atom->property->properties));
1794 LispObj *arguments, *cons, *obj, *prev; local
1796 arguments = cons = prev = NIL;
1800 arguments = cons = prev = CONS(obj, NIL);
1804 RPLACD(cons, CONS(obj, NIL))
2151 LispObj *name, *obj, *list, *cons, *code; local
2910 LispObj *cons = objseg.freeobj; local
3834 LispObj *result, *object, *cons, *cdr; local
4539 LispObj *cons; local
4555 LispObj *cons; local
4668 LispObj cons; local
    [all...]
helper.c 576 LispObj *list, *symbol, *value, *values, *cons; local
595 values = cons = NIL;
619 values = cons = CONS(NIL, NIL);
623 RPLACD(cons, CONS(NIL, NIL));
624 cons = CDR(cons);
640 for (list = init, cons = values; CONSP(list); list = CDR(list)) {
656 RPLACA(cons, value)
    [all...]
bytecode.c 185 } cons; member in union:_CodeTree::__anon45
335 static LispObj *cons, *cons1, *cons2, *cons3, *cons4, *cons5, *cons6, *cons7; variable
345 cons = &x_cons[7];
346 cons->type = LispCons_t;
347 CDR(cons) = NIL;
350 CDR(cons1) = cons;
432 arguments = form = CONS(NIL, NIL);
435 RPLACD(form, CONS(NIL, NIL));
449 arguments = form = CONS(argument, NIL);
453 RPLACD(form, CONS(argument, NIL))
1242 LispObj **constants, *code, *cons, *prev; local
    [all...]
read.c 563 COD = CONS(COD, result);
632 LispObj *cons; local
637 for (cons = object;
639 cons = object, object = CDR(object)) {
648 CDR(cons) = LispReadLabelCircle(object, info);
993 LispObj *result, *cons, *object; local
1008 result = cons = CONS(object, NIL);
1029 RPLACD(cons, object);
1032 RPLACD(cons, CONS(object, NIL))
1901 LispObj *arguments, *initial, *dim, *cons, *array, *data; local
    [all...]
xedit.c 270 PACK = CONS(xedit, PACK);
317 interactive_arguments[0].data.cons.cdr = &interactive_arguments[1];
320 interactive_arguments[1].data.cons.cdr = &interactive_arguments[2];
323 interactive_arguments[2].data.cons.cdr = &interactive_arguments[3];
326 interactive_arguments[3].data.cons.car = T;
327 interactive_arguments[3].data.cons.cdr = NIL;
427 returns = _cod = CONS(RETURN(0), NIL);
430 RPLACD(_cod, CONS(RETURN(return_count), NIL));
516 arguments.data.cons.car = syntax;
517 arguments.data.cons.cdr = NIL
    [all...]
io.c 123 lisp__data.input_list = CONS(stream, lisp__data.input_list);
format.c 1504 LispObj *string, *strings = NIL, *cons; local
1523 strings = cons = CONS(string, NIL);
1527 RPLACD(cons, CONS(string, NIL));
1528 cons = CDR(cons);
1536 for (i = 0, cons = strings; i < num_formats; i++, cons = CDR(cons)) {
    [all...]
internal.h 53 #define RPLACA(cons, object) (CAR(cons) = object)
54 #define RPLACD(cons, object) (CDR(cons) = object)
56 #define CAR(list) ((list)->data.cons.car)
57 #define CAAR(list) ((list)->data.cons.car->data.cons.car)
58 #define CADR(list) ((list)->data.cons.cdr->data.cons.car)
59 #define CDR(list) ((list)->data.cons.cdr
594 } cons; member in union:_LispObj::__anon69
    [all...]
compile.c 212 cons car cdr
1679 /* Allocate a fresh list of cons */
1978 RPLACD(com->plist, CONS(CAR(com->plist), CDR(com->plist)));
  /xsrc/external/mit/libX11/dist/modules/im/ximcp/
imThaiFlt.c 106 NON, CONS, CONS, CONS, CONS, CONS, CONS, CONS, /* 160 - 167 */
107 CONS, CONS, CONS, CONS, CONS, CONS, CONS, CONS, /* 168 - 175 *
    [all...]

Completed in 64 milliseconds