X-Git-Url: https://svn.cri.ensmp.fr/git/Faustine.git/blobdiff_plain/a6be79ccb7456a5181561f094c1f2a4f90aadb02..a186a0b2f3c996e9f17dd96e9f548e81f6447fe0:/interpretor/value.ml?ds=sidebyside

diff --git a/interpretor/value.ml b/interpretor/value.ml
index 3c97aa0..ef05f43 100644
--- a/interpretor/value.ml
+++ b/interpretor/value.ml
@@ -52,6 +52,8 @@ class value : basic -> value_type =
       method _mod = self#prim2 basic_mod
       method larger = self#prim2 basic_larger
       method smaller = self#prim2 basic_smaller
+      method max = self#prim2 basic_max
+      method min = self#prim2 basic_min
 
     end;;