Lines Matching refs:FoStack
733 if ( FoStack[k] == NULL ) /* Does the kth stack exist yet? */
735 /*fprintf(stderr, "allocating FoStack\n");*/
736 FoStack[k] = (int *) calloc(FoStackSize, sizeof(int));
737 require(FoStack[k]!=NULL, "FoPush: cannot allocate FOLLOW stack\n");
741 FoTOS[k]=FoStack[k];
747 require(valid(FoStack[k]), "FoPush: invalid FoStack");
749 if ( FoTOS[k] >= &(FoStack[k][FoStackSize-1]) )
752 require(FoTOS[k]>=FoStack[k],
753 eMsg1("FoPush: FoStack stack-ptr is playing out of its sandbox",
761 **** fprintf(stderr, "FoStack[k=%d]:\n", k);
762 **** for (p=FoStack[k]; p<=FoTOS[k]; p++)
781 require(FoTOS[k]>=FoStack[k]&&FoTOS[k]<=&(FoStack[k][FoStackSize-1]),
782 "FoPop: FoStack stack-ptr is playing out of its sandbox");
783 if ( FoTOS[k] == FoStack[k] ) FoTOS[k] = NULL;
823 require(FoTOS[k]>=FoStack[k]&&FoTOS[k]<=&(FoStack[k][FoStackSize-1]),
824 eMsg1("RegisterCycle(%s): FoStack stack-ptr is playing out of its sandbox",
826 /*** if ( FoTOS[k]<FoStack[k]||FoTOS[k]>&(FoStack[k][FoStackSize-1]) )
828 **** fprintf(stderr, "RegisterCycle(%s): FoStack stack-ptr is playing out of its sandbox\n",
831 **** FoTOS[k], FoStack[k], &(FoStack[k][FoStackSize-1]));
837 require(valid(FoStack[k]), "RegisterCycle: invalid FoStack");
839 for (p=FoTOS[k]; *p != r->rulenum && p >= FoStack[k]; --p) {;}
840 require(p>=FoStack[k], "RegisterCycle: FoStack is screwed up beyond belief");
