diff options
| -rw-r--r-- | generator/generator_ocaml.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/generator/generator_ocaml.ml b/generator/generator_ocaml.ml index 4f7548c5..10c18e37 100644 --- a/generator/generator_ocaml.ml +++ b/generator/generator_ocaml.ml @@ -625,6 +625,7 @@ copy_table (char * const * argv) | RBufferOut _ -> pr " rv = caml_alloc_string (size);\n"; pr " memcpy (String_val (rv), r, size);\n"; + pr " free (r);\n" ); pr " CAMLreturn (rv);\n"; |