Make compile on stable version

SWI-Prolog · Oct 22, 2024 · 1a2348c · 1a2348c
1 parent 7fee68a
commit 1a2348c
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 1 deletion.
diff --git a/janus/janus.c b/janus/janus.c
@@ -45,6 +45,7 @@
 #include <frameobject.h>	/* Limited API */
 #endif
 #include <assert.h>
+#include <stdbool.h>
 
 static atom_t ATOM_none;
 static atom_t ATOM_false;

diff --git a/janus/mod_swipl.c b/janus/mod_swipl.c
@@ -71,6 +71,7 @@ Py_SetPrologErrorFromObject(PyObject *obj)
   Py_CLEAR(argv);
 }
 
+#ifdef PL_Q_EXCEPT_HALT
 static term_t
 is_unwind_exception(term_t ex)
 { term_t a;
@@ -83,7 +84,6 @@ is_unwind_exception(term_t ex)
   return 0;
 }
 
-#ifdef PL_Q_EXCEPT_HALT
 static bool
 is_halt_exception(term_t a, int *code)
 { int i;