Given a declaration, is there an easy way to get a list of pragmas 
relating to that declaration?

ie:

procedure Foo;
pragma Export(C, Foo, "foo");

where Foo is declared in a long list of declarations.  I have the decl 
list and the declaration of Foo.  Is there any way I can get the pragma 
directly from Foo, rather than searching the long list of declarations 
and seeing if any pragma relates to Foo?

Thanks
James Alan Farrell