In-place modification for arrays/strings

This commit is contained in:
Dmitry Boulytchev 2018-11-14 22:01:25 +03:00
commit ff53a6ba7e

View file

@ -344,7 +344,7 @@ let compile env code =
| String -> ".string_tag_patt"
| Sexp -> ".sexp_tag_patt"
) 1 false
| ENTER xs ->
let env, code =
List.fold_left