aboutsummaryrefslogtreecommitdiff
path: root/stm/stm.ml
diff options
context:
space:
mode:
authorCarst Tankink2014-08-01 11:47:16 +0200
committerEnrico Tassi2014-08-04 16:15:00 +0200
commit5264d9340c7c03852d4903bf1c063cad542df834 (patch)
treeb86f205286f4491c95d97bf2133697807d283b8e /stm/stm.ml
parent188b47917ed7de53fe5c37a39c8463a804fae038 (diff)
STM: encapsulate Pp.message in Feedback.feedback
Diffstat (limited to 'stm/stm.ml')
-rw-r--r--stm/stm.ml1
1 files changed, 1 insertions, 0 deletions
diff --git a/stm/stm.ml b/stm/stm.ml
index eb1c4df1bd..697fd9c8fe 100644
--- a/stm/stm.ml
+++ b/stm/stm.ml
@@ -1107,6 +1107,7 @@ end = struct
feedback_queue := [];
flush oc in
Pp.set_feeder (slave_feeder !slave_oc);
+ Pp.log_via_feedback ();
Universes.set_remote_new_univ_level (bufferize (fun () ->
marshal_response !slave_oc RespGetCounterNewUnivLevel;
match unmarshal_more_data !slave_ic with