diff options
Diffstat (limited to 'backend/LICMaux.ml')
-rw-r--r-- | backend/LICMaux.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/backend/LICMaux.ml b/backend/LICMaux.ml index 602d078d..df98077b 100644 --- a/backend/LICMaux.ml +++ b/backend/LICMaux.ml @@ -23,7 +23,7 @@ type reg = P.t;; let debug_flag = ref false let debug fmt = - if !debug_flag then Printf.eprintf fmt + if !debug_flag then (flush stderr; Printf.eprintf fmt) else Printf.ifprintf stderr fmt type vstate = Unvisited | Processed | Visited |