Browse Source

fixed hash conflict resolution

ncannasse 6 năm trước cách đây
mục cha
commit
21a9280b72
1 tập tin đã thay đổi với 1 bổ sung0 xóa
  1. 1 0
      src/generators/hl2c.ml

+ 1 - 0
src/generators/hl2c.ml

@@ -196,6 +196,7 @@ let hash ctx sid =
 		in
 		let h = loop (hl_hash ctx.hlcode.strings.(sid)) in
 		Hashtbl.add ctx.hash_cache sid h;
+		Hashtbl.add ctx.hash_mem h true;
 		ctx.hash_cache_list <- sid :: ctx.hash_cache_list;
 		h