fix: Read did not set "Done" in the "unread" case
This commit is contained in:
parent
02044d1d3f
commit
9c01340900
1 changed files with 1 additions and 0 deletions
|
@ -26,6 +26,7 @@ IMPLEMENTATION MODULE InOut ;
|
|||
IF unread THEN
|
||||
unread := FALSE;
|
||||
c := unreadch;
|
||||
Done := TRUE;
|
||||
ELSE
|
||||
WITH ibuf DO
|
||||
IF cnt <= maxcnt THEN
|
||||
|
|
Loading…
Reference in a new issue