[flow] Remove some unused parser functions

Reviewed By: gkz, panagosg7

Differential Revision: D87480693

fbshipit-source-id: b08d946421e5b93e4ddbabb0292dd3a48a952aa1

Author: SamChou19815

src/parser/parser_env.ml

@@ -392,12 +392,6 @@ let with_in_formal_parameters in_formal_parameters env =
   else
     { env with in_formal_parameters }
 
-let with_in_function in_function env =
-  if in_function = env.in_function then
-    env
-  else
-    { env with in_function }
-
 let with_in_match_expression in_match_expression env =
   if in_match_expression = env.in_match_expression then
     env
@@ -587,19 +581,6 @@ let is_contextually_reserved str_val =
     true
   | _ -> false
 
-(** Words that are sometimes reserved, and sometimes allowed as identifiers
-    (namely "await" and "yield")
-
-    https://tc39.es/ecma262/#sec-keywords-and-reserved-words *)
-let token_is_contextually_reserved t =
-  let open Token in
-  match t with
-  | T_IDENTIFIER { raw; _ } -> is_contextually_reserved raw
-  | T_AWAIT
-  | T_YIELD ->
-    true
-  | _ -> false
-
 (** Words that are always reserved (mostly keywords)
 
     https://tc39.es/ecma262/#sec-keywords-and-reserved-words *)
@@ -1034,10 +1015,6 @@ module Peek = struct
      error) *)
   let is_identifier env = ith_is_identifier ~i:0 env
 
-  let is_identifier_name env = ith_is_identifier_name ~i:0 env
-
-  let is_type_identifier env = ith_is_type_identifier ~i:0 env
-
   let is_function env =
     token env = T_FUNCTION
     || token env = T_ASYNC

src/parser/parser_env.mli

@@ -153,8 +153,6 @@ val with_strict : bool -> env -> env
 
 val with_in_formal_parameters : bool -> env -> env
 
-val with_in_function : bool -> env -> env
-
 val with_in_match_expression : bool -> env -> env
 
 val with_in_match_statement : bool -> env -> env
@@ -201,8 +199,6 @@ val is_contextually_reserved : string -> bool
 
 val is_reserved : string -> bool
 
-val token_is_contextually_reserved : Token.t -> bool
-
 val token_is_reserved : Token.t -> bool
 
 val token_is_reserved_type : Token.t -> bool
@@ -238,10 +234,6 @@ module Peek : sig
 
   val is_identifier : env -> bool
 
-  val is_type_identifier : env -> bool
-
-  val is_identifier_name : env -> bool
-
   val is_function : env -> bool
 
   val is_hook : env -> bool