Commit 2a8d508d authored by Bruno Guillaume's avatar Bruno Guillaume

add Libgrew.set_safe_commands

parent 7766145f
......@@ -29,6 +29,8 @@ module Libgrew = struct
let set_debug_mode flag = Grew_base.Global.debug := flag
let set_safe_commands flag = Grew_base.Global.safe_commands := flag
exception Error of string
exception Bug of string
......
......@@ -14,8 +14,9 @@ open Conll
(** {2 General definitions} *)
(* ==================================================================================================== *)
module Libgrew : sig
val set_debug_mode: bool -> unit
val get_version: unit -> string
val set_debug_mode: bool -> unit
val set_safe_commands: bool -> unit
exception Error of string
exception Bug of string
......
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