IBM1130: Fix Coverity identified PTR positioning bookkeeping

This commit is contained in:
Mark Pizzolato 2017-09-11 15:44:23 -07:00
parent 5d1f5c33fc
commit 0559308ee4

View file

@ -127,10 +127,11 @@ static t_stat ptr_svc (UNIT *uptr)
if (IS_ONLINE(uptr)) { /* fetch character from file */ if (IS_ONLINE(uptr)) { /* fetch character from file */
ptr_char = getc(uptr->fileref); ptr_char = getc(uptr->fileref);
uptr->pos++;
if (! feof(uptr->fileref)) /* there's more left */ if (! feof(uptr->fileref)) { /* there's more left */
CLRBIT(ptr_dsw, PTR1134_DSW_READER_NOT_READY); CLRBIT(ptr_dsw, PTR1134_DSW_READER_NOT_READY);
uptr->pos++;
}
} }
SETBIT(ptr_dsw, PTR1134_DSW_READER_RESPONSE); /* indicate read complete */ SETBIT(ptr_dsw, PTR1134_DSW_READER_RESPONSE); /* indicate read complete */