/*
* (c) The GRASP/AQUA Project, Glasgow University, 1994-1998
*
- * $Id: fileSize.c,v 1.4 2000/12/11 17:51:57 simonmar Exp $
+ * $Id: fileSize.c,v 1.7 2001/04/02 16:10:32 rrt Exp $
*
* hClose Runtime Support
*/
}
if (S_ISREG(sb.st_mode)) {
/* result will be word aligned */
+#if defined( macosx_TARGET_OS )
+ *(W_ *) result = (W_)sb.st_size;
+#else
*(off_t *) result = sb.st_size;
+#endif
return 0;
} else {
ghc_errtype = ERR_INAPPROPRIATETYPE;