1 /* GNU Mailutils -- a suite of utilities for electronic mail
2    Copyright (C) 1999-2021 Free Software Foundation, Inc.
3 
4    This library is free software; you can redistribute it and/or
5    modify it under the terms of the GNU Lesser General Public
6    License as published by the Free Software Foundation; either
7    version 3 of the License, or (at your option) any later version.
8 
9    This library is distributed in the hope that it will be useful,
10    but WITHOUT ANY WARRANTY; without even the implied warranty of
11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12    Lesser General Public License for more details.
13 
14    You should have received a copy of the GNU Lesser General
15    Public License along with this library.  If not, see
16    <http://www.gnu.org/licenses/>. */
17 
18 #ifdef HAVE_CONFIG_H
19 # include <config.h>
20 #endif
21 #include <stdlib.h>
22 #include <mailutils/sys/list.h>
23 
24 mu_list_comparator_t
mu_list_set_comparator(mu_list_t list,mu_list_comparator_t comp)25 mu_list_set_comparator (mu_list_t list, mu_list_comparator_t comp)
26 {
27   mu_list_comparator_t old_comp;
28 
29   if (list == NULL)
30     return NULL;
31   old_comp = list->comp;
32   list->comp = comp;
33   return old_comp;
34 }
35