Add map helper to build from list of pairs

[tiger.ml.git] / compiler / src / lib / tiger / tiger_map_sig.ml

diff --git a/compiler/src/lib/tiger/tiger_map_sig.ml b/compiler/src/lib/tiger/tiger_map_sig.ml
index 521b6cf..ed21d33 100644 (file)
--- a/compiler/src/lib/tiger/tiger_map_sig.ml
+++ b/compiler/src/lib/tiger/tiger_map_sig.ml
@@ -10,4 +10,6 @@ module type S = sig
   val member : ('k, 'v) t -> k:'k -> bool
 
   val to_dot : ('k, 'v) t -> k_to_string:('k -> string) -> string
+
+  val of_list : ('k * 'v) list -> ('k, 'v) t
 end