Commit 6d052eed authored by bguillaum's avatar bguillaum

add function Libgrew.get_version

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/semagramme/libcaml-grew/trunk@9115 7838e531-6607-4d57-9587-6c381814729c
parent 2615cb67
...@@ -9,7 +9,7 @@ let get_version () = ...@@ -9,7 +9,7 @@ let get_version () =
let () = let () =
dispatch begin function dispatch begin function
| After_rules -> | After_rules ->
let version = get_version () in let version = "\""^(get_version ())^"\"" in
let pp_src = S[A"-pp"; A("cppo -D 'VERSION "^version^"'")] in let pp_src = S[A"-pp"; A("cppo -D 'VERSION "^version^"'")] in
flag ["ocaml"; "ocamldep"] & pp_src; flag ["ocaml"; "ocamldep"] & pp_src;
flag ["ocaml"; "compile"] & pp_src; flag ["ocaml"; "compile"] & pp_src;
......
...@@ -13,6 +13,7 @@ open Log ...@@ -13,6 +13,7 @@ open Log
open Conll open Conll
let libgrew_debug_mode () = Grew_base.Global.debug := true let libgrew_debug_mode () = Grew_base.Global.debug := true
let get_version () = VERSION
(* ==================================================================================================== *) (* ==================================================================================================== *)
(** {2 Location} *) (** {2 Location} *)
......
...@@ -11,7 +11,7 @@ ...@@ -11,7 +11,7 @@
open Conll open Conll
val libgrew_debug_mode: unit -> unit val libgrew_debug_mode: unit -> unit
val get_version: unit -> string
(* ==================================================================================================== *) (* ==================================================================================================== *)
(** {2 Location} *) (** {2 Location} *)
(* ==================================================================================================== *) (* ==================================================================================================== *)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment