Refactor code style "async" token lookahead

See #600 (comment)
rescript-lang · Jul 7, 2022 · 6815deb · 6815deb
1 parent 877145c
commit 6815deb
Showing 1 changed file with 3 additions and 5 deletions.
diff --git a/src/res_core.ml b/src/res_core.ml
@@ -237,11 +237,9 @@ let rec goToClosing closingToken state =
 (* Madness *)
 let isEs6ArrowExpression ~inTernary p =
   Parser.lookahead p (fun state ->
-      let () =
-        match state.Parser.token with
-        | Lident "async" -> Parser.next state
-        | _ -> ()
-      in
+      (match state.Parser.token with
+      | Lident "async" -> Parser.next state
+      | _ -> ());
       match state.Parser.token with
       | Lident _ | Underscore -> (
         Parser.next state;