Changeset 40 for include/fflas-ffpack/fflas_bounds.inl

Timestamp:

08/28/07 18:01:02 (1 year ago)

Author:

pernet

Message:

(hopefully) last bug fix for ftrsm ftrmm new algorithm, + linbox related tweaks.

Files:

• include/fflas-ffpack/fflas_bounds.inl (modified) (6 diffs)

include/fflas-ffpack/fflas_bounds.inl

@@ -9 +9 @@
  */
 
-#ifdef __LINBOX_CONFIG_H
+#ifdef _LINBOX_CONFIG_H
 #define FFLAS_INT_TYPE Integer
 #else
@@ -42 +42 @@
                         //FFLAS_INT_TYPE c = (p-1)*(ex)/2; //bound for a centered representation
                         long long c;
-#ifndef __LINBOX_CONFIG_H
+#ifndef _LINBOX_CONFIG_H
                         if (F.balanced)
                                 c = (p-1)*(ex)/2; // balanced representation
@@ -176 +176 @@
                 F.characteristic(pi);
                 static FFLAS_INT_TYPE p=pi;
-#ifdef __LINBOX_CONFIG_H
+#ifdef _LINBOX_CONFIG_H
                 static size_t nmax = bound_compute_double(pi);
 #else
@@ -184 +184 @@
                         return nmax;
                 else
-#ifdef __LINBOX_CONFIG_H
+#ifdef _LINBOX_CONFIG_H
                         return nmax= bound_compute_double (p=pi); //(F.balanced) ? bound_compute_balanced(p=pi) : bound_compute(p=pi);
 #else
@@ -200 +200 @@
                 F.characteristic(pi);
                 static FFLAS_INT_TYPE p=pi;
-#ifdef __LINBOX_CONFIG_H
+#ifdef _LINBOX_CONFIG_H
                 static size_t nmax = bound_compute_float(pi);
 #else
@@ -208 +208 @@
                         return nmax;
                 else
-#ifdef __LINBOX_CONFIG_H
+#ifdef _LINBOX_CONFIG_H
                         return nmax= bound_compute_float (p=pi); //(F.balanced) ? bound_compute_balanced(p=pi) : bound_compute(p=pi);
 #else