We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent e559cb6 commit 1b8d70aCopy full SHA for 1b8d70a
src/analyses/extractPthread.ml
@@ -233,15 +233,15 @@ let promela_main : fun_name = "mainfun"
233
(* assign tid: promela_main -> 0 *)
234
let _ = Tbls.ThreadTidTbl.get promela_main
235
236
-let fun_ctx man f =
237
- let man_hash =
238
- match PthreadDomain.Ctx.to_int man with
+let fun_ctx ctx f =
+ let ctx_hash =
+ match PthreadDomain.Ctx.to_int ctx with
239
| Some i ->
240
i |> i64_to_int |> Tbls.CtxTbl.get |> string_of_int
241
| None ->
242
"TOP"
243
in
244
- f.vname ^ "_" ^ man_hash
+ f.vname ^ "_" ^ ctx_hash
245
246
247
module Tasks = SetDomain.Make (Lattice.Prod (Queries.AD) (PthreadDomain.D))
0 commit comments