1 /* Return flag represented by attribute. 2 Copyright (C) 2004 Red Hat, Inc. 3 Written by Ulrich Drepper <drepper@redhat.com>, 2004. 4 5 This program is Open Source software; you can redistribute it and/or 6 modify it under the terms of the Open Software License version 1.0 as 7 published by the Open Source Initiative. 8 9 You should have received a copy of the Open Software License along 10 with this program; if not, you may obtain a copy of the Open Software 11 License version 1.0 from http://www.opensource.org/licenses/osl.php or 12 by writing the Open Source Initiative c/o Lawrence Rosen, Esq., 13 3001 King Ranch Road, Ukiah, CA 95482. */ 14 15 #ifdef HAVE_CONFIG_H 16 # include <config.h> 17 #endif 18 19 #include <dwarf.h> 20 #include "libdwP.h" 21 22 23 int dwarf_formflag(attr,return_bool)24dwarf_formflag (attr, return_bool) 25 Dwarf_Attribute *attr; 26 bool *return_bool; 27 { 28 if (attr == NULL) 29 return -1; 30 31 if (unlikely (attr->form != DW_FORM_flag)) 32 { 33 __libdw_seterrno (DWARF_E_NO_FLAG); 34 return -1; 35 } 36 37 *return_bool = *attr->valp != 0; 38 39 return 0; 40 } 41