Megatest

Diff
Login

Differences From Artifact [fd3c73f7ce]:

To Artifact [32ab28635d]:


548
549
550
551
552
553
554
















555
556
557
558
559
560
561
			 ;; I have been having trouble with init of no-sync.db so
			 ;; doing the init in a transaction every time (no gating
			 ;; on file existance.
			  (for-each
			   (lambda (stmt)
			     (sqlite3:execute db stmt))
			   (list
















			    "CREATE TABLE IF NOT EXISTS no_sync_metadat
                                (var TEXT,
                                 val TEXT,
                                   CONSTRAINT no_sync_metadat_constraint UNIQUE (var));"
			    "CREATE TABLE IF NOT EXISTS no_sync_locks 
                                (key TEXT,
                                 val TEXT,







>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>







548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
			 ;; I have been having trouble with init of no-sync.db so
			 ;; doing the init in a transaction every time (no gating
			 ;; on file existance.
			  (for-each
			   (lambda (stmt)
			     (sqlite3:execute db stmt))
			   (list
			    "CREATE TABLE IF NOT EXISTS jobs_queue
                                (id INTEGER PRIMARY KEY,
                                 host_type TEXT,
                                 cores INTEGER,
                                 memory TEXT,
                                 vars TEXT,
                                 exekey TEXT,
                                 cmdline TEXT,
                                 state TEXT,
                                 event_time INTEGER,
                                 last_update INTEGER);"
			    "CREATE TABLE IF NOT EXISTS test_extra_data
                                (id INTEGER PRIMARY KEY,
                                 run_id INTEGER,
                                 test_id INTEGER,
                                 last_seen_running INTEGER);"
			    "CREATE TABLE IF NOT EXISTS no_sync_metadat
                                (var TEXT,
                                 val TEXT,
                                   CONSTRAINT no_sync_metadat_constraint UNIQUE (var));"
			    "CREATE TABLE IF NOT EXISTS no_sync_locks 
                                (key TEXT,
                                 val TEXT,