📄 ztrsm_kernel_ln_4x2_sse.s

📁 Optimized GotoBLAS libraries
💻 S
📖 第 1 页 / 共 5 页
字号:
	salq	$ZBASE_SHIFT, %rax	leaq	(AO, %rax, 2), AO#ifdef LT	addq	$8 * SIZE, B#endif#endif#ifdef LN	subq	$2, KK	movq	BORIG, B#endif#ifdef LT	addq	$2, KK#endif#ifdef RT	movq	K, %rax	movq	BORIG, B	salq	$1 + ZBASE_SHIFT, %rax	addq	%rax, AORIG#endif	ALIGN_4	.L30:	movq	M,  I	sarq	$2, I		# i = (m >> 2)	jle	.L39	ALIGN_4.L11:#ifdef LN       movq	K, %rax       salq	$2 + ZBASE_SHIFT, %rax       subq	%rax, AORIG#endif#if defined(LN) || defined(RT)	movq	KK, %rax	movq	AORIG, AO	salq	$ZBASE_SHIFT, %rax	leaq	(AO, %rax, 4), AO#endif	leaq	BUFFER, BO#if defined(LN) || defined(RT)	movq	KK, %rax	salq	$1 + ZBASE_SHIFT, %rax	leaq	(BO, %rax, 4), BO#endif		movaps	 0 * SIZE(BO), %xmm9	movaps	 4 * SIZE(BO), %xmm11	movaps	 8 * SIZE(BO), %xmm13	movaps	16 * SIZE(BO), %xmm15	movaps	 0 * SIZE(AO), %xmm8	pxor	%xmm0, %xmm0	movaps	 4 * SIZE(AO), %xmm10	pxor	%xmm1, %xmm1	movaps	 8 * SIZE(AO), %xmm12	pxor	%xmm2, %xmm2	movaps	12 * SIZE(AO), %xmm14	pxor	%xmm3, %xmm3	PREFETCHW     -8 * SIZE(CO1)	pxor	%xmm4, %xmm4	PREFETCHW     -8 * SIZE(CO2)	pxor	%xmm5, %xmm5	pxor	%xmm6, %xmm6	pxor	%xmm7, %xmm7#if defined(LT) || defined(RN)	movq	KK, %rax#else	movq	K, %rax	subq	KK, %rax#endif	andq	$-8, %rax	salq	$4, %rax	je	.L15.L1X:		KERNEL1(32 *  0)	KERNEL2(32 *  0)	KERNEL3(32 *  0)	KERNEL4(32 *  0)	KERNEL5(32 *  0)	KERNEL6(32 *  0)	KERNEL7(32 *  0)	KERNEL8(32 *  0)	KERNEL1(32 *  1)	KERNEL2(32 *  1)	KERNEL3(32 *  1)	KERNEL4(32 *  1)	KERNEL5(32 *  1)	KERNEL6(32 *  1)	KERNEL7(32 *  1)	KERNEL8(32 *  1)	addq	$32 * 2  * SIZE, AO	addq	$64 * 2  * SIZE, BO	subq	$64 * 2, %rax	jg	.L1X.L12:	leaq	(AO, %rax, 2), AO	leaq	(BO, %rax, 4), BO	ALIGN_4.L15:#if defined(LT) || defined(RN)	movq	KK, %rax#else	movq	K, %rax	subq	KK, %rax#endif	movaps	POSINV,  %xmm15	andq	$7, %rax		# if (k & 1)	BRANCH	je .L18	ALIGN_4.L16:	mulps	%xmm8, %xmm9	addps	%xmm9, %xmm0	movaps	 4 * SIZE(BO), %xmm9	mulps	%xmm8, %xmm9	addps	%xmm9, %xmm1	movaps	 8 * SIZE(BO), %xmm9	mulps	%xmm8, %xmm9	mulps	12 * SIZE(BO), %xmm8	addps	%xmm9, %xmm2	movaps	 0 * SIZE(BO), %xmm9	addps	%xmm8, %xmm3	movaps	 8 * SIZE(AO), %xmm8	mulps	%xmm10, %xmm9	addps	%xmm9, %xmm4	movaps	 4 * SIZE(BO), %xmm9	mulps	%xmm10, %xmm9	addps	%xmm9, %xmm5	movaps	 8 * SIZE(BO), %xmm9	mulps	%xmm10, %xmm9	mulps	12 * SIZE(BO), %xmm10	addps	%xmm9, %xmm6	movaps	16 * SIZE(BO), %xmm9	addps	%xmm10, %xmm7	movaps	12 * SIZE(AO), %xmm10	addq	$ 8 * SIZE, AO		# aoffset  += 4	addq	$16 * SIZE, BO		# boffset1 += 8	decq	%rax	jg	.L16	ALIGN_4.L18:	shufps	$0xb1, %xmm1, %xmm1	shufps	$0xb1, %xmm3, %xmm3	shufps	$0xb1, %xmm5, %xmm5	shufps	$0xb1, %xmm7, %xmm7#if defined(LN) || defined(LT)#ifndef CONJ	xorps	 %xmm15, %xmm1	xorps	 %xmm15, %xmm3	xorps	 %xmm15, %xmm5	xorps	 %xmm15, %xmm7#else	xorps	 %xmm15, %xmm0	xorps	 %xmm15, %xmm2	xorps	 %xmm15, %xmm4	xorps	 %xmm15, %xmm6#endif#else	xorps	 %xmm15, %xmm1	xorps	 %xmm15, %xmm3	xorps	 %xmm15, %xmm5	xorps	 %xmm15, %xmm7#endif	addps	%xmm1, %xmm0	addps	%xmm3, %xmm2	addps	%xmm5, %xmm4	addps	%xmm7, %xmm6#if defined(LN) || defined(RT)	movq	KK, %rax#ifdef LN	subq	$4, %rax#else	subq	$2, %rax#endif	movq	AORIG, AO	movq	BORIG, B	leaq	BUFFER, BO	salq	$ZBASE_SHIFT, %rax	leaq	(AO, %rax, 4), AO	leaq	(B,  %rax, 2), B	leaq	(BO, %rax, 8), BO#endif#if defined(LN) || defined(LT)	movaps	%xmm0, %xmm1	unpcklpd %xmm2, %xmm0	unpckhpd %xmm2, %xmm1	movaps	%xmm4, %xmm5	unpcklpd %xmm6, %xmm4	unpckhpd %xmm6, %xmm5	movaps	 0 * SIZE(B), %xmm2	movaps	 4 * SIZE(B), %xmm3	movaps	 8 * SIZE(B), %xmm6	movaps	12 * SIZE(B), %xmm7	subps	%xmm0,  %xmm2	subps	%xmm1,  %xmm3	subps	%xmm4,  %xmm6	subps	%xmm5,  %xmm7#else	movaps	 0 * SIZE(AO), %xmm1	movaps	 4 * SIZE(AO), %xmm3	movaps	 8 * SIZE(AO), %xmm5	movaps	12 * SIZE(AO), %xmm7	subps	%xmm0,  %xmm1	subps	%xmm4,  %xmm3	subps	%xmm2,  %xmm5	subps	%xmm6,  %xmm7#endif#ifdef LN	movaps	28 * SIZE(AO), %xmm8	pshufd	 $0xee, %xmm8, %xmm9	pshufd	 $0xbb, %xmm8, %xmm10	pshufd	 $0xa0, %xmm7, %xmm0	pshufd	 $0xf5, %xmm7, %xmm7#ifndef CONJ	xorps	 %xmm15, %xmm7#else	xorps	 %xmm15, %xmm0#endif	mulps	%xmm9,  %xmm0	mulps	%xmm10, %xmm7	addps	%xmm0,  %xmm7	pshufd	 $0x44, %xmm8, %xmm9	pshufd	 $0x11, %xmm8, %xmm10	pshufd	 $0xa0, %xmm7, %xmm0	pshufd	 $0xf5, %xmm7, %xmm1#ifndef CONJ	xorps	 %xmm15, %xmm1#else	xorps	 %xmm15, %xmm0#endif	mulps	%xmm9,  %xmm0	mulps	%xmm10, %xmm1	subps	%xmm0,  %xmm6	subps	%xmm1,  %xmm6	movaps	24 * SIZE(AO), %xmm8	pshufd	 $0xee, %xmm8, %xmm9	pshufd	 $0xbb, %xmm8, %xmm10	pshufd	 $0xa0, %xmm7, %xmm0	pshufd	 $0xf5, %xmm7, %xmm1#ifndef CONJ	xorps	 %xmm15, %xmm1#else	xorps	 %xmm15, %xmm0#endif	mulps	%xmm9,  %xmm0	mulps	%xmm10, %xmm1	subps	%xmm0,  %xmm3	subps	%xmm1,  %xmm3	pshufd	 $0x44, %xmm8, %xmm9	pshufd	 $0x11, %xmm8, %xmm10	pshufd	 $0xa0, %xmm7, %xmm0	pshufd	 $0xf5, %xmm7, %xmm1#ifndef CONJ	xorps	 %xmm15, %xmm1#else	xorps	 %xmm15, %xmm0#endif	mulps	%xmm9,  %xmm0	mulps	%xmm10, %xmm1	subps	%xmm0,  %xmm2	subps	%xmm1,  %xmm2	movaps	20 * SIZE(AO), %xmm8	pshufd	 $0x44, %xmm8, %xmm9	pshufd	 $0x11, %xmm8, %xmm10	pshufd	 $0xa0, %xmm6, %xmm0	pshufd	 $0xf5, %xmm6, %xmm6#ifndef CONJ	xorps	 %xmm15, %xmm6#else	xorps	 %xmm15, %xmm0#endif	mulps	%xmm9,  %xmm0	mulps	%xmm10, %xmm6	addps	%xmm0,  %xmm6	movaps	16 * SIZE(AO), %xmm8	pshufd	 $0xee, %xmm8, %xmm9	pshufd	 $0xbb, %xmm8, %xmm10	pshufd	 $0xa0, %xmm6, %xmm0	pshufd	 $0xf5, %xmm6, %xmm1#ifndef CONJ	xorps	 %xmm15, %xmm1#else	xorps	 %xmm15, %xmm0#endif	mulps	%xmm9,  %xmm0	mulps	%xmm10, %xmm1	subps	%xmm0,  %xmm3	subps	%xmm1,  %xmm3	pshufd	 $0x44, %xmm8, %xmm9	pshufd	 $0x11, %xmm8, %xmm10	pshufd	 $0xa0, %xmm6, %xmm0	pshufd	 $0xf5, %xmm6, %xmm1#ifndef CONJ	xorps	 %xmm15, %xmm1#else	xorps	 %xmm15, %xmm0#endif	mulps	%xmm9,  %xmm0	mulps	%xmm10, %xmm1	subps	%xmm0,  %xmm2	subps	%xmm1,  %xmm2	movaps	 8 * SIZE(AO), %xmm8	pshufd	 $0xee, %xmm8, %xmm9	pshufd	 $0xbb, %xmm8, %xmm10	pshufd	 $0xa0, %xmm3, %xmm0	pshufd	 $0xf5, %xmm3, %xmm3#ifndef CONJ	xorps	 %xmm15, %xmm3#else	xorps	 %xmm15, %xmm0#endif	mulps	%xmm9,  %xmm0	mulps	%xmm10, %xmm3	addps	%xmm0,  %xmm3	pshufd	 $0x44, %xmm8, %xmm9	pshufd	 $0x11, %xmm8, %xmm10	pshufd	 $0xa0, %xmm3, %xmm0	pshufd	 $0xf5, %xmm3, %xmm1#ifndef CONJ	xorps	 %xmm15, %xmm1#else	xorps	 %xmm15, %xmm0#endif	mulps	%xmm9,  %xmm0	mulps	%xmm10, %xmm1	subps	%xmm0,  %xmm2	subps	%xmm1,  %xmm2	movaps	 0 * SIZE(AO), %xmm8	pshufd	 $0x44, %xmm8, %xmm9	pshufd	 $0x11, %xmm8, %xmm10	pshufd	 $0xa0, %xmm2, %xmm0	pshufd	 $0xf5, %xmm2, %xmm2#ifndef CONJ	xorps	 %xmm15, %xmm2#else	xorps	 %xmm15, %xmm0#endif	mulps	%xmm9,  %xmm0	mulps	%xmm10, %xmm2	addps	%xmm0,  %xmm2#endif#ifdef LT	movaps	 0 * SIZE(AO), %xmm8	pshufd	 $0x44, %xmm8, %xmm9	pshufd	 $0x11, %xmm8, %xmm10	pshufd	 $0xa0, %xmm2, %xmm0	pshufd	 $0xf5, %xmm2, %xmm2#ifndef CONJ	xorps	 %xmm15, %xmm2#else	xorps	 %xmm15, %xmm0#endif	mulps	%xmm9,  %xmm0	mulps	%xmm10, %xmm2	addps	%xmm0,  %xmm2	pshufd	 $0xee, %xmm8, %xmm9	pshufd	 $0xbb, %xmm8, %xmm10	pshufd	 $0xa0, %xmm2, %xmm0	pshufd	 $0xf5, %xmm2, %xmm1#ifndef CONJ	xorps	 %xmm15, %xmm1#else	xorps	 %xmm15, %xmm0#endif	mulps	%xmm9,  %xmm0	mulps	%xmm10, %xmm1	subps	%xmm0,  %xmm3	subps	%xmm1,  %xmm3	movaps	 4 * SIZE(AO), %xmm8	pshufd	 $0x44, %xmm8, %xmm9	pshufd	 $0x11, %xmm8, %xmm10	pshufd	 $0xa0, %xmm2, %xmm0	pshufd	 $0xf5, %xmm2, %xmm1#ifndef CONJ	xorps	 %xmm15, %xmm1#else	xorps	 %xmm15, %xmm0#endif	mulps	%xmm9,  %xmm0	mulps	%xmm10, %xmm1	subps	%xmm0,  %xmm6	subps	%xmm1,  %xmm6	pshufd	 $0xee, %xmm8, %xmm9	pshufd	 $0xbb, %xmm8, %xmm10	pshufd	 $0xa0, %xmm2, %xmm0	pshufd	 $0xf5, %xmm2, %xmm1#ifndef CONJ	xorps	 %xmm15, %xmm1#else	xorps	 %xmm15, %xmm0#endif	mulps	%xmm9,  %xmm0	mulps	%xmm10, %xmm1	subps	%xmm0,  %xmm7	subps	%xmm1,  %xmm7	movaps	 8 * SIZE(AO), %xmm8	pshufd	 $0xee, %xmm8, %xmm9	pshufd	 $0xbb, %xmm8, %xmm10	pshufd	 $0xa0, %xmm3, %xmm0	pshufd	 $0xf5, %xmm3, %xmm3#ifndef CONJ	xorps	 %xmm15, %xmm3#else	xorps	 %xmm15, %xmm0#endif	mulps	%xmm9,  %xmm0	mulps	%xmm10, %xmm3	addps	%xmm0,  %xmm3	movaps	 12 * SIZE(AO), %xmm8	pshufd	 $0x44, %xmm8, %xmm9	pshufd	 $0x11, %xmm8, %xmm10	pshufd	 $0xa0, %xmm3, %xmm0	pshufd	 $0xf5, %xmm3, %xmm1#ifndef CONJ	xorps	 %xmm15, %xmm1#else	xorps	 %xmm15, %xmm0#endif	mulps	%xmm9,  %xmm0	mulps	%xmm10, %xmm1	subps	%xmm0,  %xmm6	subps	%xmm1,  %xmm6	pshufd	 $0xee, %xmm8, %xmm9	pshufd	 $0xbb, %xmm8, %xmm10	pshufd	 $0xa0, %xmm3, %xmm0	pshufd	 $0xf5, %xmm3, %xmm1#ifndef CONJ	xorps	 %xmm15, %xmm1#else	xorps	 %xmm15, %xmm0#endif	mulps	%xmm9,  %xmm0	mulps	%xmm10, %xmm1	subps	%xmm0,  %xmm7	subps	%xmm1,  %xmm7	movaps	20 * SIZE(AO), %xmm8	pshufd	 $0x44, %xmm8, %xmm9	pshufd	 $0x11, %xmm8, %xmm10	pshufd	 $0xa0, %xmm6, %xmm0	pshufd	 $0xf5, %xmm6, %xmm6#ifndef CONJ	xorps	 %xmm15, %xmm6#else	xorps	 %xmm15, %xmm0#endif	mulps	%xmm9,  %xmm0	mulps	%xmm10, %xmm6	addps	%xmm0,  %xmm6	pshufd	 $0xee, %xmm8, %xmm9	pshufd	 $0xbb, %xmm8, %xmm10	pshufd	 $0xa0, %xmm6, %xmm0	pshufd	 $0xf5, %xmm6, %xmm1#ifndef CONJ	xorps	 %xmm15, %xmm1#else	xorps	 %xmm15, %xmm0#endif	mulps	%xmm9,  %xmm0	mulps	%xmm10, %xmm1	subps	%xmm0,  %xmm7	subps	%xmm1,  %xmm7	movaps	28 * SIZE(AO), %xmm8	pshufd	 $0xee, %xmm8, %xmm9	pshufd	 $0xbb, %xmm8, %xmm10	pshufd	 $0xa0, %xmm7, %xmm0	pshufd	 $0xf5, %xmm7, %xmm7#ifndef CONJ	xorps	 %xmm15, %xmm7#else	xorps	 %xmm15, %xmm0#endif	mulps	%xmm9,  %xmm0	mulps	%xmm10, %xmm7	addps	%xmm0,  %xmm7#endif#ifdef RN	movaps	 0 * SIZE(B), %xmm8	pshufd	 $0x44, %xmm8, %xmm9	pshufd	 $0x11, %xmm8, %xmm10	pshufd	 $0xa0, %xmm1, %xmm0	pshufd	 $0xf5, %xmm1, %xmm1	pshufd	 $0xa0, %xmm3, %xmm2	pshufd	 $0xf5, %xmm3, %xmm3#ifndef CONJ	xorps	 %xmm15, %xmm1	xorps	 %xmm15, %xmm3#else	xorps	 %xmm15, %xmm0	xorps	 %xmm15, %xmm2#endif	mulps	%xmm9,  %xmm0	mulps	%xmm9,  %xmm2	mulps	%xmm10, %xmm1	mulps	%xmm10, %xmm3	addps	%xmm0,  %xmm1	addps	%xmm2,  %xmm3	pshufd	 $0xee, %xmm8, %xmm9	pshufd	 $0xbb, %xmm8, %xmm10	pshufd	 $0xa0, %xmm1, %xmm0	pshufd	 $0xf5, %xmm1, %xmm2	pshufd	 $0xa0, %xmm3, %xmm4	pshufd	 $0xf5, %xmm3, %xmm6#ifndef CONJ	xorps	 %xmm15, %xmm2	xorps	 %xmm15, %xmm6#else	xorps	 %xmm15, %xmm0	xorps	 %xmm15, %xmm4#endif	mulps	%xmm9,  %xmm0	mulps	%xmm9,  %xmm4	mulps	%xmm10, %xmm2	mulps	%xmm10, %xmm6	subps	%xmm0,  %xmm5	subps	%xmm4,  %xmm7	subps	%xmm2,  %xmm5	subps	%xmm6,  %xmm7	movaps	 4 * SIZE(B), %xmm8	pshufd	 $0xee, %xmm8, %xmm9	pshufd	 $0xbb, %xmm8, %xmm10	pshufd	 $0xa0, %xmm5, %xmm4	pshufd	 $0xf5, %xmm5, %xmm5	pshufd	 $0xa0, %xmm7, %xmm6	pshufd	 $0xf5, %xmm7, %xmm7#ifndef CONJ	xorps	 %xmm15, %xmm5	xorps	 %xmm15, %xmm7#else	xorps	 %xmm15, %xmm4	xorps	 %xmm15, %xmm6#endif	mulps	%xmm9,  %xmm4	mulps	%xmm9,  %xmm6	mulps	%xmm10, %xmm5	mulps	%xmm10, %xmm7	addps	%xmm4,  %xmm5	addps	%xmm6,  %xmm7#endif#ifdef RT	movaps	 4 * SIZE(B), %xmm8	pshufd	 $0xee, %xmm8, %xmm9	pshufd	 $0xbb, %xmm8, %xmm10	pshufd	 $0xa0, %xmm5, %xmm0	pshufd	 $0xf5, %xmm5, %xmm5	pshufd	 $0xa0, %xmm7, %xmm2	pshufd	 $0xf5, %xmm7, %xmm7#ifndef CONJ	xorps	 %xmm15, %xmm5	xorps	 %xmm15, %xmm7#else	xorps	 %xmm15, %xmm0	xorps	 %xmm15, %xmm2#endif	mulps	%xmm9,  %xmm0	mulps	%xmm9,  %xmm2	mulps	%xmm10, %xmm5	mulps	%xmm10, %xmm7	addps	%xmm0,  %xmm5	addps	%xmm2,  %xmm7	pshufd	 $0x44, %xmm8, %xmm9	pshufd	 $0x11, %xmm8, %xmm10	pshufd	 $0xa0, %xmm5, %xmm0	pshufd	 $0xf5, %xmm5, %xmm2	pshufd	 $0xa0, %xmm7, %xmm4	pshufd	 $0xf5, %xmm7, %xmm6#ifndef CONJ	xorps	 %xmm15, %xmm2	xorps	 %xmm15, %xmm6#else	xorps	 %xmm15, %xmm0	xorps	 %xmm15, %xmm4#endif	mulps	%xmm9,  %xmm0	mulps	%xmm9,  %xmm4	mulps	%xmm10, %xmm2	mulps	%xmm10, %xmm6	subps	%xmm0,  %xmm1	subps	%xmm4,  %xmm3	subps	%xmm2,  %xmm1	subps	%xmm6,  %xmm3	movaps	 0 * SIZE(B), %xmm8	pshufd	 $0x44, %xmm8, %xmm9	pshufd	 $0x11, %xmm8, %xmm10
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -