/ / PDP-11 C. / Standard Library. / / Rewind. / .globl rewind / / rewind(ioptr); / FILE *ioptr; / rewind: jsr r0,_save mov 12(r5),r4 bit $VF_OUT,V_FLAG(r4) beq 0f mov $-1,r0 br 1f 0: bic $VF_EOR,V_FLAG(r4) bis $VF_BAD,V_FLAG(r4) mov $-1,V_UGET(r4) clr V_R0(r4) clr V_RBLK(r4) mov $1,V_RBLK+2(r4) clr V_RBYT(r4) clr r0 1: jmp _ret