urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2024-12-14 20:02:51 +03:00
Code Issues Packages Projects Releases Wiki Activity

Fixed wthp ap.c macro expansion

Browse Source
This commit is contained in:
Luke Patmore 2014-06-16 12:19:33 -07:00
parent 422f267cc8
commit 246dbbd2c7
1 changed files with 5 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
gen164/6/ap.c
View File

@ -183,11 +183,12 @@
u2_rx(wir_r, q_gen),
u2_bc(wir_r, c3__zpzp, u2_nul));
}
#if 0
_open_do_pq(wthp) // ?-
_open_do_pq(wthp) // ?-
{
if ( (u2_nul == q_gen) ) {
return u2_bc(wir_r, c3__zpfs, u2_rx(wir_r, p_gen));
return u2_bc(wir_r, c3__zpfs,
u2_bc(wir_r, c3__cnzz,
u2_rx(wir_r, p_gen)));
}
else {
u2_noun iq_gen = u2_h(q_gen);
@ -205,7 +206,6 @@
_open_in_wthp(wir_r, p_gen, tq_gen));
}
}
#endif
_open_do_p(wtpm) // ?&
{
if ( (u2_nul == p_gen) ) {
@ -753,9 +753,7 @@
_open_pqr (wtsg);
_open_p (wtzp);
_open_p (wtbr);
/* _open_pq (wthp); */ //buggered
_open_pq (wthp);
_open_pq (wtgr);
_open_pqr (wtls);
_open_pqr (wtkt);