add support for quoted atoms to writeq

2018-07-15 17:54:37 -06:00
parent 7527bc76f8
commit f5e254dd64
6 changed files with 40 additions and 26 deletions
--- a/src/prolog/machine/machine_state.rs
+++ b/src/prolog/machine/machine_state.rs
@@ -492,7 +492,7 @@ pub(crate) trait CallPolicy: Any {
                machine_st.fail = !machine_st.is_cyclic_term(addr);
                return_from_clause!(machine_st.last_call, machine_st)
            },
-            &BuiltInClauseType::Display => {
+            &BuiltInClauseType::Writeq => {
                let output = machine_st.print_term(machine_st[temp_v!(1)].clone(),
                                                   DisplayFormatter {},
                                                   PrinterOutputter::new());