Skip to content

Commit

Permalink
Simplify marshal
Browse files Browse the repository at this point in the history
  • Loading branch information
michael-schwarz committed Dec 4, 2023
1 parent d1b6228 commit 4a848e4
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/cdomains/apron/apronDomain.apron.ml
Original file line number Diff line number Diff line change
Expand Up @@ -258,7 +258,7 @@ struct
let vars x = Environment.ivars_only @@ A.env x

let marshal (x: t): marshal =
let vars = Array.map Var.to_string (Array.of_list (Environment.ivars_only (A.env x))) in
let vars = Array.map Var.to_string (Array.of_list (vars x)) in
x.abstract0, vars

let mem_var d v = Environment.mem_var (A.env d) v
Expand Down

0 comments on commit 4a848e4

Please sign in to comment.