示例#1
0
文件: ut_seek.c 项目: ngvrnd/urbit
                        u2_noun cor)
  {
    u2_noun sut, way, hyp, van;

    if ( (u2_no == u2_mean(cor, u2_cv_sam_2, &way, 
                                u2_cv_sam_3, &hyp, 
                                u2_cv_con, &van, 
                                0)) ||
         (u2_none == (sut = u2_frag(u2_cv_sam, van))) )
    {
      return u2_none;
    } else {
      return u2_rt
        (wir_r, u2_rx(wir_r, sut), u2_rx(wir_r, way), u2_rx(wir_r, hyp));
    }
  }

/* structures
*/
  u2_ho_jet 
  j2_mcj(Pt6, ut, seek)[] = {
    { ".2", c3__hevy, 
        j2_mc(Pt6, ut, seek), 
        Tier6_b_memo,
        u2_none, u2_none,
        j2_mck(Pt6, ut, seek), c3__seek
    },
    { }
  };

示例#2
0
文件: ut_mint.c 项目: mnemnion/urbit
    if ( (u2_no == u2_mean(cor, u2_cw_con, &van, 
                                u2_cw_sam_2, &gol, 
                                u2_cw_sam_3, &gen,
                                0)) ||
         (u2_none == (sut = u2_frag(u2_cw_sam, van))) )
    {
      return u2_bl_bail(wir_r, c3__fail);
    } else {
      u2_noun vrf = u2_frag(j2_ut_van_vrf, van);

      return u2_rq(wir_r, u2_rx(wir_r, vrf),
                          u2_rx(wir_r, sut),
                          u2_rx(wir_r, gol),
                          u2_rx(wir_r, gen));
    }
  }

/* structures
*/
  u2_ho_jet 
  j2_mcj(Pt6, ut, mint)[] = {
    { ".3", c3__hevy, 
        j2_mc(Pt6, ut, mint), 
        Tier6_b_memo,
        u2_none, u2_none,
        j2_mck(Pt6, ut, mint), c3__mint,
    },
    { }
  };
示例#3
0
文件: ut_nest.c 项目: mnemnion/urbit
    }
  }

  u2_weak
  j2_mck(Pt6, ut, nest)(u2_wire wir_r,
                        u2_noun cor)
  {
    u2_noun sut, ref, van;

    if ( (u2_no == u2_mean(cor, u2_cw_con, &van, u2_cw_sam, &ref, 0)) ||
         (u2_none == (sut = u2_frag(u2_cw_sam, van))) )
    {
      return u2_none;
    } else {
      return u2_rc(wir_r, u2_rx(wir_r, sut), u2_rx(wir_r, ref));
    }
  }

/* structures
*/
  u2_ho_jet 
  j2_mcj(Pt6, ut, nest)[] = {
    { ".3", c3__hevy, 
        j2_mc(Pt6, ut, nest), 
        Tier6_b_memo,
        u2_none, u2_none,
        j2_mck(Pt6, ut, nest)
    },
    { }
  };
示例#4
0
文件: ut.c 项目: the0ther/urbit
    { j2_sc(Pt6, ut, play), j2_mcj(Pt6, ut, play), 0, 0, u2_none },
    { j2_sc(Pt6, ut, rest), j2_mcj(Pt6, ut, rest), 0, 0, u2_none },
    { j2_sc(Pt6, ut, seek), j2_mcj(Pt6, ut, seek), 0, 0, u2_none },
    { j2_sc(Pt6, ut, snap), j2_mcj(Pt6, ut, snap), 0, 0, u2_none },
    { j2_sc(Pt6, ut, swab), j2_mcj(Pt6, ut, swab), 0, 0, u2_none },
    { j2_sc(Pt6, ut, tack), j2_mcj(Pt6, ut, tack), 0, 0, u2_none },
    { j2_sc(Pt6, ut, tock), j2_mcj(Pt6, ut, tock), 0, 0, u2_none },
    { }
  };

  u2_ho_jet 
  j2_mbj(Pt6, ut)[] = {
    { "burn", 
      c3__hevy, 
      j2_mc(Pt6, ut, burn), 
      Tier6_b,
      u2_none, u2_none },
    { "moot", 
      c3__hevy, 
      j2_mc(Pt6, ut, moot), 
      Tier6_b_memo,
      u2_none, u2_none,
      j2_mck(Pt6, ut, moot), c3__moot },
    { "repo", c3__hevy, j2_mc(Pt6, ut, repo), Tier6_b, u2_none, u2_none },
    { }
  };

  u2_ho_driver
  j2_db(Pt6, ut) = 
    { j2_sb(Pt6, ut), j2_mbj(Pt6, ut), j2_mbd(Pt6, ut), 0, u2_none };
