aboutsummaryrefslogtreecommitdiff
path: root/stm/spawned.ml
diff options
context:
space:
mode:
Diffstat (limited to 'stm/spawned.ml')
-rw-r--r--stm/spawned.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/stm/spawned.ml b/stm/spawned.ml
index 5cc8be78f5..ee9c8e9942 100644
--- a/stm/spawned.ml
+++ b/stm/spawned.ml
@@ -11,7 +11,7 @@
open Spawn
let pr_err s = Printf.eprintf "(Spawned,%d) %s\n%!" (Unix.getpid ()) s
-let prerr_endline s = if !Flags.debug then begin pr_err s end else ()
+let prerr_endline s = if CDebug.(get_flag misc) then begin pr_err s end else ()
type chandescr = AnonPipe | Socket of string * int * int