;
;	LINKAGE CONVENTIONS
;
	.MACRO	CALL RTN
	JSR	PC,RTN
	.ENDM
;
	.MACRO	RETURN
	RTS	PC
	.ENDM
;
	.MACRO	RECALL
	JSR	PC,@(SP)+
	.ENDM
;
;
;
;	EXTENDED MNEMONICS
;
;	ABSDIF A,B  -  B <= ABS(B-A)
;	ABSDIF A,B,C - B <= ABS(C<=B-A)
;
	.MACRO	ABSDIF A,B,C,?L1
	SUB	A,B
	.IF NB C
		MOV	B,C
	.ENDC
	BPL	L1
	NEG	B
L1:
	.ENDM
;
;	EXCHR A,B  -  A <=> B  (A AND B MUST BE REGISTERS)
;	EXCHS A,B,C - A <=> B ; C <= A
;
	.MACRO	EXCHR A,B
	XOR	A,B
	XOR	B,A
	XOR	A,B
	.ENDM
;
	.MACRO	EXCHS A,B,C
	MOV	A,C
	MOV	B,A
	MOV	C,B
	.ENDM
;