Merge pull request #129 from inhabitedtype/bad-check

bad-check: remove redundant check that hid a bug
inhabitedtype · Jan 23, 2018 · 595ec59 · 595ec59
2 parents 88d5127 + 31bb400
commit 595ec59
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/angstrom.ml b/lib/angstrom.ml
@@ -155,7 +155,7 @@ let rec prompt input pos fail succ =
     if len < parser_uncommitted_bytes then
       failwith "prompt: input shrunk!";
     let input = Input.create input ~off ~len ~committed_bytes:parser_committed_bytes in
-    if len = parser_uncommitted_bytes || pos = Input.length input then
+    if len = parser_uncommitted_bytes then
       match (more : More.t) with
       | Complete   -> fail input pos More.Complete
       | Incomplete -> prompt input pos fail succ