示例#5
0
文件: ut_find.c 项目: mnemnion/urbit
  j2_mck(Pt6, ut, find)(u2_wire wir_r,
                        u2_noun cor)
  {
    u2_noun sut, way, cog, van;

    if ( (u2_no == u2_mean(cor, u2_cw_con, &van, 
                                u2_cw_sam_2, &way, 
                                u2_cw_sam_3, &cog, 
                                0)) ||
         (u2_none == (sut = u2_frag(u2_cw_sam, van))) )
    {
      return u2_none;
    } else {
      return u2_rt
        (wir_r, u2_rx(wir_r, sut), u2_rx(wir_r, way), u2_rx(wir_r, cog));
    }
  }

/* structures
*/
  u2_ho_jet 
  j2_mcj(Pt6, ut, find)[] = {
    { ".3", c3__hevy, 
        j2_mc(Pt6, ut, find), 
        Tier6_b_memo,
        u2_none, u2_none,
        j2_mck(Pt6, ut, find)
    },
    { }
  };
示例#6
0
文件: ut_peek.c 项目: MacTop/urbit
  j2_mck(Pt6, ut, peek)(u2_wire wir_r,
                        u2_noun cor)
  {
    u2_noun sut, way, axe, van;

    if ( (u2_no == u2_mean(cor, u2_cv_sam_2, &way, 
                                u2_cv_sam_3, &axe,
                                u2_cv_con, &van, 
                                0)) ||
         (u2_none == (sut = u2_frag(u2_cv_sam, van))) )
    {
      return u2_none;
    } else {
      return u2_rt
        (wir_r, u2_rx(wir_r, sut), u2_rx(wir_r, way), u2_rx(wir_r, axe));
    }
  }

/* structures
*/
  u2_ho_jet 
  j2_mcj(Pt6, ut, peek)[] = {
    { ".2", c3__hevy, 
        j2_mc(Pt6, ut, peek), 
        Tier6_b_memo,
        u2_none, u2_none,
        j2_mck(Pt6, ut, peek), c3__peek
    },
    { }
  };
示例#7
0
    }
}

u2_weak
j2_mck(Pt6, ut, rest)(u2_wire wir_r,
                      u2_noun cor)
{
    u2_noun sut, leg, van;

    if ( (u2_no == u2_mean(cor, u2_cv_sam, &leg, u2_cv_con, &van, 0)) ||
            (u2_none == (sut = u2_frag(u2_cv_sam, van))) )
    {
        return u2_none;
    } else {
        return u2_rc(wir_r, u2_rx(wir_r, sut), u2_rx(wir_r, leg));
    }
}

/* structures
*/
u2_ho_jet
j2_mcj(Pt6, ut, rest)[] = {
    {   ".2", c3__hevy,
        j2_mc(Pt6, ut, rest),
        Tier6_b_memo,
        u2_none, u2_none,
        j2_mck(Pt6, ut, rest), c3__rest,
    },
    { }
};
示例#8
0
文件: ut_nest.c 项目: mnemnion/urbit
    }
  }

  u2_weak
  j2_mck(Pt6, ut, nest)(u2_wire wir_r,
                        u2_noun cor)
  {
    u2_noun sut, ref, van;

    if ( (u2_no == u2_mean(cor, u2_cw_con, &van, u2_cw_sam_3, &ref, 0)) ||
         (u2_none == (sut = u2_frag(u2_cw_sam, van))) )
    {
      return u2_none;
    } else {
      return u2_rc(wir_r, u2_rx(wir_r, sut), u2_rx(wir_r, ref));
    }
  }

/* structures
*/
  u2_ho_jet 
  j2_mcj(Pt6, ut, nest)[] = {
    { ".3", c3__hevy, 
        j2_mc(Pt6, ut, nest), 
        Tier6_b_memo,
        u2_none, u2_none,
        j2_mck(Pt6, ut, nest), c3__nest,
    },
    { }
  };
