Mercurial > octave-antonio
changeset 8418:679c22082ac7
handle -double option for save
| author | John W. Eaton <jwe@octave.org> |
|---|---|
| date | Wed, 24 Dec 2008 13:06:26 -0500 |
| parents | 654bcfb937bf |
| children | 77fe47e73075 |
| files | src/ChangeLog src/load-save.cc |
| diffstat | 2 files changed, 18 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/src/ChangeLog Tue Dec 23 08:28:23 2008 +0100 +++ b/src/ChangeLog Wed Dec 24 13:06:26 2008 -0500 @@ -1,3 +1,7 @@ +2008-12-24 John W. Eaton <jwe@octave.org> + + * load-save.cc (parse_save_options): Handle -double. + 2008-12-23 David Bateman <dbateman@free.fr> * DLD-FUNCTIONS/eigs.cc: New file.
--- a/src/load-save.cc Tue Dec 23 08:28:23 2008 +0100 +++ b/src/load-save.cc Wed Dec 24 13:06:26 2008 -0500 @@ -1048,6 +1048,8 @@ string_vector retval; int argc = argv.length (); + bool do_double = false; + for (int i = 0; i < argc; i++) { if (argv[i] == "-append") @@ -1058,6 +1060,10 @@ { format = LS_MAT_ASCII; } + else if (argv[i] == "-double") + { + do_double = true; + } else if (argv[i] == "-text" || argv[i] == "-t") { format = LS_ASCII; @@ -1116,6 +1122,14 @@ retval.append (argv[i]); } + if (do_double) + { + if (format == LS_MAT_ASCII) + format = LS_MAT_ASCII_LONG; + else + warning ("save: \"-double\" option only has an effect with \"-ascii\""); + } + return retval; }