aboutsummaryrefslogtreecommitdiffstats
path: root/lib/tuple.ml
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--lib/tuple.ml10
1 files changed, 8 insertions, 2 deletions
diff --git a/lib/tuple.ml b/lib/tuple.ml
index 1ce73b0..24eecab 100644
--- a/lib/tuple.ml
+++ b/lib/tuple.ml
@@ -1,5 +1,5 @@
module AttributeMap = struct
- include Map.Make (String)
+ include BatMap.String
let sexp_of_t sexp_of_v m =
Sexplib.Sexp.List
@@ -12,12 +12,14 @@ type non_materialized = {
hash : Conventions.Hash.t;
relation : Conventions.Name.t;
attributes : Attribute.referenced AttributeMap.t;
+ (* lineage : Relation.Lineage.t option; *)
}
[@@deriving sexp_of]
type materialized = {
relation : Conventions.Name.t;
attributes : Attribute.materialized AttributeMap.t;
+ (* lineage : Relation.Lineage.t option; *)
}
[@@deriving sexp_of]
@@ -25,4 +27,8 @@ type t = Materialized of materialized | NonMaterialized of non_materialized
[@@deriving sexp_of]
let make_materialized ~relation ~attributes =
- Materialized { relation; attributes }
+ Materialized {
+ relation;
+ attributes;
+ (* lineage = None *)
+ }