diff options
author | Sébastien Dailly <sebastien@chimrod.com> | 2017-11-22 10:57:11 +0100 |
---|---|---|
committer | Sébastien Dailly <sebastien@chimrod.com> | 2017-11-22 10:57:11 +0100 |
commit | 18f6319703d7bec460754fdceee5f0f2cfbc2702 (patch) | |
tree | 4c797600b62ccf3afc9e6c591703167c394bd033 /evaluator.ml | |
parent | 79f1dddf8958a65ce57ac4601a36289019b5f384 (diff) |
Catalog representation
Diffstat (limited to 'evaluator.ml')
-rwxr-xr-x | evaluator.ml | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/evaluator.ml b/evaluator.ml index 12d60b8..2809507 100755 --- a/evaluator.ml +++ b/evaluator.ml @@ -82,7 +82,9 @@ module C = Catalog.Make(Data) type t = C.t
-let catalog = C.empty
+let catalog = ref C.empty
+
+let get_catalog () = !catalog
let repr = C.repr
|