move term expansion logic entirely into loader.pl

This commit is contained in:
Mark Thom
2021-02-01 16:50:05 -07:00
parent 6ed7767512
commit e1ec4bee75
4 changed files with 55 additions and 66 deletions

View File

@@ -1045,7 +1045,7 @@ impl Machine {
let term = loader.read_term_from_heap(temp_v!(1))?;
loader.incremental_compile_clause(
(clause_name!("$term_expansion"), 2),
(clause_name!("term_expansion"), 2),
term,
CompilationTarget::User,
false,

View File

@@ -345,15 +345,6 @@ impl Machine {
lib_path.pop(); // remove the "lib" at the end
bootstrapping_compile(
Stream::from(include_str!("../term_and_goal_expansion.pl")),
&mut wam,
ListingSource::from_file_and_path(
clause_name!("term_and_goal_expansion.pl"),
lib_path.clone(),
),
).unwrap();
bootstrapping_compile(
Stream::from(include_str!("../loader.pl")),
&mut wam,