浏览代码

fixed hash conflict resolution

ncannasse 6 年之前
父节点
当前提交
21a9280b72
共有 1 个文件被更改,包括 1 次插入0 次删除
  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