From: Siraaj Khandkar <siraaj@khandkar.net>
Date: Sun, 2 Aug 2015 23:12:13 +0000 (-0400)
Subject: Remove unneeded parenthesis
X-Git-Url: https://git.xandkar.net/?p=ocaml-x-plane-data.git;a=commitdiff_plain;h=c80ac351ada4cccc92b4d56c1cc5d991cda06175

Remove unneeded parenthesis
---

diff --git a/x_plane_data.ml b/x_plane_data.ml
index d3091e1..fd40cf1 100644
--- a/x_plane_data.ml
+++ b/x_plane_data.ml
@@ -55,13 +55,12 @@ let rec split blocks =
 let main () =
   let packet = B64.decode sample_packet_base64 in
   let packet = Bitstring.bitstring_of_string packet in
-  ( bitmatch packet with
+  bitmatch packet with
   | { "DATA" : 4 * 8 : string
     ; "@"    : 1 * 8 : string
     ; blocks : -1    : bitstring
     } ->
       let blocks = split blocks in
-      List.iter (fun b -> print_endline (Datum.show (Datum.of_bitstring b))) blocks;
-  )
+      List.iter (fun b -> print_endline (Datum.show (Datum.of_bitstring b))) blocks
 
 let () = main ()
\ No newline at end of file