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 ecaa7f1..342a2b6 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", "recovery" /* labeled failure */ 64 "throw", "recovery", "labeled_choice" /* 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) {
@@ -111,7 +111,7 @@ void printinst (const Instruction *op, const Instruction *p) {
111 printf("%d", p->i.aux); 111 printf("%d", p->i.aux);
112 break; 112 break;
113 } 113 }
114 case IRecov: { /* labeled failure */ 114 case IRecov: case ILabChoice: { /* labeled failure */
115 printjmp(op, p); 115 printjmp(op, p);
116 printcharset((p+2)->buff); 116 printcharset((p+2)->buff);
117 break; 117 break;
@@ -164,7 +164,7 @@ static const char *tagnames[] = {
164 "call", "opencall", "rule", "grammar", 164 "call", "opencall", "rule", "grammar",
165 "behind", 165 "behind",
166 "capture", "run-time", 166 "capture", "run-time",
167 "throw", "labeled-choice", "recov" /* labeled failure */ 167 "throw", "recov", "labeled-choice" /* labeled failure */
168}; 168};
169 169
170 170
@@ -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 == TRecov) { /* labeled failure */ 226 if (tree->tag == TRecov || tree->tag == TLabChoice) { /* labeled failure */
227 printcharset(treelabelset(tree)); 227 printcharset(treelabelset(tree));
228 printf("\n"); 228 printf("\n");
229 } 229 }