xref: /csrg-svn/old/pcc/ccom.vax/VMS/jeql.mar (revision 44048)
1*44048Sbostic.MACRO	JEQL	LABLE,?AROUND
2*44048Sbostic	BNEQ	AROUND
3*44048Sbostic	BRW	LABLE
4*44048SbosticAROUND:
5*44048Sbostic	.ENDM	JEQL
6*44048Sbostic
7*44048Sbostic
8*44048Sbostic.MACRO	JNEQ	LABLE,?AROUND
9*44048Sbostic	BEQL	AROUND
10*44048Sbostic	BRW	LABLE
11*44048SbosticAROUND:
12*44048Sbostic	.ENDM	JNEQ
13*44048Sbostic
14*44048Sbostic
15*44048Sbostic.MACRO	JEQLU	LABLE,?AROUND
16*44048Sbostic	BNEQ	AROUND
17*44048Sbostic	BRW	LABLE
18*44048SbosticAROUND:
19*44048Sbostic	.ENDM	JEQLU
20*44048Sbostic
21*44048Sbostic
22*44048Sbostic.MACRO	JNEQU	LABLE,?AROUND
23*44048Sbostic	BEQL	AROUND
24*44048Sbostic	BRW	LABLE
25*44048SbosticAROUND:
26*44048Sbostic	.ENDM	JNEQU
27*44048Sbostic
28*44048Sbostic
29*44048Sbostic.MACRO	JLEQ	LABLE,?AROUND
30*44048Sbostic	BGTR	AROUND
31*44048Sbostic	BRW	LABLE
32*44048SbosticAROUND:
33*44048Sbostic	.ENDM	JLEQ
34*44048Sbostic
35*44048Sbostic
36*44048Sbostic.MACRO	JGTR	LABLE,?AROUND
37*44048Sbostic	BLEQ	AROUND
38*44048Sbostic	BRW	LABLE
39*44048SbosticAROUND:
40*44048Sbostic	.ENDM	JGTR
41*44048Sbostic
42*44048Sbostic
43*44048Sbostic.MACRO	JLSS	LABLE,?AROUND
44*44048Sbostic	BGEQ	AROUND
45*44048Sbostic	BRW	LABLE
46*44048SbosticAROUND:
47*44048Sbostic	.ENDM	JLSS
48*44048Sbostic
49*44048Sbostic
50*44048Sbostic.MACRO	JGEQ	LABLE,?AROUND
51*44048Sbostic	BLSS	AROUND
52*44048Sbostic	BRW	LABLE
53*44048SbosticAROUND:
54*44048Sbostic	.ENDM	JGEQ
55*44048Sbostic
56*44048Sbostic
57*44048Sbostic.MACRO	JLSSU	LABLE,?AROUND
58*44048Sbostic	BGEQU	AROUND
59*44048Sbostic	BRW	LABLE
60*44048SbosticAROUND:
61*44048Sbostic	.ENDM	JLSSU
62*44048Sbostic
63*44048Sbostic
64*44048Sbostic.MACRO	JGTRU	LABLE,?AROUND
65*44048Sbostic	BLEQU	AROUND
66*44048Sbostic	BRW	LABLE
67*44048SbosticAROUND:
68*44048Sbostic	.ENDM	JGTRU
69*44048Sbostic
70*44048Sbostic
71*44048Sbostic.MACRO	JGEQU	LABLE,?AROUND
72*44048Sbostic	BLSSU	AROUND
73*44048Sbostic	BRW	LABLE
74*44048SbosticAROUND:
75*44048Sbostic	.ENDM	JGEQU
76*44048Sbostic
77*44048Sbostic
78*44048Sbostic.MACRO	JLEQU	LABLE,?AROUND
79*44048Sbostic	BGTRU	AROUND
80*44048Sbostic	BRW	LABLE
81*44048SbosticAROUND:
82*44048Sbostic	.ENDM	JLEQU
83*44048Sbostic
84*44048Sbostic
85*44048Sbostic.MACRO	JVS	LABLE,?AROUND
86*44048Sbostic	BVC	AROUND
87*44048Sbostic	BRW	LABLE
88*44048SbosticAROUND:
89*44048Sbostic	.ENDM	JVS
90*44048Sbostic
91*44048Sbostic
92*44048Sbostic.MACRO	JVC	LABLE,?AROUND
93*44048Sbostic	BVS	AROUND
94*44048Sbostic	BRW	LABLE
95*44048SbosticAROUND:
96*44048Sbostic	.ENDM	JVC
97*44048Sbostic
98*44048Sbostic
99*44048Sbostic.MACRO	JCC	LABLE,?AROUND
100*44048Sbostic	BCS	AROUND
101*44048Sbostic	BRW	LABLE
102*44048SbosticAROUND:
103*44048Sbostic	.ENDM	JCC
104*44048Sbostic
105*44048Sbostic
106*44048Sbostic.MACRO	JCS	LABLE,?AROUND
107*44048Sbostic	BCC	AROUND
108*44048Sbostic	BRW	LABLE
109*44048SbosticAROUND:
110*44048Sbostic	.ENDM	JCS
111*44048Sbostic
112*44048Sbostic.MACRO	JLBS	SRC,LABLE,?AROUND
113*44048Sbostic	BLBC	SRC,AROUND
114*44048Sbostic	BRW	LABLE
115*44048SbosticAROUND:
116*44048Sbostic	.ENDM	JLBS
117*44048Sbostic
118*44048Sbostic
119*44048Sbostic.MACRO	JLBC	SRC,LABLE,?AROUND
120*44048Sbostic	BLBS	SRC,AROUND
121*44048Sbostic	BRW	LABLE
122*44048SbosticAROUND:
123*44048Sbostic	.ENDM	JLBC
124*44048Sbostic
125*44048Sbostic
126*44048Sbostic.MACRO	JBS	POS,SRC,LABLE,?AROUND
127*44048Sbostic	BBC	POS,SRC,AROUND
128*44048Sbostic	BRW	LABLE
129*44048SbosticAROUND:
130*44048Sbostic	.ENDM	JBS
131*44048Sbostic
132*44048Sbostic
133*44048Sbostic.MACRO	JBC	POS,SRC,LABLE,?AROUND
134*44048Sbostic	BBS	POS,SRC,AROUND
135*44048Sbostic	BRW	LABLE
136*44048SbosticAROUND:
137*44048Sbostic	.ENDM	JBC
138*44048Sbostic
139*44048Sbostic
140*44048Sbostic.MACRO	JBSS	POS,SRC,LABLE,?AROUND
141*44048Sbostic	BBCS	POS,SRC,AROUND
142*44048Sbostic	BRW	LABLE
143*44048SbosticAROUND:
144*44048Sbostic	.ENDM	JBSS
145*44048Sbostic
146*44048Sbostic
147*44048Sbostic.MACRO	JBCS	POS,SRC,LABLE,?AROUND
148*44048Sbostic	BBSS	POS,SRC,AROUND
149*44048Sbostic	BRW	LABLE
150*44048SbosticAROUND:
151*44048Sbostic	.ENDM	JBCS
152*44048Sbostic
153*44048Sbostic
154*44048Sbostic.MACRO	JBSC	POS,SRC,LABLE,?AROUND
155*44048Sbostic	BBCC	POS,SRC,AROUND
156*44048Sbostic	BRW	LABLE
157*44048SbosticAROUND:
158*44048Sbostic	.ENDM	JBSC
159*44048Sbostic
160*44048Sbostic
161*44048Sbostic.MACRO	JBCC	POS,SRC,LABLE,?AROUND
162*44048Sbostic	BBSC	POS,SRC,AROUND
163*44048Sbostic	BRW	LABLE
164*44048SbosticAROUND:
165*44048Sbostic	.ENDM	JBCC
166*44048Sbostic
167*44048Sbostic
168*44048Sbostic.MACRO	JBR	LABLE
169*44048Sbostic	BRW	LABLE
170*44048Sbostic	.ENDM	JBR
171*44048Sbostic
172*44048Sbostic
173*44048Sbostic.MACRO	.DATA	SEGMENT=0
174*44048Sbostic	.PSECT	C$_DATA'SEGMENT',-
175*44048Sbostic		NOEXE,LONG
176*44048Sbostic	.ENDM
177*44048Sbostic
178*44048Sbostic
179*44048Sbostic.MACRO	.TEXT	SEGMENT=0
180*44048Sbostic	.PSECT	C$_TEXT'SEGMENT',-
181*44048Sbostic		NOWRT,LONG
182*44048Sbostic	.ENDM
183*44048Sbostic
184*44048Sbostic
185*44048Sbostic.MACRO	.COMM	NAME,LENGTH=4
186*44048Sbostic	.SAVE
187*44048Sbostic	.PSECT	'NAME',-
188*44048Sbostic		NOEXE,LONG,GBL,OVR
189*44048Sbostic.=0
190*44048SbosticNAME==.
191*44048Sbostic	.BLKB	LENGTH
192*44048Sbostic	.RESTORE
193*44048Sbostic	.ENDM
194*44048Sbostic
195*44048Sbostic
196*44048Sbostic.MACRO	.LCOMM	NAME,LENGTH=4
197*44048Sbostic	.SAVE
198*44048Sbostic	.PSECT	CLV$_'NAME',-
199*44048Sbostic		NOEXE,LONG,GBL,OVR
200*44048Sbostic.=0
201*44048SbosticNAME=.
202*44048Sbostic	.BLKB	LENGTH
203*44048Sbostic	.RESTORE
204*44048Sbostic	.ENDM
205*44048Sbostic
206*44048Sbostic
207*44048Sbostic.MACRO	.SET	NAME,VALUE
208*44048SbosticNAME=VALUE
209*44048Sbostic	.ENDM
210*44048Sbostic
211*44048Sbostic
212*44048Sbostic.MACRO	.ORG	VALUE
213*44048Sbostic.=VALUE
214*44048Sbostic	.ENDM
215*44048Sbostic
216*44048Sbostic
217*44048Sbostic.MACRO	.SPACE	VALUE
218*44048Sbostic.	=	.+VALUE
219*44048Sbostic	.ENDM	.SPACE
220