gas/testsuite/gasp/pl3.asm


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

	.ALTERNATE

foo	MACRO	string
	LOCAL	lab1, lab2
lab1:	DATA.L	lab2
lab2:	SDATA	string
	ENDM

	foo	"An example"
	foo	"using LOCAL"

! test of LOCAL directive

chk_err	MACRO	limit
	LOCAL		skip !! frob
	LOCAL		zap,dog,barf
barf:	cmp		ax,limit	!! check value against
					!! limit
	jle		skip		!! skip call if OK
skip:	call	 	error
	foo		dog
	zap		dog	
	nop
	ENDM

	chk_err 5
	chk_err 10


	END