Use of standard OCaml syntax

[helm.git] / matita / components / ng_extraction / ocamlExtraction.mli

diff --git a/matita/components/ng_extraction/ocamlExtraction.mli b/matita/components/ng_extraction/ocamlExtraction.mli
index a714bd13b7182f74663ae7ce7e53100e3693a24f..e2db6a6294c0417ed12d75d604ffe1644f09e901 100644 (file)
--- 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