Commit 19b15cc0 authored by Pietro Abate's avatar Pietro Abate
Browse files

[r2004-07-08 17:18:01 by cmiachon] adding min

Original author: cmiachon
Date: 2004-07-08 17:18:01+00:00
parent 50a93c06
...@@ -314,3 +314,8 @@ unary_op_gen "flatten" ...@@ -314,3 +314,8 @@ unary_op_gen "flatten"
register_fun "raise" any Types.empty register_fun "raise" any Types.empty
(fun v -> raise (Value.CDuceExn v));; (fun v -> raise (Value.CDuceExn v));;
register_fun "min" int
(Value.query_min );;
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment