Blame thirdparty/openblas/xianyi-OpenBLAS-e6e87a2/kernel/x86/iamax_sse2.S

kusano 2b45e8
/*********************************************************************/
kusano 2b45e8
/* Copyright 2009, 2010 The University of Texas at Austin.           */
kusano 2b45e8
/* All rights reserved.                                              */
kusano 2b45e8
/*                                                                   */
kusano 2b45e8
/* Redistribution and use in source and binary forms, with or        */
kusano 2b45e8
/* without modification, are permitted provided that the following   */
kusano 2b45e8
/* conditions are met:                                               */
kusano 2b45e8
/*                                                                   */
kusano 2b45e8
/*   1. Redistributions of source code must retain the above         */
kusano 2b45e8
/*      copyright notice, this list of conditions and the following  */
kusano 2b45e8
/*      disclaimer.                                                  */
kusano 2b45e8
/*                                                                   */
kusano 2b45e8
/*   2. Redistributions in binary form must reproduce the above      */
kusano 2b45e8
/*      copyright notice, this list of conditions and the following  */
kusano 2b45e8
/*      disclaimer in the documentation and/or other materials       */
kusano 2b45e8
/*      provided with the distribution.                              */
kusano 2b45e8
/*                                                                   */
kusano 2b45e8
/*    THIS  SOFTWARE IS PROVIDED  BY THE  UNIVERSITY OF  TEXAS AT    */
kusano 2b45e8
/*    AUSTIN  ``AS IS''  AND ANY  EXPRESS OR  IMPLIED WARRANTIES,    */
kusano 2b45e8
/*    INCLUDING, BUT  NOT LIMITED  TO, THE IMPLIED  WARRANTIES OF    */
kusano 2b45e8
/*    MERCHANTABILITY  AND FITNESS FOR  A PARTICULAR  PURPOSE ARE    */
kusano 2b45e8
/*    DISCLAIMED.  IN  NO EVENT SHALL THE UNIVERSITY  OF TEXAS AT    */
kusano 2b45e8
/*    AUSTIN OR CONTRIBUTORS BE  LIABLE FOR ANY DIRECT, INDIRECT,    */
kusano 2b45e8
/*    INCIDENTAL,  SPECIAL, EXEMPLARY,  OR  CONSEQUENTIAL DAMAGES    */
kusano 2b45e8
/*    (INCLUDING, BUT  NOT LIMITED TO,  PROCUREMENT OF SUBSTITUTE    */
kusano 2b45e8
/*    GOODS  OR  SERVICES; LOSS  OF  USE,  DATA,  OR PROFITS;  OR    */
kusano 2b45e8
/*    BUSINESS INTERRUPTION) HOWEVER CAUSED  AND ON ANY THEORY OF    */
kusano 2b45e8
/*    LIABILITY, WHETHER  IN CONTRACT, STRICT  LIABILITY, OR TORT    */
kusano 2b45e8
/*    (INCLUDING NEGLIGENCE OR OTHERWISE)  ARISING IN ANY WAY OUT    */
kusano 2b45e8
/*    OF  THE  USE OF  THIS  SOFTWARE,  EVEN  IF ADVISED  OF  THE    */
kusano 2b45e8
/*    POSSIBILITY OF SUCH DAMAGE.                                    */
kusano 2b45e8
/*                                                                   */
kusano 2b45e8
/* The views and conclusions contained in the software and           */
kusano 2b45e8
/* documentation are those of the authors and should not be          */
kusano 2b45e8
/* interpreted as representing official policies, either expressed   */
kusano 2b45e8
/* or implied, of The University of Texas at Austin.                 */
kusano 2b45e8
/*********************************************************************/
kusano 2b45e8
kusano 2b45e8
#define ASSEMBLER
kusano 2b45e8
#include "common.h"
kusano 2b45e8
	
kusano 2b45e8
#define STACK	16
kusano 2b45e8
#define ARGS	 0
kusano 2b45e8
	
