[Math-atlas-commits] CVS: AtlasBase/Clint atlas-tst.base,1.5,1.6

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

Update of /cvsroot/math-atlas/AtlasBase/Clint
In directory usw-pr-cvs1:/tmp/cvs-serv30159

Modified Files:
	atlas-tst.base 
Log Message:
dsdot wrapper fix

Index: atlas-tst.base
===================================================================
RCS file: /cvsroot/math-atlas/AtlasBase/Clint/atlas-tst.base,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** atlas-tst.base	2001/10/10 22:01:53	1.5
--- atlas-tst.base	2001/12/04 06:13:30	1.6
***************
*** 682,686 ****
        REAL               X( * ), Y( * )
        EXTERNAL           DSDOT
!       REAL               DSDOT
        DOT = DSDOT( N, X, INCX, Y, INCY )
        RETURN
--- 682,686 ----
        REAL               X( * ), Y( * )
        EXTERNAL           DSDOT
!       DOUBLE PRECISION   DSDOT
        DOT = DSDOT( N, X, INCX, Y, INCY )
        RETURN