add halt/0

2019-03-17 14:38:55 -06:00
parent 2fad1c724c
commit 1ce8d90627
4 changed files with 10 additions and 2 deletions
--- a/src/prolog/machine/system_calls.rs
+++ b/src/prolog/machine/system_calls.rs
@@ -628,6 +628,8 @@ impl MachineState {

                self.fail = true;
            },
+            &SystemClauseType::Halt =>
+                std::process::exit(0),
            &SystemClauseType::InstallSCCCleaner => {
                let addr = self[temp_v!(1)].clone();
                let b = self.b;