1 //
2 // aegis - project change supervisor
3 // Copyright (C) 2004-2006, 2008, 2012 Peter Miller
4 //
5 // This program is free software; you can redistribute it and/or modify
6 // it under the terms of the GNU General Public License as published
7 // by the Free Software Foundation; either version 3 of the License, or
8 // (at your option) any later version.
9 //
10 // This program is distributed in the hope that it will be useful,
11 // but WITHOUT ANY WARRANTY; without even the implied warranty of
12 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13 // General Public License for more details.
14 //
15 // You should have received a copy of the GNU General Public License
16 // along with this program. If not, see <http://www.gnu.org/licenses/>.
17 //
18 
19 #include <common/ac/ctype.h>
20 
21 #include <libaegis/ael/attribu_list.h>
22 #include <libaegis/common.fmtgen.h>
23 
24 
25 int
ael_attribute_listable(attributes_ty * ap)26 ael_attribute_listable(attributes_ty *ap)
27 {
28     return
29         (
30             ap->name
31         &&
32             isupper((unsigned char)ap->name->str_text[0])
33         &&
34             ap->value
35         );
36 }
37 
38 
39 // vim: set ts=8 sw=4 et :
40