X-Git-Url: https://svn.cri.ensmp.fr/git/Faustine.git/blobdiff_plain/c0ac16bdf3099698bb61bb8183f047381a6c713e..e8ece9554da2a7b920ae69961aa6828a90c20fd6:/interpretor/types.ml diff --git a/interpretor/types.ml b/interpretor/types.ml index dae188f..352afbe 100644 --- a/interpretor/types.ml +++ b/interpretor/types.ml @@ -42,6 +42,8 @@ class type value_type = method _mod : value_type -> value_type method larger : value_type -> value_type method smaller : value_type -> value_type + method max : value_type -> value_type + method min : value_type -> value_type end;; @@ -68,6 +70,8 @@ type symbol = Add | Serialize | Larger | Smaller + | Max + | Min | Prefix | Select2 | Select3 @@ -109,6 +113,8 @@ class type signal_type = method _mod : signal_type -> signal_type method larger : signal_type -> signal_type method smaller : signal_type -> signal_type + method max : signal_type -> signal_type + method min : signal_type -> signal_type method rdtable : signal_type -> signal_type -> signal_type method select2 : signal_type -> signal_type -> signal_type method select3 : signal_type -> signal_type -> signal_type -> signal_type