on master help sign in
ARGH
5d5b1cbBryan O'Sullivan
Data/Aeson/Types/Internal.hs+1−1
@@ -226,7 +226,7 @@ instance NFData Value where
226obj_rnf :: (NFData k, NFData v) => Map k v -> ()
226obj_rnf :: (NFData k, NFData v) => Map k v -> ()
227#if MIN_VERSION_containers(0,4,2)
227#if MIN_VERSION_containers(0,4,2)
228obj_rnf = rnf
228obj_rnf = rnf
229−#elif MIN_VERSION_containers(0,4,0)
229+#elif MIN_VERSION_containers(0,4,1)
230obj_rnf = M.foldlWithKey' (\_ k v -> rnf k `seq` rnf v) ()
230obj_rnf = M.foldlWithKey' (\_ k v -> rnf k `seq` rnf v) ()
231#else
231#else
232obj_rnf = rnf . M.toList
232obj_rnf = rnf . M.toList