Changeset 1e7e19 in git

Timestamp:

Jun 15, 1999, 2:54:55 PM (24 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'a800fe4b3e9d37a38c5a10cc0ae9dfa0c15a4ee6')

Children:

1368792c2ccb1197c3f2ab30867fd969143e673f

Parents:

4a16eb5f1015d1654c4afd0aca819fad6357557f

Message:

* hannes: debug fixes for Singular-interface


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

Location:

libfac

Files:

• charset/charset.cc (modified) (5 diffs)
• factor/Factor.cc (modified) (4 diffs)

libfac/charset/charset.cc

@@ -2 +2 @@
 ////////////////////////////////////////////////////////////
 // emacs edit mode for this file is -*- C++ -*-
-static char * rcsid = "$Id: charset.cc,v 1.3 1997-09-12 07:19:40 Singular Exp $";
+static char * rcsid = "$Id: charset.cc,v 1.4 1999-06-15 12:54:54 Singular Exp $";
 /////////////////////////////////////////////////////////////
 // FACTORY - Includes
@@ -37 +37 @@
 #endif
 #include "debug.h"
+
+#ifdef SINGULAR
+       extern void WarnS(const char *);
+       #include "../../Singular/mod2.h"
+       #include "../../Singular/structs.h"
+       #include "../../Singular/polys.h"
+       #include "../../Singular/febase.h"
+       #include "../../Singular/clapconv.h"
+#endif
 
 // the next computes a characteristic set (a basic set in Wang's sense)
@@ -554 +563 @@
     }
     else {
-//#ifdef HAVE_SINGULAR
-//      extern void WerrorS(char *);
-//      WerrorS("libfac: Factoring over algebraic function field!");
-//#else 
-//      cerr << "libfac: Factoring over algebraic function field!" << endl;
-//#endif
       i=AS;
       for ( nr=1; nr< AS.length(); nr++){
@@ -577 +580 @@
             break;
           }
+          else
+          {
+#ifdef SINGULAR
+            //WarnS("libfac: Factoring over algebraic function field required!");
+            //pWrite(convClapPSingP(elem));
+#else 
+#ifndef NOSTREAMIO
+            cerr << "libfac: Factoring over algebraic function field!" << endl;
+#endif
+#endif
+          }
         }
       }
@@ -588 +602 @@
 /*
 $Log: not supported by cvs2svn $
+Revision 1.3  1997/09/12 07:19:40  Singular
+* hannes/michael: libfac-0.3.0
+
 Revision 1.2  1997/04/25 22:52:28  michael
 changed cerr and cout messages for use with Singular

libfac/factor/Factor.cc

@@ -1 +1 @@
 /* Copyright 1996 Michael Messollen. All rights reserved. */
 ///////////////////////////////////////////////////////////////////////////////
-static char * rcsid = "$Id: Factor.cc,v 1.4 1997-11-18 16:39:04 Singular Exp $ ";
+static char * rcsid = "$Id: Factor.cc,v 1.5 1999-06-15 12:54: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.";
 ///////////////////////////////////////////////////////////////////////////////
@@ -20 +20 @@
 #  define HAVE_SINGULAR
    extern "C" { void WerrorS(char *); }
+   extern  void WarnS(const char *);
 #endif
 
@@ -602 +603 @@
     DEBOUTLN(cout,  "Returned from specializePoly: success: ", success);
     if (success == 0 ){ // No spezialisation could be found
-#ifdef HAVE_SINGULAR
-      WerrorS("libfac: Factorize: ERROR: Not able to find a valid specialization!");    
+#ifdef SINGULAR
+      WarnS("libfac: Factorize: ERROR: Not able to find a valid specialization!");    
 #else
       cerr << "libfac: Factorize: ERROR: Not able to find a valid specialization!\n" 
@@ -803 +804 @@
 /*
 $Log: not supported by cvs2svn $
+Revision 1.4  1997/11/18 16:39:04  Singular
+* hannes: moved WerrorS from C++ to C
+     (Factor.cc MVMultiHensel.cc SqrFree.cc Truefactor.cc)
+
 Revision 1.3  1997/09/12 07:19:46  Singular
 * hannes/michael: libfac-0.3.0