From: Richard W.M. Jones <rich@annexia.org>
Date: Fri, 8 Jan 2010 14:28:17 +0000 (+0000)
Subject: Fix empty case for OCaml 3.11 and above.
X-Git-Url: http://git.annexia.org/?p=ocaml-bitstring.git;a=commitdiff_plain;h=b1d2c32cbdeb57fd513312c96fccaaadce7f704a

Fix empty case for OCaml 3.11 and above.
---

diff --git a/pa_bitstring.ml b/pa_bitstring.ml
index 0c09356..1414612 100644
--- a/pa_bitstring.ml
+++ b/pa_bitstring.ml
@@ -1123,6 +1123,10 @@ EXTEND Gram
       fields = LIST0 patt_field SEP ";";
       "}" ->
 	List.concat fields
+    | "{";
+      "_";
+      "}" ->
+	[]
     ]
   ];