kusano 2b45e8
#define STACK_M		 4 + STACK + ARGS(%esp)
kusano 2b45e8
#define STACK_X		 8 + STACK + ARGS(%esp)
kusano 2b45e8
#define STACK_INCX	12 + STACK + ARGS(%esp)
kusano 2b45e8
kusano 2b45e8
#define RET	%eax
kusano 2b45e8
#define	M	%ebx
kusano 2b45e8
#define X	%ecx
kusano 2b45e8
#define INCX	%edx
kusano 2b45e8
#define I	%esi
kusano 2b45e8
#define MM	%ebp
kusano 2b45e8
#define XX	%edi
kusano 2b45e8
#define TEMP	%ebx
kusano 2b45e8
	
kusano 2b45e8
#ifdef USE_MIN
kusano 2b45e8
#define maxpd	minpd
kusano 2b45e8
#define maxsd	minsd
kusano 2b45e8
#endif
kusano 2b45e8
kusano 2b45e8
#include "l1param.h"
kusano 2b45e8
kusano 2b45e8
	PROLOGUE
kusano 2b45e8
kusano 2b45e8
	pushl	%ebp
kusano 2b45e8
	pushl	%edi
kusano 2b45e8
	pushl	%esi
kusano 2b45e8
	pushl	%ebx
kusano 2b45e8
kusano 2b45e8
	PROFCODE
kusano 2b45e8
kusano 2b45e8
	movl	STACK_M, M
kusano 2b45e8
	movl	STACK_X, X
kusano 2b45e8
	movl	STACK_INCX, INCX
kusano 2b45e8
kusano 2b45e8
#ifdef F_INTERFACE
kusano 2b45e8
	movl	(M), M
kusano 2b45e8
	movl	(INCX), INCX
kusano 2b45e8
#endif
kusano 2b45e8
kusano 2b45e8
	pxor	%xmm0, %xmm0
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	pxor	%xmm7, %xmm7
kusano 2b45e8
#endif
kusano 2b45e8
	xor	RET, RET
kusano 2b45e8
	testl	M, M
kusano 2b45e8
	jle	.L999
kusano 2b45e8
	leal	(, INCX, SIZE), INCX
kusano 2b45e8
	testl	INCX, INCX
kusano 2b45e8
	jle	.L999
kusano 2b45e8
kusano 2b45e8
	movl	M, MM
kusano 2b45e8
	movl	X, XX
kusano 2b45e8
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	cmpeqpd	%xmm7, %xmm7
kusano 2b45e8
	psrlq	$1, %xmm7
kusano 2b45e8
#endif
kusano 2b45e8
kusano 2b45e8
	movsd	(XX), %xmm0
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
	decl	MM
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm0
kusano 2b45e8
#endif
kusano 2b45e8
	unpcklpd %xmm0, %xmm0
kusano 2b45e8
	movapd	 %xmm0, %xmm1
kusano 2b45e8
	movapd	 %xmm0, %xmm2
kusano 2b45e8
	movapd	 %xmm0, %xmm3
kusano 2b45e8
	cmpl	$SIZE, INCX
kusano 2b45e8
	jne	.L80
kusano 2b45e8
kusano 2b45e8
/* Analigned Check */
kusano 2b45e8
	cmpl	$7, MM
kusano 2b45e8
	jle	.L50
kusano 2b45e8
kusano 2b45e8
	testl	$7, XX
kusano 2b45e8
	jne	.L50		# Purely Unaligned Mode
kusano 2b45e8
kusano 2b45e8
	testl	$15, XX		# Checking for 128bit align
kusano 2b45e8
	je	.L05
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	unpcklpd %xmm4, %xmm4
kusano 2b45e8
	maxpd	 %xmm4, %xmm3
kusano 2b45e8
	decl	MM
kusano 2b45e8
	addl	$SIZE, XX
kusano 2b45e8
	ALIGN_3
kusano 2b45e8
kusano 2b45e8
.L05:
kusano 2b45e8
	movl	MM,  I
kusano 2b45e8
	sarl	$4, I
kusano 2b45e8
	jle	.L15
kusano 2b45e8
	ALIGN_4
kusano 2b45e8
	
kusano 2b45e8
.L11:
kusano 2b45e8
#ifdef PREFETCH
kusano 2b45e8
	PREFETCH (PREFETCHSIZE +  0) - PREOFFSET(XX)
kusano 2b45e8
#endif
kusano 2b45e8
kusano 2b45e8
	movapd	0 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm0
kusano 2b45e8
kusano 2b45e8
	movapd	2 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm1
kusano 2b45e8
kusano 2b45e8
	movapd	4 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm2
