From 0f4fa576268bd9492c936b5b02d6680c5abaca27 Mon Sep 17 00:00:00 2001 From: Stephen Sherratt Date: Thu, 25 Sep 2025 18:03:39 +1000 Subject: [PATCH] Expose Completion_options.t type Signed-off-by: Stephen Sherratt --- CHANGES.md | 6 ++++++ src/climate/climate.ml | 2 ++ src/climate/climate.mli | 12 +++++++++++- 3 files changed, 19 insertions(+), 1 deletion(-) diff --git a/CHANGES.md b/CHANGES.md index c97ca06..265ab5e 100644 --- a/CHANGES.md +++ b/CHANGES.md @@ -1,5 +1,11 @@ # Changelog +## 0.8.4 + +### Changed + +- Expose `Completion_options.t` type (#23) + ## 0.8.3 ### Fixed diff --git a/src/climate/climate.ml b/src/climate/climate.ml index 0ddd363..d41db0d 100644 --- a/src/climate/climate.ml +++ b/src/climate/climate.ml @@ -184,6 +184,8 @@ let help_command_arg_parser () = Arg_parser.Private.usage ~error:false ~message:None ~override_doc:None ;; +module Completion_options = Completion.Options + module Command = struct type internal = | Print_completion_script_bash diff --git a/src/climate/climate.mli b/src/climate/climate.mli index 7ab5687..9ed30e4 100644 --- a/src/climate/climate.mli +++ b/src/climate/climate.mli @@ -84,6 +84,16 @@ module Program_name : sig | Literal of string end +module Completion_options : sig + type t = + { no_comments : bool + ; no_whitespace : bool + ; minify_global_names : bool + ; minify_local_variables : bool + ; optimize_case_statements : bool + } +end + module Command : sig type 'a t @@ -153,7 +163,7 @@ module Command : sig -> ?global_symbol_prefix:[ `Random | `Custom of string ] -> ?command_hash_in_function_names:bool -> ?program_name:Program_name.t - -> ?options:Completion.Options.t + -> ?options:Completion_options.t -> _ t -> string