lithia 1.0.6

Embeddable and simple lisp dialect
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24

/// Example runner for lithia - running either a file or a repl
use std::collections::HashMap;
use std::env;
use std::fs;

use lithia::Lisp;

fn main() {
    let args: Vec<String> = env::args().collect();

    let code = if args.len() > 1 {
        fs::read_to_string(&args[1]).unwrap()
    } else {
        "(while t (print (eval (read))))".to_string()
    };

    let mut globals = HashMap::new();
    let ret = Lisp::new(&mut globals).add_stdenv().unwrap().eval(&code);

    match ret {
        Ok(_) => (),
        Err(e) => println!("\x1b[31m{}\x1b[0m", e),
    }
}