chore: update ocamlfmt

cdaringe · Jan 30, 2022 · d53fcbf · d53fcbf
1 parent 8fcdc88
commit d53fcbf
Show file tree

Hide file tree

Showing 7 changed files with 4 additions and 11 deletions.
diff --git a/.ocamlformat b/.ocamlformat
@@ -1,2 +1,2 @@
-version = 0.19.0
-profile = default
+version = 0.20.1
+profile = default
diff --git a/src/bin/js/dune b/src/bin/js/dune
@@ -1,5 +1,6 @@
 (executable
  (name main)
  (libraries hood js_of_ocaml)
- (preprocess (pps js_of_ocaml-ppx))
+ (preprocess
+  (pps js_of_ocaml-ppx))
  (modes js))
diff --git a/src/bin/js/main.ml b/src/bin/js/main.ml
@@ -3,17 +3,13 @@ let game = Hood.Game.create ()
 open Js_of_ocaml
 
 let printjs s = print_endline @@ Js.to_string s
-
 let print s = print_endline s
 
 let _ =
   Js.export_all
     (object%js
        method create = Hood.Game.create
-
        method act = Hood.Game.act
-
        method tick = Hood.Game.tick
-
        method print_game g = print @@ Hood.Common.show_game g
     end)
diff --git a/src/lib/hood/board.ml b/src/lib/hood/board.ml
@@ -3,7 +3,6 @@ open Common
 type t = Common.board
 
 let max_parks_by_street_index = [| 3; 4; 5 |]
-
 let ( >>= ) = Result.bind
 
 let investment_levels =

diff --git a/src/lib/hood/common.ml b/src/lib/hood/common.ml
@@ -58,7 +58,6 @@ type game_error =
 exception Game_error of game_error
 
 type card = { num : int; effect : effect } [@@deriving show, yojson]
-
 type deck = card list [@@deriving show, yojson]
 
 type estate_plan = { claimaint_count : int; establishments : int list }

diff --git a/src/lib/hood/deck.ml b/src/lib/hood/deck.ml
@@ -114,5 +114,4 @@ let with_effects numbers_deck =
   if num_unassigned > 0 then failwith "cards are unassigned" else assigned
 
 let create () = empty_numbers () |> with_effects
-
 let create_random () = create () |> Listext.shuffle
diff --git a/src/lib/hood/house.ml b/src/lib/hood/house.ml
@@ -9,5 +9,4 @@ let empty () : t =
   h
 
 let with_pool (h : t) : t = { h with has_pool = true }
-
 let check_num = in_range_or 1 16 (Game_error InvalidHouseNumber)