Mercurial > octave

changeset 28460:565e7ed01b01

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
maint: merge stable to default.
author John W. Eaton <jwe@octave.org>
date Thu, 11 Jun 2020 22:41:39 -0400
parents 41c5019f5dbf (current diff) 0d56bfb63b90 (diff)
children be399bc75354
files
diffstat 7 files changed, 121 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/legacy/@inline/argnames.m	Thu Jun 11 16:44:06 2020 -0400
+++ b/scripts/legacy/@inline/argnames.m	Thu Jun 11 22:41:39 2020 -0400
@@ -1,3 +1,28 @@
+########################################################################
+##
+## Copyright (C) 2020 The Octave Project Developers
+##
+## See the file COPYRIGHT.md in the top-level directory of this
+## distribution or <https://octave.org/copyright/>.
+##
+## This file is part of Octave.
+##
+## Octave is free software: you can redistribute it and/or modify it
+## under the terms of the GNU General Public License as published by
+## the Free Software Foundation, either version 3 of the License, or
+## (at your option) any later version.
+##
+## Octave is distributed in the hope that it will be useful, but
+## WITHOUT ANY WARRANTY; without even the implied warranty of
+## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+## GNU General Public License for more details.
+##
+## You should have received a copy of the GNU General Public License
+## along with Octave; see the file COPYING.  If not, see
+## <https://www.gnu.org/licenses/>.
+##
+########################################################################
+
 ## -*- texinfo -*-
 ## @deftypefn {} {} argnames (@var{fun})
 ## Return a cell array of character strings containing the names of the
--- a/scripts/legacy/@inline/char.m	Thu Jun 11 16:44:06 2020 -0400
+++ b/scripts/legacy/@inline/char.m	Thu Jun 11 22:41:39 2020 -0400
@@ -1,3 +1,28 @@
+########################################################################
+##
+## Copyright (C) 2020 The Octave Project Developers
+##
+## See the file COPYRIGHT.md in the top-level directory of this
+## distribution or <https://octave.org/copyright/>.
+##
+## This file is part of Octave.
+##
+## Octave is free software: you can redistribute it and/or modify it
+## under the terms of the GNU General Public License as published by
+## the Free Software Foundation, either version 3 of the License, or
+## (at your option) any later version.
+##
+## Octave is distributed in the hope that it will be useful, but
+## WITHOUT ANY WARRANTY; without even the implied warranty of
+## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+## GNU General Public License for more details.
+##
+## You should have received a copy of the GNU General Public License
+## along with Octave; see the file COPYING.  If not, see
+## <https://www.gnu.org/licenses/>.
+##
+########################################################################
+
 ## -*- texinfo -*-
 ## @deftypefn {} {} char (@var{fun})
 ## Return a character string representing the inline function @var{fun}.
--- a/scripts/legacy/@inline/formula.m	Thu Jun 11 16:44:06 2020 -0400
+++ b/scripts/legacy/@inline/formula.m	Thu Jun 11 22:41:39 2020 -0400
@@ -1,3 +1,28 @@
+########################################################################
+##
+## Copyright (C) 2020 The Octave Project Developers
+##
+## See the file COPYRIGHT.md in the top-level directory of this
+## distribution or <https://octave.org/copyright/>.
+##
+## This file is part of Octave.
+##
+## Octave is free software: you can redistribute it and/or modify it
+## under the terms of the GNU General Public License as published by
+## the Free Software Foundation, either version 3 of the License, or
+## (at your option) any later version.
+##
+## Octave is distributed in the hope that it will be useful, but
+## WITHOUT ANY WARRANTY; without even the implied warranty of
+## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+## GNU General Public License for more details.
+##
+## You should have received a copy of the GNU General Public License
+## along with Octave; see the file COPYING.  If not, see
+## <https://www.gnu.org/licenses/>.
+##
+########################################################################
+
 ## -*- texinfo -*-
 ## @deftypefn {} {} formula (@var{fun})
 ## Return a character string representing the inline function @var{fun}.
--- a/scripts/legacy/@inline/inline.m	Thu Jun 11 16:44:06 2020 -0400
+++ b/scripts/legacy/@inline/inline.m	Thu Jun 11 22:41:39 2020 -0400
@@ -57,6 +57,13 @@
 
 function obj = inline (expr, varargin)
 
+  persistent warned = false;
+  if (! warned)
+    warned = true;
+    warning ("Octave:legacy-function",
+             "inline is obsolete; use anonymous functions instead\n");
+  endif
+
   if (nargin == 0)
     print_usage ();
   endif
--- a/scripts/legacy/@inline/vectorize.m	Thu Jun 11 16:44:06 2020 -0400
+++ b/scripts/legacy/@inline/vectorize.m	Thu Jun 11 22:41:39 2020 -0400
@@ -1,3 +1,28 @@
+########################################################################
+##
+## Copyright (C) 2020 The Octave Project Developers
+##
+## See the file COPYRIGHT.md in the top-level directory of this
+## distribution or <https://octave.org/copyright/>.
+##
+## This file is part of Octave.
+##
+## Octave is free software: you can redistribute it and/or modify it
+## under the terms of the GNU General Public License as published by
+## the Free Software Foundation, either version 3 of the License, or
+## (at your option) any later version.
+##
+## Octave is distributed in the hope that it will be useful, but
+## WITHOUT ANY WARRANTY; without even the implied warranty of
+## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+## GNU General Public License for more details.
+##
+## You should have received a copy of the GNU General Public License
+## along with Octave; see the file COPYING.  If not, see
+## <https://www.gnu.org/licenses/>.
+##
+########################################################################
+
 ## -*- texinfo -*-
 ## @deftypefn {} {} vectorize (@var{fun})
 ## Create a vectorized version of the inline function @var{fun} by
--- a/scripts/legacy/genvarname.m	Thu Jun 11 16:44:06 2020 -0400
+++ b/scripts/legacy/genvarname.m	Thu Jun 11 22:41:39 2020 -0400
@@ -107,6 +107,13 @@
 
 function varname = genvarname (str, exclusions = {})
 
+  persistent warned = false;
+  if (! warned)
+    warned = true;
+    warning ("Octave:legacy-function",
+             "genvarname is obsolete; use matlab.lang.makeValidName or matlab.lang.makeUniqueStrings instead\n");
+  endif
+
   if (nargin < 1 || nargin > 2)
     print_usage ();
   endif
--- a/scripts/legacy/vectorize.m	Thu Jun 11 16:44:06 2020 -0400
+++ b/scripts/legacy/vectorize.m	Thu Jun 11 22:41:39 2020 -0400
@@ -41,6 +41,13 @@
 
 function retval = vectorize (fun)
 
+  persistent warned = false;
+  if (! warned)
+    warned = true;
+    warning ("Octave:legacy-function",
+             "vectorize is unreliable; its use is strongly discouraged\n");
+  endif
+
   if (nargin != 1)
     print_usage ();
   endif