66 lines
2.1 KiB
Rust
66 lines
2.1 KiB
Rust
use std::{rc::Rc, cell::RefCell, fs, panic::{self, PanicInfo}};
|
|
|
|
use backtrace::Backtrace;
|
|
use complexpr::{eval::Environment, interpreter::interpret, value::Value, stdlib};
|
|
use rustyline::{self, error::ReadlineError};
|
|
|
|
const C_RESET: &str = "\x1b[0m";
|
|
const C_BLUE: &str = "\x1b[94m";
|
|
const PROMPT: &str = "\x1b[94m>> \x1b[0m";
|
|
|
|
fn panic_hook(info: &PanicInfo) {
|
|
eprintln!("{:?}", Backtrace::new());
|
|
eprintln!("!!! Internal interpreter error occured !!!");
|
|
if let Some(s) = std::thread::current().name() {
|
|
eprintln!("Thread: {}", s);
|
|
}
|
|
if let Some(loc) = info.location() {
|
|
eprintln!("Location: {}:{}:{}", loc.file(), loc.line(), loc.column())
|
|
}
|
|
if let Some(s) = info.payload().downcast_ref::<&str>() {
|
|
eprintln!("Message: {}", s);
|
|
} else if let Some(s) = info.payload().downcast_ref::<String>() {
|
|
eprintln!("Message: {}", s);
|
|
}
|
|
}
|
|
|
|
fn main() -> Result<(), Box<dyn std::error::Error>> {
|
|
println!("{}", std::mem::size_of::<Value>());
|
|
panic::set_hook(Box::new(panic_hook));
|
|
let args: Vec<String> = std::env::args().collect();
|
|
if args.len() == 2 {
|
|
let fname = &args[1];
|
|
let src = fs::read_to_string(fname)?;
|
|
let res = interpret(&src, Some(fname.into()), None, false);
|
|
if let Err(e) = res {
|
|
println!("{}", e);
|
|
}
|
|
} else {
|
|
repl()?;
|
|
}
|
|
Ok(())
|
|
}
|
|
|
|
fn repl() -> Result<(), Box<dyn std::error::Error>> {
|
|
println!("Press {}Ctrl+D{} to exit.", C_BLUE, C_RESET);
|
|
let mut rl = rustyline::Editor::<()>::new()?;
|
|
let env = Rc::new(RefCell::new(Environment::new()));
|
|
stdlib::load(&mut env.borrow_mut());
|
|
loop {
|
|
let readline = rl.readline(PROMPT);
|
|
match readline {
|
|
Ok(line) => {
|
|
let result = interpret(&line, None, Some(env.clone()), true);
|
|
match result {
|
|
Ok(Value::Nil) => (),
|
|
Ok(value) => println!("{}", value.repr()),
|
|
Err(e) => print!("{}", e)
|
|
}
|
|
}
|
|
Err(ReadlineError::Eof) => break,
|
|
Err(_) => (),
|
|
}
|
|
}
|
|
Ok(())
|
|
}
|