diff options
| author | Mathieu Lirzin <mthl@gnu.org> | 2016-07-27 19:19:26 +0200 |
|---|---|---|
| committer | Mathieu Lirzin <mthl@gnu.org> | 2016-07-30 23:07:19 +0200 |
| commit | ac4512897c6e08f26f87d9b7ddd9120436610513 (patch) | |
| tree | eb046f2216bdebd9130be902287ed099d21d9648 /tests | |
| parent | ad267dc86aeea70b3e1e83914f808f21ce98118f (diff) | |
| download | cuirass-ac4512897c6e08f26f87d9b7ddd9120436610513.tar cuirass-ac4512897c6e08f26f87d9b7ddd9120436610513.tar.gz | |
schema: Evaluations: Add 'revision' column.
* src/schema.sql (Evaluations): Add 'revision' column.
* src/cuirass/database.scm (db-add-evaluation): Adapt.
All callers changed.
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/database.scm | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/tests/database.scm b/tests/database.scm index eecef8b..8cc022a 100644 --- a/tests/database.scm +++ b/tests/database.scm @@ -59,12 +59,12 @@ (test-assert "sqlite-exec" (begin - (sqlite-exec (%db) - "INSERT INTO Evaluations (specification) VALUES (1);") - (sqlite-exec (%db) - "INSERT INTO Evaluations (specification) VALUES (2);") - (sqlite-exec (%db) - "INSERT INTO Evaluations (specification) VALUES (3);") + (sqlite-exec (%db) "\ +INSERT INTO Evaluations (specification, revision) VALUES (1, 1);") + (sqlite-exec (%db) "\ +INSERT INTO Evaluations (specification, revision) VALUES (2, 2);") + (sqlite-exec (%db) "\ +INSERT INTO Evaluations (specification, revision) VALUES (3, 3);") (sqlite-exec (%db) "SELECT * FROM Evaluations;"))) (test-equal "db-add-specification" |