diff --git a/libguile/sort.c b/libguile/sort.c index ab6a31f58..a558a34b3 100644 --- a/libguile/sort.c +++ b/libguile/sort.c @@ -758,7 +758,7 @@ SCM_DEFINE (scm_sort, "sort", 2, 0, 0, items = scm_list_copy (items); return scm_merge_list_step (&items, scm_cmp_function (less), less, len); } -#ifdef SCM_HAVE_ARRAYS +#if SCM_HAVE_ARRAYS /* support ordinary vectors even if arrays not available? */ else if (SCM_VECTORP (items)) { @@ -910,7 +910,7 @@ SCM_DEFINE (scm_stable_sort, "stable-sort", 2, 0, 0, items = scm_list_copy (items); return scm_merge_list_step (&items, scm_cmp_function (less), less, len); } -#ifdef SCM_HAVE_ARRAYS +#if SCM_HAVE_ARRAYS /* support ordinary vectors even if arrays not available? */ else if (SCM_VECTORP (items)) {