This commit is contained in:
Mark Thom
2017-05-17 16:46:04 -06:00
parent 0063329e3e
commit 39f0f2bacb

View File

@@ -306,16 +306,14 @@ pub fn print(wam: &mut Machine, result: EvalSession) {
EvalSession::InitialQuerySuccess(alloc_locs, mut heap_locs) => { EvalSession::InitialQuerySuccess(alloc_locs, mut heap_locs) => {
print!("true"); print!("true");
if heap_locs.is_empty() {
if !wam.or_stack_is_empty() { if !wam.or_stack_is_empty() {
print!(" "); print!(" ");
} }
println!("."); println!(".");
if heap_locs.is_empty() {
return; return;
} else {
println!("");
} }
loop { loop {