18 lines
465 B
18 lines
465 B
6 years ago
|
(*
|
||
|
|
* Copyright (c) Facebook, Inc. and its affiliates.
|
||
|
|
*
|
||
|
|
* This source code is licensed under the MIT license found in the
|
||
|
|
* LICENSE file in the root directory of this source tree.
|
||
|
|
*)
|
||
|
|
|
||
|
|
(** Used-globals abstract domain *)
|
||
|
|
|
||
5 years ago
|
include Domain_intf.Dom with type summary = Reg.Set.t
|
||
|
5 years ago
|
|
||
|
|
type r =
|
||
|
|
| Per_function of Reg.Set.t Reg.Map.t
|
||
|
|
(** per-function used-globals map *)
|
||
|
|
| Declared of Reg.Set.t (** program-wide set *)
|
||
|
|
|
||
|
|
val by_function : r -> Reg.t -> summary
|