diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2014-08-04 10:10:23 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2014-08-04 10:10:23 +0000 |
| commit | caa0a5e9bc86858909102856acda216ad959cd54 (patch) | |
| tree | b4be9bc9da828ac384e6c02e31a9563d3e2d742f /gcc/ada/a-cforse.adb | |
| parent | 5469a1bf9b95384192cb00b5dfac3db18753a629 (diff) | |
| download | gcc-caa0a5e9bc86858909102856acda216ad959cd54.tar.gz | |
2014-08-04 Arnaud Charlet <charlet@adacore.com>
* sem_scil.ads: Improve comments.
* sem_ch4.adb (Analyze_Equality_Op): Add support for
Allow_Integer_Address (equality between Address and Integer).
2014-08-04 Yannick Moy <moy@adacore.com>
* a-cfhama.adb, a-cforse.adb: Minor fixes to avoid using prefix
notation on untagged objects.
* sem.ads: Update comment.
* inline.adb (Can_Be_Inlined_In_GNATprove_Mode): Do
not inline subprograms declared in the visible part of a package.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@213560 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/a-cforse.adb')
| -rw-r--r-- | gcc/ada/a-cforse.adb | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/ada/a-cforse.adb b/gcc/ada/a-cforse.adb index bc8ffbaac88..d1e6b8cd206 100644 --- a/gcc/ada/a-cforse.adb +++ b/gcc/ada/a-cforse.adb @@ -6,7 +6,7 @@ -- -- -- B o d y -- -- -- --- Copyright (C) 2010-2013, Free Software Foundation, Inc. -- +-- Copyright (C) 2010-2014, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -1534,8 +1534,8 @@ package body Ada.Containers.Formal_Ordered_Sets is end if; return S : Set (Length (Left) + Length (Right)) do - S.Assign (Source => Left); - S.Union (Right); + Assign (S, Source => Left); + Union (S, Right); end return; end Union; |