1 files changed, 2 insertions, 3 deletions
diff --git a/asmrun/natdynlink.c b/asmrun/natdynlink.c
index edb389dbb..86c4f3e6f 100644
--- a/asmrun/natdynlink.c
+++ b/asmrun/natdynlink.c
@@ -25,12 +25,11 @@
 #include <string.h>
 
 static void *getsym(void *handle, char *module, char *name){
-  char *fullname = malloc(strlen(module) + strlen(name) + 5);
+  char *fullname = caml_strconcat(3, "caml", module, name);
   void *sym;
-  sprintf(fullname, "caml%s%s", module, name);
   sym = caml_dlsym (handle, fullname);
   /*  printf("%s => %lx\n", fullname, (uintnat) sym); */
-  free(fullname);
+  caml_stat_free(fullname);
   return sym;
 }