/ / 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