projects
/
ghc-base.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Fix warnings
[ghc-base.git]
/
include
/
HsBase.h
diff --git
a/include/HsBase.h
b/include/HsBase.h
index
afbff12
..
c8de454
100644
(file)
--- a/
include/HsBase.h
+++ b/
include/HsBase.h
@@
-770,13
+770,13
@@
void debugBelch2(const char*s, char *t);
#if !defined(mingw32_HOST_OS) && !defined(__MINGW32__)
INLINE int fcntl_read(int fd, int cmd) {
#if !defined(mingw32_HOST_OS) && !defined(__MINGW32__)
INLINE int fcntl_read(int fd, int cmd) {
- fcntl(fd, cmd);
+ return fcntl(fd, cmd);
}
INLINE int fcntl_write(int fd, int cmd, long arg) {
}
INLINE int fcntl_write(int fd, int cmd, long arg) {
- fcntl(fd, cmd, arg);
+ return fcntl(fd, cmd, arg);
}
INLINE int fcntl_lock(int fd, int cmd, struct flock *lock) {
}
INLINE int fcntl_lock(int fd, int cmd, struct flock *lock) {
- fcntl(fd, cmd, lock);
+ return fcntl(fd, cmd, lock);
}
#endif
}
#endif