destructive       198 src/compare.c  static ScmObj sort_list_int(ScmObj objs, ScmObj fn, int destructive)
destructive       205 src/compare.c      if (destructive) {