示例#9
0
文件: ut_fuse.c 项目: mnemnion/urbit
    }
  }

  u2_weak
  j2_mck(Pt6, ut, fuse)(u2_wire wir_r,
                        u2_noun cor)
  {
    u2_noun sut, ref, van;

    if ( (u2_no == u2_mean(cor, u2_cw_con, &van, u2_cw_sam, &ref, 0)) ||
         (u2_none == (sut = u2_frag(u2_cw_sam, van))) )
    {
      return u2_none;
    } else {
      return u2_rc(wir_r, u2_rx(wir_r, sut), u2_rx(wir_r, ref));
    }
  }

/* structures
*/
  u2_ho_jet 
  j2_mcj(Pt6, ut, fuse)[] = {
    { ".3", c3__hevy, 
        j2_mc(Pt6, ut, fuse), 
        Tier6_b_memo,
        u2_none, u2_none,
        j2_mck(Pt6, ut, fuse)
    },
    { }
  };
示例#10
0
文件: ut_find.c 项目: mnemnion/urbit
  j2_mck(Pt6, ut, find)(u2_wire wir_r,
                        u2_noun cor)
  {
    u2_noun sut, way, cog, van;

    if ( (u2_no == u2_mean(cor, u2_cw_con, &van, 
                                u2_cw_sam_2, &way, 
                                u2_cw_sam_3, &cog, 
                                0)) ||
         (u2_none == (sut = u2_frag(u2_cw_sam, van))) )
    {
      return u2_none;
    } else {
      return u2_rt
        (wir_r, u2_rx(wir_r, sut), u2_rx(wir_r, way), u2_rx(wir_r, cog));
    }
  }

/* structures
*/
  u2_ho_jet 
  j2_mcj(Pt6, ut, find)[] = {
    { ".3", c3__hevy, 
        j2_mc(Pt6, ut, find), 
        Tier6_b_memo,
        u2_none, u2_none,
        j2_mck(Pt6, ut, find), c3__find,
    },
    { }
  };
示例#11
0
文件: ut_mull.c 项目: mnemnion/urbit
  {
    u2_noun sut, gol, dox, gen, van;

    if ( (u2_no == u2_mean(cor, u2_cw_con, &van, 
                                u2_cw_sam_2, &gol, 
                                u2_cw_sam_6, &dox,
                                u2_cw_sam_7, &gen,
                                0)) ||
         (u2_none == (sut = u2_frag(u2_cw_sam, van))) )
    {
      return u2_none;
    } else {
      return u2_rq
        (wir_r, u2_rx(wir_r, sut), 
                u2_rx(wir_r, gol), 
                u2_rx(wir_r, dox), 
                u2_rx(wir_r, gen));
    }
  }

  u2_ho_jet 
  j2_mcj(Pt6, ut, mull)[] = {
    { ".3", c3__hevy, 
        j2_mc(Pt6, ut, mull), 
        Tier6_b,
        u2_none, u2_none,
        j2_mck(Pt6, ut, mull), c3__mull,
    },
    { }
  };
示例#12
0
文件: ut_cull.c 项目: mnemnion/urbit
  {
    u2_noun sut, pol, axe, ref, van;

    if ( (u2_no == u2_mean(cor, u2_cw_con, &van, 
                                u2_cw_sam_2, &pol,
                                u2_cw_sam_6, &axe, 
                                u2_cw_sam_7, &ref,
                                0)) ||
         (pol > 1) ||
         (u2_none == (sut = u2_frag(u2_cw_sam, van))) )
    {
      return u2_none;
    } else {
      return u2_rq
        (wir_r, u2_rx(wir_r, sut), pol, u2_rx(wir_r, axe), u2_rx(wir_r, ref));
    }
  }

/* structures
*/
  u2_ho_jet 
  j2_mcj(Pt6, ut, cull)[] = {
    { ".3", c3__hevy, 
        j2_mc(Pt6, ut, cull), 
        Tier6_b_memo,
        u2_none, u2_none,
        j2_mck(Pt6, ut, cull)
    },
    { }
  };
示例#13
0
文件: ut_heal.c 项目: Gruelty/urbit
    if ( (u2_no == u2_mean(cor, u2_cv_sam_2, &qog, 
                                u2_cv_sam_6, &axe,
                                u2_cv_sam_7, &ref,
                                u2_cv_con, &van, 
                                0)) ||
         (u2_none == (sut = u2_frag(u2_cv_sam, van))) )
    {
      return u2_none;
    } else {
      return u2_rq
        (wir_r, u2_rx(wir_r, qog),
                u2_rx(wir_r, sut), 
                u2_rx(wir_r, axe), 
                u2_rx(wir_r, ref));
    }
  }

