* c-ada-spec.c (has_static_fields): Look only into variables.