[Math-atlas-commits] CVS: AtlasBase/kernel/ClintWhaley ATL_smm6x1x80_sse.c,NONE,1.1 ATL_dmm6x1x72_sse2.c,1.12,1.13 clint.base,1.20,1.21

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

Update of /cvsroot/math-atlas/AtlasBase/kernel/ClintWhaley
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv18163/kernel/ClintWhaley

Modified Files:
	ATL_dmm6x1x72_sse2.c clint.base 
Added Files:
	ATL_smm6x1x80_sse.c 
Log Message:
new sp sse kernel

--- NEW FILE: ATL_smm6x1x80_sse.c ---
#ifndef ATL_GAS_x8632
   #error "This kernel requires gas x86-32 assembler!"
#endif
#ifdef SCPLX
   #define CMUL(i_) ((i_)+(i_))
#else
   #define CMUL(i_) i_
#endif

#if !defined(KB) || (KB == 0)
   #error "KB must be a compile-time constant!"
#endif
#if !defined(NB)
   #define NB 0
#endif
#if !defined(MB)
   #define MB 0
#endif
#if (MB/6)*6 != MB
[...1207 lines suppressed...]
	sub	$1, stN
	jnz	UNLOOP

#
#	Restore callee-saved iregs
#
   #ifdef BETAX
	movl	32(%esp), %ebp
	movl	28(%esp), %ebx
	movl	24(%esp), %esi
	movl	20(%esp), %edi
	movl	16(%esp), %esp
   #else
	movl	12(%esp), %ebp
	movl	 8(%esp), %ebx
	movl	 4(%esp), %esi
	movl	  (%esp), %edi
	addl	$28, %esp
   #endif
	ret

Index: ATL_dmm6x1x72_sse2.c
===================================================================
RCS file: /cvsroot/math-atlas/AtlasBase/kernel/ClintWhaley/ATL_dmm6x1x72_sse2.c,v
retrieving revision 1.12
retrieving revision 1.13
diff -C2 -d -r1.12 -r1.13
*** ATL_dmm6x1x72_sse2.c	20 Mar 2004 18:45:43 -0000	1.12
--- ATL_dmm6x1x72_sse2.c	11 Jul 2004 16:41:50 -0000	1.13
***************
*** 433,437 ****
  	addpd	rB0, rC5
  #endif
! 
  #if KB > 22
  	movapd	176-120(pB0), rB0
--- 433,438 ----
  	addpd	rB0, rC5
  #endif
! 						pref2((pfA))
! 						addl	$PFAINC, pfA
  #if KB > 22
  	movapd	176-120(pB0), rB0
***************
*** 916,921 ****
  	addpd	rB0, rC5
  #endif
! 						pref2((pfA))
! 						addl	$PFAINC, pfA
  #if KB > 68
  	movapd	544-120(pB0), rB0
--- 917,921 ----
  	addpd	rB0, rC5
  #endif
! 
  #if KB > 68
  	movapd	544-120(pB0), rB0
***************
*** 2389,2392 ****
--- 2389,2394 ----
  	addpd	rB0, rC5
  #endif
+ 						pref2((pfA))
+ 						addl	$PFAINC, pfA
  
  #if KB > 22
***************
*** 2872,2877 ****
  	addpd	rB0, rC5
  #endif
- 						pref2((pfA))
- 						addl	$PFAINC, pfA
  #if KB > 68
  	movapd	544-120(pB0), rB0
--- 2874,2877 ----

Index: clint.base
===================================================================
RCS file: /cvsroot/math-atlas/AtlasBase/kernel/ClintWhaley/clint.base,v
retrieving revision 1.20
retrieving revision 1.21
diff -C2 -d -r1.20 -r1.21
*** clint.base	22 Jun 2004 20:49:49 -0000	1.20
--- clint.base	11 Jul 2004 16:41:50 -0000	1.21
***************
*** 7,11 ****
  @endifdef
  @extract -b @(topd)/gen.inc what=crsetup
! @ROUT ATL_dmm6x1x60_sse2_32 ATL_smm6x1x120_sse ATL_smm4x4x16_hppa
  @extract -b @(topd)/gen.inc @(cw04) what=cw
  @ROUT ATL_dmm6x1x30_x87 ATL_smm6x1x60_x87
--- 7,11 ----
  @endifdef
  @extract -b @(topd)/gen.inc what=crsetup
! @ROUT ATL_dmm6x1x60_sse2_32 ATL_smm6x1x120_sse ATL_smm6x1x80_sse
  @extract -b @(topd)/gen.inc @(cw04) what=cw
  @ROUT ATL_dmm6x1x30_x87 ATL_smm6x1x60_x87
***************
*** 43,47 ****
        ATL_dmm14x1x56_sse2pABC_MN ATL_smm14x1x84_sse ATL_smm14x1x84_sseCU @\
        ATL_dmm1x14x56_sse2pABC ATL_smm6x1x60_sse ATL_dmm6x1x60_sse2_32 @\
!       ATL_smm6x1x120_sse
  #ifndef Mjoin
     #define Mjoin(pre, nam) my_join(pre, nam)
--- 43,47 ----
        ATL_dmm14x1x56_sse2pABC_MN ATL_smm14x1x84_sse ATL_smm14x1x84_sseCU @\
        ATL_dmm1x14x56_sse2pABC ATL_smm6x1x60_sse ATL_dmm6x1x60_sse2_32 @\
!       ATL_smm6x1x120_sse ATL_smm6x1x80_sse
  #ifndef Mjoin
     #define Mjoin(pre, nam) my_join(pre, nam)