repo.or.cz
/
binutils.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
* chew.c (paramstuff, outputdots, perform, bang and usage): Remove
[binutils.git]
/
gas
/
testsuite
/
gasp
/
mdouble.out
blob
61eec93dde5397b965ea9ef376c2a15959639e56
1
!
2
3
! .MACRO HI
4
! A
5
! \! this is hidden
6
! B
7
! ! this is not
8
! C
9
! .ENDM
10
! Hello
11
Hello
12
! HI
13
! A
14
A
15
!
16
! B
17
B
18
! ! this is not
19
! this is not
20
! C
21
C
22
! Emily
23
Emily
24
!
25
!
26
27
! H'0f
28
15
29
! 200+H'0F
30
200+15
31
!
32
33
!XX .ASSIGNA Q'100
34
!! Definition:
35
! Definition:
36
! .MACRO GET X=100,Y,Z
37
! MOV #\X+H'0F,@B
38
! \Y
39
!\Z JMP @MAIN
40
!L\@ ADD #1,@HL
41
! MOV #0,@C \! Clear C
42
! ADD #2,@C
43
! ADD #\&XX, @C
44
! .ENDM
45
!
46
47
! NOP
48
NOP
49
!
50
51
!!Call:
52
!Call:
53
! GET 200,"ADD #1,@B", ENTRY
54
! MOV #200+H'0F,@B
55
MOV #200+15,@B
56
! ADD #1,@B
57
ADD #1,@B
58
!ENTRY JMP @MAIN
59
ENTRY: JMP @MAIN
60
!L1 ADD #1,@HL
61
L1: ADD #1,@HL
62
! MOV #0,@C
63
MOV #0,@C
64
! ADD #2,@C
65
ADD #2,@C
66
! ADD #\&XX, @C
67
ADD #64, @C
68
! .END