convert comments to ocamldoc comments

[helm.git] / DEVEL / gdome_xslt / ocaml / gdome_xslt / gdome_xslt.mli

diff --git a/DEVEL/gdome_xslt/ocaml/gdome_xslt/gdome_xslt.mli b/DEVEL/gdome_xslt/ocaml/gdome_xslt/gdome_xslt.mli
index 8115457f33778299e86c1c2bbcb842284d8a57cc..7571ef3d2e0893d2c4cd61a7a64d9958a8e0cbd6 100644 (file)
--- a/DEVEL/gdome_xslt/ocaml/gdome_xslt/gdome_xslt.mli
+++ b/DEVEL/gdome_xslt/ocaml/gdome_xslt/gdome_xslt.mli
@@ -28,21 +28,25 @@
 (* processStylesheet stylesheet                               *)
 (* Process a stylesheet so that it can be subsequently used   *)
 (* with applyStylesheet.                                      *)
+
+(** processStylesheet stylesheet
+ *
+ * Process a stylesheet so that it can be subsequently used with
+ * applyStylesheet. *)
 val processStylesheet:
  Gdome.document ->
    I_gdome_xslt.processed_stylesheet
 
-(* applyStylesheet source stylesheet params                   *)
-(* Applies a processed stylesheet to a source document, using *)
-(* the given list of parameters (couples name,value)          *)
+(** applyStylesheet source stylesheet params
+ * Applies a processed stylesheet to a source document, using the given list of
+ * parameters (couples name,value) *)
 val applyStylesheet:
  source: Gdome.document ->
  stylesheet:I_gdome_xslt.processed_stylesheet ->
  params:(string * string) list ->
    Gdome.document
 
-(* output the result of a previous XSLT transformation to an  *)
-(* output channel                                             *)
+(** output the result of a previous XSLT transformation to an output channel *)
 val saveResultToChannel:
   outchan: out_channel ->
   result: Gdome.document ->
@@ -50,10 +54,10 @@ val saveResultToChannel:
     unit
 
 (** set error callback, that is a function invoked each time an error message is
-generated. If None is passed, libxslt default error callback is used *)
+ * generated. If None is passed, libxslt default error callback is used *)
 val setErrorCallback: (string -> unit) option -> unit
 
 (** set debug callback, that is a function invoked each time a debugging message
-is generated. If None is passed, libxslt default error callback is used *)
+ * is generated. If None is passed, libxslt default error callback is used *)
 val setDebugCallback: (string -> unit) option -> unit