Changeset 456842 in git for libfac/factor/Factor.cc

Timestamp:

Aug 8, 2001, 4:26:56 PM (22 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', 'a7324b6e0b44a1a8ed3fa4d9ca3e2ff210ddd52c')

Children:

8444b045c3217f44893e92cc7acc9a1bc7595178

Parents:

14b1e65b4290df7e1f7dc6b926269dc204ea38a3

Message:

*hannes: Dan's HAVE_SINGULAR_ERROR


git-svn-id: file:///usr/local/Singular/svn/trunk@5573 2c84dea3-7e68-4137-9b89-c4e89433aadc

File:

• libfac/factor/Factor.cc (modified) (9 diffs)

libfac/factor/Factor.cc

@@ -1 +1 @@
 /* Copyright 1996 Michael Messollen. All rights reserved. */
 ///////////////////////////////////////////////////////////////////////////////
-static char * rcsid = "$Id: Factor.cc,v 1.9 2001-08-08 11:59:12 Singular Exp $ ";
+static char * rcsid = "$Id: Factor.cc,v 1.10 2001-08-08 14:26:55 Singular Exp $ ";
 static char * errmsg = "\nYou found a bug!\nPlease inform (Michael Messollen) michael@math.uni-sb.de \nPlease include above information and your input (the ideal/polynomial and characteristic) in your bug-report.\nThank you.";
 ///////////////////////////////////////////////////////////////////////////////
@@ -23 +23 @@
 
 #ifdef SINGULAR
-#  define HAVE_SINGULAR
+#define HAVE_SINGULAR_ERROR
+#endif
+
+#ifdef HAVE_SINGULAR_ERROR
    extern "C" { void WerrorS(char *); }
-   extern  void WarnS(const char *);
+   extern "C" { void WarnS(const char *); }
 #endif
 
@@ -218 +221 @@
           }
           else {
-#ifdef HAVE_SINGULAR
+#ifdef HAVE_SINGULAR_ERROR
             WerrorS("libfac: ERROR: not_monic1: case lt is a sum.");
 #else
+#ifndef NOSTREAMIO
             cerr << "libfac: ERROR: not_monic1: case lt is a sum.\n"
                  << rcsid << errmsg << endl;
+#endif
 #endif
           }
@@ -235 +240 @@
           Returnlist= myUnion( CFFList(CFFactor(1/a,1)),Returnlist) ;
         else {
-#ifdef HAVE_SINGULAR
+#ifdef HAVE_SINGULAR_ERROR
           WerrorS("libfac: ERROR: not_monic2: case lt is a sum.");
 #else
+#ifndef NOSTREAMIO
           cerr << "libfac: ERROR: not_monic2: case lt is a sum.\n"
                << rcsid << errmsg << endl;
+#endif
 #endif
         }
@@ -324 +331 @@
     if ( degree(Extension) == 0 ) FFRandom gen;
     else {
-#ifdef HAVE_SINGULAR
+#ifdef HAVE_SINGULAR_ERROR
     WerrorS("libfac: evaluate: Extension not inFF() or inGF() !");
 #else
@@ -397 +404 @@
     }
     else {
-#ifdef HAVE_SINGULAR
+#ifdef HAVE_SINGULAR_ERROR
       WerrorS("libfac: spezializePoly ERROR: Working over given extension-field not yet implemented!");
 #else
+#ifndef NOSTREAMIO
       cerr << "libfac: spezializePoly ERROR: Working over given extension-field not yet implemented!\n"
            << rcsid << errmsg << endl;
+#endif
 #endif
       return 0;
@@ -431 +440 @@
   else { if ( degree(Extension) == 0 ) FFRandom gen;
   else {
-#ifdef HAVE_SINGULAR
+#ifdef HAVE_SINGULAR_ERROR
     WerrorS("libfac: evaluate: Extension not inFF() or inGF() !");
 #else
+#ifndef NOSTREAMIO
     cerr << "libfac: evaluate: " << Extension << " not inFF() or inGF() !"
          << endl;
+#endif
 #endif
     FFRandom gen; }}
@@ -619 +630 @@
     DEBOUTLN(cout,  "Returned from specializePoly: success: ", success);
     if (success == 0 ){ // No spezialisation could be found
-#ifdef SINGULAR
+#ifdef HAVE_SINGULAR_ERROR
       WarnS("libfac: Factorize: ERROR: Not able to find a valid specialization!");
 #else
+#ifndef NOSTREAMIO
       cerr << "libfac: Factorize: ERROR: Not able to find a valid specialization!\n"
            << rcsid << errmsg << endl;
+#else
+       ;
+#endif
 #endif
       Outputlist.append(CFFactor(F,1));
@@ -828 +843 @@
 /*
 $Log: not supported by cvs2svn $
+Revision 1.9  2001/08/08 11:59:12  Singular
+*hannes: Dan's NOSTREAMIO changes
+
 Revision 1.8  2001/08/06 08:32:54  Singular
 * hannes: code cleanup