diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Merge branch 'master' of https://github.com/vscosta/yap-6.3

Browse Source
This commit is contained in:
Vitor Santos Costa 2016-11-08 01:40:22 -06:00
commit 51359cb175
3 changed files with 7 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
C/heapgc.c
View File

@ -467,7 +467,7 @@ push_registers(Int num_regs, yamop *nextop USES_REGS)
(
(*curslot < (CELL)LOCAL_GlobalBase &&
*curslot > (CELL)HR))) {
*curslot++ = TermNil;
*curslot++ = TermFreeTerm;
}
TrailTerm(TR++) = (CELL)curslot++;
}

5
CXX/yapt.hh
View File

@ -22,7 +22,10 @@ protected:
void mk(Term t0); /// internal method to convert from term to handle
Term gt(); /// get handle and obtain term
public:
virtual ~YAPTerm(){};
virtual ~YAPTerm(){ LOCAL_HandleBase[t] = TermFreeTerm;
while ( LOCAL_HandleBase[LOCAL_CurSlot-1] == TermFreeTerm)
LOCAL_CurSlot--;
}
YAPTerm(Term tn) {
mk(tn);
} /// private method to convert from Term (internal YAP representation) to

4
packages/python/python.c
View File

@ -93,7 +93,7 @@ X_API bool init_python(void) {
// wait for YAP_Init
return false;
}
PyGILState_STATE gstate = PyGILState_Ensure();
// PyGILState_STATE gstate = PyGILState_Ensure();
term_t t = PL_new_term_ref();
if (!Py_IsInitialized()) {
python_in_python = true;
@ -112,6 +112,6 @@ X_API bool init_python(void) {
PL_reset_term_refs(t);
install_pypreds();
install_pl2pl();
PyGILState_Release(gstate);
//PyGILState_Release(gstate);
return !python_in_python;
}