Add support for DELETE-FILE from Aleksej.

[debian/pforth] / csrc / pf_io.h

diff --git a/csrc/pf_io.h b/csrc/pf_io.h
index d4346cb1777e39fffc6a26f50848f2b7e645ce49..c31cdc4d111dfd9f77f42d61a533be6799aa47c0 100644 (file)
--- a/csrc/pf_io.h
+++ b/csrc/pf_io.h
@@ -81,13 +81,13 @@ void ioTerm( void );
        \r
        /* Prototypes for stubs. */\r
        FileStream *sdOpenFile( const char *FileName, const char *Mode );\r
-       int32 sdFlushFile( FileStream * Stream  );\r
-       int32 sdReadFile( void *ptr, int32 Size, int32 nItems, FileStream * Stream  );\r
-       int32 sdWriteFile( void *ptr, int32 Size, int32 nItems, FileStream * Stream  );\r
-       int32 sdSeekFile( FileStream * Stream, int32 Position, int32 Mode );\r
-       int32 sdTellFile( FileStream * Stream );\r
-       int32 sdCloseFile( FileStream * Stream );\r
-       int32 sdInputChar( FileStream *stream );\r
+       cell_t sdFlushFile( FileStream * Stream  );\r
+       cell_t sdReadFile( void *ptr, cell_t Size, int32_t nItems, FileStream * Stream  );\r
+       cell_t sdWriteFile( void *ptr, cell_t Size, int32_t nItems, FileStream * Stream  );\r
+       cell_t sdSeekFile( FileStream * Stream, cell_t Position, int32_t Mode );\r
+       cell_t sdTellFile( FileStream * Stream );\r
+       cell_t sdCloseFile( FileStream * Stream );\r
+       cell_t sdInputChar( FileStream *stream );\r
        \r
        #ifdef __cplusplus\r
        }   \r
@@ -114,6 +114,7 @@ void ioTerm( void );
                typedef FILE FileStream;\r
 \r
                #define sdOpenFile      fopen\r
+               #define sdDeleteFile      remove\r
                #define sdFlushFile     fflush\r
                #define sdReadFile      fread\r
                #define sdWriteFile     fwrite\r
@@ -143,10 +144,10 @@ void ioTerm( void );
 extern "C" {\r
 #endif\r
 \r
-cell ioAccept( char *Target, cell n1 );\r
-cell ioKey( void);\r
+cell_t ioAccept( char *Target, cell_t n1 );\r
+cell_t ioKey( void);\r
 void ioEmit( char c );\r
-void ioType( const char *s, int32 n);\r
+void ioType( const char *s, cell_t n);\r
 \r
 #ifdef __cplusplus\r
 }   \r