ada-procedure-start-regexp

ada-procedure-start-regexp is a variable defined in `ada-mode.el'.
Its value is

"^[ 	]*\\(with[ 	]+\\)?\\(\\(not[ 	]+\\)?overriding[ 	]+\\)?\\(procedure\\|function\\|task\\)[ 	\n]+\\(\\(\"[^\"]+\"\\)\\|\\(\\(\\sw\\|[_.]\\)+\\)\\)"

Documentation:
Regexp matching Ada subprogram start.
The actual start is at (match-beginning 4). The name is in (match-string 5).