Changeset 97f004 in git

Timestamp:

May 19, 1998, 11:48:51 AM (25 years ago)

Author:

Wilfred Pohl <pohl@…>

Branches:

(u'spielwiese', '0d6b7fcd9813a1ca1ed4220cfa2b104b97a0a003')

Children:

6ab5b1ea6008656f2868d8ce72434f8a16df99bd

Parents:

480cefb0e97369b8fa992141df1c4d2076bef283

Message:

__MWERKS__ => __NO_CONSTR__


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

Location:

Singular

Files:

• fglmcomb.cc (modified) (4 diffs)
• fglmgauss.cc (modified) (3 diffs)
• fglmvec.cc (modified) (2 diffs)
• fglmvec.h (modified) (2 diffs)
• fglmzero.cc (modified) (11 diffs)

Singular/fglmcomb.cc

@@ -1 +1 @@
 // emacs edit mode for this file is -*- C++ -*-
-// $Id: fglmcomb.cc,v 1.10 1998-05-15 14:31:20 wichmann Exp $
+// $Id: fglmcomb.cc,v 1.11 1998-05-19 09:46:46 pohl Exp $
 
 /****************************************
@@ -260 +260 @@
         }
         nf[k]= current;
-#ifdef __MWERKS__
+#ifdef __NO_CONSTR__
         mv[k].mac_constr( currV );
 #else
@@ -271 +271 @@
         STICKYPROT( "." );
  
-#ifdef __MWERKS__
+#ifdef __NO_CONSTR__
         v[k].mac_constr_i( basisSize );
 #else
@@ -472 +472 @@
     STICKYPROT2( "(%i)", basisSize );
     for ( k= 0; k < numMonoms; k++ ) {
-#ifdef __MWERKS__
+#ifdef __NO_CONSTR__
         v[k].mac_constr_i( basisSize );
 #else

Singular/fglmgauss.cc

@@ -1 +1 @@
 // emacs edit mode for this file is -*- C++ -*-
-// $Id: fglmgauss.cc,v 1.6 1998-04-08 12:12:43 pohl Exp $
+// $Id: fglmgauss.cc,v 1.7 1998-05-19 09:47:43 pohl Exp $
 
 /****************************************
@@ -32 +32 @@
         newfac= NULL;
     }
-#ifdef __MWERKS__
+#ifdef __NO_CONSTR__
     void mac_gaussElem( const fglmVector newv, const fglmVector newp, number & newpdenom, number & newfac )
     {
@@ -170 +170 @@
     
     pivot= nCopy( v.getconstelem( pivotcol ) );
-#ifdef __MWERKS__
+#ifdef __NO_CONSTR__
     elems[size].mac_gaussElem( v, p, pdenom, pivot );
 #else

Singular/fglmvec.cc

@@ -1 +1 @@
 // emacs edit mode for this file is -*- C++ -*-
-// $Id: fglmvec.cc,v 1.7 1998-04-08 12:13:21 pohl Exp $
+// $Id: fglmvec.cc,v 1.8 1998-05-19 09:45:02 pohl Exp $
 
 /****************************************
@@ -143 +143 @@
         delete rep;
 }
-#ifdef __MWERKS__
+#ifdef __NO_CONSTR__
 void
 fglmVector::mac_constr( const fglmVector & v)

Singular/fglmvec.h

@@ -1 +1 @@
 // emacs edit mode for this file is -*- C++ -*-
-// $Id: fglmvec.h,v 1.5 1998-04-08 12:12:04 pohl Exp $
+// $Id: fglmvec.h,v 1.6 1998-05-19 09:43:47 pohl Exp $
 
 /****************************************
@@ -30 +30 @@
     fglmVector( const fglmVector & v );
     ~fglmVector();
-#ifdef __MWERKS__
+#ifdef __NO_CONSTR__
     void mac_constr( const fglmVector & v);
     void mac_constr_i( int size);

Singular/fglmzero.cc

@@ -1 +1 @@
 // emacs edit mode for this file is -*- C++ -*-
-// $Id: fglmzero.cc,v 1.15 1998-05-15 14:31:04 wichmann Exp $
+// $Id: fglmzero.cc,v 1.16 1998-05-19 09:48:51 pohl Exp $
 
 /****************************************
@@ -291 +291 @@
     borderElem( poly p, fglmVector n ) : monom( p ), nf( n ) {}
     ~borderElem() { pDelete1( &monom ); }
-#ifdef __MWERKS__
+#ifdef __NO_CONSTR__
     void insertElem( poly p, fglmVector n ) 
     {
@@ -370 +370 @@
     borderMax= borderBS;
     borderSize= 0;
-#ifdef __MWERKS__
+#ifdef __NO_CONSTR__
     border= new borderElem[ borderMax ];
 #else
@@ -384 +384 @@
         pDelete1( basis + k );  //. rem: basis runs from basis[1]..basis[basisSize]
     Free( (ADDRESS)basis, basisMax*sizeof( poly ) );
-#ifdef __MWERKS__
+#ifdef __NO_CONSTR__
     delete [] border;
 #else
@@ -420 +420 @@
     borderSize++;
     if ( borderSize == borderMax ) {
-#ifdef __MWERKS__
+#ifdef __NO_CONSTR__
         borderElem * tempborder = new borderElem[ borderMax+borderBS ];
         for ( int k = 0; k < borderMax; k++ ) {
@@ -433 +433 @@
         borderMax+= borderBS;
     }
-#ifdef __MWERKS__
+#ifdef __NO_CONSTR__
     border[borderSize].insertElem( m, v );
 #else
@@ -674 +674 @@
     number fac;
 
-#ifdef __MWERKS__
+#ifdef __NO_CONSTR__
     oldGaussElem() : v(), p(), pdenom( NULL ), fac( NULL ) {}
 #endif
@@ -683 +683 @@
     }
     ~oldGaussElem();
-#ifdef __MWERKS__
+#ifdef __NO_CONSTR__
     void insertElem( const fglmVector newv, const fglmVector newp, number & newpdenom, number & newfac ) 
     {
@@ -742 +742 @@
     basisSize= 0;
     //. All arrays run from [1]..[dimen], thus Alloc( dimen + 1 )!
-#ifdef __MWERKS__
+#ifdef __NO_CONSTR__
     gauss= new oldGaussElem[ dimen+1 ];
 #else
@@ -760 +760 @@
     fglmASSERT( dimen == basisSize, "Es wurden nicht alle BasisElemente gefunden!" );
     int k;
-#ifdef __MWERKS__
+#ifdef __NO_CONSTR__
     delete [] gauss;
 #else
@@ -813 +813 @@
     
     pivot= nCopy( v.getconstelem( pivotcol ) );
-#ifdef __MWERKS__
+#ifdef __NO_CONSTR__
     gauss[basisSize].insertElem( v, p, denom, pivot );
 #else