Mercurial > hg > octave-lyh
diff src/file-io.cc @ 5823:080c08b192d8
[project @ 2006-05-19 05:32:17 by jwe]
author | jwe |
---|---|
date | Fri, 19 May 2006 05:32:19 +0000 |
parents | ace8d8d26933 |
children | bdf16e1564e1 |
line wrap: on
line diff
--- a/src/file-io.cc +++ b/src/file-io.cc @@ -202,7 +202,7 @@ if (nargin == 1) retval = octave_stream_list::remove (args(0), "fclose"); else - print_usage ("fclose"); + print_usage (); return retval; } @@ -227,7 +227,7 @@ os.clearerr (); } else - print_usage ("fclear"); + print_usage (); return retval; } @@ -270,7 +270,7 @@ } } else - print_usage ("fflush"); + print_usage (); return retval; } @@ -319,7 +319,7 @@ } } else - print_usage (who); + print_usage (); return retval; } @@ -368,7 +368,7 @@ } } else - print_usage (who); + print_usage (); return retval; } @@ -622,7 +622,7 @@ } } else - print_usage ("fopen"); + print_usage (); return retval; } @@ -681,7 +681,7 @@ result = os.rewind (); } else - print_usage ("frewind"); + print_usage (); if (nargout > 0) retval = result; @@ -722,7 +722,7 @@ } } else - print_usage ("fseek"); + print_usage (); return retval; } @@ -747,7 +747,7 @@ retval = os.tell (); } else - print_usage ("ftell"); + print_usage (); return retval; } @@ -804,7 +804,7 @@ } } else - print_usage (who); + print_usage (); if (nargout > 0) retval = result; @@ -854,7 +854,7 @@ ::error ("%s: format must be a string", who.c_str ()); } else - print_usage (who); + print_usage (); if (nargout > 0) retval = result; @@ -884,7 +884,7 @@ retval = os.puts (args(1), who); } else - print_usage (who); + print_usage (); return retval; } @@ -904,7 +904,7 @@ if (args.length () == 1) retval = stdout_stream.puts (args(0), who); else - print_usage (who); + print_usage (); return retval; } @@ -961,7 +961,7 @@ ::error ("%s: unable to create output buffer", who.c_str ()); } else - print_usage (who); + print_usage (); return retval; } @@ -1065,7 +1065,7 @@ } } else - print_usage (who); + print_usage (); } return retval; @@ -1157,7 +1157,7 @@ ::error ("%s: first argument must be a string", who.c_str ()); } else - print_usage (who); + print_usage (); } return retval; @@ -1459,7 +1459,7 @@ } } else - print_usage ("fread"); + print_usage (); return retval; } @@ -1557,7 +1557,7 @@ } } else - print_usage ("fwrite"); + print_usage (); return retval; } @@ -1584,7 +1584,7 @@ retval = os.eof () ? 1.0 : 0.0; } else - print_usage ("feof"); + print_usage (); return retval; } @@ -1629,7 +1629,7 @@ } } else - print_usage ("ferror"); + print_usage (); return retval; } @@ -1703,7 +1703,7 @@ ::error ("popen: name must be a string"); } else - print_usage ("popen"); + print_usage (); return retval; } @@ -1722,7 +1722,7 @@ if (nargin == 1) retval = octave_stream_list::remove (args(0), "pclose"); else - print_usage ("pclose"); + print_usage (); return retval; } @@ -1763,7 +1763,7 @@ ::error ("expecting first argument to be a string"); } else - print_usage ("tmpnam"); + print_usage (); return retval; } @@ -1817,7 +1817,7 @@ } } else - print_usage ("tmpfile"); + print_usage (); return retval; } @@ -1908,7 +1908,7 @@ error ("mkstemp: expecting string as first argument"); } else - print_usage ("mkstemp"); + print_usage (); #else retval(2) = "mkstemp: not supported on this sytem"; @@ -1985,7 +1985,7 @@ } } else - print_usage ("umask"); + print_usage (); if (status >= 0) retval(0) = status; @@ -2003,7 +2003,7 @@ if (nargin == 0) retval = val; else - print_usage (nm); + print_usage (); return retval; } @@ -2026,7 +2026,7 @@ if (nargin == 0) retval = P_tmpdir; else - print_usage ("P_tmpdir"); + print_usage (); return retval; } @@ -2085,7 +2085,7 @@ if (nargin == 0) retval = val; else - print_usage (nm); + print_usage (); return retval; }