28 lines
1.2 KiB
C
28 lines
1.2 KiB
C
|
|
$FreeBSD$
|
|
|
|
--- ext/amatch.c.orig
|
|
+++ ext/amatch.c
|
|
@@ -86,9 +86,10 @@
|
|
if (TYPE(strings) == T_STRING) { \
|
|
return match_function(amatch, strings); \
|
|
} else { \
|
|
- Check_Type(strings, T_ARRAY); \
|
|
int i; \
|
|
- VALUE result = rb_ary_new2(RARRAY(strings)->len); \
|
|
+ VALUE result; \
|
|
+ Check_Type(strings, T_ARRAY); \
|
|
+ result = rb_ary_new2(RARRAY(strings)->len); \
|
|
for (i = 0; i < RARRAY(strings)->len; i++) { \
|
|
VALUE string = rb_ary_entry(strings, i); \
|
|
if (TYPE(string) != T_STRING) { \
|
|
@@ -949,8 +950,8 @@
|
|
if (TYPE(strings) == T_STRING) {
|
|
result = PairDistance_match(amatch, strings, regexp, use_regexp);
|
|
} else {
|
|
- Check_Type(strings, T_ARRAY);
|
|
int i;
|
|
+ Check_Type(strings, T_ARRAY);
|
|
result = rb_ary_new2(RARRAY(strings)->len);
|
|
for (i = 0; i < RARRAY(strings)->len; i++) {
|
|
VALUE string = rb_ary_entry(strings, i);
|