kusano 2b45e8
kusano 2b45e8
	movapd	6 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm3
kusano 2b45e8
kusano 2b45e8
#ifdef PREFETCH
kusano 2b45e8
	PREFETCH (PREFETCHSIZE + 64) - PREOFFSET(XX)
kusano 2b45e8
#endif
kusano 2b45e8
kusano 2b45e8
	movapd	8 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm0
kusano 2b45e8
kusano 2b45e8
	movapd	10 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm1
kusano 2b45e8
kusano 2b45e8
	movapd	12 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm2
kusano 2b45e8
kusano 2b45e8
	movapd	14 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm3
kusano 2b45e8
kusano 2b45e8
	addl	$16 * SIZE, XX
kusano 2b45e8
	decl	I
kusano 2b45e8
	jg	.L11
kusano 2b45e8
	ALIGN_4
kusano 2b45e8
kusano 2b45e8
.L15:
kusano 2b45e8
	andl	$15,  MM
kusano 2b45e8
	jle	.L20
kusano 2b45e8
kusano 2b45e8
	testl	$8, MM
kusano 2b45e8
	je	.L16
kusano 2b45e8
kusano 2b45e8
	movapd	0 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm0
kusano 2b45e8
kusano 2b45e8
	movapd	2 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm1
kusano 2b45e8
kusano 2b45e8
	movapd	4 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm2
kusano 2b45e8
kusano 2b45e8
	movapd	6 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm3
kusano 2b45e8
	addl	$8 * SIZE, XX
kusano 2b45e8
	ALIGN_3
kusano 2b45e8
kusano 2b45e8
.L16:
kusano 2b45e8
	testl	$4, MM
kusano 2b45e8
	je	.L17
kusano 2b45e8
kusano 2b45e8
	movapd	0 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm0
kusano 2b45e8
kusano 2b45e8
	movapd	2 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm1
kusano 2b45e8
	addl	$4 * SIZE, XX
kusano 2b45e8
	ALIGN_3	
kusano 2b45e8
kusano 2b45e8
.L17:
kusano 2b45e8
	testl	$2, MM
kusano 2b45e8
	je	.L18
kusano 2b45e8
kusano 2b45e8
	movapd	0 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm2
kusano 2b45e8
	addl	$2 * SIZE, XX
kusano 2b45e8
	
kusano 2b45e8
.L18:
kusano 2b45e8
	testl	$1, MM
kusano 2b45e8
	je	.L20
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	unpcklpd  %xmm4, %xmm4
kusano 2b45e8
	maxpd	%xmm4, %xmm3
kusano 2b45e8
	ALIGN_3
kusano 2b45e8
kusano 2b45e8
/* Finding Index */
kusano 2b45e8
.L20:
kusano 2b45e8
	movl	X, XX
kusano 2b45e8
	movl	M, MM
kusano 2b45e8
kusano 2b45e8
	maxpd	 %xmm1, %xmm0
kusano 2b45e8
	maxpd	 %xmm3, %xmm2
kusano 2b45e8
	maxpd	 %xmm2, %xmm0
kusano 2b45e8
	movapd	 %xmm0, %xmm1
kusano 2b45e8
	unpckhpd %xmm0, %xmm0
kusano 2b45e8
	maxsd	 %xmm1, %xmm0
kusano 2b45e8
	unpcklpd %xmm0, %xmm0
kusano 2b45e8
kusano 2b45e8
	testl	$15, XX		# Checking for 128bit align
kusano 2b45e8
	je	.L21
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm1
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm1
kusano 2b45e8
#endif
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm1
kusano 2b45e8
	je	.L999
kusano 2b45e8
	addl	$SIZE, XX
kusano 2b45e8
	decl	MM
kusano 2b45e8
	ALIGN_3
kusano 2b45e8
kusano 2b45e8
.L21:
kusano 2b45e8
	movl	MM,  I
kusano 2b45e8
	sarl	$3, I
kusano 2b45e8
	jle	.L25
kusano 2b45e8
	ALIGN_4
kusano 2b45e8
	
kusano 2b45e8
.L22:
kusano 2b45e8
#ifdef PREFETCH
kusano 2b45e8
	PREFETCH (PREFETCHSIZE +  0) - PREOFFSET(XX)
