--- a/PipeStream.st	Thu Nov 02 20:57:11 1995 +0100
+++ b/PipeStream.st	Thu Nov 02 21:10:58 1995 +0100
@@ -21,7 +21,7 @@
 COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libbasic/PipeStream.st,v 1.34 1995-09-16 17:13:53 claus Exp $
+$Header: /cvs/stx/stx/libbasic/PipeStream.st,v 1.35 1995-11-02 20:10:58 cg Exp $
 '!
 
 !PipeStream class methodsFor:'documentation'!
@@ -42,7 +42,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libbasic/PipeStream.st,v 1.34 1995-09-16 17:13:53 claus Exp $
+$Header: /cvs/stx/stx/libbasic/PipeStream.st,v 1.35 1995-11-02 20:10:58 cg Exp $
 "
 !
 
@@ -271,7 +271,7 @@
 	 * allow interrupt even when blocking here ...
 	 */
 	__BEGIN_INTERRUPTABLE__
-	pclose(MKFD(fp));
+	pclose(__FILEVal(fp));
 	__END_INTERRUPTABLE__
     }
 #endif
@@ -292,7 +292,7 @@
     if ((fp = _INST(filePointer)) != nil) {
 	_INST(filePointer) = nil;
 	__BEGIN_INTERRUPTABLE__
-	f = MKFD(fp);
+	f = __FILEVal(fp);
 	close(fileno(f));
 	__END_INTERRUPTABLE__
     }
@@ -314,7 +314,7 @@
 	RETURN (_true);
     }
     if ((t = _INST(filePointer)) != nil) {
-	f = MKFD(t);
+	f = __FILEVal(t);
 	if (feof(f)) {
 	    _INST(hitEOF) = true;
 	    RETURN (true);
@@ -368,7 +368,7 @@
 	    _INST(lastErrorNumber) = _MKSMALLINT(errno);
 	} else {
 	    clearerr(f);
-	    _INST(filePointer) = MKOBJ(f);
+	    _INST(filePointer) = __MKOBJ(f);
 	    retVal = self;
 	}
     }