Megatest

Check-in [c5853b67b1]
Login
Overview
Comment:Fixed minor breakage from previous commit
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | run-mgr
Files: files | file ages | folders
SHA1: c5853b67b1e6ff01aba0da66b868f7536492fa5d
User & Date: matt on 2017-02-16 21:52:42
Other Links: branch diff | manifest | tags
Context
2017-02-16
22:06
Fixed launching of viewscreen causing hesitation on cleanrunexecute check-in: d2a7fb2fe4 user: matt tags: run-mgr
21:52
Fixed minor breakage from previous commit check-in: c5853b67b1 user: matt tags: run-mgr
21:42
Fixed wildcards in runconfigs, cleared some output debug noise. check-in: 2feae1cd63 user: matt tags: run-mgr
Changes

Modified db.scm from [3ef8737d8d] to [b010476b5f].

2526
2527
2528
2529
2530
2531
2532

2533
2534
2535
2536
2537
2538
2539
2526
2527
2528
2529
2530
2531
2532
2533
2534
2535
2536
2537
2538
2539
2540







+







;;
;;      NOTE: run-id is not used
;; ;;
(define (db:test-set-state-status dbstruct run-id test-id newstate newstatus newcomment)
  (db:with-db
   dbstruct
   ;; run-id
   #f
   #t
   (lambda (db)
     (cond
      ((and newstate newstatus newcomment)
       (sqlite3:execute db "UPDATE tests SET state=?,status=?,comment=? WHERE id=?;" newstate newstatus newcomment ;; (sdb:qry 'getid newcomment)
			test-id))
      ((and newstate newstatus)