[parser, types] Add Obj::take() and use it to take the Obj from the parser when it is done

parser/src/list_parser.rs

@@ -30,8 +30,10 @@ impl NodeParser for ListParser {
             Token::Id => {
                 let parser = SymParser{};
                 NodeParseResult::Push { next: Box::new(parser) }
+            },
+            Token::RightParen => {
+                NodeParseResult::Complete { obj: self.list.take() }
             }
-            _ => NodeParseResult::Error { msg: "womp".to_string() }
         }
     }
 }

types/src/object.rs

@@ -13,6 +13,7 @@
 //! available types in Scheme. These predicates are implemented as `is_*`
 //! methods in a bunch of `Is*` traits defined below.
 
+use std::mem;
 use std::any::Any;
 use std::fmt;
 use super::*;
@@ -36,6 +37,10 @@ impl Obj {
         Obj::Ptr(Box::new(obj))
     }
 
+    pub fn take(&mut self) -> Obj {
+        mem::replace(self, Obj::Null)
+    }
+
     pub fn unbox_as<T: 'static + Object>(&self) -> Option<&T> {
         match self {
             Obj::Null => None,