format

groupoid · Apr 7, 2024 · b7797bf · b7797bf
1 parent 145ce60
commit b7797bf
Showing 1 changed file with 5 additions and 5 deletions.
diff --git a/src/joe/main.ml b/src/joe/main.ml
@@ -69,12 +69,12 @@ let main f =
   let sufix = backend_type_to_suffix !backend_type in
   write_file f f_without_filename sufix;
   match !backend_type with
-    | Intel | ARM -> (
-      let arch = backend_type_to_arch !backend_type in
-      String.concat " " ["gcc"; f_without_filename^sufix; "src/"^arch^"/libmincaml.c src/"^arch^"/stub.c -o "; f_without_filename ^ ".exe"] |> Sys.command |> ignore
-     ) 
+    | Intel | ARM ->
+      ( let arch = backend_type_to_arch !backend_type in
+        String.concat " " [ "gcc"; f_without_filename^sufix;
+                            "src/"^arch^"/libmincaml.c src/"^arch^"/stub.c -o ";
+                            f_without_filename ^ ".exe"] |> Sys.command |> ignore )
     | _ -> ()
-
 
 let () =
   let files = ref [] in