ada-auto-case

ada-auto-case is a variable defined in `ada-mode.el'.
Its value is

t

Documentation:
Non-nil means automatically change case of preceding word while typing.
Casing is done according to `ada-case-keyword', `ada-case-identifier'
and `ada-case-attribute'.

You can customize this variable.