kusano 2b45e8
#endif
kusano 2b45e8
kusano 2b45e8
	movapd	0 * SIZE(XX), %xmm1
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm1
kusano 2b45e8
#endif
kusano 2b45e8
	cmpeqpd	%xmm0, %xmm1
kusano 2b45e8
kusano 2b45e8
	movapd	2 * SIZE(XX), %xmm2
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm2
kusano 2b45e8
#endif
kusano 2b45e8
	cmpeqpd	%xmm0, %xmm2
kusano 2b45e8
kusano 2b45e8
	movapd	4 * SIZE(XX), %xmm3
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm3
kusano 2b45e8
#endif
kusano 2b45e8
	cmpeqpd	%xmm0, %xmm3
kusano 2b45e8
kusano 2b45e8
	movapd	6 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	cmpeqpd	%xmm0, %xmm4
kusano 2b45e8
kusano 2b45e8
	orpd	%xmm2, %xmm1
kusano 2b45e8
	orpd	%xmm4, %xmm3
kusano 2b45e8
	orpd	%xmm3, %xmm1
kusano 2b45e8
	movmskpd %xmm1, TEMP
kusano 2b45e8
	testl	 $3, TEMP
kusano 2b45e8
	jne	 .L23
kusano 2b45e8
kusano 2b45e8
	addl	$8 * SIZE, XX
kusano 2b45e8
	addl	$8, RET
kusano 2b45e8
	decl	I
kusano 2b45e8
	jg	.L22
kusano 2b45e8
	jmp	.L25
kusano 2b45e8
	ALIGN_4
kusano 2b45e8
kusano 2b45e8
.L23:
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm1
kusano 2b45e8
	movsd	1 * SIZE(XX), %xmm2
kusano 2b45e8
	movsd	2 * SIZE(XX), %xmm3
kusano 2b45e8
	movsd	3 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm1
kusano 2b45e8
	andpd	 %xmm7, %xmm2
kusano 2b45e8
	andpd	 %xmm7, %xmm3
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm1
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm2
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm3
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm4
kusano 2b45e8
	je	.L999
kusano 2b45e8
kusano 2b45e8
	movsd	4 * SIZE(XX), %xmm1
kusano 2b45e8
	movsd	5 * SIZE(XX), %xmm2
kusano 2b45e8
	movsd	6 * SIZE(XX), %xmm3
kusano 2b45e8
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm1
kusano 2b45e8
	andpd	 %xmm7, %xmm2
kusano 2b45e8
	andpd	 %xmm7, %xmm3
kusano 2b45e8
#endif
kusano 2b45e8
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm1
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm2
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm3
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	jmp	.L999
kusano 2b45e8
	ALIGN_3
kusano 2b45e8
kusano 2b45e8
.L25:
kusano 2b45e8
	testl	$4, MM
kusano 2b45e8
	je	.L27
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm1
kusano 2b45e8
	movsd	1 * SIZE(XX), %xmm2
kusano 2b45e8
	movsd	2 * SIZE(XX), %xmm3
kusano 2b45e8
	movsd	3 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm1
kusano 2b45e8
	andpd	 %xmm7, %xmm2
kusano 2b45e8
	andpd	 %xmm7, %xmm3
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	addl	$4 * SIZE, XX
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm1
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm2
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm3
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm4
kusano 2b45e8
	je	.L999
kusano 2b45e8
	ALIGN_3	
kusano 2b45e8
kusano 2b45e8
.L27:
kusano 2b45e8
	testl	$2, MM
kusano 2b45e8
	je	.L28
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm1
kusano 2b45e8
	movsd	1 * SIZE(XX), %xmm2
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm1
kusano 2b45e8
	andpd	 %xmm7, %xmm2
kusano 2b45e8
#endif
kusano 2b45e8
	addl	$2 * SIZE, XX
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm1
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm2
kusano 2b45e8
	je	.L999
kusano 2b45e8
	ALIGN_3
kusano 2b45e8
	
kusano 2b45e8
.L28:
kusano 2b45e8
	incl	RET
kusano 2b45e8
	jmp	.L999
kusano 2b45e8
	ALIGN_3
kusano 2b45e8
kusano 2b45e8
.L50:
kusano 2b45e8
/* Unaligned Mode */
kusano 2b45e8
	movl	MM,  I
kusano 2b45e8
	sarl	$4, I
