urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2024-11-24 13:06:09 +03:00
Code Issues Packages Projects Releases Wiki Activity

u3: adds +new-end, +new-lsh, and +new-rsh jet interfaces

Browse Source
This commit is contained in:
Joe Bryan 2020-12-01 23:08:31 -08:00
parent bec63413b0
commit f4442668c8
5 changed files with 51 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
pkg/urbit/include/jets/w.h
View File

@ -55,8 +55,10 @@
u3_noun u3wc_dor(u3_noun);
u3_noun u3wc_dvr(u3_noun);
u3_noun u3wc_end(u3_noun);
u3_noun u3wc_new_end(u3_noun);
u3_noun u3wc_gor(u3_noun);
u3_noun u3wc_lsh(u3_noun);
u3_noun u3wc_new_lsh(u3_noun);
u3_noun u3wc_mas(u3_noun);
u3_noun u3wc_met(u3_noun);
u3_noun u3wc_mix(u3_noun);
@ -70,6 +72,7 @@
u3_noun u3wc_rev(u3_noun);
u3_noun u3wc_rip(u3_noun);
u3_noun u3wc_rsh(u3_noun);
u3_noun u3wc_new_rsh(u3_noun);
u3_noun u3wc_swp(u3_noun);
u3_noun u3wc_sqt(u3_noun);

11
pkg/urbit/jets/c/end.c
View File

@ -56,3 +56,14 @@
}
}
u3_noun
u3wc_new_end(u3_noun cor)
{
u3_atom bloq, step;
u3_noun a, b;
u3x_mean(cor, u3x_sam_2, &a,
u3x_sam_3, &b, 0);
u3x_bite(a, &bloq, &step);
return u3qc_end(bloq, step, u3x_atom(b));
}

11
pkg/urbit/jets/c/lsh.c
View File

@ -66,3 +66,14 @@
return d;
}
u3_noun
u3wc_new_lsh(u3_noun cor)
{
u3_atom bloq, step;
u3_noun a, b;
u3x_mean(cor, u3x_sam_2, &a,
u3x_sam_3, &b, 0);
u3x_bite(a, &bloq, &step);
return u3qc_lsh(bloq, step, u3x_atom(b));
}

11
pkg/urbit/jets/c/rsh.c
View File

@ -63,3 +63,14 @@
return d;
}
u3_noun
u3wc_new_rsh(u3_noun cor)
{
u3_atom bloq, step;
u3_noun a, b;
u3x_mean(cor, u3x_sam_2, &a,
u3x_sam_3, &b, 0);
u3x_bite(a, &bloq, &step);
return u3qc_rsh(bloq, step, u3x_atom(b));
}

15
pkg/urbit/jets/tree.c
View File

@ -1503,6 +1503,10 @@ static c3_c* _141_two_end_ha[] = {
"45a0efc0c4ae4b93f554d480a9d2c52474d5ebd6b1b9b0ab888b9bee2117db55",
0
};
static u3j_harm _141_two_new_end_a[] = {{".2", u3wc_new_end, c3y}, {}};
static c3_c* _141_two_new_end_ha[] = {
0
};
static u3j_harm _141_two_gor_a[] = {{".2", u3wc_gor, c3y}, {}};
static c3_c* _141_two_gor_ha[] = {
"3ab7d6a56b8b347bd677a77ec43cda984d1eb869bab5c9bc2185f5c4a366703a",
@ -1513,6 +1517,10 @@ static c3_c* _141_two_lsh_ha[] = {
"a93f01f1db5bcaf1973d01234bbcec8f8adf9d6402a8d715a1b13b70a140a428",
0
};
static u3j_harm _141_two_new_lsh_a[] = {{".2", u3wc_new_lsh, c3y}, {}};
static c3_c* _141_two_new_lsh_ha[] = {
0
};
// XX appears to be a duplicate of _141_one_mas_a
//
static u3j_harm _141_two_mas_a[] = {{".2", u3wc_mas, c3y}, {}};
@ -1577,6 +1585,10 @@ static c3_c* _141_two_rsh_ha[] = {
"a401145b4c11ec8d17a729fe30f06c295865ffed1b970b0a788f0fec1ed0a703",
0
};
static u3j_harm _141_two_new_rsh_a[] = {{".2", u3wc_new_rsh, c3y}, {}};
static c3_c* _141_two_new_rsh_ha[] = {
0
};
static u3j_harm _141_two_swp_a[] = {{".2", u3wc_swp, c3y}, {}};
static c3_c* _141_two_swp_ha[] = {
"f809ed11a87db6cef8944c7252d53cda1e030240ee52912c3843d56805ac17fa",
@ -1845,9 +1857,11 @@ static u3j_core _141_two_d[] =
{ "dor", 7, _141_two_dor_a, 0, _141_two_dor_ha },
{ "dvr", 7, _141_two_dvr_a, 0, _141_two_dvr_ha },
{ "end", 7, _141_two_end_a, 0, _141_two_end_ha },
{ "new-end", 7, _141_two_new_end_a, 0, _141_two_new_end_ha },
{ "gor", 7, _141_two_gor_a, 0, _141_two_gor_ha },
{ "jam", 7, _141_two_jam_a, 0, _141_two_jam_ha },
{ "lsh", 7, _141_two_lsh_a, 0, _141_two_lsh_ha },
{ "new-lsh", 7, _141_two_new_lsh_a, 0, _141_two_new_lsh_ha },
{ "mas", 7, _141_two_mas_a, 0, _141_two_mas_ha },
{ "mat", 7, _141_two_mat_a, 0, _141_two_mat_ha },
{ "met", 7, _141_two_met_a, 0, _141_two_met_ha },
@ -1860,6 +1874,7 @@ static u3j_core _141_two_d[] =
{ "rev", 7, _141_two_rev_a, 0, _141_two_rev_ha },
{ "rip", 7, _141_two_rip_a, 0, _141_two_rip_ha },
{ "rsh", 7, _141_two_rsh_a, 0, _141_two_rsh_ha },
{ "new-rsh", 7, _141_two_new_rsh_a, 0, _141_two_new_rsh_ha },
{ "swp", 7, _141_two_swp_a, 0, _141_two_swp_ha },
{ "rub", 7, _141_two_rub_a, 0, _141_two_rub_ha },
{ "peg", 7, _141_two_peg_a, 0, _141_two_peg_ha },