X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=include%2FHsBase.h;h=e5be148183401143607ffb88d0c32fa369e6174f;hb=0a08fda071163671792fe2cfffa1a65820502798;hp=51f2e60ee5b4be447def88274c746d0b193476e2;hpb=5699b7d4aefa303fd560fad2ae583f5fde676c65;p=ghc-base.git

diff --git a/include/HsBase.h b/include/HsBase.h
index 51f2e60..e5be148 100644
--- a/include/HsBase.h
+++ b/include/HsBase.h
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: HsBase.h,v 1.23 2003/08/19 16:39:14 simonmar Exp $
+ * $Id: HsBase.h,v 1.24 2003/08/20 15:54:45 panne Exp $
  *
  * (c) The University of Glasgow 2001-2002
  *
@@ -259,11 +259,7 @@ __hscore_seek_cur()
 INLINE HsInt
 __hscore_o_binary()
 {
-#ifdef HAVE_O_BINARY
-  return O_BINARY;
-#else
-  return 0;
-#endif
+  return CONST_O_BINARY;
 }
 
 INLINE int