diff options
author | Sudha Parimala <sudharg247@gmail.com> | 2021-03-24 10:49:35 +0530 |
---|---|---|
committer | Sudha Parimala <sudharg247@gmail.com> | 2021-03-24 10:49:35 +0530 |
commit | ad551ac31dde6c1fc29ea8fff454288f8e499d1c (patch) | |
tree | bdc1d414525cdcb637f91811c030f7de9e95401a /runtime/minor_gc.c | |
parent | cc661c624957dee27263fc8be89ed3e771d22af8 (diff) | |
download | ocaml-ad551ac31dde6c1fc29ea8fff454288f8e499d1c.tar.gz |
typo fixes and remove extra variable
Diffstat (limited to 'runtime/minor_gc.c')
-rw-r--r-- | runtime/minor_gc.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/runtime/minor_gc.c b/runtime/minor_gc.c index 5bde57a8ca..0b1c06cebc 100644 --- a/runtime/minor_gc.c +++ b/runtime/minor_gc.c @@ -341,8 +341,7 @@ static void oldify_one (void* st_v, value v, value *p) st->live_bytes += Bhsize_hd(hd); result = alloc_shared(sz, tag); for (i = 0; i < sz; i++) { - value curr = Field(v, i); - Field(result, i) = curr; + Field(result, i) = Field(v, i); } CAMLassert (infix_offset == 0); if( !try_update_object_header(v, p, result, 0) ) { |