Update src/lowering/desugar.ml

dfinity · Oct 16, 2024 · 0877d44 · 0877d44
1 parent 7086198
commit 0877d44
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/lowering/desugar.ml b/src/lowering/desugar.ml
@@ -90,7 +90,7 @@ and exp' at note = function
       (breakE "!" (nullE()))
       (* case ? v : *)
       (varP v) (varE v) ty).it
-  | S.ObjBlockE (s, (self_id_opt,_), dfs) ->
+  | S.ObjBlockE (s, (self_id_opt, _), dfs) ->
     obj_block at s self_id_opt dfs note.Note.typ
   | S.ObjE (bs, efs) ->
     obj note.Note.typ efs bs