- Fix possible memory leak in ffi module

Author: felipensp

modules/std/ffi/ffi.cc

@@ -132,7 +132,7 @@ static void _ffi_call(Value* result, ffi_call_func pf, size_t n_args,
 				ffi_values[i] =  vi;
 			} else {
 				clever_error("Argument %N isn't a int!\n", i + 1);
-				return;
+				goto out;
 			}
 		} else if (v->isBool()) {
 			if (arg_type == FFIVOID or arg_type == FFIBOOL) {
@@ -145,7 +145,7 @@ static void _ffi_call(Value* result, ffi_call_func pf, size_t n_args,
 				ffi_values[i] = b;
 			} else {
 				clever_error("Argument %N isn't a bool!\n", i + 1);
-				return;
+				goto out;
 			}
 		} else if (v->isStr()) {
 			if (arg_type == FFIVOID or arg_type == FFISTRING) {
@@ -162,7 +162,7 @@ static void _ffi_call(Value* result, ffi_call_func pf, size_t n_args,
 				ffi_values[i] =  s;
 			} else {
 				clever_error("Argument %N isn't a string!\n", i + 1);
-				return;
+				goto out;
 			}
 		} else if (v->isDouble()) {
 			if (arg_type == FFIVOID or arg_type == FFIDOUBLE) {
@@ -175,7 +175,7 @@ static void _ffi_call(Value* result, ffi_call_func pf, size_t n_args,
 				ffi_values[i] = d;
 			} else {
 				clever_error("Argument %N isn't a double!\n", i + 1);
-				return;
+				goto out;
 			}
 		} else {
 			if (arg_type == FFIVOID or arg_type == FFIPOINTER) {
@@ -186,14 +186,14 @@ static void _ffi_call(Value* result, ffi_call_func pf, size_t n_args,
 				ffi_values[i] = &(obj->data);
 			} else {
 				clever_error("Argument %N isn't a pointer!\n", i + 1);
-				return;
+				goto out;
 			}
 		}
 	}
 
 	if (ffi_prep_cif(&cif, FFI_DEFAULT_ABI, n_args, ffi_rt, ffi_args) != FFI_OK) {
 		result->setBool(false);
-		return;
+		goto out;
 	}
 
 #ifndef CLEVER_WIN32
@@ -245,7 +245,7 @@ static void _ffi_call(Value* result, ffi_call_func pf, size_t n_args,
 		result->setBool(true);
 	}
 #endif
-
+out:
 	for (size_t i = 0; i < n_args; ++i) {
 		Value* v = args.at(i + offset);