kusano 2b45e8
	jle	.L55
kusano 2b45e8
	ALIGN_4
kusano 2b45e8
kusano 2b45e8
.L51:
kusano 2b45e8
#ifdef PREFETCH
kusano 2b45e8
	PREFETCH (PREFETCHSIZE +  0) - PREOFFSET(XX)
kusano 2b45e8
#endif
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	movhpd	1 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm0
kusano 2b45e8
kusano 2b45e8
	movsd	2 * SIZE(XX), %xmm4
kusano 2b45e8
	movhpd	3 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm1
kusano 2b45e8
kusano 2b45e8
	movsd	4 * SIZE(XX), %xmm4
kusano 2b45e8
	movhpd	5 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm2
kusano 2b45e8
kusano 2b45e8
	movsd	6 * SIZE(XX), %xmm4
kusano 2b45e8
	movhpd	7 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm3
kusano 2b45e8
kusano 2b45e8
#ifdef PREFETCH
kusano 2b45e8
	PREFETCH (PREFETCHSIZE + 64) - PREOFFSET(XX)
kusano 2b45e8
#endif
kusano 2b45e8
kusano 2b45e8
	movsd	8 * SIZE(XX), %xmm4
kusano 2b45e8
	movhpd	9 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm0
kusano 2b45e8
kusano 2b45e8
	movsd	10 * SIZE(XX), %xmm4
kusano 2b45e8
	movhpd	11 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm1
kusano 2b45e8
kusano 2b45e8
	movsd	12 * SIZE(XX), %xmm4
kusano 2b45e8
	movhpd	13 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm2
kusano 2b45e8
kusano 2b45e8
	movsd	14 * SIZE(XX), %xmm4
kusano 2b45e8
	movhpd	15 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm3
kusano 2b45e8
kusano 2b45e8
	addl	$16 * SIZE, XX
kusano 2b45e8
	decl	I
kusano 2b45e8
	jg	.L51
kusano 2b45e8
	ALIGN_4
kusano 2b45e8
kusano 2b45e8
.L55:
kusano 2b45e8
	andl	$15,  MM
kusano 2b45e8
	jle	.L60
kusano 2b45e8
kusano 2b45e8
	testl	$8, MM
kusano 2b45e8
	je	.L56
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	movhpd	1 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm0
kusano 2b45e8
kusano 2b45e8
	movsd	2 * SIZE(XX), %xmm4
kusano 2b45e8
	movhpd	3 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm1
kusano 2b45e8
kusano 2b45e8
	movsd	4 * SIZE(XX), %xmm4
kusano 2b45e8
	movhpd	5 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm2
kusano 2b45e8
kusano 2b45e8
	movsd	6 * SIZE(XX), %xmm4
kusano 2b45e8
	movhpd	7 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm3
kusano 2b45e8
kusano 2b45e8
	addl	$8 * SIZE, XX
kusano 2b45e8
	ALIGN_3
kusano 2b45e8
kusano 2b45e8
.L56:
kusano 2b45e8
	testl	$4, MM
kusano 2b45e8
	je	.L57
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	movhpd	1 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm0
kusano 2b45e8
kusano 2b45e8
	movsd	2 * SIZE(XX), %xmm4
kusano 2b45e8
	movhpd	3 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm1
kusano 2b45e8
	addl	$4 * SIZE, XX
kusano 2b45e8
	ALIGN_3	
kusano 2b45e8
kusano 2b45e8
.L57:
kusano 2b45e8
	testl	$2, MM
kusano 2b45e8
	je	.L58
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	movhpd	1 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm2
kusano 2b45e8
	addl	$2 * SIZE, XX
kusano 2b45e8
	
kusano 2b45e8
.L58:
kusano 2b45e8
	testl	$1, MM
kusano 2b45e8
	je	.L60
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	unpcklpd  %xmm4, %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm3
kusano 2b45e8
	ALIGN_3
kusano 2b45e8
kusano 2b45e8
.L60:
kusano 2b45e8
	movl	X, XX
kusano 2b45e8
	movl	M, MM
kusano 2b45e8
kusano 2b45e8
	maxpd	 %xmm1, %xmm0
kusano 2b45e8
	maxpd	 %xmm3, %xmm2
kusano 2b45e8
	maxpd	 %xmm2, %xmm0
