File: aix-toc-1b.s

package info (click to toggle)
binutils-m68hc1x 1%3A2.35.1-3
  • links: PTS, VCS
  • area: main
  • in suites: bullseye
  • size: 335,580 kB
  • sloc: ansic: 1,187,755; asm: 674,290; cpp: 130,744; exp: 70,774; makefile: 56,048; sh: 22,128; yacc: 14,459; lisp: 13,803; perl: 2,112; ada: 1,681; lex: 1,649; pascal: 1,446; cs: 879; sed: 195; xml: 95; awk: 25
file content (23 lines) | stat: -rw-r--r-- 294 bytes parent folder | download | duplicates (28) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
	.macro  loadtoc
	.toc
	.tc	asym\@[TC], \@ | 0x10000

	.csect	.f2[PR]
	.if     size == 32
	lwz     1,asym\@[TC](2)
	.else
	ld      1,asym\@[TC](2)
	.endif
	.endm

	.globl	.f2
	.csect	.f2[PR]
.f2:
	.rept	0x7ffc * 8 / size
	loadtoc
	.endr

	.globl	f2
	.csect	f2[DS]
f2:
	.long	.f2[PR],TOC[TC0],0