Eclipse Support

This commit is contained in:
Vitor Santos Costa
2014-03-13 16:57:21 +00:00
parent 4591e1baaf
commit 228bc76a35
3 changed files with 5 additions and 2 deletions

View File

@@ -2234,7 +2234,7 @@ X_API qid_t PL_open_query(module_t ctx, int flags, predicate_t p, term_t t0)
t = Yap_AddressFromSlot(t0 PASS_REGS);
/* ignore flags and module for now */
qid_t new = (qid_t)Yap_AllocCodeSpace(sizeof(*qid_t));
qid_t new = (qid_t)Yap_AllocCodeSpace(sizeof(struct open_query_struct));
LOCAL_execution = new;
new->q_open=1;
new->q_state=0;