Mercurial > hg > octave-nkf

diff scripts/deprecated/exponential_cdf.m @ 7696:0a362fa8f3c8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add warning to rest of deprecated functions
author David Bateman <dbateman@free.fr>
date Fri, 04 Apr 2008 10:18:35 -0400
parents 8e5371d47da6
children 1cdb42b372e8 72830070a17b
line wrap: on
line diff
--- a/scripts/deprecated/exponential_cdf.m
+++ b/scripts/deprecated/exponential_cdf.m
@@ -32,6 +32,14 @@
 
 function cdf = exponential_cdf (varargin)
 
+  persistent warned = false;
+  if (! warned)
+    warned = true;
+    warning ("Octave:deprecated-function",
+        ["exponential_cdf is obsolete and will be removed from a future\n",
+	       "version of Octave, please use expcdf instead"]);
+  endif
+
  if (nargin > 1)
    varargin{2} = 1 ./ varargin{2};
  endif