Skip to content
Snippets Groups Projects
Commit 09f6f2b2 authored by Kostyantyn Vorobyov's avatar Kostyantyn Vorobyov
Browse files

Disable functionality that re-creates assignments of literal strings

during global initialisation
parent 8e432fc3
No related branches found
No related tags found
No related merge requests found
...@@ -164,12 +164,7 @@ class e_acsl_visitor prj generate = object (self) ...@@ -164,12 +164,7 @@ class e_acsl_visitor prj generate = object (self)
| None -> model stmts, env | None -> model stmts, env
| Some (CompoundInit _) -> assert false | Some (CompoundInit _) -> assert false
| Some (SingleInit e) -> | Some (SingleInit e) ->
let e, env = self#literal_string env e in let _, env = self#literal_string env e in stmts, env)
let stmt =
Cil.mkStmtOneInstr ~valid_sid:true
(Set(Cil.var new_vi, e, e.eloc))
in
model (stmt :: stmts), env)
global_vars global_vars
([ return ], env) ([ return ], env)
in in
......
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