[Math-atlas-commits] CVS: AtlasBase/kernel/ClintWhaley ATL_dmm4x4x16_hppa.c,NONE,1.1

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

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

Added Files:
	ATL_dmm4x4x16_hppa.c 
Log Message:
hppa changes

--- NEW FILE: ATL_dmm4x4x16_hppa.c ---
#if !defined(ATL_LINUX_PARISC) && !defined(ATL_HPUX_PARISC)
   #error "This kernel requires gas PA-RISC assembler!"
#endif

#ifndef Mjoin
   #define Mjoin(pre, nam) my_join(pre, nam)
   #define my_join(pre, nam) pre ## nam
#endif
#ifdef DCPLX
   #define CMUL(i_) (2*(i_))
#else
   #define CMUL(i_) i_
#endif

#if 1
#define prefA(mem)      ldw     mem, %r0
#define prefB(mem)      ldw     mem, %r0
#define prefC(mem)      ldd     mem, %r0
#else
[...1211 lines suppressed...]
	fldd	-48(%r30), %fr17
	fldd	-56(%r30), %fr18
	fldd	-64(%r30), %fr19
	fldd	-72(%r30), %fr20
	fldd	-80(%r30), %fr21
	ldw	-84(%r30), %r3
	ldw	-88(%r30), %r4
	ldw	-92(%r30), %r5
	ldw	-96(%r30), %r6
	ldw	-100(%r30), %r7
	ldw	-104(%r30), %r8
	ldw	-108(%r30), %r9
	ldw	-112(%r30), %r10
	ldw	-116(%r30), %r11
	ldw	-120(%r30), %r12
	ldw	-124(%r30), %r13
	bve (%r2)
	ldo	-FSIZE(%r30), %r30
	.EXIT
	.PROCEND