[project @ 1999-09-19 19:26:57 by sof]

[ghc-hetmet.git] / ghc / lib / std / cbits / stgio.h

diff --git a/ghc/lib/std/cbits/stgio.h b/ghc/lib/std/cbits/stgio.h
index 68a0979..0e3bb77 100644 (file)
--- a/ghc/lib/std/cbits/stgio.h
+++ b/ghc/lib/std/cbits/stgio.h
@@ -1,7 +1,7 @@
 /* 
  * (c) The GRASP/AQUA Project, Glasgow University, 1994-1998
  *
- * $Id: stgio.h,v 1.9 1999/01/15 17:54:23 sof Exp $
+ * $Id: stgio.h,v 1.12 1999/09/19 19:26:57 sof Exp $
  *
  * Helper code for GHC's IO subsystem.
  */
@@ -104,7 +104,7 @@ StgInt  fill_up_line_buffer(IOFileObject*);
 
 /* filePosn.c */
 StgInt getFilePosn (StgForeignPtr);
-StgInt setFilePosn (StgForeignPtr, StgInt);
+StgInt setFilePosn (StgForeignPtr, StgInt, StgByteArray);
 
 /* filePutc.c */
 StgInt filePutc    (StgForeignPtr, StgChar);
@@ -146,7 +146,7 @@ StgAddr getCurrentDirectory(void);
 StgAddr getDirectoryContents (StgByteArray);
 
 /* getLock.c */
-int     lockFile    (int, int);
+int     lockFile    (int, int, int);
 int     unlockFile  (int);
 StgInt getLock     (StgInt, StgInt);
 
@@ -154,9 +154,9 @@ StgInt      getLock     (StgInt, StgInt);
 StgInt inputReady  (StgForeignPtr, StgInt);
 
 /* openFile.c */
-IOFileObject* openFile    (StgByteArray, StgInt, StgInt, StgInt);
+IOFileObject* openFile    (StgByteArray, StgInt, StgInt);
 IOFileObject* openFd      (StgInt, StgInt, StgInt);
-IOFileObject* openStdFile (StgInt, StgInt, StgInt);
+IOFileObject* openStdFile (StgInt, StgInt);
 
 /* progargs.c */
 StgAddr get_prog_argv(void);
@@ -185,6 +185,9 @@ StgInt      seekFile  (StgForeignPtr, StgInt, StgInt, StgByteArray);
 StgInt seekFile_int64 (StgForeignPtr, StgInt, StgInt64);
 StgInt seekFileP (StgForeignPtr);
 
+/* setBinaryMode.c */
+StgInt setBinaryMode__ (StgForeignPtr, StgInt);
+
 /* setBuffering.c */
 StgInt setBuffering (StgForeignPtr, StgInt);
 StgInt  const_BUFSIZ (void);
@@ -214,6 +217,7 @@ StgInt prim_SETZONE ( StgAddr, StgAddr );
 StgInt sizeof_word      ( void ); 
 StgInt sizeof_struct_tm        ( void );
 StgInt sizeof_time_t    ( void );
+char*  get_ZONE     ( StgAddr );
 
 /* toLocalTime.c */
 StgAddr toLocalTime (StgInt, StgByteArray, StgByteArray);
@@ -224,8 +228,7 @@ StgAddr toUTCTime (StgInt, StgByteArray, StgByteArray);
 StgInt prim_toUTCTime ( StgInt64,StgByteArray );
 
 /* toClockSec.c */
-StgAddr toClockSec (StgInt, StgInt, StgInt, StgInt, StgInt, StgInt, StgInt, StgByteArray);
-StgInt prim_toClockSec(StgInt, StgInt, StgInt, StgInt, StgInt, StgInt, StgInt, StgByteArray);
+StgInt toClockSec (StgInt, StgInt, StgInt, StgInt, StgInt, StgInt, StgInt, StgByteArray);
 
 /* writeError.c */
 void    writeErrString__ (StgAddr, StgByteArray, StgInt);