NIL
if (talon != NIL && (talon->visible == FALSE)) {
for (ptr = talon; ptr != NIL; ptr = ptr->next) {
for (ptr = hand; ptr != NIL; ptr = ptr->next) {
for (ptr = stock, row = stockrow; ptr != NIL; ptr = ptr->next, row++) {
if (stock == NIL) {
if (tableau[des] == NIL)
bottom[sour] = NIL;
if (bottom[des] == NIL)
tableau[sour] = NIL;
if (found[tempbase] != NIL)
if (talon == NIL && hand != NIL)
ptr != NIL;
ptr != NIL;
cards[i].next = NIL;
if (cp == NIL)
if (*cp != NIL)
if (*cp != NIL) {
deck[0]->next = NIL;
deck[13]->next = NIL;
found[i] = NIL;
deck[i]->next = NIL;
deck[decksize-1]->next = NIL;
talon = NIL;
if (cp == NIL) {
if ((cp == stock) && (tableau[des] == NIL))
else if (tableau[des] == NIL)
if (stock == NIL &&
else if (talon != NIL) {
while (talon != NIL) {
ptr != NIL;
ptr != NIL;
s->strstart - (IPos)MAX_DIST(s) : NIL;
s->head[s->hash_size - 1] = NIL; \
hash_head = NIL;
if (hash_head != NIL && s->strstart - hash_head <= MAX_DIST(s)) {
*p = (Pos)(m >= wsize ? m - wsize : NIL);
hash_head = NIL;
if (hash_head != NIL && s->prev_length < s->max_lazy_match &&
*p = (Pos)(m >= wsize ? m - wsize : NIL);
s->strstart - (IPos)MAX_DIST(s) : NIL;
s->head[s->hash_size - 1] = NIL; \
hash_head = NIL;
if (hash_head != NIL && s->strstart - hash_head <= MAX_DIST(s)) {
*p = (Pos)(m >= wsize ? m - wsize : NIL);
hash_head = NIL;
if (hash_head != NIL && s->prev_length < s->max_lazy_match &&
*p = (Pos)(m >= wsize ? m - wsize : NIL);
{ --inloop; $$ = stat4(FOR, $3, NIL, $7, $10); }
pa_pat { $$ = stat2(PASTAT, $1, stat2(PRINT, rectonode(), NIL)); }
| pa_pat ',' opt_nl pa_pat { $$ = pa2stat($1, $4, stat2(PRINT, rectonode(), NIL)); }
| lbrace stmtlist '}' { $$ = stat2(PASTAT, NIL, $2); }
| ppattern MATCHOP reg_expr { $$ = op3($2, NIL, $1, (Node*)makedfa($3, 0)); free($3); }
$$ = op3($2, NIL, $1, (Node*)makedfa(strnode($3), 0));
| pattern MATCHOP reg_expr { $$ = op3($2, NIL, $1, (Node*)makedfa($3, 0)); free($3); }
$$ = op3($2, NIL, $1, (Node*)makedfa(strnode($3), 0));
{ $$ = op3(MATCH, NIL, rectonode(), (Node*)makedfa($1, 0)); free($1); }
| print prarg { $$ = stat3($1, $2, NIL, NIL); }
$$ = stat1(BREAK, NIL); }
$$ = stat1(CONTINUE, NIL); }
| EXIT st { $$ = stat1(EXIT, NIL); }
| if stmt { $$ = stat3(IF, $1, $2, NIL); }
$$ = stat1(NEXT, NIL); }
$$ = stat1(NEXTFILE, NIL); }
| RETURN st { $$ = stat1(RETURN, NIL); }
| CALL '(' ')' { $$ = op2(CALL, celltonode($1,CVAR), NIL); }
{ $$ = op5(GENSUB, NIL, (Node*)makedfa($3, 1), $5, $7, rectonode()); }
$$ = op5(GENSUB, NIL, (Node *)makedfa(strnode($3), 1), $5, $7, rectonode());
{ $$ = op5(GENSUB, NIL, (Node*)makedfa($3, 1), $5, $7, $9); }
$$ = op5(GENSUB, NIL, (Node *)makedfa(strnode($3),1), $5,$7,$9);
| GETLINE LT term { $$ = op3(GETLINE, NIL, itonp($2), $3); }
| GETLINE var { $$ = op3(GETLINE, $2, NIL, NIL); }
| GETLINE { $$ = op3(GETLINE, NIL, NIL, NIL); }
{ $$ = op3(MATCHFCN, NIL, $3, (Node*)makedfa($5, 1)); free($5); }
$$ = op3(MATCHFCN, NIL, $3, (Node*)makedfa(strnode($5), 1));
{ $$ = op4(SPLIT, $3, makearr($5), NIL, (Node*)STRING); } /* default */
{ $$ = op4($1, NIL, (Node*)makedfa($3, 1), $5, rectonode()); free($3); }
$$ = op4($1, NIL, (Node*)makedfa(strnode($3), 1), $5, rectonode());
{ $$ = op4($1, NIL, (Node*)makedfa($3, 1), $5, $7); free($3); }
$$ = op4($1, NIL, (Node*)makedfa(strnode($3), 1), $5, $7);
{ $$ = op3(SUBSTR, $3, $5, NIL); }
return (unary(op2(ALL, NIL, NIL)));
return (unary(op2(EMPTYRE, NIL, NIL)));
return (unary(op2(DOT, NIL, NIL)));
np = op2(CCL, NIL, (Node*) cclenter((const char *) rlxstr));
np = op2(NCCL, NIL, (Node *) cclenter((const char *) rlxstr));
return (unary(op2(CHAR, NIL, itonp(HAT))));
return (unary(op2(CHAR, NIL, NIL)));
return unary(op2(CCL, NIL, (Node *) cclenter("")));
return (concat(op2(CAT, op2(CCL, NIL, (Node *) cclenter("")),
return (unary(op2(STAR, np, NIL)));
return (unary(op2(PLUS, np, NIL)));
return (unary(op2(QUEST, np, NIL)));
return (unary(op2(ZERO, np, NIL)));
p1 = op2(CAT, op2(STAR, op2(ALL, NIL, NIL), NIL), p);
p1 = op2(CAT, p1, op2(FINAL, NIL, NIL));
return(op2(EMPTYRE, NIL, NIL));
np = op2(CHAR, NIL, itonp(rlxval));
duplist[1] = NIL;
dupfwd[numecs] = NIL;
if ( nfaccnum != NIL ) \
if ( nfaccnum != NIL || transchar[state] != SYM_EPSILON ) \
duplist[i] = NIL;
accset[i] = NIL;
if (duplist[sym] == NIL) {
duplist[sym] = NIL;
for (i = fwd[cclm]; i != NIL && i <= llsiz; i = fwd[i]) {
if (oldec != NIL)
if (bck[cclm] != NIL || oldec != bck[cclm]) {
bck[cclm] = NIL;
fwd[oldec] = NIL;
fwd[newec] = NIL;
if (fwd[tch] != NIL)
if (bck[tch] != NIL)
fwd[tch] = NIL;
bck[tch] = NIL;
if (bck[i] == NIL) {
for (j = fwd[i]; j != NIL; j = fwd[j])
#define NO_TRANSITION NIL
firstprot = NIL;
ecgroup[1] = NIL;
nextecm[csize] = NIL;
if (anum != NIL)
if (first == NIL)
else if (last == NIL)
if (first == NIL)
else if (second == NIL)
accptnum[finalst[first]] == NIL) {
accptnum[finalst[second]] == NIL) {
accptnum[lastnfa] = NIL;
for (i = firstprot; i != NIL; i = protnext[i])
if (firstprot != NIL) {
for (i = minprot; i != NIL; i = protnext[i]) {
tecbck[1] = NIL;
tecfwd[numecs] = NIL;
protnext[lastprot] = NIL;
if (firstprot != NIL)
if (protnext[qelm] != NIL)
protprev[qelm] = NIL;