Initial revision
[binutils.git] / gas / testsuite / gasp / mdouble.out
blob9d9ad62d2839cbc64178b6689ef5a50c2f55bfe6
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 !       
27 !       H'0f
28         15
29 !       200+H'0F
30         200+15
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
47 !       NOP
48         NOP
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 !L00001 ADD     #1,@HL
61 L00001: 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