git.iko.soy/wock
on master help sign in
con
db2352diko
nock/src/jets.rs+4−1
compare with master
unifiedsplit
@@ -9,7 +9,7 @@ use std::{
9
9
10use crate::{
10use crate::{
11 interpreter::{slam, InterpreterContext},
11 interpreter::{slam, InterpreterContext},
12− noun::{self, cell, Atom, Bite, Noun},
12+ noun::{self, cell, Atom, Noun},
13};
13};
14
14
15pub type Jets = BTreeMap<noun::Hash, Jet>;
15pub type Jets = BTreeMap<noun::Hash, Jet>;
@@ -79,6 +79,7 @@ pub fn generate_jets() -> Jets {
79 (189837220965666741450798472864087835815, SEW),
79 (189837220965666741450798472864087835815, SEW),
80 (122271149828189266412416527758198690539, SWP),
80 (122271149828189266412416527758198690539, SWP),
81 (315388312266248574424227833154020891850, XEB),
81 (315388312266248574424227833154020891850, XEB),
82+ (26880808488368366377851132561579207892, CON),
82 ])
83 ])
83}
84}
84
85
@@ -856,3 +857,5 @@ static XEB: Jet = |_ctx, n| {
856
857
857 Rc::new(Noun::from_u32(c))
858 Rc::new(Noun::from_u32(c))
858};
859};
860+
861+static CON: Jet = |_ctx, n| BINARY_ATOM(n, |a, b| a | b);