summaryrefslogtreecommitdiffstats
path: root/byterun/compact.c
diff options
context:
space:
mode:
authorDamien Doligez <damien.doligez-inria.fr>2000-10-12 18:05:42 +0000
committerDamien Doligez <damien.doligez-inria.fr>2000-10-12 18:05:42 +0000
commitcdf19e15fc00c997fee4b46c147320e4dff390a6 (patch)
treeadfacfaa4596e23800047746fdb78b44a995153c /byterun/compact.c
parentbe85acc16e8aa5c0811bbcd365e0856bd797f50b (diff)
bcopy -> memmove; pas de virgule finale dans instruct.h
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@3310 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'byterun/compact.c')
-rw-r--r--byterun/compact.c3
1 files changed, 1 insertions, 2 deletions
diff --git a/byterun/compact.c b/byterun/compact.c
index 68054d4af..66e88415e 100644
--- a/byterun/compact.c
+++ b/byterun/compact.c
@@ -329,8 +329,7 @@ void compact_heap (void)
if (Color_hd (q) == Caml_white){
size_t sz = Bhsize_hd (q);
char *newadr = compact_allocate (sz); Assert (newadr <= (char *)p);
- /* bcopy (source, destination, length) */
- bcopy (p, newadr, sz);
+ memmove (newadr, p, sz);
p += Wsize_bsize (sz);
}else{
Assert (Color_hd (q) == Caml_blue);