Mercurial > octave
changeset 30910:78c3dcadf130
maint: Remove unnecessary input validation from @style classes
The Octave interpreter guarantees that the first argument to an old-style
@class is the object itself so there is no need to check for it.
* cd.m, disp.m, argnames.m, char.m, feval.m, formula.m,
vectorize.m: Remove check for 1 argument to function.
author | Rik <rik@octave.org> |
---|---|
date | Wed, 06 Apr 2022 16:30:23 -0700 |
parents | a6eabdc177bc |
children | b7edac56a810 |
files | scripts/@ftp/cd.m scripts/@ftp/disp.m scripts/legacy/@inline/argnames.m scripts/legacy/@inline/char.m scripts/legacy/@inline/feval.m scripts/legacy/@inline/formula.m scripts/legacy/@inline/vectorize.m |
diffstat | 7 files changed, 0 insertions(+), 28 deletions(-) [+] |
line wrap: on
line diff
--- a/scripts/@ftp/cd.m Wed Apr 06 14:54:39 2022 -0700 +++ b/scripts/@ftp/cd.m Wed Apr 06 16:30:23 2022 -0700 @@ -42,10 +42,6 @@ function path = cd (f, path) - if (nargin < 1) - print_usage (); - endif - if (nargin == 2) __ftp_cwd__ (f.curlhandle, path); endif
--- a/scripts/@ftp/disp.m Wed Apr 06 14:54:39 2022 -0700 +++ b/scripts/@ftp/disp.m Wed Apr 06 16:30:23 2022 -0700 @@ -25,10 +25,6 @@ function disp (obj) - if (nargin < 1) - print_usage (); - endif - printf (" FTP object\n"); printf (" host: %s\n", obj.host); printf (" user: %s\n", obj.username);
--- a/scripts/legacy/@inline/argnames.m Wed Apr 06 14:54:39 2022 -0700 +++ b/scripts/legacy/@inline/argnames.m Wed Apr 06 16:30:23 2022 -0700 @@ -32,10 +32,6 @@ function args = argnames (fcn) - if (nargin != 1) - print_usage (); - endif - args = fcn.args; endfunction
--- a/scripts/legacy/@inline/char.m Wed Apr 06 14:54:39 2022 -0700 +++ b/scripts/legacy/@inline/char.m Wed Apr 06 16:30:23 2022 -0700 @@ -34,10 +34,6 @@ function fcnstr = char (obj) - if (nargin < 1) - print_usage (); - endif - fcnstr = obj.expr; endfunction
--- a/scripts/legacy/@inline/feval.m Wed Apr 06 14:54:39 2022 -0700 +++ b/scripts/legacy/@inline/feval.m Wed Apr 06 16:30:23 2022 -0700 @@ -25,10 +25,6 @@ function retval = feval (fcn, varargin) - if (nargin < 1) - print_usage (); - endif - fh = eval (sprintf ("@(%s) %s", strjoin (fcn.args, ","), fcn.expr)); retval = fh (varargin{:});