File: alpha.inc

package info (click to toggle)
binutils-avr 2.26.20160125%2BAtmel3.6.1-4
  • links: PTS, VCS
  • area: main
  • in suites: buster
  • size: 365,520 kB
  • sloc: ansic: 2,480,046; asm: 892,791; exp: 188,218; cpp: 133,829; makefile: 63,887; sh: 32,194; yacc: 26,783; lisp: 16,707; xml: 7,490; perl: 6,449; python: 4,555; ada: 4,318; pascal: 3,174; lex: 2,250; cs: 879; sed: 334; f90: 298; awk: 168; objc: 134; java: 73; fortran: 43
file content (65 lines) | stat: -rw-r--r-- 1,067 bytes parent folder | download | duplicates (34) 
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
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
 
	comment "subroutine declare"
	.purgem gdbasm_declare
	.macro gdbasm_declare name
	.ent	\name
\name:
	.endm

	comment "subroutine prologue"
	.macro gdbasm_enter
	.frame	$30, 16, $26, 0
	.mask	0x04000000, -16
	ldgp	$gp, 0($27)
	subq	$sp, 16, $sp
	stq	$26, 0($sp)
	.prologue 1
	.endm

	comment "subroutine epilogue"
	.macro gdbasm_leave
	ldq	$26, 0($sp)
	addq	$sp, 16, $sp
	ret
	.endm

	comment "subroutine end"
	.purgem gdbasm_end
	.macro gdbasm_end name
	.end	\name
	.endm

	comment "subroutine call"
	/* Can't use ldgp here because the finish-frame test expects the
	   pc to wind up on the next line.  That's ok, we're all local.  */
	.macro gdbasm_call subr
	jsr	$26, \subr
	.endm

	.macro gdbasm_several_nops
	nop
	nop
	nop
	nop
	.endm

	comment "exit (0)"
	.macro gdbasm_exit0
	lda	$16, 0($31)
	lda	$0, 1($31)
	callsys
	.endm

	comment "crt0 startup"
	.macro gdbasm_startup
	.frame	$31, 0, $31, 0
	.prologue
	ldgp	$gp, 0($27)
	.endm

	comment "Declare a data variable"
	.purgem gdbasm_datavar
	.macro gdbasm_datavar name value
	.data
\name:
	.long	\value
	.endm