Improvements to ap.c

This commit is contained in:
Luke Patmore 2014-06-13 13:52:13 -07:00
parent 4cf4ca57d9
commit 147a423a3f
2 changed files with 43 additions and 2 deletions

View File

@ -210,6 +210,27 @@
u2_rz(wir_r, tul);
return ret;
}
_open_do_pqr(wtpt) // ?@
{
return u2_bq(wir_r, c3__wtcl,
u2_bt(wir_r, c3__wtts,
u2_bt(wir_r, c3__axil,
c3__atom,
u2_blip),
u2_rx(wir_r, p_gen)),
u2_rx(wir_r, q_gen),
u2_rx(wir_r, r_gen));
}
_open_do_pqr(wtsg) // ?~
{
return u2_bq(wir_r, c3__wtcl,
u2_bt(wir_r, c3__wtts,
u2_bc(wir_r, c3__axil, c3__null),
u2_rx(wir_r, p_gen)),
u2_rx(wir_r, q_gen),
u2_rx(wir_r, r_gen));
}
_open_do_p(wtzp) // ?!
{
@ -545,6 +566,18 @@
u2_bq(wir_r, c3__memo, c3__dtzz, u2_blip, u2_rx(wir_r, p_gen)),
u2_rx(wir_r, q_gen));
}
_open_do_pqrs(sgwt) // ~?
{
return u2_bq(wir_r, c3__tsgl,
u2_rx(wir_r, s_gen),
c3__wtdt,
u2_bq(wir_r, u2_rx(wir_r, q_gen),
u2_bc(wir_r, u2_nul, _1),
c3__sgpm,
u2_bt(wir_r, u2_rx(wir_r, p_gen),
u2_rx(wir_r, r_gen),
u2_bc(wir_r, u2_nul, _1))));
}
/***
****
***/
@ -645,7 +678,8 @@
_open_p (bczp);
_open_p (brhp);
/* _open_p (brhp); */ //buggered
_open_p (brdt);
_open_pq (brcb);
_open_pq (brkt);
@ -682,6 +716,7 @@
_open_pqrs(sgcn);
_open_pq (sgfs);
_open_pq (sgls);
_open_pqrs(sgwt);
_open_pq (smcl);
@ -691,9 +726,13 @@
_open_pqr (wtdt);
_open_pq (wtgl);
_open_pqr (wtpt);
_open_pqr (wtsg);
_open_p (wtzp);
_open_p (wtbr);
_open_pq (wthp);
/* _open_pq (wthp); */ //buggered
_open_pq (wtgr);
_open_pqr (wtls);
_open_pqr (wtkt);

View File

@ -903,6 +903,7 @@
# define c3__sgsg c3_s4('s','g','s','g')
# define c3__sgsp c3_s4('s','g','s','p')
# define c3__sgts c3_s4('s','g','t','s')
# define c3__sgwt c3_s4('s','g','w','t')
# define c3__sgzp c3_s4('s','g','z','p')
# define c3__show c3_s4('s','h','o','w')
# define c3__shud c3_s4('s','h','u','d')
@ -1123,6 +1124,7 @@
# define c3__wtls c3_s4('w','t','l','s')
# define c3__wtms c3_s4('w','t','m','s')
# define c3__wtpm c3_s4('w','t','p','m')
# define c3__wtpt c3_s4('w','t','p','t')
# define c3__wtsg c3_s4('w','t','s','g')
# define c3__wtts c3_s4('w','t','t','s')
# define c3__wtzp c3_s4('w','t','z','p')