Changeset 3740 in Sophya

Timestamp:

Feb 8, 2010, 11:45:19 AM (16 years ago)

Author:

cmv

Message:

bug avec SetMemoryMapping, cmv+rz 08/02/2010

File:

• trunk/SophyaExt/LinAlg/intflapack.cc (modified) (1 diff)

trunk/SophyaExt/LinAlg/intflapack.cc

@@ -641 +641 @@
 
   { // Use {} for automatic des-allocation of "bsave"
-  TMatrix<T> bsave(m,nrhs); bsave.SetMemoryMapping(BaseArray::FortranMemoryMapping);
-  bsave = b;
+  TMatrix<T> bsave = b;
   b.ReSize(maxmn,nrhs); b = (T) 0;
   for(int i=0;i<m;i++) for(int j=0;j<nrhs;j++) b(i,j) = bsave(i,j);
   } // Use {} for automatic des-allocation of "bsave"
   s.ReSize(minmn);
-  
+
   int_4 smlsiz = 25;  // Normallement ilaenv_en_C(9,...) renvoie toujours 25
   if(typeid(T) == typeid(r_4) )               smlsiz = ilaenv_en_C(9,"SGELSD"," ",0,0,0,0);