method vvdec vi =
if isFunctionType vi.vtype then
if not (VarinfoHashtbl.mem functions_with_source vi) then
VarinfoHashtbl.replace functions_no_source vi
(try VarinfoHashtbl.find functions_no_source vi with Not_found -> 0);
DoChildren