Updated MANIFEST

[ocaml-bitstring.git] / examples / ping.ml

diff --git a/examples/ping.ml b/examples/ping.ml
index 7a274cb..6d53077 100644 (file)
--- a/examples/ping.ml
+++ b/examples/ping.ml
@@ -1,5 +1,5 @@
 (* Read in IPv4 and IPv6 ping packets and display them.
- * $Id: 60_ping.ml,v 1.3 2008-04-25 11:08:43 rjones Exp $
+ * $Id$
  *)
 
 open Printf
@@ -61,7 +61,7 @@ let display pkt =
     exit 1
 
 let () =
-  let pkt = Bitmatch.bitstring_of_file "tests/ipv4.ping" in
+  let pkt = Bitmatch.bitstring_of_file "ping.ipv4" in
   display pkt;
-  let pkt = Bitmatch.bitstring_of_file "tests/ipv6.ping" in
+  let pkt = Bitmatch.bitstring_of_file "ping.ipv6" in
   display pkt