(no subject)

Jan 12, 2016 03:21

Развёрнутый сишный макрос для псевдо-лисп выражения CADDR(proto):

(((((((((proto == (uclptr_t)~0))?(uclptr_t)~0:m->uclmem[proto].container.cdr) == (uclptr_t)~0))?(uclptr_t)~0:m->uclmem[(((proto == (uclptr_t)~0))?(uclptr_t)~0:m->uclmem[proto].container.cdr)].container.cdr) == (uclptr_t)~0))?(uclptr_t)~0:m->uclmem[((((((proto == (uclptr_t)~0))?(uclptr_t)~0:m->uclmem[proto].container.cdr) == (uclptr_t)~0))?(uclptr_t)~0:m->uclmem[(((proto == (uclptr_t)~0))?(uclptr_t)~0:m->uclmem[proto].container.cdr)].container.cdr)].container.car)

:)

uncommon lisp

Previous post Next post
Up