* c-ada-spec.c (to_ada_name): Add index parameter.