diff options
Diffstat (limited to 'ghc/lib/std/cbits/filePutc.c')
| -rw-r--r-- | ghc/lib/std/cbits/filePutc.c | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/ghc/lib/std/cbits/filePutc.c b/ghc/lib/std/cbits/filePutc.c index b48f9fe8fd..f2ce4a9c30 100644 --- a/ghc/lib/std/cbits/filePutc.c +++ b/ghc/lib/std/cbits/filePutc.c @@ -1,7 +1,7 @@ /* * (c) The GRASP/AQUA Project, Glasgow University, 1994-1998 * - * $Id: filePutc.c,v 1.8 1999/09/16 13:14:43 simonmar Exp $ + * $Id: filePutc.c,v 1.9 1999/11/25 16:54:14 simonmar Exp $ * * hPutChar Runtime Support */ @@ -21,9 +21,7 @@ #define TERMINATE_LINE(x) ((x) == '\n') StgInt -filePutc(ptr, c) -StgForeignPtr ptr; -StgChar c; +filePutc(StgForeignPtr ptr, StgChar c) { IOFileObject* fo = (IOFileObject*)ptr; int rc = 0; |