blob: 392b1f132714b81290932b5f65ebd5ba39f2553d [file] [log] [blame]
Ulrich Drepperb08d5a82005-07-26 05:00:05 +00001/* Check whether given attribute has specific form.
2 Copyright (C) 2003 Red Hat, Inc.
3 Written by Ulrich Drepper <drepper@redhat.com>, 2003.
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
23int
24dwarf_hasform (attr, search_form)
25 Dwarf_Attribute *attr;
26 unsigned int search_form;
27{
28 if (attr == NULL)
29 return 0;
30
31 return attr->form == search_form;
32}