Skip to content
Snippets Groups Projects
Commit d24d2250 authored by Andre Maroneze's avatar Andre Maroneze Committed by David Bühler
Browse files

[Aorai] properly handle int parsing errors

parent 753c8a1d
No related branches found
No related tags found
No related merge requests found
......@@ -739,8 +739,13 @@ let type_expr metaenv env ?tr ?current e =
let var = Logic_const.tvar (Cil.cvar_to_lvar (find_metavar s metaenv)) in
env, var, cond
| PCst (Logic_ptree.IntConstant s) ->
let e = Cil.parseIntLogic ~loc s in
env, e, cond
begin
try
let e = Cil.parseIntLogic ~loc s in
env, e, cond
with ParseIntError msg ->
raise_error msg
end
| PCst (Logic_ptree.FloatConstant str) ->
env, Logic_utils.parse_float ~loc str, cond
| PCst (Logic_ptree.StringConstant s) ->
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment