Asis (ada semantic interface specification) lets you develop applications to walk through the sources of your ada programs and examine the semantic constructs.

this package lets you build asis applications with gnat.