Switch to side-by-side view
--- a/Streams.ISO.mi +++ b/Streams.ISO.mi @@ -260,7 +260,8 @@ IOChan.Skip(Datei); ELSIF (res = IOConsts.endOfInput) THEN Char := CommonIO.EoF; - IOChan.SetReadResult(Datei,IOConsts.endOfInput); END; + IOChan.SetReadResult(Datei,IOConsts.endOfInput); + END; END GetChar; PROCEDURE PutChar(VAR Datei : Stream;