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
+        }
+    }
 }