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