equal
deleted
inserted
replaced
1946 Squeak compatibility." |
1946 Squeak compatibility." |
1947 |
1947 |
1948 |elementSize n| |
1948 |elementSize n| |
1949 |
1949 |
1950 elementSize := aContainer class elementByteSize. |
1950 elementSize := aContainer class elementByteSize. |
1951 n := self nextBytes:nElements*elementSize into:aContainer startingAt:index. |
1951 n := self nextBytes:nElements*elementSize into:aContainer startingAt:index*elementSize. |
1952 ^ n // elementSize |
1952 ^ n // elementSize |
1953 |
1953 |
1954 "Modified: / 15-02-2011 / 11:04:22 / cg" |
1954 "Modified: / 15-09-2011 / 14:00:55 / cg" |
1955 ! |
1955 ! |
1956 |
1956 |
1957 readOnly |
1957 readOnly |
1958 "Squeak compatibility: make the stream readOnly" |
1958 "Squeak compatibility: make the stream readOnly" |
1959 |
1959 |
5704 ! ! |
5704 ! ! |
5705 |
5705 |
5706 !ExternalStream class methodsFor:'documentation'! |
5706 !ExternalStream class methodsFor:'documentation'! |
5707 |
5707 |
5708 version |
5708 version |
5709 ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.343 2011-09-09 07:17:43 cg Exp $' |
5709 ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.344 2011-09-15 13:12:35 cg Exp $' |
5710 ! |
5710 ! |
5711 |
5711 |
5712 version_CVS |
5712 version_CVS |
5713 ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.343 2011-09-09 07:17:43 cg Exp $' |
5713 ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.344 2011-09-15 13:12:35 cg Exp $' |
5714 ! ! |
5714 ! ! |
5715 |
5715 |
5716 ExternalStream initialize! |
5716 ExternalStream initialize! |