Fixed very old bug where Streams.GetStreamPosition would return the wrong position --- thanks to Jan Verhoeven for finding this.
This commit is contained in:
@@ -340,7 +340,7 @@ IMPLEMENTATION MODULE Streams;
|
|||||||
RETURN;
|
RETURN;
|
||||||
END;
|
END;
|
||||||
IF s^.mode = reading THEN
|
IF s^.mode = reading THEN
|
||||||
position := position + LONG(s^.maxcnt - s^.cnt + 1);
|
position := position - LONG(s^.maxcnt - s^.cnt + 1);
|
||||||
END;
|
END;
|
||||||
END GetPosition;
|
END GetPosition;
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user