Improve {Map, Set}.union.
authorMilan Straka <fox@ucw.cz>
Fri, 27 Apr 2012 09:51:48 +0000 (11:51 +0200)
committerMilan Straka <fox@ucw.cz>
Fri, 27 Apr 2012 09:51:48 +0000 (11:51 +0200)
commitcd96a9045df8d2f8d98d9ec6e13c4a2492f0836b
treed64ad81c0647c298258e6ad93b703b3d47dce4ce
parentb19776e51d99f9264c9449952950f5f6071a0aa3
Improve {Map, Set}.union.

Instead of having a special case set `union` set_of_size_1 in union,
move it to hedgeUnion, so it can be used recursively. Benchmark shows up
to 30% speedup.
Data/Map/Base.hs
Data/Set/Base.hs