Returned ensure thread is running.

mdbergmann · Jan 15, 2025 · da61abf · da61abf
1 parent 3df36a7
commit da61abf
Showing 1 changed file with 2 additions and 3 deletions.
diff --git a/src/mbox/message-box.lisp b/src/mbox/message-box.lisp
@@ -241,8 +241,7 @@ It will be apply'ed with the rest of the args when the message was 'popped' from
        (bt2:with-lock-held (withreply-lock)
          (log:trace "~a: pushing item to queue: ~a" (name msgbox) push-item)
          (queue:pushq queue push-item)
-         ;; (ensure-thread-is-running msgbox)
-         )
+         (ensure-thread-is-running msgbox))
 
        ;; It is important to leave lock withreply-lock
        ;; before we will wait for result. Otherwisee handler-fun
@@ -253,7 +252,7 @@ It will be apply'ed with the rest of the args when the message was 'popped' from
        (bt2:with-lock-held (withreply-lock)
          (log:trace "~a: pushing item to queue: ~a" (name msgbox) push-item)
          (queue:pushq queue push-item)
-         ;; (ensure-thread-is-running msgbox)
+         (ensure-thread-is-running msgbox)
 
          (log:trace "~a: withreply: waiting for arrival of result..." (name msgbox))
          (bt2:condition-wait withreply-cvar withreply-lock))))