diff options
author | Cyril SIX <cyril.six@kalray.eu> | 2020-12-09 13:03:42 +0100 |
---|---|---|
committer | Cyril SIX <cyril.six@kalray.eu> | 2020-12-09 13:03:42 +0100 |
commit | fac788f255313517de24732370fc3a10dda1b247 (patch) | |
tree | a2d52aab4fddb56ed398f67dd7b1f002f133b314 /backend/LICMaux.ml | |
parent | 9a1d53cd56e21dfca27818d715d527e867f2d68d (diff) | |
download | compcert-kvx-fac788f255313517de24732370fc3a10dda1b247.tar.gz compcert-kvx-fac788f255313517de24732370fc3a10dda1b247.zip |
Flushing debug output
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 |