search for: has_tags

Using 'ocamlfind ocamldoc' is much faster than running 'ocamldoc' directly, because ocamlfind will run the native code program 'ocamldoc.opt' if it is available. This change approximately halves the time taken to compile the ocaml bindings. --- ocaml/Makefile.am | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ocaml/Makefile.am b/ocaml/Makefile.am index

...; - Generate more sub-headings. > > - Document the object-oriented API. > > - Use a common function to generate the doc for module and OO APIs. > --- Mostly OK, except ... > + let generate_doc ?(indent = "") f = > + if is_documented f then ( > + let has_tags = ref false in > + > + pr "%s(** %s" indent f.shortdesc; > + (match f.deprecated_by with > + | None -> () > + | Some replacement -> > + has_tags := true; > + pr "\n\n @deprecated Use {!%s} instead" replacement...

...he returned integer is the @@ -149,41 +155,45 @@ module Errno : sig pr "\ end +(** {3 Structs} *) + "; generate_ocaml_structure_decls (); + pr "\ + +(** {3 Actions} *) + +"; + + let generate_doc ?(indent = "") f = + if is_documented f then ( + let has_tags = ref false in + + pr "%s(** %s" indent f.shortdesc; + (match f.deprecated_by with + | None -> () + | Some replacement -> + has_tags := true; + pr "\n\n @deprecated Use {!%s} instead" replacement + ); + (match version_ad...

This way the version string of each API can be used also in other generator modules. Mostly code motion, no actual behaviour changes. --- generator/c.ml | 21 ++++++++++----------- generator/docstrings.ml | 6 ++++++ 2 files changed, 16 insertions(+), 11 deletions(-) diff --git a/generator/c.ml b/generator/c.ml index 63dc09a..a2b9c94 100644 --- a/generator/c.ml +++ b/generator/c.ml @@

I''m currently working on some RSpec view tests and I''m having problems with expect_render. Most of the expect_render''s work fine, but in one of my views I have: <%= render :partial => "user_cloud", :locals => {:user => @featured_user} %> I see that expect_render supports ":object" or ":collection" for the second

...+++ b/generator/OCaml.ml > @@ -186,10 +186,13 @@ end > opt > ); > (match f.deprecated_by with > - | None -> () > - | Some replacement -> > + | Not_deprecated -> () > + | Replaced_by replacement -> > has_tags := true; > pr "\n\n @deprecated Use {!%s} instead" replacement > + | Deprecated_no_replacement -> > + has_tags := true; > + pr "\n\n @deprecated" Ditto. > diff --git a/generator/java.ml b/generator/java.ml > index 8...

...505..38b254d 100644 --- a/generator/OCaml.ml +++ b/generator/OCaml.ml @@ -186,10 +186,13 @@ end opt ); (match f.deprecated_by with - | None -> () - | Some replacement -> + | Not_deprecated -> () + | Replaced_by replacement -> has_tags := true; pr "\n\n @deprecated Use {!%s} instead" replacement + | Deprecated_no_replacement -> + has_tags := true; + pr "\n\n @deprecated" ); (match version_added f with | None -> () diff --git a/generator/actio...

...r/ocaml.ml b/generator/ocaml.ml index 288e91f..ef04540 100644 --- a/generator/ocaml.ml +++ b/generator/ocaml.ml @@ -177,6 +177,13 @@ end else pr "%s(** alias for {!%s}" indent f.name; + (match f.optional with + | None -> () + | Some opt -> + has_tags := true; + pr "\n\n This function depends on the feature \"%s\". See also {!feature_available}." + opt + ); (match f.deprecated_by with | None -> () | Some replacement -> diff --git a/generator/perl.ml b/generator/perl.ml...