REW1: AOS MTREWN ;INCREMENT COUNT OF REW WAIT UNITS\r
REW2: HLRZ DEVDAT,DEVSER(DEVDAT) ;DEVDAT TO NEXT DDB\r
JUMPE DEVDAT,REW3 ;LAST ONE?\r
- HRLZ DAT,DEVNAM(DEVDAT) ;NO,GET LH OF NAME\r
+ HLRZ DAT,DEVNAM(DEVDAT) ;NO,GET LH OF NAME\r
CAIN DAT,(SIXBIT /MTA/) ;STILL A MAGTAPE?\r
JRST REWLP ;YES, CONTINUE\r
REW3: POP PDP,DEVDAT\r