Esempio n. 1
0
int
pushRecordSegStack(segstack *stack, Record r)
{ if ( stack->top + sizeof(r) <= stack->max )
  { Record *rp = (Record*)stack->top;

    *rp++ = r;
    stack->top = (char*)rp;
    stack->count++;

    return TRUE;
  } else
  { int rc;

    PL_LOCK(L_AGC);
    rc = pushSegStack(stack, &r);
    PL_UNLOCK(L_AGC);

    return rc;
  }
}
Esempio n. 2
0
static int
TrailCyclic(Word p ARG_LD)
{ return pushSegStack(&LD->cycle.lstack, p, Word);
}
Esempio n. 3
0
static int
pushForMark(segstack *stack, Word p, int wr)
{ word w = ((word)p)|wr;

  return pushSegStack(stack, w, word);
}