Repository : ssh://darcs.haskell.org//srv/darcs/packages/directory On branch : master
http://hackage.haskell.org/trac/ghc/changeset/986167971c2e58c2645cf7e1ce8b4d5857b07510 >--------------------------------------------------------------- commit 986167971c2e58c2645cf7e1ce8b4d5857b07510 Author: Ian Lynagh <[email protected]> Date: Mon Aug 1 01:08:39 2011 +0100 Remove some antiquated C constructs Fixes validate on amd64/Linux with: SRC_CC_OPTS += -Wmissing-parameter-type SRC_CC_OPTS += -Wold-style-declaration SRC_CC_OPTS += -Wold-style-definition >--------------------------------------------------------------- include/HsDirectory.h | 10 +++++----- 1 files changed, 5 insertions(+), 5 deletions(-) diff --git a/include/HsDirectory.h b/include/HsDirectory.h index 608b3aa..e997fde 100644 --- a/include/HsDirectory.h +++ b/include/HsDirectory.h @@ -57,7 +57,7 @@ * (PATH_MAX is not defined on systems with unlimited path length, * e.g. the Hurd). */ -INLINE HsInt __hscore_long_path_size() { +INLINE HsInt __hscore_long_path_size(void) { #ifdef PATH_MAX return PATH_MAX; #else @@ -65,10 +65,10 @@ INLINE HsInt __hscore_long_path_size() { #endif } -INLINE mode_t __hscore_S_IRUSR() { return S_IRUSR; } -INLINE mode_t __hscore_S_IWUSR() { return S_IWUSR; } -INLINE mode_t __hscore_S_IXUSR() { return S_IXUSR; } -INLINE mode_t __hscore_S_IFDIR() { return S_IFDIR; } +INLINE mode_t __hscore_S_IRUSR(void) { return S_IRUSR; } +INLINE mode_t __hscore_S_IWUSR(void) { return S_IWUSR; } +INLINE mode_t __hscore_S_IXUSR(void) { return S_IXUSR; } +INLINE mode_t __hscore_S_IFDIR(void) { return S_IFDIR; } #endif /* __HSDIRECTORY_H__ */ _______________________________________________ Cvs-libraries mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-libraries
