u3_noun u3we_loss(u3_noun cor) { u3_noun hel, hev; if ( (u3_none == (hel = u3r_at(u3x_sam_2, cor))) || (u3_none == (hev = u3r_at(u3x_sam_3, cor))) || (c3n == _listp(hel)) || (c3n == _listp(hev)) ) { return u3m_bail(c3__fail); } else { return u3qe_loss(hel, hev); } }
struct ls_object *lsrt_builtin_listp(int argc, struct ls_object *args[], struct ls_object *freelist[]) { UNUSED_ARGUMENT(freelist); lsrt_check_args_count(1, 1, argc); return _listp(args[0]) ? &global_true_obj : &global_false_obj; }