Megatest: Artifact [26239e26a3]

Artifact 26239e26a31ba78b8b937e85356512589b695fe3:

File mutils/tests/datastruct.scm — part of check-in [d345134880] at 2019-12-28 22:08:33 on branch v1.70-defunct-try — wip (user: matt, size: 241) [annotate] [blame] [check-ins using] [more...]


(use test)

(include "datastruct.scm")

(define hh (make-hash-table))

(hierhash-set! hh 5 1 2 3 4)

(test 5 (hierhash-ref hh 1 2 3 4))

(hierhash-set! hh 10 1 2 3 5)

(test 10 (hierhash-ref hh 1 2 3 5))
(test 5  (hierhash-ref hh 1 2 3 4))