review suggestion

dfinity · Aug 2, 2024 · 31cf9cc · 31cf9cc
1 parent e02db3d
commit 31cf9cc
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/src/ir_def/construct.ml b/src/ir_def/construct.ml
@@ -76,9 +76,9 @@ let wildP =
 (* Primitives *)
 
 let varE (id, typ) =
-  if T.is_mut typ
-  then { it = VarE (Var, id); at = no_region; note = Note.{ def with typ = T.as_immut typ } }
-  else { it = VarE (Const, id); at = no_region; note = Note.{ def with typ } }
+  { it = VarE ((if T.is_mut typ then Var else Const), id)
+  ; at = no_region
+  ; note = Note.{ def with typ = T.as_immut typ } }
 
 let varLE (id, typ) =
   { it = VarLE id; at = no_region; note = typ }