[project @ 1997-03-14 05:17:06 by sof]

[ghc-hetmet.git] / ghc / lib / cbits / filePosn.lc

diff --git a/ghc/lib/cbits/filePosn.lc b/ghc/lib/cbits/filePosn.lc
index 826c4f4..7a0d790 100644 (file)
--- a/ghc/lib/cbits/filePosn.lc
+++ b/ghc/lib/cbits/filePosn.lc
@@ -10,7 +10,7 @@
 
 StgInt
 getFilePosn(fp)
-StgAddr fp;
+StgForeignObj fp;
 {
     StgInt posn;
 
@@ -29,7 +29,7 @@ StgAddr fp;
 
 StgInt
 setFilePosn(fp, posn)
-StgAddr fp;
+StgForeignObj fp;
 StgInt posn;
 {
     while (fseek((FILE *) fp, posn, SEEK_SET) != 0) {