summaryrefslogblamecommitdiff
path: root/abstract/constant_domain.ml
blob: 8444779ed4a498119de50b0df2f335e82db591f3 (plain) (tree)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

















                         
module Make : Domain.s =
  struct


    type tv =
      | Bot
      | BTrue
      | BFalse
      | BTop
      | I of Z.t
      | ITop
      | Top

    type ts = tv VarMap.t

  end