Spec (p.goblint.1.1.1.doc.goblint.lib.Extract

include module type of struct include Analyses.DefaultSpec end

type marshal = unit

val should_join : 'a -> 'b -> bool

val call_descr : Cil.fundec -> 'a -> string

val intrpt : ('a, 'b, 'c) Analyses.ctx -> 'a

val vdecl : ('a, 'b, 'c) Analyses.ctx -> 'd -> 'a

val asm : ('a, 'b, 'c) Analyses.ctx -> 'a

val skip : ('a, 'b, 'c) Analyses.ctx -> 'a

val event : ('a, 'b, 'c) Analyses.ctx -> 'd -> 'e -> 'a

val morphstate : 'a -> 'b -> 'b

val sync : ('a, 'b, 'c) Analyses.ctx -> 'd -> 'a

val context : 'a -> 'b -> 'b

val name : unit -> string

module Pid = IntDomain.Flattened

module Ctx = IntDomain.Flattened

module Pred : sig ... end

module D : sig ... end

module C = D

module Tasks : sig ... end

module G = Tasks

val tasks_var : Cil.varinfo

type pname = string

type fname = string

type id = pname * fname

type node = Cil.location

type action =

| Call of fname
| Sys of string

type edge = node * action * node

val extracted : 
  (id, edge BatteriesExceptionless.Set.t) BatteriesExceptionless.Hashtbl.t

val add_edge : id -> edge -> unit

val get_edges : id -> edge BatteriesExceptionless.Set.t

module SymTbl (G : sig ... end) : sig ... end

module Pids : sig ... end

module FunTbl : sig ... end

module H (G : sig ... end) : sig ... end

module Prios : sig ... end

module Pfuns : sig ... end

module Res : sig ... end

val indent : string -> string

val get_globals : unit -> 'a list

val codegen_proc : (pname * fname) -> string

val codegen : unit -> string

val query : 'b -> 'a Queries.t -> 'a Queries.result

val assign : 
  (D.t, 'a, 'b) Analyses.ctx ->
  Prelude.Ana.lval ->
  Prelude.Ana.exp ->
  D.t

val branch : (D.t, 'a, 'b) Analyses.ctx -> Prelude.Ana.exp -> bool -> D.t

val body : (D.t, 'a, 'b) Analyses.ctx -> Prelude.Ana.fundec -> D.t

val return : 
  (D.t, 'a, 'b) Analyses.ctx ->
  Prelude.Ana.exp option ->
  Prelude.Ana.fundec ->
  D.t

val enter : 
  (D.t, 'a, 'b) Analyses.ctx ->
  Prelude.Ana.lval option ->
  Prelude.Ana.fundec ->
  Prelude.Ana.exp list ->
  (D.t * D.t) list

val combine : 
  (D.t, 'a, 'b) Analyses.ctx ->
  Prelude.Ana.lval option ->
  'c ->
  Prelude.Ana.fundec ->
  Prelude.Ana.exp list ->
  'd ->
  D.t ->
  D.t

val special : 
  (D.t, Tasks.t, 'a) Analyses.ctx ->
  Prelude.Ana.lval option ->
  Prelude.Ana.varinfo ->
  Prelude.Ana.exp list ->
  D.t

val startstate : 'a -> Pid.t * Ctx.t * Pred.t

val exitstate : 'a -> Pid.t * Ctx.t * Pred.t

val init : 'a -> unit

val finalize : unit -> unit

val threadenter : 
  ('a, Tasks.t, 'b) Analyses.ctx ->
  'c ->
  CilType.Varinfo.t ->
  'd ->
  D.t list

val threadspawn : ('a, 'b, 'c) Analyses.ctx -> 'd -> 'e -> 'f -> 'g -> 'a