consume end of input

robur-coop · Nov 4, 2024 · 55657c9 · 55657c9
1 parent df099b3
commit 55657c9
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/config_parser.ml b/src/config_parser.ml
@@ -1,7 +1,7 @@
 open Angstrom
 
 let parse_one rule config_str =
-  match parse_string ~consume:Consume.All rule config_str with
+  match parse_string ~consume:Consume.All (rule <* end_of_input) config_str with
   | Ok _ as o -> o
   | Error msg -> Error (`Msg (Fmt.str "Parse error in %S: %s" config_str msg))