Switched malloc to caml_stat_alloc

mmottl · mmottl · commit 85985f49ca8a · 2015-09-02T22:47:40.000-04:00
diff --git a/lib/sqlite3_stubs.c b/lib/sqlite3_stubs.c
@@ -115,7 +115,7 @@ typedef struct user_exception { value exn; } user_exception;
 
 static inline void create_user_exception(value v_exn)
 {
-  user_exception *user_exn = malloc(sizeof(user_exception));
+  user_exception *user_exn = caml_stat_alloc(sizeof(user_exception));
   user_exn->exn = v_exn;
   caml_register_global_root(&user_exn->exn);
   pthread_setspecific(user_exception_key, user_exn);

Original file line number	Diff line number	Diff line change
`@@ -115,7 +115,7 @@ typedef struct user_exception { value exn; } user_exception;`
`115`	`115`
`116`	`116`	`static inline void create_user_exception(value v_exn)`
`117`	`117`	`{`
`118`		`- user_exception *user_exn = malloc(sizeof(user_exception));`
	`118`	`+ user_exception *user_exn = caml_stat_alloc(sizeof(user_exception));`
`119`	`119`	`user_exn->exn = v_exn;`
`120`	`120`	`caml_register_global_root(&user_exn->exn);`
`121`	`121`	`pthread_setspecific(user_exception_key, user_exn);`