--- a/FileStream.st Wed Mar 13 12:51:41 2019 +0100
+++ b/FileStream.st Wed Mar 13 16:57:11 2019 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
"
COPYRIGHT (c) 1989 by Claus Gittinger
All Rights Reserved
@@ -913,42 +911,6 @@
!FileStream methodsFor:'misc functions'!
-copyToEndInto:outStream bufferSize:bufferSize
- "copy the data into another stream."
-
- |pos n nWritten|
-
- "the sendfile() system call currently (2004-05-07) handles only descriptors that
- support mmap-like operations as from-fd.
- Therefore, this method is reimplemented here (from ExternalStream)"
-
- outStream isExternalStream ifTrue:[
- pos := self position.
- n := self size - pos.
- nWritten := OperatingSystem
- copyFromFd:self fileHandle
- toFd:outStream fileHandle
- startIndex:pos
- count:n.
- nWritten > 0 ifTrue:[
- self position:pos+nWritten.
- ].
- nWritten = n ifTrue:[
- ^ self
- ].
- ].
- ^ super copyToEndInto:outStream bufferSize:bufferSize.
-
- "
- |in out|
-
- in := 'Makefile' asFilename readStream.
- out := Stdout.
- in copyToEndInto:out.
- in close.
- "
-!
-
syncFileSystem
"sync the filesystem containing this FileStream"