Just for context, people asked for C "+=" type of assignment since Ada 83. Target Name Symbol solves that. Note that Target Name Symbol is actually more useful than C "+=", since you can do stuff like

My_Data (To_Index (1)) := @ * 2 - 3.0 * @;