C++ (Cpp) _listp Examples

Example #1

File: loss.c Project: alecbrick/urbit

  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);
    }
  }

Example #2

File: pairlist.c Project: live4thee/llscheme

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;
}