Add machine field to Worker table.
* src/sql/upgrade-2.sql: New file. * Makefile.am (dist_sql_DATA): Add it. * src/schema.sql (Workers): Add "machine field". * src/cuirass/database.scm (db-get-builds): Return "worker" field. (db-add-worker): Honor new "machine" field. (db-get-workers): Ditto. * src/cuirass/remote-worker.scm (remote-worker): Adapt it. * src/cuirass/remote.scm (<worker>)[machine]: New field. (worker-machine): New procedure. (worker->sexp, sexp->worker): Adapt accordingly. (generate-worker-name): Ditto. * tests/database.scm (%dummy-worker): Add "machine" field.
Showing
- Makefile.am 2 additions, 1 deletionMakefile.am
- src/cuirass/database.scm 8 additions, 5 deletionssrc/cuirass/database.scm
- src/cuirass/remote-worker.scm 4 additions, 2 deletionssrc/cuirass/remote-worker.scm
- src/cuirass/remote.scm 15 additions, 9 deletionssrc/cuirass/remote.scm
- src/schema.sql 1 addition, 0 deletionssrc/schema.sql
- src/sql/upgrade-2.sql 6 additions, 0 deletionssrc/sql/upgrade-2.sql
- tests/database.scm 1 addition, 0 deletionstests/database.scm
Loading
Please register or sign in to comment