Merge Value and ValueInner
This commit is contained in:
parent
2167b524ec
commit
61c42ae790
|
|
@ -313,10 +313,10 @@ trait Eval {
|
||||||
impl Eval for ast::Constant {
|
impl Eval for ast::Constant {
|
||||||
fn eval(&self, _ctx: &RunContext) -> types::Value {
|
fn eval(&self, _ctx: &RunContext) -> types::Value {
|
||||||
match self {
|
match self {
|
||||||
ast::Constant::Nil => None,
|
ast::Constant::Nil => types::Value::Nil,
|
||||||
ast::Constant::Boolean(value) => Some(types::ValueInner::Boolean(*value)),
|
ast::Constant::Boolean(value) => types::Value::Boolean(*value),
|
||||||
ast::Constant::Number(value) => Some(types::ValueInner::Number(*value)),
|
ast::Constant::Number(value) => types::Value::Number(*value),
|
||||||
ast::Constant::String(value) => Some(types::ValueInner::String(value.clone())),
|
ast::Constant::String(value) => types::Value::String(value.clone()),
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
@ -326,9 +326,9 @@ impl Eval for Location {
|
||||||
match self {
|
match self {
|
||||||
Location::Variable { id } => ctx.var(*id).get(),
|
Location::Variable { id } => ctx.var(*id).get(),
|
||||||
Location::Field { table, index } => {
|
Location::Field { table, index } => {
|
||||||
let table = table.eval(ctx).expect("attempt to index a nil value");
|
let table = table.eval(ctx);
|
||||||
let index = index.eval(ctx).expect("attempt to index with a nil value");
|
let index = index.eval(ctx);
|
||||||
let types::ValueInner::Table(table) = table else {
|
let types::Value::Table(table) = table else {
|
||||||
panic!("attempt to index a non-table");
|
panic!("attempt to index a non-table");
|
||||||
};
|
};
|
||||||
table.get(index)
|
table.get(index)
|
||||||
|
|
@ -341,7 +341,7 @@ impl Eval for Call {
|
||||||
fn eval(&self, ctx: &RunContext) -> types::Value {
|
fn eval(&self, ctx: &RunContext) -> types::Value {
|
||||||
let callee = self.callee.eval(ctx);
|
let callee = self.callee.eval(ctx);
|
||||||
let args: Vec<_> = self.args.iter().map(|arg| arg.eval(ctx)).collect();
|
let args: Vec<_> = self.args.iter().map(|arg| arg.eval(ctx)).collect();
|
||||||
let Some(types::ValueInner::Function(f)) = callee else {
|
let types::Value::Function(f) = callee else {
|
||||||
panic!("attempt to call a non-function");
|
panic!("attempt to call a non-function");
|
||||||
};
|
};
|
||||||
f.call(&args)
|
f.call(&args)
|
||||||
|
|
@ -356,9 +356,7 @@ impl Eval for Function {
|
||||||
.map(|(_name, id)| ctx.var(*id))
|
.map(|(_name, id)| ctx.var(*id))
|
||||||
.collect();
|
.collect();
|
||||||
let self_ = self.clone(); // TODO reference, somehow
|
let self_ = self.clone(); // TODO reference, somehow
|
||||||
Some(
|
types::Function::new(self.name.clone(), move |args| self_.call(&upvalues, args)).into()
|
||||||
types::Function::new(self.name.clone(), move |args| self_.call(&upvalues, args)).into(),
|
|
||||||
)
|
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
@ -366,11 +364,11 @@ impl Eval for Table {
|
||||||
fn eval(&self, ctx: &RunContext) -> types::Value {
|
fn eval(&self, ctx: &RunContext) -> types::Value {
|
||||||
let table = types::Table::default();
|
let table = types::Table::default();
|
||||||
for field in &self.fields {
|
for field in &self.fields {
|
||||||
let key = field.key.eval(ctx).expect("attempt to set a nil index");
|
let key = field.key.eval(ctx);
|
||||||
let value = field.value.eval(ctx);
|
let value = field.value.eval(ctx);
|
||||||
table.set(key, value);
|
table.set(key, value);
|
||||||
}
|
}
|
||||||
Some(table.into())
|
table.into()
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
@ -394,9 +392,9 @@ impl Eval for Statement {
|
||||||
match target {
|
match target {
|
||||||
Location::Variable { id } => ctx.var(*id).set(source),
|
Location::Variable { id } => ctx.var(*id).set(source),
|
||||||
Location::Field { table, index } => {
|
Location::Field { table, index } => {
|
||||||
let table = table.eval(ctx).expect("attempt to index a nil value");
|
let table = table.eval(ctx);
|
||||||
let index = index.eval(ctx).expect("attempt to index with a nil value");
|
let index = index.eval(ctx);
|
||||||
let types::ValueInner::Table(table) = table else {
|
let types::Value::Table(table) = table else {
|
||||||
panic!("attempt to index a non-table");
|
panic!("attempt to index a non-table");
|
||||||
};
|
};
|
||||||
table.set(index, source)
|
table.set(index, source)
|
||||||
|
|
@ -407,7 +405,7 @@ impl Eval for Statement {
|
||||||
call.eval(ctx);
|
call.eval(ctx);
|
||||||
}
|
}
|
||||||
};
|
};
|
||||||
None
|
types::Value::Nil
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
@ -421,7 +419,9 @@ impl Function {
|
||||||
assert_eq!(args.len(), self.args.len());
|
assert_eq!(args.len(), self.args.len());
|
||||||
let ctx = RunContext {
|
let ctx = RunContext {
|
||||||
args: args.iter().map(new_var).collect(),
|
args: args.iter().map(new_var).collect(),
|
||||||
locals: (0..self.locals.len()).map(|_| new_var(&None)).collect(),
|
locals: (0..self.locals.len())
|
||||||
|
.map(|_| new_var(&types::Value::Nil))
|
||||||
|
.collect(),
|
||||||
upvalues: upvalues.to_vec(),
|
upvalues: upvalues.to_vec(),
|
||||||
};
|
};
|
||||||
for statement in &self.body {
|
for statement in &self.body {
|
||||||
|
|
@ -443,29 +443,26 @@ impl OpenFunction {
|
||||||
|
|
||||||
#[cfg(test)]
|
#[cfg(test)]
|
||||||
mod tests {
|
mod tests {
|
||||||
use crate::{
|
use crate::{ast::*, types::Nil, types::Value};
|
||||||
ast::*,
|
|
||||||
types::{Value, ValueInner},
|
|
||||||
};
|
|
||||||
|
|
||||||
use super::build;
|
use super::build;
|
||||||
|
|
||||||
fn get(table: &Value, index: &str) -> Value {
|
fn get(table: &Value, index: &str) -> Value {
|
||||||
let Some(ValueInner::Table(table)) = table else {
|
let Value::Table(table) = table else {
|
||||||
panic!("a table expected");
|
panic!("a table expected");
|
||||||
};
|
};
|
||||||
table.get(index.into())
|
table.get(index.into())
|
||||||
}
|
}
|
||||||
|
|
||||||
fn set(table: &Value, index: &str, value: Value) {
|
fn set(table: &Value, index: &str, value: Value) {
|
||||||
let Some(ValueInner::Table(table)) = table else {
|
let Value::Table(table) = table else {
|
||||||
panic!("a table expected");
|
panic!("a table expected");
|
||||||
};
|
};
|
||||||
table.set(index.into(), value);
|
table.set(index.into(), value);
|
||||||
}
|
}
|
||||||
|
|
||||||
fn call(func: &Value, args: &[Value]) -> Value {
|
fn call(func: &Value, args: &[Value]) -> Value {
|
||||||
let Some(ValueInner::Function(func)) = func else {
|
let Value::Function(func) = func else {
|
||||||
panic!("a function expected");
|
panic!("a function expected");
|
||||||
};
|
};
|
||||||
func.call(args)
|
func.call(args)
|
||||||
|
|
@ -494,9 +491,9 @@ mod tests {
|
||||||
};
|
};
|
||||||
let env = crate::types::Table::default();
|
let env = crate::types::Table::default();
|
||||||
let testee = build(&testee);
|
let testee = build(&testee);
|
||||||
let ret = testee.call(Some(env.clone().into()), &[]);
|
let ret = testee.call(env.clone().into(), &[]);
|
||||||
assert_eq!(ret, Some(3.into()));
|
assert_eq!(ret, 3.into());
|
||||||
assert_eq!(env.get("x".into()), Some(1.into()));
|
assert_eq!(env.get("x".into()), 1.into());
|
||||||
}
|
}
|
||||||
|
|
||||||
#[test]
|
#[test]
|
||||||
|
|
@ -526,9 +523,9 @@ mod tests {
|
||||||
};
|
};
|
||||||
let env = crate::types::Table::default();
|
let env = crate::types::Table::default();
|
||||||
let testee = build(&testee);
|
let testee = build(&testee);
|
||||||
let ret = testee.call(Some(env.clone().into()), &[]);
|
let ret = testee.call(env.clone().into(), &[]);
|
||||||
assert_eq!(ret, Some(42.into()));
|
assert_eq!(ret, 42.into());
|
||||||
assert_eq!(env.get("x".into()), Some(666.into()));
|
assert_eq!(env.get("x".into()), 666.into());
|
||||||
}
|
}
|
||||||
|
|
||||||
#[test]
|
#[test]
|
||||||
|
|
@ -545,8 +542,8 @@ mod tests {
|
||||||
}))),
|
}))),
|
||||||
};
|
};
|
||||||
let remember = build(&remember);
|
let remember = build(&remember);
|
||||||
let the_answerer = remember.call(None, &[Some(42.into())]);
|
let the_answerer = remember.call(Nil, &[42.into()]);
|
||||||
assert_eq!(call(&the_answerer, &[]), Some(42.into()));
|
assert_eq!(call(&the_answerer, &[]), 42.into());
|
||||||
}
|
}
|
||||||
|
|
||||||
#[test]
|
#[test]
|
||||||
|
|
@ -586,13 +583,13 @@ mod tests {
|
||||||
))),
|
))),
|
||||||
};
|
};
|
||||||
let make_cell = build(&make_cell);
|
let make_cell = build(&make_cell);
|
||||||
let cell1 = make_cell.call(None, &[]);
|
let cell1 = make_cell.call(Nil, &[]);
|
||||||
let cell2 = make_cell.call(None, &[]);
|
let cell2 = make_cell.call(Nil, &[]);
|
||||||
assert_eq!(call(&get(&cell1, "get"), &[]), None);
|
assert_eq!(call(&get(&cell1, "get"), &[]), Nil);
|
||||||
call(&get(&cell1, "set"), &[Some(42.into())]);
|
call(&get(&cell1, "set"), &[42.into()]);
|
||||||
call(&get(&cell2, "set"), &[Some("foobar".into())]);
|
call(&get(&cell2, "set"), &["foobar".into()]);
|
||||||
assert_eq!(call(&get(&cell1, "get"), &[]), Some(42.into()));
|
assert_eq!(call(&get(&cell1, "get"), &[]), 42.into());
|
||||||
call(&get(&cell1, "set"), &[call(&get(&cell2, "get"), &[])]);
|
call(&get(&cell1, "set"), &[call(&get(&cell2, "get"), &[])]);
|
||||||
assert_eq!(call(&get(&cell1, "get"), &[]), Some("foobar".into()));
|
assert_eq!(call(&get(&cell1, "get"), &[]), "foobar".into());
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
|
||||||
30
src/types.rs
30
src/types.rs
|
|
@ -1,7 +1,9 @@
|
||||||
use std::{cell::RefCell, collections::HashMap, fmt::Debug, hash::Hash, rc::Rc};
|
use std::{cell::RefCell, collections::HashMap, fmt::Debug, hash::Hash, rc::Rc};
|
||||||
|
|
||||||
#[derive(Debug, Clone, PartialEq, Eq, Hash)]
|
#[derive(Debug, Clone, PartialEq, Eq, Hash, Default)]
|
||||||
pub enum ValueInner {
|
pub enum Value {
|
||||||
|
#[default]
|
||||||
|
Nil,
|
||||||
Boolean(bool),
|
Boolean(bool),
|
||||||
Number(i64),
|
Number(i64),
|
||||||
String(String),
|
String(String),
|
||||||
|
|
@ -9,16 +11,18 @@ pub enum ValueInner {
|
||||||
Function(Function),
|
Function(Function),
|
||||||
}
|
}
|
||||||
|
|
||||||
|
pub use Value::Nil;
|
||||||
|
|
||||||
macro_rules! impl_from {
|
macro_rules! impl_from {
|
||||||
($as: ident, $from: ty) => {
|
($as: ident, $from: ty) => {
|
||||||
impl From<$from> for ValueInner {
|
impl From<$from> for Value {
|
||||||
fn from(value: $from) -> Self {
|
fn from(value: $from) -> Self {
|
||||||
Self::$as(value.into())
|
Self::$as(value.into())
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
};
|
};
|
||||||
(try $as: ident, $from: ty) => {
|
(try $as: ident, $from: ty) => {
|
||||||
impl TryFrom<$from> for ValueInner {
|
impl TryFrom<$from> for Value {
|
||||||
type Error = ::std::num::TryFromIntError;
|
type Error = ::std::num::TryFromIntError;
|
||||||
fn try_from(value: $from) -> Result<Self, Self::Error> {
|
fn try_from(value: $from) -> Result<Self, Self::Error> {
|
||||||
Ok(Self::$as(value.try_into()?))
|
Ok(Self::$as(value.try_into()?))
|
||||||
|
|
@ -39,11 +43,9 @@ impl_from!(String, &str);
|
||||||
impl_from!(Table, Table);
|
impl_from!(Table, Table);
|
||||||
impl_from!(Function, Function);
|
impl_from!(Function, Function);
|
||||||
|
|
||||||
pub type Value = Option<ValueInner>;
|
|
||||||
|
|
||||||
#[derive(Debug, Clone, Default)]
|
#[derive(Debug, Clone, Default)]
|
||||||
struct TableInner {
|
struct TableInner {
|
||||||
content: HashMap<ValueInner, ValueInner>,
|
content: HashMap<Value, Value>,
|
||||||
}
|
}
|
||||||
|
|
||||||
#[derive(Debug, Clone, Default)]
|
#[derive(Debug, Clone, Default)]
|
||||||
|
|
@ -64,13 +66,19 @@ impl Hash for Table {
|
||||||
}
|
}
|
||||||
|
|
||||||
impl Table {
|
impl Table {
|
||||||
pub fn get(&self, key: ValueInner) -> Value {
|
pub fn get(&self, key: Value) -> Value {
|
||||||
self.0.borrow().content.get(&key).cloned()
|
self.0
|
||||||
|
.borrow()
|
||||||
|
.content
|
||||||
|
.get(&key)
|
||||||
|
.cloned()
|
||||||
|
.unwrap_or_default()
|
||||||
}
|
}
|
||||||
|
|
||||||
pub fn set(&self, key: ValueInner, value: Value) {
|
pub fn set(&self, key: Value, value: Value) {
|
||||||
|
assert!(key != Nil);
|
||||||
let mut this = self.0.borrow_mut();
|
let mut this = self.0.borrow_mut();
|
||||||
if let Some(value) = value {
|
if value != Nil {
|
||||||
this.content.insert(key, value);
|
this.content.insert(key, value);
|
||||||
} else {
|
} else {
|
||||||
this.content.remove(&key);
|
this.content.remove(&key);
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue
Block a user