Mercurial > octave
comparison libinterp/octave-value/ov.cc @ 21078:49852ff04747
maint: Remove unnecessary declarations of retval.
* __pchip_deriv__.cc, data.cc, dirfns.cc, error.cc, file-io.cc, input.cc,
load-path.cc, octave-link.cc, strfns.cc, sysdep.cc, time.cc, toplev.cc,
urlwrite.cc, ov-cell.cc, ov.cc: Remove unnecessary declarations of retval.
| author | Rik <rik@octave.org> |
|---|---|
| date | Fri, 15 Jan 2016 13:40:34 -0800 |
| parents | a9ed4104ecfd |
| children | e39e05d90788 |
comparison
equal
deleted
inserted
replaced
| 21077:40f931a63a91 | 21078:49852ff04747 |
|---|---|
| 3012 If @var{idx} is an empty structure array with fields @samp{type} and\n\ | 3012 If @var{idx} is an empty structure array with fields @samp{type} and\n\ |
| 3013 @samp{subs}, return @var{val}.\n\ | 3013 @samp{subs}, return @var{val}.\n\ |
| 3014 @seealso{subsasgn, substruct}\n\ | 3014 @seealso{subsasgn, substruct}\n\ |
| 3015 @end deftypefn") | 3015 @end deftypefn") |
| 3016 { | 3016 { |
| 3017 octave_value_list retval; | |
| 3018 | |
| 3019 if (args.length () != 2) | 3017 if (args.length () != 2) |
| 3020 print_usage (); | 3018 print_usage (); |
| 3021 | 3019 |
| 3022 std::string type; | 3020 std::string type; |
| 3023 std::list<octave_value_list> idx; | 3021 std::list<octave_value_list> idx; |
| 3028 | 3026 |
| 3029 if (type.empty ()) | 3027 if (type.empty ()) |
| 3030 return ovl (arg0); | 3028 return ovl (arg0); |
| 3031 else | 3029 else |
| 3032 return arg0.subsref (type, idx, nargout); | 3030 return arg0.subsref (type, idx, nargout); |
| 3033 | |
| 3034 return retval; | |
| 3035 } | 3031 } |
| 3036 | 3032 |
| 3037 DEFUN (subsasgn, args, , | 3033 DEFUN (subsasgn, args, , |
| 3038 "-*- texinfo -*-\n\ | 3034 "-*- texinfo -*-\n\ |
| 3039 @deftypefn {} {} subsasgn (@var{val}, @var{idx}, @var{rhs})\n\ | 3035 @deftypefn {} {} subsasgn (@var{val}, @var{idx}, @var{rhs})\n\ |