parseman 0.18.0 → 0.18.1

package/dist/index.js

@@ -1450,7 +1450,11 @@ function label(name, combinator) {
     _tag: combinator._tag,
     _meta: combinator._meta,
     _def: { tag: "label", label: name, parser: combinator },
-    parse: combinator.parse.bind(combinator)
+    parse(input, pos, ctx) {
+      const result = combinator.parse(input, pos, ctx);
+      if (!result.ok) return { ...result, expected: [name] };
+      return result;
+    }
   };
 }
 
@@ -4508,8 +4512,17 @@ function emitDispatch(p, ctx, pos) {
       return emit(def.parser, ctx, pos);
     case "token":
       return emitToken(def, ctx, pos);
-    case "label":
-      return emit(def.parser, ctx, pos);
+    case "label": {
+      const inner = emitFallible(def.parser, ctx, pos);
+      return {
+        stmts: [
+          ...inner.stmts,
+          ...emitIfFail(ctx, `!${inner.okVar}`, failBody(ctx, JSON.stringify(def.label), "_ctx._fe"))
+        ],
+        valueVar: inner.valVar,
+        endVar: inner.endVar
+      };
+    }
     case "grammar": {
       const savedTrivia = ctx.activeTrivia;
       const savedKindLabels = ctx.triviaKindLabels;