summaryrefslogtreecommitdiff
path: root/compiler/Values.ml
diff options
context:
space:
mode:
authorSon Ho2023-08-03 00:24:02 +0200
committerSon Ho2023-08-03 00:24:02 +0200
commitc6f0a8c8bfe04e83de4692a389daf8cde47b74d5 (patch)
treee42a806ad5a987017c9880599a4dc4eb3d24d0e1 /compiler/Values.ml
parent10822d76c7b45b9566f8e2b458107ac8b0eac60e (diff)
Fix issues
Diffstat (limited to 'compiler/Values.ml')
-rw-r--r--compiler/Values.ml2
1 files changed, 2 insertions, 0 deletions
diff --git a/compiler/Values.ml b/compiler/Values.ml
index f70b9b4b..d884c319 100644
--- a/compiler/Values.ml
+++ b/compiler/Values.ml
@@ -50,6 +50,8 @@ type sv_kind =
(** A value given back by a loop (when ending abstractions while going backwards) *)
| LoopJoin
(** The result of a loop join (when computing loop fixed points) *)
+ | Aggregate
+ (** A symbolic value we introduce in place of an aggregate value *)
[@@deriving show, ord]
(** Ancestor for {!symbolic_value} iter visitor *)