فهرست منبع

clear files cache before generation

Nicolas Cannasse 9 سال پیش
والد
کامیت
b3440aede8
1فایلهای تغییر یافته به همراه1 افزوده شده و 0 حذف شده
  1. 1 0
      genneko.ml

+ 1 - 0
genneko.ml

@@ -779,6 +779,7 @@ let build ctx types =
 	packs @ methods @ boot :: names @ inits @ vars
 	packs @ methods @ boot :: names @ inits @ vars
 
 
 let generate com =
 let generate com =
+	Hashtbl.clear files;
 	let ctx = new_context com (if Common.defined com Define.NekoV1 then 1 else 2) false in
 	let ctx = new_context com (if Common.defined com Define.NekoV1 then 1 else 2) false in
 	let libs = (EBlock (generate_libs_init com.neko_libs) , { psource = "<header>"; pline = 1; }) in
 	let libs = (EBlock (generate_libs_init com.neko_libs) , { psource = "<header>"; pline = 1; }) in
 	let el = build ctx com.types in
 	let el = build ctx com.types in