--- a/FileStream.st Sun Feb 05 22:28:39 1995 +0100
+++ b/FileStream.st Sun Feb 05 22:29:58 1995 +0100
@@ -21,7 +21,7 @@
COPYRIGHT (c) 1989 by Claus Gittinger
All Rights Reserved
-$Header: /cvs/stx/stx/libbasic/FileStream.st,v 1.17 1995-02-02 12:21:09 claus Exp $
+$Header: /cvs/stx/stx/libbasic/FileStream.st,v 1.18 1995-02-05 21:29:58 claus Exp $
'!
!FileStream class methodsFor:'documentation'!
@@ -42,7 +42,7 @@
version
"
-$Header: /cvs/stx/stx/libbasic/FileStream.st,v 1.17 1995-02-02 12:21:09 claus Exp $
+$Header: /cvs/stx/stx/libbasic/FileStream.st,v 1.18 1995-02-05 21:29:58 claus Exp $
"
!
@@ -88,6 +88,13 @@
# define SEEK_END 2
#endif
+/*
+ * on some systems errno is a macro ... check for it here
+ */
+#ifndef errno
+ extern errno;
+#endif
+
%}
! !
@@ -389,7 +396,6 @@
%{
FILE *f;
OBJ path;
- extern errno;
if (_INST(filePointer) == nil) {
path = _INST(pathName);
@@ -524,7 +530,6 @@
FILE *f;
struct stat buf;
int ret;
- extern errno;
int fd;
if (_INST(filePointer) != nil) {
@@ -562,7 +567,6 @@
FILE *f;
long currentPosition;
- extern errno;
if (_INST(filePointer) != nil) {
f = (FILE *)MKFD(_INST(filePointer));
@@ -594,7 +598,6 @@
FILE *f;
int ret;
- extern errno;
if (_INST(filePointer) != nil) {
if (_isSmallInteger(newPos)) {
@@ -632,7 +635,6 @@
%{
FILE *f;
int ret;
- extern errno;
if (_INST(filePointer) != nil) {
f = (FILE *)MKFD(_INST(filePointer));