Rename test programs so the name is a valid OCaml module name.
[ocaml-bitstring.git] / tests / 51_open_pattern.ml
diff --git a/tests/51_open_pattern.ml b/tests/51_open_pattern.ml
deleted file mode 100644 (file)
index 8c0b33b..0000000
+++ /dev/null
@@ -1,17 +0,0 @@
-(* Open a persistent pattern
- * $Id$
- *)
-
-open Printf
-open Bitstring
-
-open bitmatch "tests/test.bmpp"
-
-let () =
-  let bits = bitstring_of_string "\022Mary had a little lamb" in
-  bitmatch bits with
-  | { :pascal_string } ->
-      () (*printf "it's a Pascal string, len = %d, string = %S\n" len str*)
-  | { _ } ->
-      eprintf "not matching error\n";
-      exit 1