浏览代码

ignore _g* vars for debugging (generated by compiler)

Nicolas Cannasse 8 年之前
父节点
当前提交
5bde6cdd7c
共有 1 个文件被更改,包括 4 次插入0 次删除
  1. 4 0
      src/generators/genhl.ml

+ 4 - 0
src/generators/genhl.ml

@@ -941,7 +941,11 @@ let real_name v =
 	in
 	loop v.v_meta
 
+let is_gen_local v =
+	String.length v.v_name >= 2 && String.unsafe_get v.v_name 0 = '_' && String.unsafe_get v.v_name 1 = 'g'
+
 let add_assign ctx v =
+	if is_gen_local v then () else
 	let name = real_name v in
 	ctx.m.massign <- (alloc_string ctx name, current_pos ctx - 1) :: ctx.m.massign