projects
/
platform
/
upstream
/
binutils.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
0131dcc1572bf063e87be2569336b21c5bdd4834
[platform/upstream/binutils.git]
/
gas
/
testsuite
/
gasp
/
pl3.asm
1
.ALTERNATE
2
3
foo MACRO string
4
LOCAL lab1, lab2
5
lab1: DATA.L lab2
6
lab2: SDATA string
7
ENDM
8
9
foo "An example"
10
foo "using LOCAL"
11
12
! test of LOCAL directive
13
14
chk_err MACRO limit
15
LOCAL skip !! frob
16
LOCAL zap,dog,barf
17
barf: cmp ax,limit !! check value against
18
!! limit
19
jle skip !! skip call if OK
20
skip: call error
21
foo dog
22
zap dog
23
nop
24
ENDM
25
26
chk_err 5
27
chk_err 10
28
29
30
END