Handle Arr and Map cases in blitLinks

This is the function that folds over links necessary to load a value. It
wasn't handling the case for arrays or the new case for maps, so it was
possible to miss dependencies for those sorts of values. Then trying to load
the value would fail if the runtime cache wasn't already primed with the
missing dependencies.

Author: dolio

unison-runtime/src/Unison/Runtime/ANF.hs

@@ -2340,6 +2340,9 @@ instance Referential Cont where
 
 blitLinks :: (Monoid a) => (Bool -> ref -> a) -> BLit ref -> a
 blitLinks f (List s) = foldMap (valueLinks f) s
+blitLinks f (Arr a) = foldMap (valueLinks f) a
+blitLinks f (Map m) =
+  foldMap (\(k, v) -> valueLinks f k <> valueLinks f v) m
 blitLinks _ _ = mempty
 
 instance Referential BLit where