From 8834bc154280e443aeac618eb433e365d82253c6 Mon Sep 17 00:00:00 2001
From: Jed Barber <jjbarber@y7mail.com>
Date: Sat, 12 Dec 2020 17:12:21 +1100
Subject: Duplicate subgroup bug fixed, finally

---
 src/packrat-parsers.adb | 1 +
 1 file changed, 1 insertion(+)

(limited to 'src/packrat-parsers.adb')

diff --git a/src/packrat-parsers.adb b/src/packrat-parsers.adb
index 63dcb00..eba9e20 100644
--- a/src/packrat-parsers.adb
+++ b/src/packrat-parsers.adb
@@ -563,6 +563,7 @@ package body Packrat.Parsers is
                 Ada.Strings.Unbounded.Append
                    (Context.Error_String,
                     Packrat.Errors.Encode (Traits.Label_Enum'Image (Label), Start));
+                return Salt;
             else
                 Context.Error_String := +"";
             end if;
-- 
cgit