anchor.diff:      (assert-equal (map-all.msgmap-get test 0) nil)
       (assert-equal (map-all.enummap-get test 0) :one)))
   
  +
  +; Verify that generic (de)serialization works.
   (deftest serialization-test (map-tests)
     (let ((test1 (make-map-proto :strval "test" :intval 1))
           (submsg1 (make-map-message.val-message :strval "one"))
  
positive.code:       (assert-true (proto:proto-equal test2 t2res))
        (assert-true (proto:proto-equal test3 t3res)))))
  
  (deftest optimized-serialization-test (map-tests)
    (proto-impl:make-serializer map-proto)
    (proto-impl:make-serializer map-message.val-message)
  
negative.code:     (assert (= (slot-value result 'clunit::failed) 0))
      (assert (= (slot-value result 'clunit::errors) 0))))
  
  ; todo(benkuehnert):
  ; - Test maps with aliased types as the value.
  ; - Test map type text format
  
  ; Tests that accessor functions are working: put, get, remove, has.
  (deftest accessor-check (map-tests)
    (let ((m (make-map-proto)))
      (assert-true (not (map-proto.has-map-field m)))
  