hash-table equality added by niadh on Sat Nov 24 13:00:33 2018
(equal? (alist->hash-table (map cons '(SURT: DATE:) '(1 2))) (alist->hash-table (map cons '(DATE: SURT:) '(2 1))))
(equal? (alist->hash-table (map cons '(SURT: DATE:) '(1 2))) (alist->hash-table (map cons '(DATE: SURT:) '(2 1))))