Hint Rewrite is_pointer_or_null_match using assumption : norm1.

(* Specifications: *)
Lemma is_pointer_force_int_ptr2:
forall v, isptr v ->
match v with
| Vint _ => if Archi.ptr64 then None else Some v
| Vlong _ => if Archi.ptr64 then Some v else None
| Vptr _ _ => Some v
| _ => None
end = Some v.