opentry had rwo defs

This commit is contained in:
Vítor Santos Costa 2014-12-14 11:57:31 +00:00
parent 0ae8785de5
commit 289a36a0a1

View File

@ -602,14 +602,14 @@ unify_var_nvar_trail:
static void static void
InitReverseLookupOpcode(void) InitReverseLookupOpcode(void)
{ {
opentry *opeptr; op_entry *opeptr;
op_numbers i; op_numbers i;
/* 2 K should be OK */ /* 2 K should be OK */
int hash_size_mask = OP_HASH_SIZE-1; int hash_size_mask = OP_HASH_SIZE-1;
UInt sz = OP_HASH_SIZE*sizeof(struct opcode_tab_entry); UInt sz = OP_HASH_SIZE*sizeof(struct opcode_tab_entry);
while (OP_RTABLE == NULL) { while (OP_RTABLE == NULL) {
if ((OP_RTABLE = (opentry *)Yap_AllocCodeSpace(sz)) == NULL) { if ((OP_RTABLE = (op_entry *)Yap_AllocCodeSpace(sz)) == NULL) {
if (!Yap_growheap(FALSE, sz, NULL)) { if (!Yap_growheap(FALSE, sz, NULL)) {
Yap_Error(INTERNAL_ERROR, TermNil, Yap_Error(INTERNAL_ERROR, TermNil,
"Couldn't obtain space for the reverse translation opcode table"); "Couldn't obtain space for the reverse translation opcode table");