You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
19 lines
454 B
19 lines
454 B
7 years ago
|
(*
|
||
6 years ago
|
* Copyright (c) Facebook, Inc. and its affiliates.
|
||
7 years ago
|
*
|
||
|
* This source code is licensed under the MIT license found in the
|
||
|
* LICENSE file in the root directory of this source tree.
|
||
|
*)
|
||
7 years ago
|
|
||
|
(** Global variables *)
|
||
|
|
||
5 years ago
|
type t = private {reg: Reg.t; init: Exp.t option; typ: Typ.t; loc: Loc.t}
|
||
6 years ago
|
[@@deriving compare, equal, hash, sexp]
|
||
6 years ago
|
|
||
|
val pp : t pp
|
||
|
val pp_defn : t pp
|
||
|
|
||
|
include Invariant.S with type t := t
|
||
|
|
||
5 years ago
|
val mk : ?init:Exp.t -> Reg.t -> Typ.t -> Loc.t -> t
|