Lines Matching refs:CONSP
243 for (object = list; CONSP(object); object = CDR(object)) {
298 if (!CONSP(lists))
302 for (; CONSP(CDR(lists)) && CAR(lists) == NIL; lists = CDR(lists))
306 if (!CONSP(CDR(lists)))
314 for (list = CDR(list); CONSP(list); list = CDR(list)) {
321 for (; CONSP(CDR(lists)); lists = CDR(lists)) {
327 for (; CONSP(list); list = CDR(list)) {
356 if (STRINGP(array) && CONSP(subscripts) && CDR(subscripts) == NIL) {
371 for (count = 0, dim = subscripts, obj = array->data.array.dim; CONSP(dim);
385 for (count = seq = 0, dim = subscripts; CONSP(dim); dim = CDR(dim), seq++) {
444 for (; CONSP(list); list = CDR(list)) {
447 if (!CONSP(compare))
509 for (; CONSP(args); args = CDR(args)) {
536 for (; CONSP(arg); arg = CDR(arg))
547 CONSP(arg);
554 for (arg = more_args; CONSP(arg); arg = CDR(arg))
577 return (CONSP(object) ? NIL : T);
603 for (; CONSP(body); body = CDR(body))
742 for (; CONSP(body); body = CDR(body)) {
748 if (CONSP(CDR(body)))
754 else if (CONSP(form)) {
755 for (; CONSP(form); form = CDR(form))
760 if (CONSP(form)) /* if found match */
769 for (body = result; CONSP(body); body = CDR(body))
794 for (; CONSP(body); body = CDR(body))
877 for (; CONSP(body); body = CDR(body)) {
884 for (code = CDR(code); CONSP(code); code = CDR(code))
904 if (CONSP(CAR(list))) {
920 for (list = CDR(list); CONSP(list); list = CDR(list)) {
923 if (CONSP(CAR(list))) {
1002 consp object
1009 return (CONSP(object) ? T : NIL);
1075 if (CONSP(body) && STRINGP(CAR(body))) {
1118 if (CONSP(body) && STRINGP(CAR(body))) {
1159 if (body == NIL || (CONSP(body) && STRINGP(CAR(body)))) {
1174 if (!CONSP(store))
1177 for (obj = store; CONSP(obj); obj = CDR(obj)) {
1182 if (CONSP(body) && STRINGP(CAR(body))) {
1529 for (list = more_sequences; CONSP(list); list = CDR(list), count++) {
1548 for (i = 1, list = more_sequences; CONSP(list); list = CDR(list), i++) {
1721 if (CONSP(sequence))
1974 for (; CONSP(body); body = CDR(body))
2081 if (!CONSP(list))
2130 for (list = NIL; CONSP(init); init = CDR(init)) {
2143 if (CONSP(pair)) {
2164 for (; CONSP(list); list = CDR(list)) {
2174 for (result = NIL; CONSP(body); body = CDR(body))
2195 for (; CONSP(init); init = CDR(init)) {
2208 if (CONSP(pair)) {
2225 for (result = NIL; CONSP(body); body = CDR(body))
2260 if (!CONSP(more_objects))
2265 for (more_objects = CDR(more_objects); CONSP(more_objects);
2292 CONSP(slow);
2322 return (object == NIL || CONSP(object) ? T : NIL);
2395 for (cmp2 = CDR(list2); CONSP(cmp2); cmp2 = CDR(cmp2)) {
2428 for (cmp1 = list1; CONSP(cmp1); cmp1 = CDR(cmp1)) {
2449 for (cmp2 = clist2; CONSP(cmp2); cmp2 = CDR(cmp2)) {
2521 for (cmp2 = list2; CONSP(cmp2); cmp2 = CDR(cmp2)) {
2536 for (; CONSP(cmp1); cmp1 = CDR(cmp1)) {
2564 if (CONSP(cons2))
2573 CONSP(cons))
2598 for (code = body; CONSP(code); code = CDR(code))
2639 else if (CONSP(dimensions)) {
2642 for (rank = 0; CONSP(dim); rank++, dim = CDR(dim)) {
2736 if (!CONSP(array))
2752 for (i = 0, obj = dim; CONSP(obj); i++, obj = CDR(obj))
2761 if (!CONSP(obj = CAR(obj)))
2775 if (!CONSP(obj))
2942 if (CONSP(list)) {
2946 for (; CONSP(CDR(list)); list = CDR(list)) {
2948 if (CONSP(head)) {
2949 for (tail = head; CONSP(CDR(tail)); tail = CDR(tail))
2959 if (CONSP(head)) {
2994 for (length = 0, alist = list; CONSP(alist); length++, alist = CDR(alist))
3004 for (rest = more_lists; CONSP(rest); rest = CDR(rest), count++) {
3009 i < length && CONSP(alist);
3106 for (length = 0, alist = list; CONSP(alist); length++, alist = CDR(alist))
3114 for (count = 0, rest = more_lists; CONSP(rest); rest = CDR(rest), count++) {
3116 i < length && CONSP(alist);
3240 for (; CONSP(list); list = CDR(list))
3245 for (; CONSP(list); list = CDR(list))
3252 for (; CONSP(list); list = CDR(list))
3257 for (; CONSP(list); list = CDR(list)) {
3304 for (i = -1; CONSP(symbols); symbols = CDR(symbols), i++) {
3319 for (result = NIL; CONSP(body); body = CDR(body))
3344 for (; CONSP(form); form = CDR(form)) {
3390 if (!CONSP(form))
3409 for (; CONSP(form); form = CDR(form))
3414 for (i = 0, cons = CDR(values); CONSP(cons); cons = CDR(cons), i++)
3467 if (CONSP(symbols)) {
3474 for (i = 0; CONSP(symbols); symbols = CDR(symbols), i++) {
3499 for (; CONSP(lists); lists = CDR(lists))
3504 if (!CONSP(lists))
3510 for (cons = list; CONSP(CDR(cons)); cons = CDR(cons))
3515 if (!CONSP(lists)) {
3522 for (; CONSP(CDR(lists)); lists = CDR(lists)) {
3527 for (tail = head; CONSP(CDR(tail)); tail = CDR(tail))
3603 if (!CONSP(list))
3608 return (CONSP(list) ? CAR(list) : NIL);
3631 if (!CONSP(list))
3687 for (; CONSP(args); args = CDR(args)) {
3710 if (CONSP(key) && CONSP(data)) {
3717 for (; CONSP(key) && CONSP(data); key = CDR(key), data = CDR(data)) {
3721 if (CONSP(key) || CONSP(data))
3802 if (!CONSP(sequence))
3950 for (arguments = CDR(arguments); CONSP(arguments);
3982 for (; CONSP(body); body = CDR(body))
4007 for (; CONSP(body); body = CDR(body))
4026 CONSP(body); body = CDR(body))
4077 for (count = 0, list = symbols; CONSP(list); count++, list = CDR(list)) {
4109 if (CONSP(values)) {
4131 for (; CONSP(body); body = CDR(body))
4534 if (!CONSP(sequence))
4644 if (CONSP(CDR(result))) {
4654 if (CONSP(CDR(cons)))
4690 if (count && !CONSP(sequence)) {
4920 if (!CONSP(sequence))
5033 if (!CONSP(sequence)) {
5265 for (list = CDR(list); CONSP(list); list = CDR(list)) {
5613 for (; CONSP(form); form = CDR(form)) {
5618 if (!CONSP(form))
5640 for (list = form; CONSP(list); list = CDR(list)) {
5644 if (!CONSP(list))
5651 for (; CONSP(form); form = CDDR(form)) {
5674 for (; CONSP(form); form = CDR(form)) {
5677 if (!CONSP(form))
5699 if (!CONSP(CDR(place)))
5716 if (CONSP(CDR(place)))
5738 if (!CONSP(CDR(place))) {
5743 else if (!CONSP(CDDR(place))) {
5753 for (place = CDR(place); CONSP(place); place = CDR(place)) {
5793 for (setf = form; CONSP(setf); setf = CDR(setf)) {
5797 if (!CONSP(setf))
5804 for (; CONSP(form); form = CDDR(form)) {
5819 if (!CONSP(CDR(place)))
5828 if (CONSP(CDR(place)))
5848 if (!CONSP(CDR(place))) {
5853 else if (!CONSP(CDDR(place))) {
5863 for (place = CDR(place); CONSP(place); place = CDR(place)) {
5940 if (!CONSP(list) || !CONSP(CDR(list)))
5946 if (!CONSP(list))
5949 if (!CONSP(list))
5985 if (!CONSP(list2)) {
6003 if (!CONSP(list1)) {
6074 for (; CONSP(work); ++string, work = CDR(work))
6312 for (labels = map = NIL, ptr = body; CONSP(ptr); ptr = CDR(ptr)) {
6319 for (list = labels; CONSP(list); list = CDDR(list)) {
6344 for (ptr = labels; CONSP(ptr); ptr = CDDR(ptr)) {
6346 for (map = CDDR(ptr); CONSP(map); map = CDDR(map)) {
6368 for (ptr = labels; CONSP(ptr); ptr = CDDR(ptr)) {
6374 if (!CONSP(ptr))
6381 for (; CONSP(body); body = CDR(body)) {
6384 if (CONSP(form))
6454 if (CONSP(left)) {
6455 for (; CONSP(left) && CONSP(right);
6461 if (CONSP(cmp_left)) {
6552 result = !CONSP(object) ? T : NIL;
6560 result = CONSP(object) ? T : NIL;
6578 else if (CONSP(type)) {
6630 for (; CONSP(body); body = CDR(body))
6654 for (prog = body; CONSP(prog); prog = CDR(prog))
6695 if (CONSP(*pcleanup))
6696 for (; CONSP(cleanup); cleanup = CDR(cleanup))
6727 for (i = 0, list = CDR(list); count && CONSP(list);
6788 for (; CONSP(body); body = CDR(body))
6811 for (prog = body; CONSP(prog); prog = CDR(prog))
6938 CONSP(list) && CONSP(CDR(list));
6973 CONSP(CDR(list));
6983 CONSP(CDR(list));
6988 for (accum = 1, object = CDR(object); CONSP(object);
Indexes created Fri Jul 03 00:25:33 UTC 2026