urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2024-12-22 10:21:31 +03:00
Code Issues Packages Projects Releases Wiki Activity

replaces calls to u3qc_hor with u3qc_gor

Browse Source
This commit is contained in:
Joe Bryan 2019-01-08 20:13:27 -05:00
parent 421781652d
commit 8fe90875cd
8 changed files with 8 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
include/jets/q.h
View File

@ -54,7 +54,6 @@
u3_noun u3qc_dvr(u3_atom, u3_atom);
u3_noun u3qc_end(u3_atom, u3_atom, u3_atom);
u3_noun u3qc_gor(u3_atom, u3_atom);
# define u3qc_hor u3qc_gor
u3_noun u3qc_lsh(u3_atom, u3_atom, u3_atom);
u3_noun u3qc_mas(u3_atom);
u3_noun u3qc_met(u3_atom, u3_atom);

2
jets/d/in_bif.c
View File

@ -25,7 +25,7 @@
u3_noun c, n_c, l_c, r_c;
u3_noun d;
if ( c3y == u3qc_hor(b, n_a) ) {
if ( c3y == u3qc_gor(b, n_a) ) {
c = _i_bif_putroot(l_a, b);
u3r_trel(c, &n_c, &l_c, &r_c);
d = u3nt(u3k(n_c),

2
jets/d/in_del.c
View File

@ -72,7 +72,7 @@
return u3m_bail(c3__exit);
}
else if ( c3n == u3r_sing(n_a, b) ) {
if ( c3y == u3qc_hor(b, n_a) ) {
if ( c3y == u3qc_gor(b, n_a) ) {
return u3nt(u3k(n_a),
u3qdi_del(l_a, b),
u3k(r_a));

2
jets/d/in_has.c
View File

@ -24,7 +24,7 @@
return c3y;
}
else {
if ( c3y == u3qc_hor(b, n_a) ) {
if ( c3y == u3qc_gor(b, n_a) ) {
return u3qdi_has(l_a, b);
}
else return u3qdi_has(r_a, b);

2
jets/d/in_int.c
View File

@ -44,7 +44,7 @@
u3qdi_int(l_a, l_b),
u3qdi_int(r_a, r_b));
}
else if ( c3y == u3qc_hor(n_b, n_a) ) {
else if ( c3y == u3qc_gor(n_b, n_a) ) {
return u3qdi_uni(u3qdi_int(l_a,
u3nt(n_b,
l_b,

2
jets/d/in_mer.c
View File

@ -44,7 +44,7 @@
u3qdi_mer(l_a, l_b),
u3qdi_mer(r_a, r_b));
}
else if ( c3y == u3qc_hor(n_b, n_a) ) {
else if ( c3y == u3qc_gor(n_b, n_a) ) {
return u3qdi_mer(u3nt(n_a,
u3qdi_mer(l_a,
u3nt(n_b,

2
jets/d/in_put.c
View File

@ -27,7 +27,7 @@
return u3m_bail(c3__exit);
}
else {
if ( c3y == u3qc_hor(b, n_a) ) {
if ( c3y == u3qc_gor(b, n_a) ) {
c = u3qdi_put(l_a, b);
if ( c3y == u3qc_vor(n_a, u3h(c)) ) {

4
jets/d/in_uni.c
View File

@ -27,7 +27,7 @@ _in_uni(u3_noun a, u3_noun b)
if ( c3y == u3r_sing(n_a, n_b) ) {
return u3nt(u3k(n_b), _in_uni(l_a, l_b), _in_uni(r_a, r_b));
}
else if ( c3y == u3qc_hor(n_a, n_b) ) {
else if ( c3y == u3qc_gor(n_a, n_b) ) {
naw = u3nt(u3k(n_a), u3k(l_a), u3_nul);
sub = _in_uni(naw, l_b);
neb = u3nt(u3k(n_b), sub, u3k(r_b));
@ -47,7 +47,7 @@ _in_uni(u3_noun a, u3_noun b)
else if ( c3y == u3r_sing(n_b, n_a) ) {
return u3nt(u3k(n_b), _in_uni(l_a, l_b), _in_uni(r_a, r_b));
}
else if ( c3y == u3qc_hor(n_b, n_a) ) {
else if ( c3y == u3qc_gor(n_b, n_a) ) {
neb = u3nt(u3k(n_b), u3k(l_b), u3_nul);
sub = _in_uni(l_a, neb);
naw = u3nt(u3k(n_a), sub, u3k(r_a));