diff options
| -rw-r--r-- | src/forth/compiler.rs | 4 | ||||
| -rw-r--r-- | src/forth/vm.rs | 6 | ||||
| -rwxr-xr-x | src/lib.rs | 2 |
3 files changed, 7 insertions, 5 deletions
diff --git a/src/forth/compiler.rs b/src/forth/compiler.rs index 17f0113..97e94a9 100644 --- a/src/forth/compiler.rs +++ b/src/forth/compiler.rs @@ -1,4 +1,4 @@ -use super::vm::{ByteCode, OpCode, WordList}; +use super::vm::{ByteCode, DataStackType, OpCode, WordList}; use std::collections::HashMap; use std::iter::{Enumerate, Iterator}; @@ -116,7 +116,7 @@ impl<'a> Compiler<'a> { pub fn compile(&mut self) -> CompileResult<()> { while let Some((word, start, end)) = self.next_word() { let anno = Annotation { loc: (start, end) }; - if let Ok(i) = word.parse::<i32>() { + if let Ok(i) = word.parse::<DataStackType>() { self.bc_push(OpCode::Num(i), anno); } else if let Some(i) = self.wordalog.0.get(word) { self.bc_push(OpCode::Call(*i), anno); diff --git a/src/forth/vm.rs b/src/forth/vm.rs index fe034a6..8cec0d2 100644 --- a/src/forth/vm.rs +++ b/src/forth/vm.rs @@ -2,9 +2,11 @@ use log::debug; use std::ops::Index; +pub type DataStackType = i32; + #[derive(Clone, Debug, Eq, PartialEq)] pub enum OpCode { - Num(i32), + Num(DataStackType), Str(usize, usize), Call(usize), TCall(usize), // tail call, really just ‘jmp’, but named to indicate desired usage. @@ -85,7 +87,7 @@ impl Default for InstructionPointer { } #[derive(Debug)] -pub struct DataStack(pub Vec<i32>); +pub struct DataStack(pub Vec<DataStackType>); #[derive(Debug)] pub struct CallStack(pub Vec<InstructionPointer>); @@ -144,7 +144,7 @@ impl ExportedVM { vm.run().map_err(|err| format!("runtime error: {err:?}")) } - pub fn stack(&self) -> Vec<i32> { + pub fn stack(&self) -> Vec<forth::vm::DataStackType> { let Some(vm) = &self.vm else { return vec![] }; |