.MACRO CF$ENT
	.MCALL	$FDV
	.GLOBL	.FDARG
ARGS=4
FP=5
	JSR	R5,C$SAV
	$FDV	ARG=#.FDARG
.ENDM

.MACRO CF$XIT
	MOV	F$REQ(R0),R0
	MOV	@F$STS(R0),R0
	JMP	C$RET
.ENDM