1 /* Test program for dwarf_getmacros and related
30 static void include (Dwarf *dbg, Dwarf_Off macoff, ptrdiff_t token);
32 static int
33 mac (Dwarf_Macro *macro, void *dbg)  in mac()  argument
35   static int level = 0;  in mac()
53 	include (dbg, w, DWARF_GETMACROS_START);  in mac()
54 	--level;  in mac()
63 	if (dwarf_macro_getsrcfiles (dbg, macro, &files, &nfiles) < 0)  in mac()
78 	--level;  in mac()
113 static void
114 include (Dwarf *dbg, Dwarf_Off macoff, ptrdiff_t token)  in include()  argument
116   while ((token = dwarf_getmacros_off (dbg, macoff, mac, dbg, token)) != 0)  in include()
117     if (token == -1)  in include()
124 static void
125 getmacros (Dwarf *dbg, Dwarf_Die *die, bool new_style)  in getmacros()  argument
128        (off = dwarf_getmacros (die, mac, dbg, off)); )  in getmacros()
129     if (off == -1)  in getmacros()
131 	puts (dwarf_errmsg (-1));  in getmacros()
144   Dwarf *dbg = dwarf_begin (fd, DWARF_C_READ);  in main()  local
151       while (dwarf_get_units (dbg, cu, &cu, NULL,  in main()
161 	  getmacros (dbg, die, new_style);  in main()
167       Dwarf_Die cudie_mem, *cudie = dwarf_offdie (dbg, cuoff, &cudie_mem);  in main()
170 	  puts (dwarf_errmsg (-1));  in main()
173       getmacros (dbg, cudie, new_style);  in main()
176   dwarf_end (dbg);  in main()