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.
21 lines
487 B
21 lines
487 B
(*
|
|
* Copyright (c) 2018-present, Facebook, Inc.
|
|
*
|
|
* This source code is licensed under the MIT license found in the
|
|
* LICENSE file in the root directory of this source tree.
|
|
*)
|
|
|
|
(** Global variables *)
|
|
|
|
type t = private
|
|
{var: Var.t; init: Exp.t option; siz: int; typ: Typ.t; loc: Loc.t}
|
|
[@@deriving compare, hash, sexp]
|
|
|
|
val equal : t -> t -> bool
|
|
val pp : t pp
|
|
val pp_defn : t pp
|
|
|
|
include Invariant.S with type t := t
|
|
|
|
val mk : ?init:Exp.t -> Var.t -> int -> Typ.t -> Loc.t -> t
|