Mercurial > hg > octave-lyh

diff scripts/deprecated/perror.m @ 12574:89604fa96d2f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Deprecate perror, strerror functions.
author Rik <octave@nomad.inbox5.com>
date Mon, 04 Apr 2011 13:37:13 -0700
parents scripts/general/perror.m@fd0a3ac60b0e
children 72c96de7a403
line wrap: on
line diff
copy from scripts/general/perror.m
copy to scripts/deprecated/perror.m
--- a/scripts/general/perror.m
+++ b/scripts/deprecated/perror.m
@@ -29,6 +29,13 @@
 
 function perror (funcname, num)
 
+  persistent warned = false;
+  if (! warned)
+    warned = true;
+    warning ("Octave:deprecated-function",
+             "perror is obsolete and will be removed from a future version of Octave.");
+  endif
+
   if (nargin != 2)
     print_usage ();
   else