kusano 2b45e8
	movapd	 %xmm0, %xmm1
kusano 2b45e8
	unpckhpd %xmm0, %xmm0
kusano 2b45e8
	maxsd	 %xmm1, %xmm0
kusano 2b45e8
	unpcklpd %xmm0, %xmm0
kusano 2b45e8
kusano 2b45e8
	movl	MM,  I
kusano 2b45e8
	sarl	$3, I
kusano 2b45e8
	jle	.L65
kusano 2b45e8
	ALIGN_4
kusano 2b45e8
	
kusano 2b45e8
.L62:
kusano 2b45e8
#ifdef PREFETCH
kusano 2b45e8
	PREFETCH (PREFETCHSIZE +  0) - PREOFFSET(XX)
kusano 2b45e8
#endif
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm1
kusano 2b45e8
	movhpd	1 * SIZE(XX), %xmm1
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm1
kusano 2b45e8
#endif
kusano 2b45e8
	cmpeqpd	%xmm0, %xmm1
kusano 2b45e8
kusano 2b45e8
	movsd	2 * SIZE(XX), %xmm2
kusano 2b45e8
	movhpd	3 * SIZE(XX), %xmm2
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm2
kusano 2b45e8
#endif
kusano 2b45e8
	cmpeqpd	%xmm0, %xmm2
kusano 2b45e8
kusano 2b45e8
	movsd	4 * SIZE(XX), %xmm3
kusano 2b45e8
	movhpd	5 * SIZE(XX), %xmm3
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm3
kusano 2b45e8
#endif
kusano 2b45e8
	cmpeqpd	%xmm0, %xmm3
kusano 2b45e8
kusano 2b45e8
	movsd	6 * SIZE(XX), %xmm4
kusano 2b45e8
	movhpd	7 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	cmpeqpd	%xmm0, %xmm4
kusano 2b45e8
kusano 2b45e8
	orpd	%xmm2, %xmm1
kusano 2b45e8
	orpd	%xmm4, %xmm3
kusano 2b45e8
	orpd	%xmm3, %xmm1
kusano 2b45e8
	movmskpd %xmm1, TEMP
kusano 2b45e8
	testl	 $3, TEMP
kusano 2b45e8
	jne	 .L63
kusano 2b45e8
kusano 2b45e8
	addl	$8 * SIZE, XX
kusano 2b45e8
	addl	$8, RET
kusano 2b45e8
	decl	I
kusano 2b45e8
	jg	.L62
kusano 2b45e8
	jmp	.L65
kusano 2b45e8
	ALIGN_4
kusano 2b45e8
kusano 2b45e8
.L63:
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm1
kusano 2b45e8
	movsd	1 * SIZE(XX), %xmm2
kusano 2b45e8
	movsd	2 * SIZE(XX), %xmm3
kusano 2b45e8
	movsd	3 * SIZE(XX), %xmm4
kusano 2b45e8
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm1
kusano 2b45e8
	andpd	 %xmm7, %xmm2
kusano 2b45e8
	andpd	 %xmm7, %xmm3
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm1
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm2
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm3
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm4
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
kusano 2b45e8
	movsd	4 * SIZE(XX), %xmm1
kusano 2b45e8
	movsd	5 * SIZE(XX), %xmm2
kusano 2b45e8
	movsd	6 * SIZE(XX), %xmm3
kusano 2b45e8
	
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm1
kusano 2b45e8
	andpd	 %xmm7, %xmm2
kusano 2b45e8
	andpd	 %xmm7, %xmm3
kusano 2b45e8
#endif
kusano 2b45e8
	
kusano 2b45e8
	comisd	%xmm0, %xmm1
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm2
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm3
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	jmp	.L999
kusano 2b45e8
	ALIGN_3
kusano 2b45e8
kusano 2b45e8
.L65:
kusano 2b45e8
	testl	$4, MM
kusano 2b45e8
	je	.L67
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm1
kusano 2b45e8
	movsd	1 * SIZE(XX), %xmm2
kusano 2b45e8
	movsd	2 * SIZE(XX), %xmm3
kusano 2b45e8
	movsd	3 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm1
kusano 2b45e8
	andpd	 %xmm7, %xmm2
kusano 2b45e8
	andpd	 %xmm7, %xmm3
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	addl	$4 * SIZE, XX
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm1
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm2
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm3
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm4
kusano 2b45e8
	je	.L999
