diff --git a/ext/pg_connection.c b/ext/pg_connection.c
index ed4ff8a9d..bc141d546 100644
--- a/ext/pg_connection.c
+++ b/ext/pg_connection.c
@@ -1298,7 +1298,7 @@ alloc_query_params(struct query_params_data *paramsData)
 	paramsData->typecast_heap_chain = Qnil;
 	paramsData->gc_array = Qnil;
 
-	nParams = (int)RARRAY_LEN(paramsData->params);
+	nParams = RARRAY_LENINT(paramsData->params);
 
 	required_pool_size = nParams * (
 			sizeof(char *) +
@@ -1513,7 +1513,7 @@ pgconn_sync_prepare(int argc, VALUE *argv, VALUE self)
 
 	if(! NIL_P(in_paramtypes)) {
 		Check_Type(in_paramtypes, T_ARRAY);
-		nParams = (int)RARRAY_LEN(in_paramtypes);
+		nParams = RARRAY_LENINT(in_paramtypes);
 		paramTypes = ALLOC_N(Oid, nParams);
 		for(i = 0; i < nParams; i++) {
 			param = rb_ary_entry(in_paramtypes, i);
@@ -2121,7 +2121,7 @@ pgconn_send_prepare(int argc, VALUE *argv, VALUE self)
 
 	if(! NIL_P(in_paramtypes)) {
 		Check_Type(in_paramtypes, T_ARRAY);
-		nParams = (int)RARRAY_LEN(in_paramtypes);
+		nParams = RARRAY_LENINT(in_paramtypes);
 		paramTypes = ALLOC_N(Oid, nParams);
 		for(i = 0; i < nParams; i++) {
 			param = rb_ary_entry(in_paramtypes, i);
diff --git a/ext/pg_type_map_by_column.c b/ext/pg_type_map_by_column.c
index 61d621020..5221385b0 100644
--- a/ext/pg_type_map_by_column.c
+++ b/ext/pg_type_map_by_column.c
@@ -55,7 +55,7 @@ pg_tmbc_fit_to_query( VALUE self, VALUE params )
 	t_typemap *default_tm;
 
 	Check_Type(params, T_ARRAY);
-	nfields = (int)RARRAY_LEN( params );
+	nfields = RARRAY_LENINT( params );
 	if ( this->nfields != nfields ) {
 		rb_raise( rb_eArgError, "number of result fields (%d) does not match number of mapped columns (%d)",
 				nfields, this->nfields );