Mercurial > hg > octave-nkf
changeset 6907:c8081f4c094f
[project @ 2007-09-17 17:31:10 by jwe]
author | jwe |
---|---|
date | Mon, 17 Sep 2007 17:31:10 +0000 |
parents | c5118619023e |
children | b2de26e67857 |
files | liboctave/ChangeLog liboctave/lo-utils.cc src/version.h |
diffstat | 3 files changed, 16 insertions(+), 7 deletions(-) [+] |
line wrap: on
line diff
--- a/liboctave/ChangeLog +++ b/liboctave/ChangeLog @@ -1,3 +1,8 @@ +2007-09-17 John W. Eaton <jwe@octave.org> + + * lo-utils.cc (octave_read_complex, octave_read_double): Skip + leading whitespace. + 2007-09-13 John W. Eaton <jwe@octave.org> * lo-utils.cc (read_inf_nan_na, octave_read_double,
--- a/liboctave/lo-utils.cc +++ b/liboctave/lo-utils.cc @@ -26,6 +26,7 @@ #include <config.h> #endif +#include <cctype> #include <cstdlib> #include <cstdio> @@ -262,9 +263,11 @@ { double d = 0.0; - char c1 = 0; + char c1 = ' '; - c1 = is.get (); + while (isspace (c1)) + c1 = is.get (); + switch (c1) { case '-': @@ -317,9 +320,10 @@ Complex cx = 0.0; - char ch = 0; + char ch = ' '; - ch = is.get (); + while (isspace (ch)) + ch = is.get (); if (ch == '(') {
--- a/src/version.h +++ b/src/version.h @@ -25,11 +25,11 @@ #if !defined (octave_version_h) #define octave_version_h 1 -#define OCTAVE_VERSION "2.9.13+" +#define OCTAVE_VERSION "2.9.14" -#define OCTAVE_API_VERSION "api-v25" +#define OCTAVE_API_VERSION "api-v26" -#define OCTAVE_RELEASE_DATE "2007-07-25" +#define OCTAVE_RELEASE_DATE "2007-09-17" #define OCTAVE_COPYRIGHT "Copyright (C) 2007 John W. Eaton and others."