/ program lunblocks struct bfdb ;buffered fdb's bfdb=-32. member b.lh,b.lhl[4],b.max[1],b.cur[1] member b.type,b.dirty,b.stat,b.seek[4] member b.stype,b.ssize,b.sracc member b.io,b.prec,b.pos,b.check end-struct b.peek=b.lhl struct l.lru ;Lru lists member l.blk[4],l.dirty,l.data[512.] end-struct io.luns:: .word stdin-b.lh+2 .word stdout-b.lh+2 .word 0 .word 0 .word -1 .word 0,0,0,0,0 eluns:: nluns==/2 $$err:: .word 0 .end