diff --git a/src/c/arch/ffi_x86_64.d b/src/c/arch/ffi_x86_64.d
index ce71d5550..2c1d16c3f 100644
--- a/src/c/arch/ffi_x86_64.d
+++ b/src/c/arch/ffi_x86_64.d
@@ -159,7 +159,7 @@ ecl_dynamic_callback_execute(long i1, long i2, long i3, long i4, long i5, long i
 {
 	cl_object fun, rtype, argtypes;
 	cl_object result;
-	cl_index size, i_reg_index, f_reg_index;
+	cl_index i, size, i_reg_index, f_reg_index;
 	union ecl_ffi_values output;
 	enum ecl_ffi_tag tag;
 	long i_reg[MAX_INT_REGISTERS];
@@ -213,8 +213,8 @@ ARG_FROM_STACK:
 		ecl_stack_frame_push(frame, result);
 	}
 
-	result = cl_apply_from_stack_frame(frame, fun);
-	cl_stack_frame_close(frame);
+	result = ecl_apply_from_stack_frame(frame, fun);
+	ecl_stack_frame_close(frame);
 
 	tag = ecl_foreign_type_code(rtype);
 	memset(&output, 0, sizeof(output));