package goblint

  1. Overview
  2. Docs
Static analysis framework for C

Install

dune-project
 Dependency

Authors

Maintainers

Sources

goblint-2.7.1.tbz
sha256=af01aac256229f33a90a9fcbfed04b01e3097f154d4d124f006476d6387c6a66
sha512=2a93bfe16881adbc2d8dcbfe38c1e19cd24ca105d8e1eda13d02440f3002874ffe2957dfd937510765233a054a40568b0052db92e31d382a5bd215d1ec12565c

doc/src/goblint.solver/solverBox.ml.html

Source file solverBox.ml

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
(** Box operator for warrowing solvers. *)

module type S =
  functor (D: Lattice.S) ->
  sig
    val box: D.t -> D.t -> D.t
  end

module Warrow: S = functor (D: Lattice.S) ->
struct
  let box x y =
    if D.leq y x then
      D.narrow x y
    else
      D.widen x (D.join x y)
end

module Widen: S = functor (D: Lattice.S) ->
struct
  let box x y = D.widen x (D.join x y)
end

module NarrowOption: S = functor (D: Lattice.S) ->
struct
  let box x y =
    if GobConfig.get_bool "exp.no-narrow" then
      x
    else
      D.narrow x y
end