kusano 2b45e8
	ALIGN_3	
kusano 2b45e8
kusano 2b45e8
.L67:
kusano 2b45e8
	testl	$2, MM
kusano 2b45e8
	je	.L68
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm1
kusano 2b45e8
	movsd	1 * SIZE(XX), %xmm2
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm1
kusano 2b45e8
	andpd	 %xmm7, %xmm2
kusano 2b45e8
#endif
kusano 2b45e8
	addl	$2 * SIZE, XX
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm1
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm2
kusano 2b45e8
	je	.L999
kusano 2b45e8
	ALIGN_3
kusano 2b45e8
	
kusano 2b45e8
.L68:
kusano 2b45e8
	incl	RET
kusano 2b45e8
	jmp	.L999
kusano 2b45e8
	ALIGN_4
kusano 2b45e8
kusano 2b45e8
.L80:
kusano 2b45e8
	movl	MM,  I
kusano 2b45e8
	sarl	$4, I
kusano 2b45e8
	jle	.L85
kusano 2b45e8
	ALIGN_4
kusano 2b45e8
	
kusano 2b45e8
.L81:
kusano 2b45e8
#ifdef PREFETCH
kusano 2b45e8
	PREFETCH (PREFETCHSIZE +  0) - PREOFFSET(XX)
kusano 2b45e8
#endif
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
	movhpd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm0
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
	movhpd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm1
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
	movhpd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm2
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
	movhpd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm3
kusano 2b45e8
kusano 2b45e8
#ifdef PREFETCH
kusano 2b45e8
	PREFETCH (PREFETCHSIZE +  0) - PREOFFSET(XX)
kusano 2b45e8
#endif
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
	movhpd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm0
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
	movhpd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	%xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm1
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
	movhpd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	%xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm2
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
	movhpd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	%xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm3
kusano 2b45e8
kusano 2b45e8
	decl	I
kusano 2b45e8
	jg	.L81
kusano 2b45e8
	ALIGN_4
kusano 2b45e8
kusano 2b45e8
.L85:
kusano 2b45e8
	andl	$15,  MM
kusano 2b45e8
	jle	.L90
kusano 2b45e8
kusano 2b45e8
	testl	$8, MM
kusano 2b45e8
	je	.L86
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
	movhpd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	%xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm0
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
	movhpd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	%xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm1
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
	movhpd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	%xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm2
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
	movhpd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	%xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm3
kusano 2b45e8
	ALIGN_3
kusano 2b45e8
kusano 2b45e8
.L86:
kusano 2b45e8
	testl	$4, MM
kusano 2b45e8
	je	.L87
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
	movhpd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	%xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm0
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
	movhpd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	%xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm1
kusano 2b45e8
	ALIGN_3	
kusano 2b45e8
kusano 2b45e8
.L87:
kusano 2b45e8
	testl	$2, MM
kusano 2b45e8
	je	.L88
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
	movhpd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	maxpd	%xmm4, %xmm2
kusano 2b45e8
	ALIGN_3
kusano 2b45e8
	
kusano 2b45e8
.L88:
kusano 2b45e8
	testl	$1, MM
kusano 2b45e8
	je	.L90
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm4
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	unpcklpd  %xmm4, %xmm4
kusano 2b45e8
	maxpd	%xmm4, %xmm3
kusano 2b45e8
	ALIGN_4
kusano 2b45e8
kusano 2b45e8
.L90:
kusano 2b45e8
	movl	X, XX
kusano 2b45e8
	movl	M, MM
kusano 2b45e8
kusano 2b45e8
	maxpd	 %xmm1, %xmm0
kusano 2b45e8
	maxpd	 %xmm3, %xmm2
kusano 2b45e8
	maxpd	 %xmm2, %xmm0
kusano 2b45e8
	movapd	 %xmm0, %xmm1
kusano 2b45e8
	unpckhpd %xmm0, %xmm0
kusano 2b45e8
	maxsd	 %xmm1, %xmm0
kusano 2b45e8
	unpcklpd %xmm0, %xmm0
kusano 2b45e8
kusano 2b45e8
	movl	MM,  I
kusano 2b45e8
	sarl	$3, I
kusano 2b45e8
	jle	.L95
kusano 2b45e8
	ALIGN_4
