Просмотр исходного кода

fixed hash conflict resolution

ncannasse 6 лет назад
Родитель
Сommit
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