Overview
Comment: | added usage for typed-records |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | defstruct-srehman |
Files: | files | file ages | folders |
SHA1: |
24c163e8960da543198770dd469f8877 |
User & Date: | srehman on 2016-09-14 14:17:21 |
Other Links: | branch diff | manifest | tags |
Context
2016-09-15
| ||
17:07 | fixed var names check-in: 759d0eca16 user: srehman tags: defstruct-srehman | |
2016-09-14
| ||
14:17 | added usage for typed-records check-in: 24c163e896 user: srehman tags: defstruct-srehman | |
13:50 | fixed syntax for defstruct declaration check-in: 2abc692fe0 user: srehman tags: defstruct-srehman | |
Changes
Modified db_records.scm from [24529c9564] to [d8fe3f2cf4].
︙ | ︙ | |||
61 62 63 64 65 66 67 | (define (dbr:dbstruct-get-localdb v run-id) (hash-table-ref/default (dbr:dbstruct-get-locdbs v) run-id #f)) (define (dbr:dbstruct-set-localdb! v run-id db) (hash-table-set! (dbr:dbstruct-get-locdbs v) run-id db)) | | | | 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 | (define (dbr:dbstruct-get-localdb v run-id) (hash-table-ref/default (dbr:dbstruct-get-locdbs v) run-id #f)) (define (dbr:dbstruct-set-localdb! v run-id db) (hash-table-set! (dbr:dbstruct-get-locdbs v) run-id db)) (require-extension typed-records) (defstruct db:test-rec ((id -1) : number) ((run_id -1) : number) ((testname "") : string) ((state "") : string) ((status "") : string) ((event_time -1) : number) ((host "") : string) ((cpuload -1) : number) |
︙ | ︙ |