start adding output checks to test

2018-01-15 23:42:09 -07:00
parent bdb7da3ccf
commit f59763da67
5 changed files with 459 additions and 28 deletions
--- a/src/prolog/io.rs
+++ b/src/prolog/io.rs
@@ -441,9 +441,11 @@ pub fn print(wam: &mut Machine, result: EvalSession) {

            loop {
                let mut result = EvalSession::QueryFailure;
-                let bindings = wam.heap_view::<PrinterOutputter>(&heap_locs);
+                let mut output = PrinterOutputter::new();
+                
+                let bindings = wam.heap_view(&heap_locs, output).result();

-                let stdin  = stdin();
+                let stdin = stdin();
                let mut stdout = stdout().into_raw_mode().unwrap();

                write!(stdout, "{}", bindings).unwrap();