-{-# OPTIONS -#include "HsCore.h" #-}
+{-# OPTIONS -#include "HsBase.h" #-}
-----------------------------------------------------------------------------
--
-- Module : Data.Array.IO
-- Stability : experimental
-- Portability : non-portable
--
--- $Id: IO.hs,v 1.4 2002/02/05 17:32:25 simonmar Exp $
+-- $Id: IO.hs,v 1.5 2002/02/07 11:13:29 simonmar Exp $
--
-- Mutable boxed/unboxed arrays in the IO monad.
--
-{-# OPTIONS -fno-implicit-prelude -#include "HsCore.h" #-}
+{-# OPTIONS -fno-implicit-prelude -#include "HsBase.h" #-}
-----------------------------------------------------------------------------
--
-- Module : Foreign.C.Error
-- Stability : provisional
-- Portability : portable
--
--- $Id: Error.hs,v 1.5 2002/02/05 17:32:25 simonmar Exp $
+-- $Id: Error.hs,v 1.6 2002/02/07 11:13:30 simonmar Exp $
--
-- C-specific Marshalling support: Handling of C "errno" error codes
--
-{-# OPTIONS -fno-implicit-prelude -#include "HsCore.h" #-}
+{-# OPTIONS -fno-implicit-prelude -#include "HsBase.h" #-}
#undef DEBUG_DUMP
#undef DEBUG
-- -----------------------------------------------------------------------------
--- $Id: Handle.hs,v 1.3 2002/02/05 17:32:26 simonmar Exp $
+-- $Id: Handle.hs,v 1.4 2002/02/07 11:13:30 simonmar Exp $
--
-- (c) The University of Glasgow, 1994-2001
--
-{-# OPTIONS -fno-implicit-prelude -#include "HsCore.h" #-}
+{-# OPTIONS -fno-implicit-prelude -#include "HsBase.h" #-}
#undef DEBUG_DUMP
-- -----------------------------------------------------------------------------
--- $Id: IO.hs,v 1.3 2002/02/05 17:32:26 simonmar Exp $
+-- $Id: IO.hs,v 1.4 2002/02/07 11:13:30 simonmar Exp $
--
-- (c) The University of Glasgow, 1992-2001
--
*/
#define INLINE
-#include "HsCore.h"
+#include "HsBase.h"
*
* Directory Runtime Support
*/
-#include "HsCore.h"
+#include "HsBase.h"
#if defined(mingw32_TARGET_OS)
#include <windows.h>
/*
* (c) The University of Glasgow, 2000-2001
*
- * $Id: errno.c,v 1.3 2001/12/21 15:07:26 simonmar Exp $
+ * $Id: errno.c,v 1.4 2002/02/07 11:13:30 simonmar Exp $
*
* GHC Error Number Conversion
*/
-#include "HsCore.h"
+#include "HsBase.h"
/* Raw errno */
/* Covers up the fact that on Windows this is a function */
/*
* (c) The GRASP/AQUA Project, Glasgow University, 1994-1998
*
- * $Id: inputReady.c,v 1.4 2001/12/21 15:07:26 simonmar Exp $
+ * $Id: inputReady.c,v 1.5 2002/02/07 11:13:30 simonmar Exp $
*
* hReady Runtime Support
*/
/* select and supporting types is not Posix */
/* #include "PosixSource.h" */
-#include "HsCore.h"
+#include "HsBase.h"
/*
* inputReady(fd) checks to see whether input is available on the file
/*
* (c) The GRASP/AQUA Project, Glasgow University, 1994-1998
*
- * $Id: lockFile.c,v 1.1 2001/06/28 14:15:04 simonmar Exp $
+ * $Id: lockFile.c,v 1.2 2002/02/07 11:13:30 simonmar Exp $
*
* stdin/stout/stderr Runtime Support
*/
-#include "HsCore.h"
+#include "HsBase.h"
#ifndef FD_SETSIZE
#define FD_SETSIZE 256
/*
- * (c) The GRASP/AQUA Project, Glasgow University, 1994-1998
+ * (c) The University of Glasgow 2002
*
- * $Id: system.c,v 1.4 2001/12/21 15:07:26 simonmar Exp $
+ * $Id: system.c,v 1.5 2002/02/07 11:13:30 simonmar Exp $
*
* system Runtime Support
*/
/* The itimer stuff in this module is non-posix */
// #include "PosixSource.h"
-#include "HsCore.h"
+#include "HsBase.h"
#if defined(mingw32_TARGET_OS)
#include <windows.h>
/*
- * (c) The GRASP/AQUA Project, Glasgow University, 1998
+ * (c) The University of Glasgow 2002
*
- * $Id: writeError.c,v 1.4 2002/01/02 14:40:11 simonmar Exp $
+ * $Id: writeError.c,v 1.5 2002/02/07 11:13:30 simonmar Exp $
*
* hPutStr Runtime Support
*/
#include "Rts.h"
#include "RtsUtils.h"
-#include "HsCore.h"
+#include "HsBase.h"
void
writeErrString__(HsAddr msg_hdr, HsAddr msg, HsInt len)
/* -----------------------------------------------------------------------------
- * $Id: HsCore.h,v 1.8 2002/02/06 11:49:32 simonmar Exp $
+ * $Id: HsBase.h,v 1.1 2002/02/07 11:13:30 simonmar Exp $
*
* (c) The University of Glasgow 2001-2002
*