diff options
Diffstat (limited to 'database/run.lisp')
| -rw-r--r-- | database/run.lisp | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/database/run.lisp b/database/run.lisp index 5b7d24b..a2d7cf1 100644 --- a/database/run.lisp +++ b/database/run.lisp @@ -1,11 +1,11 @@ (mito:deftable run () - ((category :col-type category)) + ((category :col-type category :accessor run-category)) (:record-timestamps nil) (:conc-name run-)) (mito:deftable run-split () - ((run :col-type run) - (category-split :col-type category-split) + ((run :col-type run :accessor run-split-run) + (category-split :col-type category-split :accessor run-split-category-split) (start-timestamp :col-type (or :bigint :null)) (end-timestamp :col-type (or :bigint :null))) (:record-timestamps nil) |