aboutsummaryrefslogtreecommitdiff
path: root/src/sexp/util.rs
diff options
context:
space:
mode:
authorJoel Kronqvist <joel.kronqvist@iki.fi>2025-08-06 16:23:18 +0300
committerJoel Kronqvist <joel.kronqvist@iki.fi>2025-08-06 16:23:18 +0300
commit313c044b4a878a425aaca6554576f5154ace8ff9 (patch)
tree706bf5e34678622111a23c7045f667c1acbe7c6d /src/sexp/util.rs
parent23b2028bdce46d02209fc2df70fc5468a8beffa8 (diff)
downloadmyslip-313c044b4a878a425aaca6554576f5154ace8ff9.tar.gz
myslip-313c044b4a878a425aaca6554576f5154ace8ff9.zip
Implemented let-bindings
Diffstat (limited to 'src/sexp/util.rs')
-rw-r--r--src/sexp/util.rs10
1 files changed, 10 insertions, 0 deletions
diff --git a/src/sexp/util.rs b/src/sexp/util.rs
index b3edf19..a28aaad 100644
--- a/src/sexp/util.rs
+++ b/src/sexp/util.rs
@@ -76,4 +76,14 @@ impl SExp {
},
}
}
+
+ pub fn check_let(self) -> Option<(String, SExp)> {
+ match &(self.parts())[..] {
+ [l, n, v] if *l == Atom(Let) => match (n.clone(), v.clone()) {
+ (Atom(Var(name)), val) => Some((name, val)),
+ _ => None
+ },
+ _ => None
+ }
+ }
}