diff options
| author | Hugo Herbelin | 2017-09-11 09:33:32 +0200 |
|---|---|---|
| committer | Hugo Herbelin | 2017-09-11 09:44:34 +0200 |
| commit | d3856bd7f6fb903a20124d57ea2a7bd6154b9039 (patch) | |
| tree | 881d0cd1373dd79c2fe0acc20386727f604ed314 /stm/asyncTaskQueue.ml | |
| parent | 1b0a6cc670abd4118f4def0d4a3fdf358afb92d3 (diff) | |
In stm, fixing a typo about flushing debugging messages.
Diffstat (limited to 'stm/asyncTaskQueue.ml')
| -rw-r--r-- | stm/asyncTaskQueue.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/stm/asyncTaskQueue.ml b/stm/asyncTaskQueue.ml index 9c58df5b21..31ede2d8b7 100644 --- a/stm/asyncTaskQueue.ml +++ b/stm/asyncTaskQueue.ml @@ -10,7 +10,7 @@ open CErrors open Pp open Util -let stm_pr_err pp = Format.eprintf "%s] @[%a@]%!\n" (System.process_id ()) Pp.pp_with pp +let stm_pr_err pp = Format.eprintf "%s] @[%a@]\n%!" (System.process_id ()) Pp.pp_with pp let stm_prerr_endline s = if !Flags.debug then begin stm_pr_err (str s) end else () |