/
/ PDP-11 C.
/ Stdio.
/
/ Get lun.
/

	.globl	flun

/
/ flun(ioptr);
/ FILE *ioptr;
/
/ Returns the lun associated with the
/ file.
/

flun:	jsr	r0,_save
	mov	12(sp),r4
	call	_ckiov
	mov	F_LUN(r4),r0
	jmp	_ret
