diff options
Diffstat (limited to 'lib')
-rw-r--r-- | lib/pp.ml4 | 1 | ||||
-rw-r--r-- | lib/pp.mli | 1 |
2 files changed, 2 insertions, 0 deletions
@@ -341,6 +341,7 @@ let msgnl x = msgnl_with !std_ft x let msgerr x = msg_with !err_ft x let msgerrnl x = msgnl_with !err_ft x let msg_warning x = msg_warning_with !err_ft x +let msg_warn x = msg_warning (str x) (* Same specific display in emacs as warning, but without the "Warning:" *) let msg_debug x = msgnl (emacs_quote x) @@ -116,6 +116,7 @@ val msgnl : std_ppcmds -> unit val msgerr : std_ppcmds -> unit val msgerrnl : std_ppcmds -> unit val msg_warning : std_ppcmds -> unit +val msg_warn : string -> unit (** Same specific display in emacs as warning, but without the "Warning:" **) val msg_debug : std_ppcmds -> unit |