fact: Definition f_abort_with := {| fn_return := tvoid; fn_callconv := cc_default; fn_params := ((_s, (tptr tschar)) :: nil); fn_vars := nil; fn_temps := ((_t'1, (tptr (Tstruct ___sFILE noattr))) :: nil); fn_body := (Ssequence (Ssequence (Sset _t'1 (Evar ___stderrp (tptr (Tstruct ___sFILE noattr)))) (Scall None (Evar _fprintf (Tfunction (Tcons (tptr (Tstruct ___sFILE noattr)) (Tcons (tptr tschar) Tnil)) tint {|cc_vararg:=(Some 2); cc_unproto:=false; cc_structret:=false|})) ((Etempvar _t'1 (tptr (Tstruct ___sFILE noattr))) :: (Evar ___stringlit_1 (tarray tschar 3)) :: (Etempvar _s (tptr tschar)) :: nil))) (Scall None (Evar _exit (Tfunction (Tcons tint Tnil) tvoid cc_default)) ((Econst_int (Int.repr 1) tint) :: nil))) |}.
imports: Coq(String List ZArith) compcert(Coqlib Integers Floats AST Ctypes Cop Clight Clightdefs)