1	.title	Assembler Link Test Constants
2
3	.module	tconst
4
5	.area	TEST	(ABS,OVR)
6
7	bra1	==	0	; branching constants
8	bra2	==	0x80
9	bra3	==	0x182
10	bra4	==	0x204
11
12	.blkb	0x7E		;bra1:
13	.blkb	0x02
14	.blkb	0x7F		;bra2:
15	.blkb	0x02
16	.blkb	0x02
17	.blkb	0x7F
18	.blkb	0x00		;bra3:
19	.blkb	0x02
20	.blkb	0x80
21	.blkb	0x00		;bra4:
22
23	.globl	bra5,bra6,bra7,bra8
24
25				; branching labels
26bra5:	.blkb	0x7E		;bra5:
27	.blkb	0x02
28bra6:	.blkb	0x7F		;bra6:
29	.blkb	0x02
30	.blkb	0x02
31	.blkb	0x7F
32bra7:	.blkb	0x00		;bra7:
33	.blkb	0x02
34	.blkb	0x80
35bra8:	.blkb	0x00		;bra8:
36
37
38	; 12-Bit numbers are considered valid if:
39	;   1) the most significant 4 bits of the 16-bit number are zero
40	;   2) the most significant 4 bits of the 16-bit number are all ones
41
42	n0FFF	==	0x0FFF	;largest positive
43	n1000	==	0x1000	;+1
44
45	nF000	==	0xF000	;largest negative
46	nEFFF	==	0xEFFF	;-1
47
48
49	.area	DIRECT	(ABS,OVR)
50	.setdp
51
52	boundary	==	0x101
53
54	minus1	==	-1	; paging / indexing constants
55	zero	==	0
56	two55	==	0d255
57	two56	==	0d256
58	five11	==	0d511
59	five12	==	0d512
60
61
62	.globl	lzero,ltwo55,ltwo56,lminus1
63
64lzero:	.blkb	0x00FF		; paging labels
65ltwo55:	.blkb	0x0001
66ltwo56:	.blkb	0xFEFF
67lminus1:.blkb	0d0000
68
69