Witness (goblint.Goblint

module M = Messages

module type WitnessTaskResult =
  Svcomp.TaskResult with module Arg.Edge = MyARG.InlineEdge

val write_file : 
  string ->
  (module Svcomp.Task) ->
  (module WitnessTaskResult) ->
  unit

val print_svcomp_result : string -> unit

val print_task_result : (module Svcomp.TaskResult) -> unit

val init : (module MyCFG.FileCfg) -> unit

module Result (R : ResultQuery.SpecSysSol2) : sig ... end