예제 #1
0
파일: ut_play.c 프로젝트: Gunga/urbit
  static u3_noun
  _play_edit(u3_noun van,
             u3_noun sut,
             u3_noun mew,
             u3_noun rag)
  {
    while ( 1 ) {
      if ( c3n == u3du(mew) ) {
        return rag;
      } else {
        u3_noun i_mew = u3h(mew);
        u3_noun t_mew = u3t(mew);
        u3_noun pi_mew = u3h(i_mew);
        u3_noun qi_mew = u3t(i_mew);
        u3_noun laf = _play_in(van, sut, qi_mew);
        u3_noun ruz = u3qfu_tock(van, sut, pi_mew, laf, rag);

        u3z(laf);
        u3z(rag);
        rag = u3k(u3t(ruz));
        u3z(ruz);

        mew = t_mew;
      }
    }
  }
예제 #2
0
파일: ut_mint.c 프로젝트: agentultra/urbit
  static u3_noun
  _mint_edit(
             u3_noun van,
             u3_noun sut,
             u3_noun mew,
             u3_noun p_lar,
             u3_noun rag,
             u3_noun hej)
  {
    while ( 1 ) {
      if ( c3n == u3du(mew) ) {
        u3_noun gim = u3qfu_fire(van, sut, rag);
        u3_noun fol = u3qf_hike(p_lar, hej);

        u3z(rag);
        u3z(hej);

        return u3nc(gim, fol);
      } else {
        u3_noun i_mew = u3h(mew);
        u3_noun t_mew = u3t(mew);
        u3_noun pi_mew = u3h(i_mew);
        u3_noun qi_mew = u3t(i_mew);
        u3_noun zil = u3qfu_mint(van, sut, c3__noun, qi_mew);
        u3_noun p_zil = u3h(zil);
        u3_noun q_zil = u3t(zil);
        u3_noun wip = u3qfu_tock
          (van, sut, pi_mew, p_zil, rag);

        u3z(rag);
        rag = u3k(u3t(wip));

        hej = u3nc(u3nc(u3k(u3h(wip)),
                                        u3k(q_zil)),
                           hej);

        u3z(zil);
        u3z(wip);

        mew = t_mew;
      }
    }
  }