--- a/UnixOperatingSystem.st	Sun May 03 14:39:22 2015 +0200
+++ b/UnixOperatingSystem.st	Sun May 03 14:39:48 2015 +0200
@@ -11031,19 +11031,23 @@
      Return the previous blocking state."
 
 %{  /* NOCONTEXT */
+#ifdef __SCHTEAM__
+    // TODO
+    return context._RETURN(0);
+#else
 
     int ret = 0, flags;
 
-#if defined(F_GETFL) && defined(F_SETFL)
-# undef DELAY_FLAG
-# if defined(O_NONBLOCK)
-#  define DELAY_FLAG O_NONBLOCK
-# elif defined(O_NDELAY)
-#  define DELAY_FLAG O_NDELAY
-# elif defined(FNDELAY)
-#  define DELAY_FLAG FNDELAY
-# endif
-# if defined(DELAY_FLAG)
+# if defined(F_GETFL) && defined(F_SETFL)
+#  undef DELAY_FLAG
+#  if defined(O_NONBLOCK)
+#   define DELAY_FLAG O_NONBLOCK
+#  elif defined(O_NDELAY)
+#   define DELAY_FLAG O_NDELAY
+#  elif defined(FNDELAY)
+#   define DELAY_FLAG FNDELAY
+#  endif
+#  if defined(DELAY_FLAG)
     if (__isSmallInteger(fd)) {
 	int f = __intVal(fd);
 
@@ -11057,9 +11061,10 @@
 	    RETURN ((flags & DELAY_FLAG) ? false : true );
 	}
     }
-#  undef DELAY_FLAG
-# endif
-#endif
+#   undef DELAY_FLAG
+#  endif
+# endif
+#endif /* not SCHTEAM */
 %}.
     "
      fd argument not integer or bad return code
@@ -11819,17 +11824,21 @@
 
     |err|
 %{
+#ifdef __SCHTEAM__
+    // TODO
+    return context._RETURN(0);
+#else
     int ret, flags;
 
-#if defined(F_GETFL) && defined(F_SETFL)
-# if defined(O_NDELAY)
-#  define DELAY_FLAG O_NDELAY
-# else
-#  if defined(FNDELAY)
-#   define DELAY_FLAG FNDELAY
-#  endif
-# endif
-# if defined(DELAY_FLAG)
+# if defined(F_GETFL) && defined(F_SETFL)
+#  if defined(O_NDELAY)
+#   define DELAY_FLAG O_NDELAY
+#  else
+#   if defined(FNDELAY)
+#    define DELAY_FLAG FNDELAY
+#   endif
+#  endif
+#  if defined(DELAY_FLAG)
     if (__isSmallInteger(__INST(fd))) {
 	int f = __intVal(__INST(fd));
 
@@ -11845,13 +11854,15 @@
 	    err = __mkSmallInteger(errno);
 	}
     }
-# undef DELAY_FLAG
-# endif /* DELAY_FLAG */
-#endif
+#  undef DELAY_FLAG
+#  endif /* DELAY_FLAG */
+# endif
+#endif /* not SCHTEAM */
 %}.
     err notNil ifTrue:[
 	self error:err
     ].
+
     "
      fd argument not integer
     "
@@ -14274,11 +14285,11 @@
 !UnixOperatingSystem class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/UnixOperatingSystem.st,v 1.437 2015-04-24 08:17:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UnixOperatingSystem.st,v 1.438 2015-05-03 12:39:48 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/UnixOperatingSystem.st,v 1.437 2015-04-24 08:17:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UnixOperatingSystem.st,v 1.438 2015-05-03 12:39:48 cg Exp $'
 ! !