Skip to content

Commit

Permalink
Apply suggestions from code review
Browse files Browse the repository at this point in the history
Co-authored-by: Gabor Greif <[email protected]>
  • Loading branch information
crusso and ggreif authored Feb 24, 2025
1 parent 8e4efeb commit 175eb8a
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions src/mo_frontend/typing.ml
Original file line number Diff line number Diff line change
Expand Up @@ -163,7 +163,7 @@ let display_labs fmt labs =
let display_typs fmt typs =
if !Flags.ai_errors then
let tfs = T.Env.fold (fun x c acc ->
if (Syntax.is_privileged x || Syntax.is_scope x) ||
if Syntax.(is_privileged x || is_scope x) ||
T.(match Cons.kind c with
| Def ([], Prim _)
| Def ([], Any)
Expand Down Expand Up @@ -271,7 +271,7 @@ let emit_unused_warnings env =
List.iter emit list

let ignore_warning_for_id id =
Syntax.is_underscored id || Syntax.is_privileged id
Syntax.(is_underscored id || is_privileged id)

let detect_unused env inner_identifiers =
if not env.pre && env.check_unused then
Expand Down

0 comments on commit 175eb8a

Please sign in to comment.