erts: GC needs the size even if the frag is not referenced

erlang · Mar 25, 2015 · 73b1ce1 · 73b1ce1
1 parent 43b633e
commit 73b1ce1
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/erts/emulator/beam/erl_map.c b/erts/emulator/beam/erl_map.c
@@ -1008,6 +1008,7 @@ static Eterm flatmap_merge(Process *p, Eterm nodeA, Eterm nodeB) {
 
     n = n1 + n2 - unused_size;
     *thp = make_arityval(n);
+    mp_new->size = n;
 
     /* Reshape map to a hashmap if the map exceeds the limit */
 
@@ -1043,8 +1044,6 @@ static Eterm flatmap_merge(Process *p, Eterm nodeA, Eterm nodeB) {
 	return res;
     }
 
-    mp_new->size = n;
-
     return make_flatmap(mp_new);
 }