add warnings when initialization goals fail (#168)

This commit is contained in:
Mark Thom
2019-10-30 00:25:17 -06:00
parent d34811aa36
commit 4ad62e4606
2 changed files with 14 additions and 8 deletions

View File

@@ -230,14 +230,17 @@ impl Machine {
self.machine_st.reset();
}
pub fn run_init_code(&mut self, code: Code) {
pub fn run_init_code(&mut self, code: Code) -> bool {
let old_machine_st = self.sink_to_snapshot();
self.machine_st.reset();
self.code_repo.cached_query = code;
self.run_query(&AllocVarDict::new());
let result = self.machine_st.fail;
self.absorb_snapshot(old_machine_st);
!result
}
pub fn run_top_level(&mut self) {