Example #1
0
  u3_noun
  u3qfu_peek(u3_noun van,
             u3_noun sut,
             u3_noun way,
             u3_noun axe)
  {
    c3_m    fun_m = c3__peek;
    u3_noun pro   = u3z_find_3(fun_m, sut, way, axe);

    if ( u3_none != pro ) {
      return pro;
    }
    else {
      pro = _cqfu_peek(van, sut, way, axe);

      return u3z_save_3(fun_m, sut, way, axe, pro);
    }
  }
Example #2
0
File: ut_play.c Project: bd/urbit
  u3_noun
  u3qfu_play(u3_noun van,
             u3_noun sut,
             u3_noun gen)
  {
#if 1
    c3_m    fun_m = 144 + c3__play;
    u3_noun vrf   = u3r_at(u3qfu_van_vrf, van);
    u3_noun pro   = u3z_find_3(fun_m, vrf, sut, gen);

    if ( u3_none != pro ) {
      return pro;
    }
    else {
      pro = _cqfu_play(van, sut, gen);

      return u3z_save_3(fun_m, vrf, sut, gen, pro);
    }
#else
    return _cqfu_play(van, sut, gen);
#endif
  }