remove unused fields instead, prompting more dead_code removal

src/machine/compile.rs

@@ -1351,7 +1351,7 @@ impl<'a> LoadState<'a> {
         settings: CodeGenSettings,
         atom_tbl: TabledData<Atom>,
     ) -> Result<StandaloneCompileResult, SessionError> {
-        let mut preprocessor = Preprocessor::new(self.wam.machine_st.flags);
+        let mut preprocessor = Preprocessor::new();
         let mut cg = CodeGenerator::<DebrayAllocator>::new(atom_tbl.clone(), settings);
 
         let clause = self.try_term_to_tl(term, &mut preprocessor)?;
@@ -1389,7 +1389,7 @@ impl<'a> LoadState<'a> {
             CodeGenerator::<DebrayAllocator>::new(self.wam.machine_st.atom_tbl.clone(), settings);
 
         let mut clauses = vec![];
-        let mut preprocessor = Preprocessor::new(self.wam.machine_st.flags);
+        let mut preprocessor = Preprocessor::new();
 
         for term in predicates.predicates.drain(0..) {
             clauses.push(self.try_term_to_tl(term, &mut preprocessor)?);

src/machine/mod.rs

@@ -7,7 +7,6 @@ use lazy_static::lazy_static;
 use crate::clause_types::*;
 use crate::forms::*;
 use crate::instructions::*;
-use crate::machine::heap::*;
 use crate::machine::loader::*;
 use crate::machine::term_stream::{LiveTermStream, LoadStatePayload, TermStream};
 use crate::read::*;
@@ -109,7 +108,6 @@ impl LoadContext {
 #[derive(Debug)]
 pub struct Machine {
     pub(super) machine_st: MachineState,
-    pub(super) _inner_heap: Heap,
     pub(super) policies: MachinePolicies,
     pub(super) indices: IndexStore,
     pub(super) code_repo: CodeRepo,
@@ -280,7 +278,6 @@ impl Machine {
 
         let mut wam = Machine {
             machine_st: MachineState::new(),
-            _inner_heap: Heap::new(),
             policies: MachinePolicies::new(),
             indices: IndexStore::new(),
             code_repo: CodeRepo::new(),

src/machine/preprocessor.rs

@@ -553,14 +553,12 @@ fn qualified_clause_to_query_term<'a>(
 
 #[derive(Debug)]
 pub(crate) struct Preprocessor {
-    _flags: MachineFlags,
     queue: VecDeque<VecDeque<Term>>,
 }
 
 impl Preprocessor {
-    pub(super) fn new(flags: MachineFlags) -> Self {
+    pub(super) fn new() -> Self {
         Preprocessor {
-            _flags: flags,
             queue: VecDeque::new(),
         }
     }

src/machine/stack.rs

@@ -109,7 +109,6 @@ pub(crate) struct OrFramePrelude {
     pub(crate) b: usize,
     pub(crate) bp: LocalCodePtr,
     pub(crate) tr: usize,
-    pub(crate) _pstr_tr: usize,
     pub(crate) h: usize,
     pub(crate) b0: usize,
 }