Mercurial > hg > octave-jordi
comparison libinterp/corefcn/__dispatch__.cc @ 20917:6f0bd96f93c0
maint: Use new C++ archetype in more files.
Place input validation first in files.
Move declaration of retval down in function to be closer to point of usage.
Eliminate else clause after if () error.
Use "return ovl()" where it makes sense.
* __dispatch__.cc, __dsearchn__.cc, __ichol__.cc, __lin_interpn__.cc,
balance.cc, betainc.cc, bitfcns.cc, bsxfun.cc, cellfun.cc, colloc.cc, conv2.cc,
daspk.cc, dasrt.cc, dassl.cc, data.cc, debug.cc, dirfns.cc, dlmread.cc, dot.cc,
eig.cc, error.cc, fft.cc, fft2.cc, fftn.cc, file-io.cc, ov-type-conv.h:
Use new C++ archetype in more files.
| author | Rik <rik@octave.org> |
|---|---|
| date | Wed, 16 Dec 2015 15:00:31 -0800 |
| parents | 8bb38ba1bad6 |
| children |
comparison
equal
deleted
inserted
replaced
| 20916:a7051a169cad | 20917:6f0bd96f93c0 |
|---|---|
| 40 #include "variables.h" | 40 #include "variables.h" |
| 41 | 41 |
| 42 DEFUN (__dispatch__, args, nargout, | 42 DEFUN (__dispatch__, args, nargout, |
| 43 "Undocumented internal function") | 43 "Undocumented internal function") |
| 44 { | 44 { |
| 45 octave_value retval; | |
| 46 | |
| 47 int nargin = args.length (); | 45 int nargin = args.length (); |
| 48 | 46 |
| 49 if (nargin < 1 || nargin > 3) | 47 if (nargin < 1 || nargin > 3) |
| 50 print_usage (); | 48 print_usage (); |
| 51 | 49 |
| 56 if (nargin > 1) | 54 if (nargin > 1) |
| 57 r = args(1).xstring_value ("__dispatch__: second argument must be a function name"); | 55 r = args(1).xstring_value ("__dispatch__: second argument must be a function name"); |
| 58 | 56 |
| 59 if (nargin > 2) | 57 if (nargin > 2) |
| 60 t = args(2).xstring_value ("__dispatch__: third argument must be a type name"); | 58 t = args(2).xstring_value ("__dispatch__: third argument must be a type name"); |
| 59 | |
| 60 octave_value retval; | |
| 61 | 61 |
| 62 if (nargin == 1) | 62 if (nargin == 1) |
| 63 { | 63 { |
| 64 if (nargout > 0) | 64 if (nargout > 0) |
| 65 { | 65 { |