add (non)-deterministic REPL demarcations

diff --git a/src/prolog/io.rs b/src/prolog/io.rs
index 3a9fb341a3e11f24a8d4188d84858f921a61eec6..12149d49050ee63d0905c71ba9e98ee3079aecc4 100644 (file)
--- a/src/prolog/io.rs
+++ b/src/prolog/io.rs
@@ -304,8 +304,14 @@ Each predicate must have the same name and arity.";
 pub fn print(wam: &mut Machine, result: EvalSession) {
     match result {
         EvalSession::InitialQuerySuccess(alloc_locs, mut heap_locs) => {
-            println!("true");
+            print!("true");
 
+            if !wam.or_stack_is_empty() {
+                print!(" ");                    
+            }
+            
+            println!(".");
+            
             if heap_locs.is_empty() {
                 return;
             }