call-with-message msg-receive msg-val
- ez-run-hive
+ run-hive
bootstrap-message
serialize-message write-message
;;; 8sync bootstrap utilities
;;; =========================
-(define* (ez-run-hive hive initial-tasks)
+(define* (run-hive hive initial-tasks)
"Start up an agenda and run HIVE in it with INITIAL-TASKS."
(let* ((queue (list->q initial-tasks))
(agenda (make-agenda #:pre-unwind-handler print-error-and-continue