Module Ecaml__.Advice
val around_values : Ecaml.Symbol.t -> Core_kernel.Source_code_position.t -> ?docstring:string -> for_function:Ecaml.Symbol.t -> ?interactive:Ecaml.Defun.Interactive.t -> ((Ecaml__.Import.Value.t list -> Ecaml__.Import.Value.t) -> Ecaml__.Import.Value.t list -> Ecaml__.Import.Value.t) -> unit
around_values ?docstring ?interactive here return_type advice_name f ~for_function
defines functionadvice_name
with bodyf
and adds it as advice onfor_function
.Compared to
around_funcall
,around_values
provides looser coupling when the advice doesn't need to interact with the arguments or return value offor_function
.
val around_funcall : Ecaml.Symbol.t -> Core_kernel.Source_code_position.t -> ?docstring:string -> for_function:Ecaml.Symbol.t -> ?interactive:Ecaml.Defun.Interactive.t -> 'a Ecaml.Funcall.t -> ('a -> 'a) -> unit
around_funcall
provides typeful access to the arguments and return value offor_function
.
val add_predefined_function : Ecaml.Symbol.t -> for_function:Ecaml.Symbol.t -> unit
(describe-function 'advice-add)
val remove : Ecaml.Symbol.t -> for_function:Ecaml.Symbol.t -> unit
(describe-function 'advice-remove)