Overview
| Comment: | fixed bug in (rmt:test-set-state-status-by-id) that resulted in stack dump |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | v1.64 |
| Files: | files | file ages | folders |
| SHA1: |
1d610e33751bc0d51f64eececf385678 |
| User & Date: | bjbarcla on 2017-06-20 13:04:18 |
| Other Links: | branch diff | manifest | tags |
Context
|
2017-06-20
| ||
| 15:19 | updated unittests/tests.scm check-in: 1fa3b7d422 user: bjbarcla tags: v1.64 | |
| 13:04 | fixed bug in (rmt:test-set-state-status-by-id) that resulted in stack dump check-in: 1d610e3375 user: bjbarcla tags: v1.64 | |
|
2017-06-17
| ||
| 09:09 | Side fix to mtutil check-in: 06a1cb9d9b user: matt tags: v1.64 | |
Changes
Modified api.scm from [f9c2df9786] to [1f6842e15f].
| ︙ | ︙ | |||
152 153 154 155 156 157 158 |
((get-keys-write) (db:get-keys dbstruct)) ;; force a dummy "write" query to force server; for debug in -repl
;; SERVERS
((start-server) (apply server:kind-run params))
((kill-server) (set! *server-run* #f))
;; TESTS
| > | > > > > > > > > > > > > > > | 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 |
((get-keys-write) (db:get-keys dbstruct)) ;; force a dummy "write" query to force server; for debug in -repl
;; SERVERS
((start-server) (apply server:kind-run params))
((kill-server) (set! *server-run* #f))
;; TESTS
;;((test-set-state-status-by-id) (apply mt:test-set-state-status-by-id dbstruct params))
;;BB - commented out above because it was calling below, eventually, incorrectly (dbstruct passed to mt:test-set-state-status-by-id, which previosly did more, but now only passes thru to db:set-state-status-and-roll-up-items.
((test-set-state-status-by-id)
;; (define (db:set-state-status-and-roll-up-items dbstruct run-id test-name item-path state status comment)
(db:set-state-status-and-roll-up-items
dbstruct
(list-ref params 0) ; run-id
(list-ref params 1) ; test-name
#f ; item-path
(list-ref params 2) ; state
(list-ref params 3) ; status
(list-ref params 4) ; comment
))
((delete-test-records) (apply db:delete-test-records dbstruct params))
((delete-old-deleted-test-records) (apply db:delete-old-deleted-test-records dbstruct params))
((test-set-state-status) (apply db:test-set-state-status dbstruct params))
((test-set-top-process-pid) (apply db:test-set-top-process-pid dbstruct params))
((set-state-status-and-roll-up-items) (apply db:set-state-status-and-roll-up-items dbstruct params))
((top-test-set-per-pf-counts) (apply db:top-test-set-per-pf-counts dbstruct params))
((test-set-archive-block-id) (apply db:test-set-archive-block-id dbstruct params))
|
| ︙ | ︙ |