File: aix-glink-2c.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 (33 lines) | stat: -rw-r--r-- 480 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
	.toc

	.macro	defabs,type,name,value
	\type	\name
	\name	= \value
	.endm

	.macro	deffun,type,name
	\type	\name
	.csect	\name\()[DS]
\name\():
	.long	\name\()[PR],TOC[TC0],0

	.globl	.\name
	.csect	.\name\()[PR]
.\name\():
	nop
	.endm

	.macro	defdata,type,name,contents
	\type	\name
	.csect	\name\()[RW]
\name\():
	.long	\contents
	.endm

	defabs	.globl,a1,0xf400
	deffun	.globl,a2
	defdata	.globl,a3,0x4400

	defabs	.globl,c1,0xf500
	deffun	.globl,c2
	defdata	.globl,c3,0x5500