correction to -> offset

diff --git a/src/prolog/builtins.rs b/src/prolog/builtins.rs
index cb81fd3a31c06e33bb1e7060f123e5d1d0d6b2dd..8b47f093f4ee9caf3ca0130fe6bd44d7335d0608 100644 (file)
--- a/src/prolog/builtins.rs
+++ b/src/prolog/builtins.rs
@@ -161,7 +161,7 @@ fn get_builtins() -> Code {
          query![put_value!(perm_v!(1), 1)],
          deallocate!(),
          execute_n!(1),
-         allocate!(2), // (->)/2, 124.
+         allocate!(2), // (->)/2, 125.
          get_level!(),
          fact![get_var_in_fact!(perm_v!(2), 2)],
          call_n!(1),
@@ -235,7 +235,7 @@ pub fn build_code_dir() -> (Code, CodeDir, OpDir)
 
     code_dir.insert((String::from(";"), 2), (PredicateKeyType::BuiltIn, 76));
     code_dir.insert((String::from(","), 2), (PredicateKeyType::BuiltIn, 81));
-    code_dir.insert((String::from("->"), 2), (PredicateKeyType::BuiltIn, 124));
+    code_dir.insert((String::from("->"), 2), (PredicateKeyType::BuiltIn, 125));
 
     (builtin_code, code_dir, op_dir)
 }