X-Git-Url: https://code.consxy.com/gitweb/gitweb.cgi?p=candle;a=blobdiff_plain;f=src%2Fmain%2Fbase.lisp;h=e47c0fb8858318e145c107b349f0253fc9eff3bf;hp=3fe9dbe1fa5749f90e42157f418aeccf63c290ee;hb=90a0214bc3b5136af1c0d88ca11e5afe3564c1fc;hpb=b2b606982b84a98e1f4b07e55cf5dc3ca1aa454e diff --git a/src/main/base.lisp b/src/main/base.lisp index 3fe9dbe..e47c0fb 100644 --- a/src/main/base.lisp +++ b/src/main/base.lisp @@ -3,7 +3,18 @@ (defvar *candle-dir*) (lame-db:defdbstruct project name src) + +; Status here is: +; - :queued - to be run +; - :failed - job failed +; - :succeeded - job succeeded +; - :no-candle-file - no candle file was found +; - :in-progress - job is running (lame-db:defdbstruct job status sha when-run (project :join project)) +; in-git here refers to whether the branch exists in git. As branches get deleted, +; this will get set to nil but we keep them around for historical reference +(lame-db:defdbstruct branch name in-git (project :join project) (job :join job)) + (defun project-dir (project) (format nil "~Arepos/~A/" *candle-dir* (project-name project)))