Ejemplo n.º 1
0
    extern u2_ho_jet j2_mbj(Pt6, ut)[];
    extern u2_ho_driver j2_mbd(Pt6, ut)[];

/* structures
*/
  static u2_ho_driver
    _watt_drivers_0[],
    _watt_drivers_1[],
    _watt_drivers_2[];

  u2_ho_driver
  j2_da(Pt0) = { j2_sa(Pt0), 0, _watt_drivers_0, 0, u2_none };

  static u2_ho_driver
  _watt_drivers_0[] = {
    { j2_sb(Pt0, mood), 0, _watt_drivers_1, 0, u2_none },
    { }
  };

  static u2_ho_driver
  _watt_drivers_1[] = {
    { j2_sb(PtM, tape), j2_mbj(PtM, tape), 0, 0, u2_none },
    { j2_sb(PtM, hoon), 0, _watt_drivers_2, 0, u2_none },
    { }
  };

  static u2_ho_driver
  _watt_drivers_2[] = {
    { j2_sb(Pt1, add), j2_mbj(Pt1, add), 0, 0, u2_none },
    { j2_sb(Pt1, dec), j2_mbj(Pt1, dec), 0, 0, u2_none },
    { j2_sb(Pt1, div), j2_mbj(Pt1, div), 0, 0, u2_none },
      return u2_bl_bail(wir_r, c3__exit);
    }
    else {
      return j2_mcd(Pt5, aesc, de)(wir_r, a, b);
    }
  }

/* structures
*/
  u2_ho_jet
  j2_mcj(Pt5, aesc, en)[] = {
    { ".2", c3__lite, j2_mc(Pt5, aesc, en), Tier5, u2_none, u2_none },
    { }
  };
  u2_ho_jet
  j2_mcj(Pt5, aesc, de)[] = {
    { ".2", c3__lite, j2_mc(Pt5, aesc, de), Tier5, u2_none, u2_none },
    { }
  };

  u2_ho_driver
  j2_mbd(Pt5, aesc)[] = {
    { j2_sc(Pt5, aesc, en), j2_mcj(Pt5, aesc, en), 0, 0, u2_none },
    { j2_sc(Pt5, aesc, de), j2_mcj(Pt5, aesc, de), 0, 0, u2_none },
    { }
  };

  u2_ho_driver
  j2_db(Pt5, aesc) =
    { j2_sb(Pt5, aesc), 0, j2_mbd(Pt5, aesc), 0, u2_none };
Ejemplo n.º 3
0
    { ".3", c3__hevy, j2_mc(Pt5, stir, fun), Tier5_b, u2_none, u2_none },
    { }
  };

/* structures
*/
  /* bend
  */
    u2_ho_driver 
    j2_mbd(Pt5, bend)[] = {
      { j2_sc(Pt5, bend, fun), j2_mcj(Pt5, bend, fun), 0, 0, u2_none },
      { }
    };

    u2_ho_driver
    j2_db(Pt5, bend) = { j2_sb(Pt5, bend), 0, j2_mbd(Pt5, bend), 0, u2_none };

  /* cold
  */
    u2_ho_driver 
    j2_mbd(Pt5, cold)[] = {
      { j2_sc(Pt5, cold, fun), j2_mcj(Pt5, cold, fun), 0, 0, u2_none },
      { }
    };

    u2_ho_driver
    j2_db(Pt5, cold) = { j2_sb(Pt5, cold), 0, j2_mbd(Pt5, cold), 0, u2_none };

  /* comp
  */
    u2_ho_driver 
Ejemplo n.º 4
0
Archivo: ut.c Proyecto: 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 };
Ejemplo n.º 5
0
/* structures
*/
  u2_ho_jet 
  j2_mbj(Pt5, shax)[] = { 
    { ".2", c3__lite, j2_mb(Pt5, shax), Tier5, u2_none, u2_none },
    { }
  };
  u2_ho_jet 
  j2_mbj(Pt5, shas)[] = { 
    { ".2", c3__lite, j2_mb(Pt5, shas), Tier5, u2_none, u2_none },
    { }
  };

  u2_ho_jet 
  j2_mcj(Pt5, og, raw)[] = {
    { ".2", c3__lite, j2_mc(Pt5, og, raw), Tier5, u2_none, u2_none },
    { }
  };

  u2_ho_driver 
  j2_mbd(Pt5, og)[] = {
    { j2_sc(Pt5, og, raw), j2_mcj(Pt5, og, raw), 0, 0, u2_none },
    {}
  };

  u2_ho_driver
  j2_db(Pt5, og) = 
    { j2_sb(Pt5, og), 0, j2_mbd(Pt5, og), 0, u2_none };

Ejemplo n.º 6
0
Archivo: in.c Proyecto: Gruelty/urbit
*/
#include "all.h"
#include "../pit.h"

/* declarations
*/
  extern u2_ho_jet j2_mcj(Pt4, in, gas)[];
  extern u2_ho_jet j2_mcj(Pt4, in, has)[];
  extern u2_ho_jet j2_mcj(Pt4, in, put)[];
  extern u2_ho_jet j2_mcj(Pt4, in, tap)[];

/* structures
*/
  u2_ho_driver 
  j2_mbd(Pt4, in)[] = {
    { j2_sc(Pt4, in, gas), j2_mcj(Pt4, in, gas), 0, 0, u2_none },
    { j2_sc(Pt4, in, has), j2_mcj(Pt4, in, has), 0, 0, u2_none },
    { j2_sc(Pt4, in, put), j2_mcj(Pt4, in, put), 0, 0, u2_none },
    { j2_sc(Pt4, in, tap), j2_mcj(Pt4, in, tap), 0, 0, u2_none },
    {}
  };

  u2_ho_jet 
  j2_mbj(Pt4, in)[] = {
    { }
  };

  u2_ho_driver
  j2_db(Pt4, in) = 
    { j2_sb(Pt4, in), j2_mbj(Pt4, in), j2_mbd(Pt4, in), 0, u2_none };