is there a better/shorter way to do this? added by certainty on Tue Feb 18 16:20:52 2014
(define (merge-alists lhs rhs)
(fold (lambda (elt ls) (alist-update (car elt) (cdr elt) ls)) lhs rhs))(define (merge-alists lhs rhs)
(fold (lambda (elt ls) (alist-update (car elt) (cdr elt) ls)) lhs rhs))