let mk_global_c_vars name ty =
  let vi = (Cil.makeGlobalVar ~logic:true name ty) in
    vi.vghost<-true;
    let ini = {init=Some(Cil.makeZeroInit ty)} in
      globals_queue:=GVar(vi,ini,vi.vdecl)::(!globals_queue);
      Globals.Vars.add vi ini;
      set_varinfo name vi