From e594be2048986717071af835490da95fa025b286 Mon Sep 17 00:00:00 2001 From: Allan Blanchard <allan.blanchard@cea.fr> Date: Fri, 23 Oct 2020 10:24:22 +0200 Subject: [PATCH] Update API doc for 22.0-Titanium --- src/kernel_internals/parsing/errorloc.mli | 2 +- src/kernel_services/ast_data/annotations.mli | 6 +++--- src/kernel_services/ast_data/globals.mli | 10 +++++----- src/kernel_services/ast_printing/printer_api.mli | 2 +- src/kernel_services/ast_queries/cil.mli | 4 ++-- src/kernel_services/ast_queries/cil_datatype.mli | 4 ++-- src/kernel_services/ast_queries/file.mli | 2 +- .../ast_queries/json_compilation_database.mli | 2 +- src/kernel_services/ast_queries/logic_const.mli | 4 ++-- src/kernel_services/ast_queries/logic_utils.mli | 4 ++-- src/kernel_services/cmdline_parameters/cmdline.mli | 4 ++-- .../cmdline_parameters/parameter_customize.mli | 4 ++-- .../cmdline_parameters/parameter_sig.mli | 2 +- src/kernel_services/plugin_entry_points/emitter.mli | 2 +- src/kernel_services/plugin_entry_points/kernel.mli | 2 +- src/kernel_services/plugin_entry_points/plugin.mli | 6 +++--- src/libraries/stdlib/extlib.mli | 2 +- src/libraries/utils/filepath.mli | 8 ++++---- src/plugins/qed/logic.ml | 10 +++++----- 19 files changed, 40 insertions(+), 40 deletions(-) diff --git a/src/kernel_internals/parsing/errorloc.mli b/src/kernel_internals/parsing/errorloc.mli index 0089c29d902..76ceffd5a5a 100644 --- a/src/kernel_internals/parsing/errorloc.mli +++ b/src/kernel_internals/parsing/errorloc.mli @@ -74,7 +74,7 @@ val pp_context_from_file: ?ctx:int -> ?start_line:int -> Format.formatter -> Filepath.position -> unit (** prints a readable description of a location - @since Frama-C+dev *) + @since 22.0-Titanium *) val pp_location: Format.formatter -> Cil_types.location -> unit (** Parse errors are usually fatal, but their reporting is sometimes diff --git a/src/kernel_services/ast_data/annotations.mli b/src/kernel_services/ast_data/annotations.mli index 60cae71fd14..1e49ae756b5 100644 --- a/src/kernel_services/ast_data/annotations.mli +++ b/src/kernel_services/ast_data/annotations.mli @@ -69,7 +69,7 @@ val funspec: val has_funspec: kernel_function -> bool (** @return [true] iff the function has a non-empty specification. - @since Frama-C+dev *) + @since 22.0-Titanium *) val behaviors: ?emitter:Emitter.t -> ?populate:bool -> kernel_function -> funbehavior list @@ -284,7 +284,7 @@ val add_code_annot: There can be at most one loop variant registered per statement. Attempting to register a second one will result in a fatal error. - @modify Frama-C+dev: add keep_empty argument + @modify 22.0-Titanium: add keep_empty argument *) val add_assert: @@ -411,7 +411,7 @@ val add_allocates: keep_empty:bool -> allocation behavior_component_addition (** Add new allocates into the given behavior. See {!Annotations.add_assigns} for the signification of [keep_empty] - @modify Frama-C+dev add keep_empty argument + @modify 22.0-Titanium add keep_empty argument *) val add_extended: acsl_extension behavior_component_addition diff --git a/src/kernel_services/ast_data/globals.mli b/src/kernel_services/ast_data/globals.mli index 9e5293c20ff..b3f359ffbc8 100644 --- a/src/kernel_services/ast_data/globals.mli +++ b/src/kernel_services/ast_data/globals.mli @@ -107,15 +107,15 @@ module Functions: sig val mem_name: string -> bool (** @return [true] iff there is a function with such a name - @since Frama-C+dev *) + @since 22.0-Titanium *) val mem_def_name: string -> bool (** @return [true] iff there is a function definition with such a name - @since Frama-C+dev *) + @since 22.0-Titanium *) val mem_decl_name: string -> bool (** @return [true] iff there is a function declaration with such a name - @since Frama-C+dev *) + @since 22.0-Titanium *) (** {2 Searching} *) @@ -236,7 +236,7 @@ module Types : sig val mem_enum_tag: string -> bool (** @return [true] iff there is an enum constant with the given name in the AST. - @since Frama-C+dev *) + @since 22.0-Titanium *) val find_enum_tag: string -> exp * typ (** Find an enum constant from its name in the AST. @@ -245,7 +245,7 @@ module Types : sig val mem_type: Logic_typing.type_namespace -> string -> bool (** @return [true] iff there is a type with the given name in the given namespace in the AST. - @since Frama-C+dev *) + @since 22.0-Titanium *) val find_type: Logic_typing.type_namespace -> string -> typ (** Find a type from its name in the AST. diff --git a/src/kernel_services/ast_printing/printer_api.mli b/src/kernel_services/ast_printing/printer_api.mli index 55444e77588..b6cec4010d9 100644 --- a/src/kernel_services/ast_printing/printer_api.mli +++ b/src/kernel_services/ast_printing/printer_api.mli @@ -453,7 +453,7 @@ module type S_pp = sig val pp_predicate_node: Format.formatter -> predicate_node -> unit val pp_predicate: Format.formatter -> predicate -> unit val pp_toplevel_predicate: Format.formatter -> toplevel_predicate -> unit - (** @since Frama-C+dev *) + (** @since 22.0-Titanium *) val pp_identified_predicate: Format.formatter -> identified_predicate -> unit val pp_code_annotation: Format.formatter -> code_annotation -> unit val pp_funspec: Format.formatter -> funspec -> unit diff --git a/src/kernel_services/ast_queries/cil.mli b/src/kernel_services/ast_queries/cil.mli index df110d9e57e..3bf916dcb66 100644 --- a/src/kernel_services/ast_queries/cil.mli +++ b/src/kernel_services/ast_queries/cil.mli @@ -548,12 +548,12 @@ val isArithmeticType: typ -> bool (** True if the argument is a scalar type (i.e. integral, enum, floating point or pointer - @since Frama-C+dev + @since 22.0-Titanium *) val isScalarType: typ -> bool (** alias of isScalarType. - @deprecated Frama-C+dev use isScalarType instead + @deprecated 22.0-Titanium use isScalarType instead *) val isArithmeticOrPointerType: typ -> bool diff --git a/src/kernel_services/ast_queries/cil_datatype.mli b/src/kernel_services/ast_queries/cil_datatype.mli index 22b09a997e1..d088edb1cde 100644 --- a/src/kernel_services/ast_queries/cil_datatype.mli +++ b/src/kernel_services/ast_queries/cil_datatype.mli @@ -73,7 +73,7 @@ module Location: sig (** Pretty-print both location start and end, including file, line and character offset. - @since Frama-C+dev + @since 22.0-Titanium *) val pretty_debug: t Pretty_utils.formatter @@ -85,7 +85,7 @@ module Location: sig starting position. Compares normalized filenames, lines and columns, but no absolute character offsets. - @since Frama-C+dev + @since 22.0-Titanium *) val equal_start_semantic : location -> location -> bool diff --git a/src/kernel_services/ast_queries/file.mli b/src/kernel_services/ast_queries/file.mli index 52c7f9b91f2..9192bb4f790 100644 --- a/src/kernel_services/ast_queries/file.mli +++ b/src/kernel_services/ast_queries/file.mli @@ -73,7 +73,7 @@ val list_available_machdeps: unit -> string list (** [list_available_machdeps ()] gives the list of the names of available machdeps, starting with the ones added with new_machdep and ending with the list of default machdeps. - @since Frama-C+dev *) + @since 22.0-Titanium *) type code_transformation_category (** type of registered code transformations diff --git a/src/kernel_services/ast_queries/json_compilation_database.mli b/src/kernel_services/ast_queries/json_compilation_database.mli index 5b9f18f1b08..299d0ea5472 100644 --- a/src/kernel_services/ast_queries/json_compilation_database.mli +++ b/src/kernel_services/ast_queries/json_compilation_database.mli @@ -27,6 +27,6 @@ val get_flags : Datatype.Filepath.t -> string list (** [has_entry f] returns true iff [f] has an entry in the JSON compilation database. Must only be called if a JCDB file has been specified. - @since Frama-C+dev + @since 22.0-Titanium *) val has_entry : Datatype.Filepath.t -> bool diff --git a/src/kernel_services/ast_queries/logic_const.mli b/src/kernel_services/ast_queries/logic_const.mli index 90795135858..2c2ebd716d2 100644 --- a/src/kernel_services/ast_queries/logic_const.mli +++ b/src/kernel_services/ast_queries/logic_const.mli @@ -51,12 +51,12 @@ val refresh_spec: funspec -> funspec to check a property, without adding it as hypothesis for the rest of the verification. See {!Cil_types.toplevel_predicate} for more information. Default is [false], i.e. use standard ACSL semantics. - @since Frama-C+dev + @since 22.0-Titanium *) val toplevel_predicate: ?only_check:bool -> predicate -> toplevel_predicate (** creates a new identified predicate with a fresh id. - @modify Frama-C+dev add [only_check] optional parameter + @modify 22.0-Titanium add [only_check] optional parameter *) val new_predicate: ?only_check:bool -> predicate -> identified_predicate diff --git a/src/kernel_services/ast_queries/logic_utils.mli b/src/kernel_services/ast_queries/logic_utils.mli index b1e4074364f..ae2b76fdbd2 100644 --- a/src/kernel_services/ast_queries/logic_utils.mli +++ b/src/kernel_services/ast_queries/logic_utils.mli @@ -315,12 +315,12 @@ val add_attribute_glob_annot: (** {2 Contracts } *) (** [true] if the behavior has only an assigns clause. - @since Frama-C+dev + @since 22.0-Titanium *) val behavior_has_only_assigns: behavior -> bool (** [true] if the only non-empty fields of the contract are assigns clauses - @since Frama-C+dev + @since 22.0-Titanium *) val funspec_has_only_assigns: funspec -> bool diff --git a/src/kernel_services/cmdline_parameters/cmdline.mli b/src/kernel_services/cmdline_parameters/cmdline.mli index d1cbe9927c7..d4a26b2eec6 100644 --- a/src/kernel_services/cmdline_parameters/cmdline.mli +++ b/src/kernel_services/cmdline_parameters/cmdline.mli @@ -319,7 +319,7 @@ val add_aliases: If [deprecated] is set to true, the use of the aliases emits a warning. @Invalid_argument if an alias name is the empty string @since Carbon-20110201 - @modify Frama-c+dev add [visible] and [deprecated] arguments. *) + @modify 22.0-Titanium add [visible] and [deprecated] arguments. *) val replace_option_setting: string -> plugin:string -> group:Group.t -> option_setting -> unit @@ -396,7 +396,7 @@ val permissive: bool unknown option names and invalid values for some options (e.g. non-existent function names). - @since Frama-C+dev *) + @since 22.0-Titanium *) val last_project_created_by_copy: (unit -> string option) ref diff --git a/src/kernel_services/cmdline_parameters/parameter_customize.mli b/src/kernel_services/cmdline_parameters/parameter_customize.mli index 49e2f1433d6..b1360bc21d3 100644 --- a/src/kernel_services/cmdline_parameters/parameter_customize.mli +++ b/src/kernel_services/cmdline_parameters/parameter_customize.mli @@ -129,7 +129,7 @@ val is_reconfigurable: unit -> unit only parameters corresponding to options registered at the {!Cmdline.Configuring} stage are reconfigurable. @since Nitrogen-20111001 - @modify Frama-C+dev [do_iterate] renamed to [is_reconfigurable] + @modify 22.0-Titanium [do_iterate] renamed to [is_reconfigurable] *) val is_not_reconfigurable: unit -> unit @@ -137,7 +137,7 @@ val is_not_reconfigurable: unit -> unit parameters corresponding to options registered at the {!Cmdline.Configuring} stage are reconfigurable. @since Nitrogen-20111001 - @modify Frama-C+dev [do_iterate] renamed to [is_reconfigurable] + @modify 22.0-Titanium [do_iterate] renamed to [is_reconfigurable] *) val no_category: unit -> unit diff --git a/src/kernel_services/cmdline_parameters/parameter_sig.mli b/src/kernel_services/cmdline_parameters/parameter_sig.mli index 89a439f71b3..d72b00e5014 100644 --- a/src/kernel_services/cmdline_parameters/parameter_sig.mli +++ b/src/kernel_services/cmdline_parameters/parameter_sig.mli @@ -185,7 +185,7 @@ module type S_no_parameter = sig If [visible] is set to false, the aliases do not appear in help messages. If [deprecated] is set to true, the use of the aliases emits a warning. @raise Invalid_argument if one of the strings is empty - @modify Frama-c+dev add [visible] and [deprecated] arguments. *) + @modify 22.0-Titanium add [visible] and [deprecated] arguments. *) (**/**) val is_set: unit -> bool diff --git a/src/kernel_services/plugin_entry_points/emitter.mli b/src/kernel_services/plugin_entry_points/emitter.mli index f8a43053a48..c3f30a88bc5 100644 --- a/src/kernel_services/plugin_entry_points/emitter.mli +++ b/src/kernel_services/plugin_entry_points/emitter.mli @@ -71,7 +71,7 @@ val orphan: t emitter that is no longer available (in particular, annotations loaded from a state that was generated from a different set of plug-ins than in current session). Should not be used outside of the kernel. - @since Frama-C+dev + @since 22.0-Titanium *) (** Usable emitters are the ones which can really emit something. *) diff --git a/src/kernel_services/plugin_entry_points/kernel.mli b/src/kernel_services/plugin_entry_points/kernel.mli index c81f3efefe7..f62ba3b05e3 100644 --- a/src/kernel_services/plugin_entry_points/kernel.mli +++ b/src/kernel_services/plugin_entry_points/kernel.mli @@ -240,7 +240,7 @@ module AutocompleteHelp: Parameter_sig.String_set module PrintConfigJson: Parameter_sig.Bool (** Behavior of option "-print-config-json" - @since Frama-C+dev *) + @since 22.0-Titanium *) (* ************************************************************************* *) (** {2 Output Messages} *) diff --git a/src/kernel_services/plugin_entry_points/plugin.mli b/src/kernel_services/plugin_entry_points/plugin.mli index 39798e3efef..6cee5207ce1 100644 --- a/src/kernel_services/plugin_entry_points/plugin.mli +++ b/src/kernel_services/plugin_entry_points/plugin.mli @@ -71,7 +71,7 @@ module type S_no_log = sig [add_plugin_output_aliases [alias]] adds the aliases -alias-help, -alias-verbose, etc. @since 18.0-Argon - @modify Frama-c+dev add [visible] and [deprecated] arguments. *) + @modify 22.0-Titanium add [visible] and [deprecated] arguments. *) end (** Provided plug-general services for plug-ins. @@ -90,7 +90,7 @@ type plugin = private p_help: string; p_parameters: (string, Typed_parameter.t list) Hashtbl.t } (** @since Beryllium-20090901 - @modify Frama-C+dev previously only "iterable" parameters were included, + @modify 22.0-Titanium previously only "iterable" parameters were included, now all parameters are. *) @@ -175,7 +175,7 @@ val iter_on_plugins: (plugin -> unit) -> unit val fold_on_plugins: (plugin -> 'a -> 'a) -> 'a -> 'a (** Fold [f] on each registered plug-in. - @since Frama-C+dev *) + @since 22.0-Titanium *) (**/**) (* ************************************************************************* *) diff --git a/src/libraries/stdlib/extlib.mli b/src/libraries/stdlib/extlib.mli index 391de576362..e6a69068fea 100644 --- a/src/libraries/stdlib/extlib.mli +++ b/src/libraries/stdlib/extlib.mli @@ -323,7 +323,7 @@ val html_escape: string -> string (** [format_string_of_stag stag] returns the string corresponding to [stag], or raises an exception if the tag extension is unsupported. - @since Frama-C+dev + @since 22.0-Titanium *) val format_string_of_stag: Format.stag -> string diff --git a/src/libraries/utils/filepath.mli b/src/libraries/utils/filepath.mli index dae52a5ab34..e2958f5edda 100644 --- a/src/libraries/utils/filepath.mli +++ b/src/libraries/utils/filepath.mli @@ -92,7 +92,7 @@ val add_symbolic_dir: string -> string -> unit (** Returns the list of symbolic dirs added via [add_symbolic_dir], plus preexisting ones (e.g. FRAMAC_SHARE), as pairs (name, dir). - @since Frama-C+dev + @since 22.0-Titanium *) val all_symbolic_dirs: unit -> (string * string) list @@ -114,7 +114,7 @@ module Normalized: sig resulting from the concatenation of [dir] ^ "/" ^ [file]. The resulting path must respect [existence]. - @since Frama-C+dev + @since 22.0-Titanium *) val concat: ?existence:existence -> t -> string -> t @@ -159,7 +159,7 @@ module Normalized: sig (** [is_file f] returns [true] iff [f] points to a regular file (or a symbolic link pointing to a file). Returns [false] if any errors happen when [stat]'ing the file. - @since Frama-C+dev *) + @since 22.0-Titanium *) val is_file: t -> bool (** [to_base_uri path] returns a pair [prefix, rest], according to the @@ -171,7 +171,7 @@ module Normalized: sig E.g. for the path "FRAMAC_SHARE/libc/string.h", returns ("FRAMAC_SHARE", "libc/string.h"). - @since Frama-C+dev + @since 22.0-Titanium *) val to_base_uri: t -> string option * string end diff --git a/src/plugins/qed/logic.ml b/src/plugins/qed/logic.ml index eb4ff31c0b0..53ebca7474d 100644 --- a/src/plugins/qed/logic.ml +++ b/src/plugins/qed/logic.ml @@ -432,7 +432,7 @@ sig The [force] parameters defaults to [false], when it is [true], if there exist another builtin, it is replaced with the new one. Use with care. - @modify Frama-C+dev add optional [force] parameter + @modify 22.0-Titanium add optional [force] parameter *) val set_builtin' : @@ -448,7 +448,7 @@ sig The [force] parameters defaults to [false], when it is [true], if there exist another builtin, it is replaced with the new one. Use with care. - @modify Frama-C+dev add optional [force] parameter + @modify 22.0-Titanium add optional [force] parameter *) val set_builtin_get : @@ -460,7 +460,7 @@ sig The [force] parameters defaults to [false], when it is [true], if there exist another builtin, it is replaced with the new one. Use with care. - @modify Frama-C+dev add optional [force] parameter + @modify 22.0-Titanium add optional [force] parameter *) val set_builtin_eq : @@ -475,7 +475,7 @@ sig The [force] parameters defaults to [false], when it is [true], if there exist another builtin, it is replaced with the new one. Use with care. - @modify Frama-C+dev add optional [force] parameter + @modify 22.0-Titanium add optional [force] parameter *) val set_builtin_leq : @@ -491,7 +491,7 @@ sig The [force] parameters defaults to [false], when it is [true], if there exist another builtin, it is replaced with the new one. Use with care. - @modify Frama-C+dev add optional [force] parameter + @modify 22.0-Titanium add optional [force] parameter *) (** {3 Specific Patterns} *) -- GitLab