format

Author: cometkim

compiler/dune

@@ -1,5 +1,20 @@
-(dirs bsb bsb_exe bsb_helper bsb_helper_exe bsc cmij common core depends ext
-  frontend gentype jsoo js_parser ml syntax)
+(dirs
+ bsb
+ bsb_exe
+ bsb_helper
+ bsb_helper_exe
+ bsc
+ cmij
+ common
+ core
+ depends
+ ext
+ frontend
+ gentype
+ jsoo
+ js_parser
+ ml
+ syntax)
 
 (env
  (dev

compiler/ext/dune

@@ -3,8 +3,12 @@
  (wrapped false)
  (preprocess
   (action
-   (run %{bin:cppo} -V OCAML:%{ocaml_version} %{env:CPPO_FLAGS=}
-     %{input-file})))
+   (run
+    %{bin:cppo}
+    -V
+    OCAML:%{ocaml_version}
+    %{env:CPPO_FLAGS=}
+    %{input-file})))
  (flags
   (:standard -w +a-4-42-40-9-48-70))
  (foreign_stubs

compiler/jsoo/dune

@@ -8,4 +8,5 @@
  (flags
   (:standard -w +a-4-9-40-42-44-45))
  (libraries core syntax ml js_of_ocaml)
- (preprocess (pps js_of_ocaml-ppx)))
+ (preprocess
+  (pps js_of_ocaml-ppx)))

tests/syntax_benchmarks/Benchmark.ml

@@ -33,16 +33,16 @@ module Time : sig
 
   val now : unit -> t
 
-  val[@warning "-32"] to_uint64 : t -> int64
+  val [@warning "-32"] to_uint64 : t -> int64
 
   (* let of_uint64_ns ns = ns *)
 
-  val[@warning "-32"] nanosecond : t
-  val[@warning "-32"] microsecond : t
-  val[@warning "-32"] millisecond : t
-  val[@warning "-32"] second : t
-  val[@warning "-32"] minute : t
-  val[@warning "-32"] hour : t
+  val [@warning "-32"] nanosecond : t
+  val [@warning "-32"] microsecond : t
+  val [@warning "-32"] millisecond : t
+  val [@warning "-32"] second : t
+  val [@warning "-32"] minute : t
+  val [@warning "-32"] hour : t
 
   val zero : t