diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2014-01-21 07:54:56 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2014-01-21 07:54:56 +0000 |
| commit | 52f34872f95551ac472bf7321aa97794f2dc6ca5 (patch) | |
| tree | f71da796d9a3d34f4f69cc3d0f65b97a32e0baf2 /gcc/ada/atree.adb | |
| parent | de4ebd7a445413e739802b2e8b7c8b10edd7a685 (diff) | |
| download | gcc-52f34872f95551ac472bf7321aa97794f2dc6ca5.tar.gz | |
2014-01-21 Robert Dewar <dewar@adacore.com>
* switch-c.adb, usage.adb, atree.adb, atree.ads: Minor reformatting.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@206872 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/atree.adb')
| -rw-r--r-- | gcc/ada/atree.adb | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/ada/atree.adb b/gcc/ada/atree.adb index 3eb67f60dbc..95b31329866 100644 --- a/gcc/ada/atree.adb +++ b/gcc/ada/atree.adb @@ -739,6 +739,7 @@ package body Atree is if Has_Extension (Source) then pragma Assert (Has_Extension (Destination)); + for J in 1 .. Num_Extension_Nodes loop Nodes.Table (Destination + J) := Nodes.Table (Source + J); end loop; |