summaryrefslogtreecommitdiff
path: root/src/Pure.ml
diff options
context:
space:
mode:
Diffstat (limited to 'src/Pure.ml')
-rw-r--r--src/Pure.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Pure.ml b/src/Pure.ml
index 9efab912..58ee0b98 100644
--- a/src/Pure.ml
+++ b/src/Pure.ml
@@ -236,7 +236,7 @@ class virtual ['self] mapreduce_value_base =
end
type var_or_dummy =
- | Var of var * mplace option
+ | Var of var * mplace option (* TODO: the mplace is actually always a variable *)
| Dummy (** Ignored value: `_`. *)
[@@deriving
show,