]> www.ginac.de Git - ginac.git/blobdiff - check/check_lsolve.cpp
* Remove support for <strstream>. It is too bug-ridden.
[ginac.git] / check / check_lsolve.cpp
index 59264d9d1cb4cf23b173d438a72db6dca27529d5..a964c4b305352012393dad56dbe6b9bead9e752b 100644 (file)
  */
 
 #include "checks.h"
-
-#if defined(HAVE_SSTREAM)
-#  include <sstream>
-#else
-#  include <strstream>
-#endif
+#include <sstream>
 
 static unsigned check_matrix_solve(unsigned m, unsigned n, unsigned p,
                                                                   unsigned degree)
@@ -55,15 +50,9 @@ static unsigned check_matrix_solve(unsigned m, unsigned n, unsigned p,
        matrix X(n,p);
        for (unsigned i=0; i<n; ++i) {
                for (unsigned j=0; j<p; ++j) {
-#if defined(HAVE_SSTREAM)
                        ostringstream buf;
                        buf << "x" << i << j << ends;
                        x.push_back(symbol(buf.str()));
-#else
-                       char buf[4];
-                       ostrstream(buf,sizeof(buf)) << i << j << ends;
-                       x.push_back(symbol(string("x")+buf));
-#endif
                        X.set(i,j,x[p*i+j]);
                }
        }
@@ -113,17 +102,10 @@ static unsigned check_inifcns_lsolve(unsigned n)
                vector<symbol> a;
                vector<symbol> x;
                for (unsigned i=0; i<n; ++i) {
-#if defined(HAVE_SSTREAM)
                        ostringstream buf;
                        buf << i << ends;
                        a.push_back(symbol(string("a")+buf.str()));
                        x.push_back(symbol(string("x")+buf.str()));
-#else
-                       char buf[3];
-                       ostrstream(buf,sizeof(buf)) << i << ends;
-                       a.push_back(symbol(string("a")+buf));
-                       x.push_back(symbol(string("x")+buf));
-#endif
                }
                lst eqns;  // equation list
                lst vars;  // variable list