X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fcomponents%2Fng_extraction%2FocamlExtraction.mli;h=e2db6a6294c0417ed12d75d604ffe1644f09e901;hb=926bd86002f91d2bf2a3ce7376309f5106268959;hp=a714bd13b7182f74663ae7ce7e53100e3693a24f;hpb=66be8fbe19e2ccfa0e6a7abeba605152d1322595;p=helm.git

diff --git a/matita/components/ng_extraction/ocamlExtraction.mli b/matita/components/ng_extraction/ocamlExtraction.mli
index a714bd13b..e2db6a629 100644
--- a/matita/components/ng_extraction/ocamlExtraction.mli
+++ b/matita/components/ng_extraction/ocamlExtraction.mli
@@ -2,7 +2,7 @@ open OcamlExtractionTable
 
 (* These commands have an effect iff OCAML_EXTRACTION is set *)
 
-val print_open: #status as 'status -> NUri.uri list -> 'status
-val print_ocaml_of_obj: #status as 'status -> NCic.obj -> 'status
-val open_file: #status as 'status -> baseuri:string -> string -> 'status
-val close_file: #status as 'status -> 'status
+val print_open: (#status as 'status) -> NUri.uri list -> 'status
+val print_ocaml_of_obj: (#status as 'status) -> NCic.obj -> 'status
+val open_file: (#status as 'status) -> baseuri:string -> string -> 'status
+val close_file: (#status as 'status) -> 'status