filesep extension

John W. Eaton jwe at bevo.che.wisc.edu
Tue Nov 11 13:48:29 CST 2008


On 11-Nov-2008, Jaroslav Hajek wrote:

| It seems I tried an ugly trick that wouldn't work. So here's a
| hopefully working version:
| 
|  function varargout = strchr (str, chars, varargin)
|  if (nargin < 2 || ! ischar (str) || ! ischar (chars))
|    print_usage ();
|  endif
|  f = false (1, 256);
|  f(chars+1) = true;
|  varargout = cell (1, nargout);
|  varagout{1} = [];
|  [varargout{:}] = find (reshape (f(str+1), size (str)), varargin{:});
| endfunction

What are you trying to do with

  varargout = cell (1, nargout);
  varagout{1} = [];

?  Why is the second statement needed?

jwe


More information about the Octave-maintainers mailing list