kusano 2b45e8
	
kusano 2b45e8
.L92:
kusano 2b45e8
#ifdef PREFETCH
kusano 2b45e8
	PREFETCH (PREFETCHSIZE +  0) - PREOFFSET(XX)
kusano 2b45e8
#endif
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm1
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
	movhpd	0 * SIZE(XX), %xmm1
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm1
kusano 2b45e8
#endif
kusano 2b45e8
	cmpeqpd	%xmm0, %xmm1
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm2
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
	movhpd	0 * SIZE(XX), %xmm2
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm2
kusano 2b45e8
#endif
kusano 2b45e8
	cmpeqpd	%xmm0, %xmm2
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm3
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
	movhpd	0 * SIZE(XX), %xmm3
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm3
kusano 2b45e8
#endif
kusano 2b45e8
	cmpeqpd	%xmm0, %xmm3
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
	movhpd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	cmpeqpd	%xmm0, %xmm4
kusano 2b45e8
kusano 2b45e8
	orpd	%xmm2, %xmm1
kusano 2b45e8
	orpd	%xmm4, %xmm3
kusano 2b45e8
	orpd	%xmm3, %xmm1
kusano 2b45e8
	movmskpd %xmm1, TEMP
kusano 2b45e8
	testl	 $3, TEMP
kusano 2b45e8
	jne	 .L93
kusano 2b45e8
kusano 2b45e8
	addl	$8, RET
kusano 2b45e8
	decl	I
kusano 2b45e8
	jg	.L92
kusano 2b45e8
	jmp	.L95
kusano 2b45e8
	ALIGN_4
kusano 2b45e8
kusano 2b45e8
.L93:
kusano 2b45e8
	leal	(, INCX, 8), TEMP
kusano 2b45e8
	subl	TEMP, XX
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm1
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm2
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm3
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm1
kusano 2b45e8
	andpd	 %xmm7, %xmm2
kusano 2b45e8
	andpd	 %xmm7, %xmm3
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm1
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm2
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm3
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm4
kusano 2b45e8
	je	.L999
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm1
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm2
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm3
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm1
kusano 2b45e8
	andpd	 %xmm7, %xmm2
kusano 2b45e8
	andpd	 %xmm7, %xmm3
kusano 2b45e8
#endif
kusano 2b45e8
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm1
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm2
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm3
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	jmp	.L999
kusano 2b45e8
	ALIGN_3
kusano 2b45e8
kusano 2b45e8
.L95:
kusano 2b45e8
	testl	$4, MM
kusano 2b45e8
	je	.L97
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm1
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm2
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm3
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm4
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm1
kusano 2b45e8
	andpd	 %xmm7, %xmm2
kusano 2b45e8
	andpd	 %xmm7, %xmm3
kusano 2b45e8
	andpd	 %xmm7, %xmm4
kusano 2b45e8
#endif
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm1
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm2
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm3
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm4
kusano 2b45e8
	je	.L999
kusano 2b45e8
	ALIGN_3	
kusano 2b45e8
kusano 2b45e8
.L97:
kusano 2b45e8
	testl	$2, MM
kusano 2b45e8
	je	.L98
kusano 2b45e8
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm1
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
	movsd	0 * SIZE(XX), %xmm2
kusano 2b45e8
	addl	INCX, XX
kusano 2b45e8
#ifdef USE_ABS
kusano 2b45e8
	andpd	 %xmm7, %xmm1
kusano 2b45e8
	andpd	 %xmm7, %xmm2
kusano 2b45e8
#endif
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm1
kusano 2b45e8
	je	.L999
kusano 2b45e8
	incl	RET
kusano 2b45e8
	comisd	%xmm0, %xmm2
kusano 2b45e8
	je	.L999
kusano 2b45e8
	ALIGN_3
kusano 2b45e8
	
kusano 2b45e8
.L98:
kusano 2b45e8
	incl	RET
kusano 2b45e8
	ALIGN_3
kusano 2b45e8
kusano 2b45e8
.L999:
kusano 2b45e8
	popl	%ebx
kusano 2b45e8
	popl	%esi
kusano 2b45e8
	popl	%edi
kusano 2b45e8
	popl	%ebp
kusano 2b45e8
	ret
kusano 2b45e8
kusano 2b45e8
	EPILOGUE