diff options
author | Léo Gourdin <leo.gourdin@lilo.org> | 2021-07-28 10:32:09 +0200 |
---|---|---|
committer | Léo Gourdin <leo.gourdin@lilo.org> | 2021-07-28 10:32:09 +0200 |
commit | 056658bd2986d9e12ac07a54d25c08eb8a62ff60 (patch) | |
tree | 93e3f9a49f656bc8cf1ea3aa460ea2be1c083915 /scheduling/RTLtoBTLaux.ml | |
parent | 77ee161826e24e87f801cbbeb797fb3a4a4a0fe9 (diff) | |
download | compcert-kvx-056658bd2986d9e12ac07a54d25c08eb8a62ff60.tar.gz compcert-kvx-056658bd2986d9e12ac07a54d25c08eb8a62ff60.zip |
remove todos, clean
Diffstat (limited to 'scheduling/RTLtoBTLaux.ml')
-rw-r--r-- | scheduling/RTLtoBTLaux.ml | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/scheduling/RTLtoBTLaux.ml b/scheduling/RTLtoBTLaux.ml index 3de82d96..d544e87f 100644 --- a/scheduling/RTLtoBTLaux.ml +++ b/scheduling/RTLtoBTLaux.ml @@ -67,7 +67,6 @@ let translate_function code entry join_points liveness = | Some s -> ( match inst with | Icond (cond, lr, ifso, ifnot, info) -> - (* TODO gourdinl remove this *) assert (s = ifnot); next_nodes := !next_nodes @ non_predicted_successors inst psucc; iinfo.pcond <- info; @@ -100,7 +99,6 @@ let rtl2btl (f : RTL.coq_function) = let liveness = analyze f in let btl = translate_function code entry join_points liveness in let dm = PTree.map (fun n i -> n) btl in - (* TODO gourdinl move elsewhere *) (*debug_flag := true;*) debug "Entry %d\n" (p2i entry); debug "RTL Code: "; |