aboutsummaryrefslogtreecommitdiff
path: root/lpprint.c
diff options
context:
space:
mode:
Diffstat (limited to 'lpprint.c')
-rw-r--r--lpprint.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/lpprint.c b/lpprint.c
index 0ca0b0e..122d2e5 100644
--- a/lpprint.c
+++ b/lpprint.c
@@ -61,7 +61,7 @@ void printinst (const Instruction *op, const Instruction *p) {
61 "choice", "jmp", "call", "open_call", 61 "choice", "jmp", "call", "open_call",
62 "commit", "partial_commit", "back_commit", "failtwice", "fail", "giveup", 62 "commit", "partial_commit", "back_commit", "failtwice", "fail", "giveup",
63 "fullcapture", "opencapture", "closecapture", "closeruntime", 63 "fullcapture", "opencapture", "closecapture", "closeruntime",
64 "throw", "labeled_choice" /* labeled failure */ 64 "throw", "labeled_choice", "recovery" /* labeled failure */
65 }; 65 };
66 printf("%02ld: %s ", (long)(p - op), names[p->i.code]); 66 printf("%02ld: %s ", (long)(p - op), names[p->i.code]);
67 switch ((Opcode)p->i.code) { 67 switch ((Opcode)p->i.code) {
@@ -112,7 +112,7 @@ void printinst (const Instruction *op, const Instruction *p) {
112 printf("%d", p->i.aux); 112 printf("%d", p->i.aux);
113 break; 113 break;
114 } 114 }
115 case ILabChoice: { /* labeled failure */ 115 case ILabChoice: case IRecov: { /* labeled failure */
116 printjmp(op, p); 116 printjmp(op, p);
117 printcharset((p+2)->buff); 117 printcharset((p+2)->buff);
118 break; 118 break;
@@ -165,7 +165,7 @@ static const char *tagnames[] = {
165 "call", "opencall", "rule", "grammar", 165 "call", "opencall", "rule", "grammar",
166 "behind", 166 "behind",
167 "capture", "run-time", 167 "capture", "run-time",
168 "throw", "labeled-choice" /* labeled failure */ 168 "throw", "labeled-choice", "recov" /* labeled failure */
169}; 169};
170 170
171 171
@@ -223,7 +223,7 @@ void printtree (TTree *tree, int ident) {
223 default: { 223 default: {
224 int sibs = numsiblings[tree->tag]; 224 int sibs = numsiblings[tree->tag];
225 printf("\n"); 225 printf("\n");
226 if (tree->tag == TLabChoice) { /* labeled failure */ 226 if (tree->tag == TLabChoice || tree->tag == TRecov) { /* labeled failure */
227 printcharset(treelabelset(tree)); 227 printcharset(treelabelset(tree));
228 printf("\n"); 228 printf("\n");
229 } 229 }