- Procedural: we specify more unifiers for apply to help higher-order unification

[helm.git] / helm / software / components / acic_procedural / acic2Procedural.mli

diff --git a/helm/software/components/acic_procedural/acic2Procedural.mli b/helm/software/components/acic_procedural/acic2Procedural.mli
index 8cbcb1c7e3f9457a578053e7fdcf41ac762fbe8e..cca20ba5f805e6837c52c960208b7a9fa71554d5 100644 (file)
--- a/helm/software/components/acic_procedural/acic2Procedural.mli
+++ b/helm/software/components/acic_procedural/acic2Procedural.mli
@@ -26,7 +26,7 @@
 val procedural_of_acic_object:
    ids_to_inner_sorts:(Cic.id, Cic2acic.sort_kind) Hashtbl.t ->
    ids_to_inner_types:(Cic.id, Cic2acic.anntypes) Hashtbl.t -> ?info:string ->
-   ?depth:int -> ?flavour:Cic.object_flavour -> string -> Cic.annobj ->
+   GrafiteAst.inline_param list -> Cic.annobj ->
       (Cic.annterm, Cic.annterm,
        Cic.annterm GrafiteAst.reduction, Cic.annterm CicNotationPt.obj, string)
       GrafiteAst.statement list
@@ -34,11 +34,9 @@ val procedural_of_acic_object:
 val procedural_of_acic_term:
    ids_to_inner_sorts:(Cic.id, Cic2acic.sort_kind) Hashtbl.t ->
    ids_to_inner_types:(Cic.id, Cic2acic.anntypes) Hashtbl.t -> 
-   ?depth:int -> string -> Cic.context -> Cic.annterm ->
+   GrafiteAst.inline_param list -> Cic.context -> Cic.annterm ->
       (Cic.annterm, Cic.annterm,
        Cic.annterm GrafiteAst.reduction, Cic.annterm CicNotationPt.obj, string)
       GrafiteAst.statement list
 
 val tex_formatter: Format.formatter option ref
-
-val debug: bool ref