the commit contnues by updating the RTM and modifying the typechecker accordingly

[helm.git] / helm / software / helena / src / basic_rg / brgReduction.mli

diff --git a/helm/software/helena/src/basic_rg/brgReduction.mli b/helm/software/helena/src/basic_rg/brgReduction.mli
index e8df9f7aa4a1141a2705661527e07e9c4f09b8fa..e73d2df8a8508d793a80182e938c13398d6cabeb 100644 (file)
--- a/helm/software/helena/src/basic_rg/brgReduction.mli
+++ b/helm/software/helena/src/basic_rg/brgReduction.mli
@@ -11,16 +11,18 @@
 
 type kam
 
+type message = (kam, Brg.term) Log.message
+
 val empty_kam: kam
 
 val get: kam -> int -> Brg.bind
 
 val push: kam -> Entity.attrs -> Brg.bind -> kam
 
-val xwhd: Status.status -> kam -> Brg.term -> kam * Brg.term 
+val xwhd: Status.status -> kam -> int option -> Brg.term -> kam * Brg.term 
 
 (* arguments: expected type, inferred type *) 
 val are_convertible: 
-   Status.status -> kam -> Brg.term -> kam -> Brg.term -> bool
+   Status.status -> kam -> int option -> Brg.term -> kam -> int option -> Brg.term -> bool
 
 val specs: (kam, Brg.term) Log.specs