File: aix-toc-1a.s

package info (click to toggle)
binutils-djgpp 2.35.1%2Bdfsg-1
  • links: PTS, VCS
  • area: main
  • in suites: bullseye
  • size: 321,228 kB
  • sloc: ansic: 1,162,947; asm: 671,219; cpp: 134,012; exp: 70,783; makefile: 55,860; sh: 22,254; yacc: 14,459; lisp: 13,806; perl: 2,008; lex: 1,649; pascal: 307; sed: 195; awk: 25
file content (23 lines) | stat: -rw-r--r-- 281 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
 
	.macro  loadtoc
	.toc
	.tc	sym\@[TC], \@

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

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

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