Megatest

Check-in [b0eb665b87]
Login
Overview
Comment:Missing import.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | v1.6569-multi-db-wip
Files: files | file ages | folders
SHA1: b0eb665b8795165111be1a2a8a5978c88ecfc6e1
User & Date: matt on 2021-02-15 14:44:51
Other Links: branch diff | manifest | tags
Context
2021-02-15
15:28
More missing imports. check-in: 3084088d75 user: matt tags: v1.6569-multi-db-wip (unpublished)
14:44
Missing import. check-in: b0eb665b87 user: matt tags: v1.6569-multi-db-wip (unpublished)
14:44
Missing import. check-in: 47be7624cb user: matt tags: v1.6569-multi-db-wip (unpublished)
Changes

Modified items.scm from [07a121ab4e] to [c9b6afabe6].

22
23
24
25
26
27
28



29
30
31
32
33
34
35
;; 		     (season      "summer winter fall spring")))

(declare (unit items))
(declare (uses common))

(declare (uses commonmod))
(import commonmod)




(include "common_records.scm")

;; Puts out all combinations
(define (process-itemlist hierdepth curritemkey itemlist)
  (let ((res '()))
    (if (not hierdepth)







>
>
>







22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
;; 		     (season      "summer winter fall spring")))

(declare (unit items))
(declare (uses common))

(declare (uses commonmod))
(import commonmod)

(declare (uses configfmod))
(import configfmod)

(include "common_records.scm")

;; Puts out all combinations
(define (process-itemlist hierdepth curritemkey itemlist)
  (let ((res '()))
    (if (not hierdepth)