add documentation for let and while forms

src/stl/str.rs

@@ -1,57 +0,0 @@
-/* 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::sym::SymTable;
-use crate::segment::{Seg, Ctr};
-
-
-pub const ECHO_DOCSTRING: &str =
-    "traverses any number of arguments. Prints their evaluated values on a new line for each.";
-
-pub fn echo_callback(ast: &Seg, _syms: &mut SymTable) -> Result<Ctr, String> {
-    if ast.len() == 1 {
-        println!("{}", ast.car);
-    } else {
-        ast.circuit(&mut |arg: &Ctr| print!("{}", arg) == ());
-    }
-
-    Ok(Ctr::None)
-}
-
-pub const CONCAT_DOCSTRING: &str = "Iterates over N args of any type other than SYMBOL.
-converts each argument to a string. Combines all strings.
-Returns final (combined) string.";
-
-pub fn concat_callback(ast: &Seg, _syms: &mut SymTable) -> Result<Ctr, String> {
-    let mut string = String::from("");
-    if !ast.circuit(&mut |arg: &Ctr| {
-        match arg {
-            // should be a thing here
-            Ctr::Symbol(_) => return false,
-            Ctr::String(s) => string.push_str(&s),
-            Ctr::Integer(i) => string.push_str(&i.to_string()),
-            Ctr::Float(f) => string.push_str(&f.to_string()),
-            Ctr::Bool(b) => string.push_str(&b.to_string()),
-            Ctr::Seg(c) => string.push_str(ast_as_string(c.clone(), true).as_str()),
-            Ctr::None => (),
-        }
-        return true;
-    }) {
-        eprintln!("dont know what to do witha symbol here")
-    }
-    return Ctr::String(string);
-}