# HG changeset patch # User jwe # Date 1165355385 0 # Node ID e5ed0d1edddc9fdc4c6f27d567504b84b1182f0b # Parent 42efaffa4f08902706bdb1a2440309c4f7d0682d [project @ 2006-12-05 21:49:44 by jwe] diff -r 42efaffa4f08 -r e5ed0d1edddc liboctave/ChangeLog --- a/liboctave/ChangeLog Tue Dec 05 19:45:58 2006 +0000 +++ b/liboctave/ChangeLog Tue Dec 05 21:49:45 2006 +0000 @@ -1,3 +1,9 @@ +2006-12-05 John W. Eaton + + * lo-utils.cc (octave_read_double): If we see '+' or '-' but not + followed by 'I' or 'i', try reading number after putting + characters back on input stream. + 2006-12-05 Paul Kienzle * randpoisson.c (oct_fill_randp): For lambda > 1e8, upper limit of diff -r 42efaffa4f08 -r e5ed0d1edddc liboctave/lo-utils.cc --- a/liboctave/lo-utils.cc Tue Dec 05 19:45:58 2006 +0000 +++ b/liboctave/lo-utils.cc Tue Dec 05 21:49:45 2006 +0000 @@ -278,6 +278,7 @@ { is.putback (c2); is.putback (c1); + is >> d; } } break; @@ -292,6 +293,7 @@ { is.putback (c2); is.putback (c1); + is >> d; } } break; diff -r 42efaffa4f08 -r e5ed0d1edddc src/ChangeLog --- a/src/ChangeLog Tue Dec 05 19:45:58 2006 +0000 +++ b/src/ChangeLog Tue Dec 05 21:49:45 2006 +0000 @@ -1,5 +1,8 @@ 2006-12-05 John W. Eaton + * ls-oct-ascii.cc (extract_keyword): If no match and looking for + more, skip to end of line before trying another match. + * pt-mat.cc (tm_row_const::empty): New function. (tm_const::init): Don't append anything if tmp tm_row_const object is empty. diff -r 42efaffa4f08 -r e5ed0d1edddc src/load-save.cc --- a/src/load-save.cc Tue Dec 05 19:45:58 2006 +0000 +++ b/src/load-save.cc Tue Dec 05 21:49:45 2006 +0000 @@ -360,6 +360,7 @@ retval = LS_BINARY; else { + file.clear (); file.seekg (0, std::ios::beg); int32_t mopt, nr, nc, imag, len; diff -r 42efaffa4f08 -r e5ed0d1edddc src/ls-oct-ascii.cc --- a/src/ls-oct-ascii.cc Tue Dec 05 19:45:58 2006 +0000 +++ b/src/ls-oct-ascii.cc Tue Dec 05 21:49:45 2006 +0000 @@ -121,6 +121,11 @@ } else if (next_only) break; + else + { + while (is.get (c) && c != '\n') + ; // Skip to end of line. + } } }