summaryrefslogtreecommitdiff
path: root/gas/testsuite/gasp/mdouble.out
blob: 61eec93dde5397b965ea9ef376c2a15959639e56 (plain)
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
66
67
68
!

!	.MACRO	HI
!	A
!	\! this is hidden
!	B
!	! this is not
!	C
!	.ENDM
!	Hello 
	Hello 
!	HI
!	A
	A
!	
!	B
	B
!	! this is not
	! this is not
!	C
	C
!	Emily
	Emily
!	
!

!	H'0f
	15
!	200+H'0F
	200+15
!

!XX	.ASSIGNA	Q'100
!! Definition:
	! Definition:
!	.MACRO	GET X=100,Y,Z
!	MOV	#\X+H'0F,@B
!	\Y
!\Z	JMP	@MAIN
!L\@	ADD 	#1,@HL
!	MOV	#0,@C	\! Clear C
!	ADD	#2,@C
!	ADD	#\&XX, @C
!	.ENDM
!

!	NOP
	NOP
!

!!Call:	
	!Call:	
!	GET	200,"ADD #1,@B", ENTRY
!	MOV	#200+H'0F,@B
	MOV	#200+15,@B
!	ADD #1,@B
	ADD #1,@B
!ENTRY	JMP	@MAIN
ENTRY:	JMP	@MAIN
!L1	ADD 	#1,@HL
L1:	ADD 	#1,@HL
!	MOV	#0,@C	
	MOV	#0,@C	
!	ADD	#2,@C
	ADD	#2,@C
!	ADD	#\&XX, @C
	ADD	#64, @C
!	.END