fix goal expansion in disjunctions, add warnings for singleton variables

2019-10-03 22:13:34 -06:00
parent 02d1ed237f
commit b61ed65208
11 changed files with 348 additions and 116 deletions
--- a/src/prolog/machine/dynamic_database.rs
+++ b/src/prolog/machine/dynamic_database.rs
@@ -27,11 +27,11 @@ impl Machine {
                    let module = idx.0.borrow().1.clone();

                    match module.as_str() {
-                        "user" => compile_user_module(self, src),
+                        "user" => compile_user_module(self, src, true),
                        _ => compile_into_module(self, module, src, name),
                    }
                }
-                None => compile_user_module(self, src),
+                None => compile_user_module(self, src, true),
            },
            _ => compile_into_module(self, name.owning_module(), src, name),
        }