[Math-atlas-commits] CVS: AtlasBase/Clint atlas-lvl2.base, 1.21, 1.22

[R. C. W. <rw...@us...>]

Update of /cvsroot/math-atlas/AtlasBase/Clint
In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv2387/Clint

Modified Files:
	atlas-lvl2.base 
Log Message:


Index: atlas-lvl2.base
===================================================================
RCS file: /cvsroot/math-atlas/AtlasBase/Clint/atlas-lvl2.base,v
retrieving revision 1.21
retrieving revision 1.22
diff -C2 -d -r1.21 -r1.22
*** atlas-lvl2.base	7 Jul 2006 13:40:52 -0000	1.21
--- atlas-lvl2.base	9 Aug 2007 17:02:06 -0000	1.22
***************
*** 3115,3121 ****
     {
  /*
!  *    Apply alpha to Y if X has stride 1 & Y is smaller
   */
!       if (incX == 1 && N < M)
        {
           vx = malloc(ATL_Cachelen + ATL_MulBySize(N));
--- 3115,3124 ----
     {
  /*
!  *    Apply alpha to Y if X has stride 1 & Y is MUCH smaller
!  *    The LAPACK barfs if you  switch which vector alpha is applied to,
!  *    since it tests tiny matrices, so make it apply to X when they are
!  *    close to even
   */
!       if (incX == 1 && N < (M>>4))
        {
           vx = malloc(ATL_Cachelen + ATL_MulBySize(N));