diff options
Diffstat (limited to 'stdlib/camlinternalMod.ml')
| -rw-r--r-- | stdlib/camlinternalMod.ml | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/stdlib/camlinternalMod.ml b/stdlib/camlinternalMod.ml index 5f1882a2b4..5265a712e6 100644 --- a/stdlib/camlinternalMod.ml +++ b/stdlib/camlinternalMod.ml @@ -67,5 +67,4 @@ let rec update_mod shape o n = for i = 0 to Array.length comps - 1 do update_mod comps.(i) (Obj.field o i) (Obj.field n i) done - | Value v -> - overwrite o n + | Value v -> () (* the value is already there *) |