From 8e91dcb281a982f3da257ec2d8d76010ebe53360 Mon Sep 17 00:00:00 2001
From: Louis Gesbert <louis.gesbert@ocamlpro.com>
Date: Wed, 28 Aug 2024 14:09:02 +0200
Subject: [PATCH] Apply suggestions from code review

Thanks @vincent-botbol

Co-authored-by: vbot <vincent.botbol@inria.fr>
---
 compiler/scalc/print.ml | 2 --
 1 file changed, 2 deletions(-)

diff --git a/compiler/scalc/print.ml b/compiler/scalc/print.ml
index a3703cdc..fd80fe69 100644
--- a/compiler/scalc/print.ml
+++ b/compiler/scalc/print.ml
@@ -22,11 +22,9 @@ let needs_parens (_e : expr) : bool = false
 
 let format_var_name (fmt : Format.formatter) (v : VarName.t) : unit =
   VarName.format fmt v
-(* Format.fprintf fmt "%a_%d" VarName.format v (VarName.id v) *)
 
 let format_func_name (fmt : Format.formatter) (v : FuncName.t) : unit =
   FuncName.format fmt v
-(* Format.fprintf fmt "@{<green>%a_%d@}" FuncName.format v (FuncName.id v) *)
 
 let rec format_expr
     (decl_ctx : decl_ctx)