version 1.41, 2023/09/19 01:14:05 |
version 1.42, 2023/09/21 17:19:06 |
|
|
rtok = relex(); |
rtok = relex(); |
if (rtok == ')') { /* special pleading for () */ |
if (rtok == ')') { /* special pleading for () */ |
rtok = relex(); |
rtok = relex(); |
return unary(op2(CCL, NIL, (Node *) tostring(""))); |
return unary(op2(CCL, NIL, (Node *) cclenter(""))); |
} |
} |
np = regexp(); |
np = regexp(); |
if (rtok == ')') { |
if (rtok == ')') { |
|
|
return (concat(op2(CAT, np, primary()))); |
return (concat(op2(CAT, np, primary()))); |
case EMPTYRE: |
case EMPTYRE: |
rtok = relex(); |
rtok = relex(); |
return (concat(op2(CAT, op2(CCL, NIL, (Node *) tostring("")), |
return (concat(op2(CAT, op2(CCL, NIL, (Node *) cclenter("")), |
primary()))); |
primary()))); |
} |
} |
return (np); |
return (np); |