Definition init_mem (p: program F V) :=
  alloc_globals (globalenv p) Mem.empty p.(prog_defs).

Lemma store_init_data_list_neutral: forall b idl m p m', Mem.inject_neutral thr m -> Plt b thr -> store_init_data_list ge m b p idl = Some m' -> Mem.inject_neutral thr m'.