Differences From Artifact [ec94e568ab]:
- File commonmod.scm — part of check-in [d5a5af944d] at 2024-02-03 19:48:52 on branch v1.80-revolution-remodularization — server and repl now work (user: matt, size: 98636) [annotate] [blame] [check-ins using]
To Artifact [5b4b945014]:
- File commonmod.scm — part of check-in [d44e27b773] at 2024-02-04 21:21:37 on branch v1.80-revolution-remodularization — wip (user: matt, size: 98807) [annotate] [blame] [check-ins using]
| ︙ | |||
2727 2728 2729 2730 2731 2732 2733 2734 2735 2736 | 2727 2728 2729 2730 2731 2732 2733 2734 2735 2736 2737 2738 2739 2740 | + + + + |
(define (common:get-full-version)
(conc megatest-version "-" megatest-fossil-hash))
(define (common:version-signature)
(conc megatest-version "-" (substring megatest-fossil-hash 0 4)))
(define (common:get-fields cfgdat)
(let ((fields (hash-table-ref/default cfgdat "fields" '())))
(map car fields)))
(define keys:config-get-fields common:get-fields)
)
|