/// a2 -- pdp-11 assembler pass 2outw:	cmp	dot-2,$4	beq	9f	bit	$1,dot	bne	1f	add	$2,dot	tstb	passno	beq	8f	clr	-(sp)	rol	r3	adc	(sp)	asr	r3		/ get relative pc bit	cmp	r3,$40	bne	2f/ external references	mov	$666,outmod		/ make nonexecutable	mov	xsymbol,r3	sub	$usymtab,r3	asl	r3	bis	$4,r3		/ external relocation	br	3f2:	bic	$40,r3		/ clear any ext bits	cmp	r3,$5	blo	4f	cmp	r3,$33		/ est. text, data	beq	6f	cmp	r3,$34	bne	7f6:	jsr	r5,error; 'r7:	mov	$1,r3		/ make absolute4:	cmp	r3,$2	blo	5f	cmp	r3,$4	bhi	5f	tst	(sp)	bne	4f	add	dotdot,r2	br	4f5:	tst	(sp)	beq	4f	sub	dotdot,r24:	dec	r3	bpl	3f	clr	r33:	asl	r3	bis	(sp)+,r3	mov	r2,r0	jsr	r5,putw; txtp	mov	tseekp,r0	add	$2,2(r0)	adc	(r0)	mov	r3,r0	jsr	r5,putw; relp	mov	rseekp,r0	add	$2,2(r0)	adc	(r0)8:	rts	pc1:	jsr	r5,error; 'o	clr	r3	jsr	pc,outb	rts	pc9:	jsr	r5,error; 'x	rts	pcoutb:	cmp	dot-2,$4		/ test bss mode	beq	9b	cmp	r3,$1	blos	1f	jsr	r5,error; 'r1:	tstb	passno	beq	2f	mov	r2,r0	bit	$1,dot	bne	1f	jsr	r5,putw; txtp	clr	r0	jsr	r5,putw; relp	mov	tseekp,r0	add	$2,2(r0)	adc	(r0)	mov	rseekp,r0	add	$2,2(r0)	adc	(r0)	br	2f1:	mov	txtp,r0	movb	r2,-1(r0)2:	inc	dot	rts	pcerror:	mov	pc,errflg	mov	$666,outmod		/ make nonexecutable	mov	r3,-(sp)	mov	r2,-(sp)	mov	r1,-(sp)	mov	r0,-(sp)	mov	$argb,r11:	movb	(r1),ch	beq	1f	clrb	(r1)+	mov	$1,r0	sys	write; ch; 1	br	1b1:	mov	(r5)+,r0	movb	r0,0f	mov	line,r3	mov	$0f+6,r0	mov	$4,r12:	clr	r2	dvd	$10.,r2	add	$'0,r3	movb	r3,-(r0)	mov	r2,r3	sob	r1,2b	mov	$1,r0	sys	write; 0f; 7	mov	(sp)+,r0	mov	(sp)+,r1	mov	(sp)+,r2	mov	(sp)+,r3	rts	r5	.data0:	<f xxxx\n>	.even	.textbetwen:	cmp	r0,(r5)+	blt	1f	cmp	(r5)+,r0	blt	2f1:	tst	(r5)+2:	rts	r5