aboutsummaryrefslogtreecommitdiffstats
path: root/backend/Profilingaux.ml
diff options
context:
space:
mode:
authorDavid Monniaux <david.monniaux@univ-grenoble-alpes.fr>2020-04-10 08:25:00 +0200
committerDavid Monniaux <david.monniaux@univ-grenoble-alpes.fr>2020-04-10 08:25:00 +0200
commitcc8893f2357a832bfd86030c3d80b80439502fec (patch)
tree066df20ead1a122ea1f0db8582bf2aed170dba54 /backend/Profilingaux.ml
parentc69d601f9222c1adc4a918d3edb88cf802137a16 (diff)
downloadcompcert-kvx-cc8893f2357a832bfd86030c3d80b80439502fec.tar.gz
compcert-kvx-cc8893f2357a832bfd86030c3d80b80439502fec.zip
begin factorizing profiler
Diffstat (limited to 'backend/Profilingaux.ml')
-rw-r--r--backend/Profilingaux.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/backend/Profilingaux.ml b/backend/Profilingaux.ml
index 51718303..a1d41ceb 100644
--- a/backend/Profilingaux.ml
+++ b/backend/Profilingaux.ml
@@ -55,6 +55,6 @@ let load_profiling_info (filename : string) : unit =
let condition_oracle (id : identifier) : bool option =
let (count0, count1) = get_counts id in
- Printf.fprintf stderr "%a : %Ld %Ld\n" pp_id id count0 count1;
+ (* Printf.fprintf stderr "%a : %Ld %Ld\n" pp_id id count0 count1; *)
if count0 = count1 then None
else Some(count1 > count0);;