Branch data Line data Source code
1 : : /* Get information from a source line record returned by libdwfl.
2 : : Copyright (C) 2005, 2006 Red Hat, Inc.
3 : : This file is part of elfutils.
4 : :
5 : : This file is free software; you can redistribute it and/or modify
6 : : it under the terms of either
7 : :
8 : : * the GNU Lesser General Public License as published by the Free
9 : : Software Foundation; either version 3 of the License, or (at
10 : : your option) any later version
11 : :
12 : : or
13 : :
14 : : * the GNU General Public License as published by the Free
15 : : Software Foundation; either version 2 of the License, or (at
16 : : your option) any later version
17 : :
18 : : or both in parallel, as here.
19 : :
20 : : elfutils is distributed in the hope that it will be useful, but
21 : : WITHOUT ANY WARRANTY; without even the implied warranty of
22 : : MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
23 : : General Public License for more details.
24 : :
25 : : You should have received copies of the GNU General Public License and
26 : : the GNU Lesser General Public License along with this program. If
27 : : not, see <http://www.gnu.org/licenses/>. */
28 : :
29 : : #include "libdwflP.h"
30 : : #include <dwarf.h>
31 : :
32 : : const char *
33 : 0 : dwfl_line_comp_dir (Dwfl_Line *line)
34 : : {
35 [ # # ]: 0 : if (line == NULL)
36 : : return NULL;
37 : :
38 : 0 : struct dwfl_cu *cu = dwfl_linecu (line);
39 : : Dwarf_Attribute attr_mem;
40 : 0 : return INTUSE(dwarf_formstring) (INTUSE(dwarf_attr) (&cu->die,
41 : : DW_AT_comp_dir,
42 : : &attr_mem));
43 : : }
|