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