/* structures
*/
  u2_ho_jet 
  j2_mcj(Pt6, ut, heal)[] = {
    { ".2", c3__hevy, 
        j2_mc(Pt6, ut, heal), 
        Tier6_b,
        u2_none, u2_none,
        j2_mck(Pt6, ut, heal), c3__heal,
    },
    { }
  };
示例#14
0
文件: ut_fink.c 项目: cgyarvin/urbit
    if ( (u2_no == u2_mean(cor, u2_cv_sam_2, &dep, 
                                u2_cv_sam_6, &way, 
                                u2_cv_sam_7, &cog, 
                                u2_cv_con, &van, 
                                0)) ||
         (u2_none == (sut = u2_frag(u2_cv_sam, van))) )
    {
      return u2_none;
    } else {
      return u2_rq
        (wir_r, u2_rx(wir_r, sut), 
                u2_rx(wir_r, dep), 
                u2_rx(wir_r, way), 
                u2_rx(wir_r, cog));
    }
  }

/* structures
*/
  u2_ho_jet 
  j2_mcj(Pt6, ut, fink)[] = {
    { ".2", c3__hevy, 
        j2_mc(Pt6, ut, fink), 
        Tier6_b,
        u2_none, u2_none,
        j2_mck(Pt6, ut, fink), c3__fink,
    },
    { }
  };
示例#15
0
文件: ut_firm.c 项目: mnemnion/urbit
    }
  }

  u2_weak
  j2_mck(Pt6, ut, firm)(u2_wire wir_r,
                        u2_noun cor)
  {
    u2_noun sut, dib, van;

    if ( (u2_no == u2_mean(cor, u2_cw_con, &van, u2_cw_sam, &dib, 0)) ||
         (u2_none == (sut = u2_frag(u2_cw_sam, van))) )
    {
      return u2_none;
    } else {
      return u2_rc(wir_r, u2_rx(wir_r, sut), u2_rx(wir_r, dib));
    }
  }

/* structures
*/
  u2_ho_jet 
  j2_mcj(Pt6, ut, firm)[] = {
    { ".3", c3__hevy, 
        j2_mc(Pt6, ut, firm), 
        Tier6_b,
        u2_none, u2_none,
        j2_mck(Pt6, ut, firm)
    },
    { }
  };
示例#16
0
文件: ut_bust.c 项目: Gruelty/urbit
    }
  }

  u2_weak
  j2_mck(Pt6, ut, bust)(u2_wire wir_r,
                        u2_noun cor)
  {
    u2_noun sut, dib, van;

    if ( (u2_no == u2_mean(cor, u2_cv_sam, &dib, u2_cv_con, &van, 0)) ||
         (u2_none == (sut = u2_frag(u2_cv_sam, van))) )
    {
      return u2_none;
    } else {
      return u2_rc(wir_r, u2_rx(wir_r, sut), u2_rx(wir_r, dib));
    }
  }

/* structures
*/
  u2_ho_jet 
  j2_mcj(Pt6, ut, bust)[] = {
    { ".2", c3__hevy, 
        j2_mc(Pt6, ut, bust), 
        Tier6_b,
        u2_none, u2_none,
        j2_mck(Pt6, ut, bust), c3__bust,
    },
    { }
  };
示例#17
0
文件: ut_cull.c 项目: Gruelty/urbit
  {
    u2_noun sut, pol, axe, ref, van;

    if ( (u2_no == u2_mean(cor, u2_cv_sam_2, &pol,
                                u2_cv_sam_6, &axe, 
                                u2_cv_sam_7, &ref,
                                u2_cv_con, &van, 
                                0)) ||
         (pol > 1) ||
         (u2_none == (sut = u2_frag(u2_cv_sam, van))) )
    {
      return u2_none;
    } else {
      return u2_rq
        (wir_r, u2_rx(wir_r, sut), pol, u2_rx(wir_r, axe), u2_rx(wir_r, ref));
    }
  }

/* structures
*/
  u2_ho_jet 
  j2_mcj(Pt6, ut, cull)[] = {
    { ".2", c3__hevy, 
        j2_mc(Pt6, ut, cull), 
        Tier6_b_memo,
        u2_none, u2_none,
        j2_mck(Pt6, ut, cull), c3__cull,
    },
    { }
  };