From b1d2c32cbdeb57fd513312c96fccaaadce7f704a Mon Sep 17 00:00:00 2001
From: "Richard W.M. Jones" <rich@annexia.org>
Date: Fri, 8 Jan 2010 14:28:17 +0000
Subject: [PATCH] Fix empty case for OCaml 3.11 and above.

---
 pa_bitstring.ml | 4 ++++
 1 file changed, 4 insertions(+)

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
+    | "{";
+      "_";
+      "}" ->
+	[]
     ]
   ];
 
-- 
1.8.3.1