Changeset 09171bd in git for factory/ffops.cc

Timestamp:

Nov 8, 2005, 7:08:58 PM (18 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', '17f1d200f27c5bd38f5dfc6e8a0879242279d1d8')

Children:

c91fefd86fa767380ec3afd51615cf5943a61c88

Parents:

79cf7d0d7efe4df23244844b4fcd1285ef913580

Message:

*hannes: removed MWERKS support
         optimized ffops with idea from Singular/kernel/modulop.h


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

File:

• factory/ffops.cc (modified) (2 diffs)

factory/ffops.cc

@@ -1 +1 @@
 /* emacs edit mode for this file is -*- C++ -*- */
-/* $Id: ffops.cc,v 1.9 2000-08-04 11:10:15 obachman Exp $ */
+/* $Id: ffops.cc,v 1.10 2005-11-08 18:08:58 Singular Exp $ */
 
 #include <config.h>
@@ -15 +15 @@
 bool ff_big = false;
 short * ff_invtab = new short [32767];
-
-#ifdef __MWERKS__
-#include <stuff_64.h>
-int ff_mul( const int a, const int b )
-{
-  Int_64 c;
-  unsigned int ua, ub;
-  int res;
-  
-  if ((!a) || (!b)) return 0;
-  if (a>0)
-    ua = a;
-  else
-    ua = -a;
-  if (b>0)
-    ub = b;
-  else
-    ub = -b;
-  mul_64(&c, ua, ub);
-  res = rem_64(&c, ff_prime);
-  if ((a>0) != (b>0))
-    res = ff_prime-res;
-  return res;
-}
-#endif
 
 void ff_setprime ( const int p )