Frama-C-discuss mailing list archives

This page gathers the archives of the old Frama-C-discuss archives, that was hosted by Inria's gforge before its demise at the end of 2020. To search for mails newer than September 2020, please visit the page of the new mailing list on Renater.

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Frama-c-discuss] About the slicing plugin. (slicing speed on slicing zones)

  • Subject: [Frama-c-discuss] About the slicing plugin. (slicing speed on slicing zones)
  • From: abiao.yang at gmail.com (David Yang)
  • Date: Mon, 23 Sep 2013 15:10:12 +0800
Dear all,

uh... The following code is my function for slicing a punch of zones.

let slice_zones zones kf =
    let prj = !Db.Slicing.Project.mk_project "zones slice" in
    let mark = !Db.Slicing.Mark.make ~data:true ~addr:true ~ctrl:true in
    let ref_sel_set = ref Db.Slicing.Select.empty_selects in
    List.iter
        (fun z ->
            ref_sel_set := !Db.Slicing.select_func_zone !ref_sel_set mark z
kf
        ) zones;
    !Db.Slicing.Request.add_selection prj !ref_sel_set;
    !Db.Slicing.Request.apply_all prj ~propagate_to_callers:false;
    !Db.Slicing.Slice.get_all prj kf;
;;
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.gforge.inria.fr/pipermail/frama-c-discuss/attachments/20130923/1f0f6b34/attachment.html>