simponic/speedrun-timer
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Add manual accessors to fix weird accessor issues on linux

Browse Source
This commit is contained in:
Logan Hunt 2022-07-10 16:18:36 -07:00
parent e718ef491d
commit e7bcc0e863
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
database/category.lisp
View File

@ -6,7 +6,7 @@
(mito:deftable category-split () (mito:deftable category-split ()
((name :col-type (:varchar 128)) ((name :col-type (:varchar 128))
(category :col-type category)) (category :col-type category :accessor category-split-category))
(:record-timestamps nil) (:record-timestamps nil)
(:conc-name category-split-)) (:conc-name category-split-))

6
database/run.lisp
View File

@ -1,11 +1,11 @@
(mito:deftable run () (mito:deftable run ()
((category :col-type category)) ((category :col-type category :accessor run-category))
(:record-timestamps nil) (:record-timestamps nil)
(:conc-name run-)) (:conc-name run-))
(mito:deftable run-split () (mito:deftable run-split ()
((run :col-type run) ((run :col-type run :accessor run-split-run)
(category-split :col-type category-split) (category-split :col-type category-split :accessor run-split-category-split)
(start-timestamp :col-type (or :bigint :null)) (start-timestamp :col-type (or :bigint :null))
(end-timestamp :col-type (or :bigint :null))) (end-timestamp :col-type (or :bigint :null)))
(:record-timestamps nil) (:record-timestamps nil)