* src/integer/input/cl_I_read_stream.cc (read_integer): Fix a bug

	that caused radix specifiers to not work when reading from a stream.
	* src/rational/input/cl_RA_read_stream.cc (read_rational): Likewise.
	* src/real/input/cl_R_read_stream.cc (read_real): Likewise.
	* src/float/input/cl_F_read_stream.cc (read_float): Likewise.
	* src/complex/input/cl_N_read_stream.cc (read_complex): Likewise.

diff --git a/ChangeLog b/ChangeLog
index 3ea69206e7a1a60bb57632dc6dfda2db26be7e45..a472ea753840bf81b8e81d819cab0b65ddcb51b4 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,12 @@
+2004-10-26  Richard B. Kreckel  <kreckel@ginac.de>
+
+       * src/integer/input/cl_I_read_stream.cc (read_integer): Fix a bug
+       that caused radix specifiers to not work when reading from a stream.
+       * src/rational/input/cl_RA_read_stream.cc (read_rational): Likewise.
+       * src/real/input/cl_R_read_stream.cc (read_real): Likewise.
+       * src/float/input/cl_F_read_stream.cc (read_float): Likewise.
+       * src/complex/input/cl_N_read_stream.cc (read_complex): Likewise.
+
 2004-10-25  Richard B. Kreckel  <kreckel@ginac.de>
 
        * src/base/cl_low.h: Add mulu64 assembler macro for ia64.

diff --git a/src/complex/input/cl_N_read_stream.cc b/src/complex/input/cl_N_read_stream.cc
index 48df82ee2def615fa8750deb98b773ef0c766376..7199476a362ee92920f4514accb65096dba3294f 100644 (file)
--- a/src/complex/input/cl_N_read_stream.cc
+++ b/src/complex/input/cl_N_read_stream.cc
@@ -72,7 +72,6 @@ const cl_N read_complex (std::istream& stream, const cl_read_flags& flags)
                }
                if (!(((c >= 'A') && (c <= 'Z')) || ((c >= 'a') && (c <= 'z'))))
                        goto syntax1;
-               buffer.push(c);
                c = freadchar(stream);
                if (c == cl_EOF) goto eof;
                if (c == '(') {

diff --git a/src/float/input/cl_F_read_stream.cc b/src/float/input/cl_F_read_stream.cc
index a3e7461fe72d8b638f51c16691f8bcf6156e18b0..b2daee602a9536b6a59feb5193eb58c240515ffa 100644 (file)
--- a/src/float/input/cl_F_read_stream.cc
+++ b/src/float/input/cl_F_read_stream.cc
@@ -74,7 +74,6 @@ const cl_F read_float (std::istream& stream, const cl_read_flags& flags)
                }
                if (!(((c >= 'A') && (c <= 'Z')) || ((c >= 'a') && (c <= 'z'))))
                        goto syntax1;
-               buffer.push(c);
                c = freadchar(stream);
                if (c == cl_EOF) goto eof;
        }

diff --git a/src/integer/input/cl_I_read_stream.cc b/src/integer/input/cl_I_read_stream.cc
index 71fddb68945166866b84566011b6730033c586ec..6f6a5c076bd35115e45608f80b049a89511435ce 100644 (file)
--- a/src/integer/input/cl_I_read_stream.cc
+++ b/src/integer/input/cl_I_read_stream.cc
@@ -74,7 +74,6 @@ const cl_I read_integer (std::istream& stream, const cl_read_flags& flags)
                }
                if (!(((c >= 'A') && (c <= 'Z')) || ((c >= 'a') && (c <= 'z'))))
                        goto syntax1;
-               buffer.push(c);
                c = freadchar(stream);
                if (c == cl_EOF) goto eof;
        }

diff --git a/src/rational/input/cl_RA_read_stream.cc b/src/rational/input/cl_RA_read_stream.cc
index 85dcfd8ee48f9989be36c260245b29e0071a9165..a54f861f8981f3aab00bebc225c915b80672f84c 100644 (file)
--- a/src/rational/input/cl_RA_read_stream.cc
+++ b/src/rational/input/cl_RA_read_stream.cc
@@ -75,7 +75,6 @@ const cl_RA read_rational (std::istream& stream, const cl_read_flags& flags)
                }
                if (!(((c >= 'A') && (c <= 'Z')) || ((c >= 'a') && (c <= 'z'))))
                        goto syntax1;
-               buffer.push(c);
                c = freadchar(stream);
                if (c == cl_EOF) goto eof;
        }

diff --git a/src/real/input/cl_R_read_stream.cc b/src/real/input/cl_R_read_stream.cc
index b6947451b5619f079744e047b83329539fd0f1b6..e75221d48380a950e74e45cef608fc9b4664ff41 100644 (file)
--- a/src/real/input/cl_R_read_stream.cc
+++ b/src/real/input/cl_R_read_stream.cc
@@ -74,7 +74,6 @@ const cl_R read_real (std::istream& stream, const cl_read_flags& flags)
                }
                if (!(((c >= 'A') && (c <= 'Z')) || ((c >= 'a') && (c <= 'z'))))
                        goto syntax1;
-               buffer.push(c);
                c = freadchar(stream);
                if (c == cl_EOF) goto eof;
        }