File: mma.S

package info (click to toggle)
linux 6.12.8-1
  • links: PTS, VCS
  • area: main
  • in suites: trixie
  • size: 1,673,568 kB
  • sloc: ansic: 25,888,630; asm: 268,782; sh: 136,481; python: 64,809; makefile: 55,668; perl: 38,052; xml: 19,270; cpp: 5,893; yacc: 4,923; lex: 2,939; awk: 1,592; sed: 28; ruby: 25
file content (36 lines) | stat: -rw-r--r-- 761 bytes parent folder | download | duplicates (29)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
/* SPDX-License-Identifier: GPL-2.0-or-later
 *
 * Test basic matrix multiply assist (MMA) functionality if available.
 *
 * Copyright 2020, Alistair Popple, IBM Corp.
 */
	.global test_mma
test_mma:
	/* Load accumulator via VSX registers from image passed in r3 */
	lxvh8x	4,0,3
	lxvh8x	5,0,4

	/* Clear and prime the accumulator (xxsetaccz) */
	.long	0x7c030162

	/* Prime the accumulator with MMA VSX move to accumulator
	* X-form (xxmtacc) (not needed due to above zeroing) */
	//.long 0x7c010162

	/* xvi16ger2s */
	.long	0xec042958

	/* Deprime the accumulator - xxmfacc 0 */
	.long 0x7c000162

	/* Store result in image passed in r5 */
	stxvw4x	0,0,5
	addi	5,5,16
	stxvw4x	1,0,5
	addi	5,5,16
	stxvw4x	2,0,5
	addi	5,5,16
	stxvw4x	3,0,5
	addi	5,5,16

	blr