projects
/
ghc-hetmet.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(from parent 1:
cb47032
)
[project @ 2001-11-09 20:58:40 by sof]
author
sof
<unknown>
Fri, 9 Nov 2001 20:58:40 +0000
(20:58 +0000)
committer
sof
<unknown>
Fri, 9 Nov 2001 20:58:40 +0000
(20:58 +0000)
prel_PrelHandle_read(): de-hebetudified.
ghc/lib/std/cbits/PrelIOUtils.c
patch
|
blob
|
history
diff --git
a/ghc/lib/std/cbits/PrelIOUtils.c
b/ghc/lib/std/cbits/PrelIOUtils.c
index
feabc8b
..
607d1bd
100644
(file)
--- a/
ghc/lib/std/cbits/PrelIOUtils.c
+++ b/
ghc/lib/std/cbits/PrelIOUtils.c
@@
-72,7
+72,7
@@
HsInt prel_PrelHandle_write(HsInt fd, HsAddr ptr, HsInt off, HsInt sz)
HsInt prel_PrelHandle_read(HsInt fd, HsAddr ptr, HsInt off, HsInt sz)
{
- return write(fd,ptr + off, sz);
+ return read(fd,ptr + off, sz);
}
void *prel_PrelIO_memcpy(char *dst, HsInt dst_off, const char *src, size_t sz)