Mercurial > octave-nkf
comparison src/file-io.cc @ 4594:3a284f89aa41
[project @ 2003-11-12 02:27:28 by jwe]
author | jwe |
---|---|
date | Wed, 12 Nov 2003 02:29:55 +0000 |
parents | 7b957b442818 |
children | 02d2fcf835fc |
comparison
equal
deleted
inserted
replaced
4593:77566be8b9e9 | 4594:3a284f89aa41 |
---|---|
168 } | 168 } |
169 | 169 |
170 DEFUN (fclose, args, , | 170 DEFUN (fclose, args, , |
171 "-*- texinfo -*-\n\ | 171 "-*- texinfo -*-\n\ |
172 @deftypefn {Built-in Function} {} fclose (@var{fid})\n\ | 172 @deftypefn {Built-in Function} {} fclose (@var{fid})\n\ |
173 Closes the specified file. If an error is encountered while trying to\n\ | 173 Closes the specified file. If successful, @code{fclose} returns 0,\n\ |
174 close the file, an error message is printed and @code{fclose} returns\n\ | 174 otherwise, it returns -1.\n\ |
175 0. Otherwise, it returns 1.\n\ | |
176 @end deftypefn") | 175 @end deftypefn") |
177 { | 176 { |
178 octave_value retval = -1; | 177 octave_value retval = -1; |
179 | 178 |
180 int nargin = args.length (); | 179 int nargin = args.length (); |