537 |
actions_output (FILE *out) |
actions_output (FILE *out) |
538 |
{ |
{ |
539 |
int rule; |
int rule; |
540 |
|
|
541 |
|
fputs ("m4_define([b4_actions], \n[[", out); |
542 |
for (rule = 1; rule < nrules + 1; ++rule) |
for (rule = 1; rule < nrules + 1; ++rule) |
543 |
if (rules[rule].action) |
if (rules[rule].action) |
544 |
{ |
{ |
552 |
fprintf (out, " %s\n break;\n\n", |
fprintf (out, " %s\n break;\n\n", |
553 |
rules[rule].action); |
rules[rule].action); |
554 |
} |
} |
555 |
|
fputs ("]])\n\n", out); |
556 |
} |
} |
557 |
|
|
558 |
|
|
565 |
{ |
{ |
566 |
int i; |
int i; |
567 |
int first = 1; |
int first = 1; |
568 |
|
|
569 |
|
fputs ("m4_define([b4_tokens], \n[", out); |
570 |
for (i = 0; i < ntokens; ++i) |
for (i = 0; i < ntokens; ++i) |
571 |
{ |
{ |
572 |
symbol_t *symbol = symbols[i]; |
symbol_t *symbol = symbols[i]; |
602 |
|
|
603 |
first = 0; |
first = 0; |
604 |
} |
} |
605 |
|
fputs ("])\n\n", out); |
606 |
} |
} |
607 |
|
|
608 |
|
|
1017 |
fputs ("m4_changecom()\n", out); |
fputs ("m4_changecom()\n", out); |
1018 |
fputs ("m4_init()\n", out); |
fputs ("m4_init()\n", out); |
1019 |
|
|
|
fputs ("m4_define([b4_actions], \n[[", out); |
|
1020 |
actions_output (out); |
actions_output (out); |
|
fputs ("]])\n\n", out); |
|
|
|
|
|
fputs ("m4_define([b4_tokens], \n[", out); |
|
1021 |
token_definitions_output (out); |
token_definitions_output (out); |
|
fputs ("])\n\n", out); |
|
1022 |
|
|
1023 |
muscles_m4_output (out); |
muscles_m4_output (out); |
1024 |
|
|