primitive repl

src/stl.rs

@@ -0,0 +1,29 @@
+/* relish: versatile lisp shell
+ * Copyright (C) 2021 Aidan Hahn
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+use crate::str::get_echo;
+use crate::func::{FTable, func_declare};
+use std::rc::Rc;
+use std::cell::RefCell;
+
+pub fn get_stdlib() -> Result<Rc<RefCell<FTable>>, String> {
+    let ft = Rc::new(RefCell::new(FTable::new()));
+    if let Some(s) = func_declare(ft.clone(), Rc::new(RefCell::new(get_echo()))) {
+        return Err(s)
+    }
+
+    return Ok(ft)
+}