1 ; Copyright 2022 Frank Duncan (frank@consxy.com) under AGPL3. See distributed LICENSE.txt.
2 (in-package #:candle-local)
5 (defvar *candle-location*)
7 (defmethod candle:process-job-in-system ((job-system (eql :local)) job)
9 ((work-dir (format nil "~Awork/" candle:*candle-dir*))
17 (candle:project-dir (candle:job-project job))
20 (with-output-to-string (out-str)
22 (sb-ext:process-exit-code
30 (values (zerop code) out)))
32 ; NOOP as there is no service that needs to be cleaned up
33 (defmethod candle:shutdown-system ((job-system (eql :local))))