diff options
author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2014-07-17 06:35:13 +0000 |
---|---|---|
committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2014-07-17 06:35:13 +0000 |
commit | 7e89ad833260a023e115508db597bb98fe4e1406 (patch) | |
tree | 32444e488d3b2cf3ccc24757d930ec5c8c41ecea /gcc/ada/sem_ch12.adb | |
parent | fa771c058f76d90b56deb64a2695b1560bda4719 (diff) | |
download | gcc-7e89ad833260a023e115508db597bb98fe4e1406.tar.gz |
2014-07-17 Robert Dewar <dewar@adacore.com>
* debug.adb: Remove -gnatdQ.
* exp_disp.adb: Remove -gnatdQ.
* a-ztenio.ads, a-wtinio.ads, a-wtmoio.ads, a-ztcoau.ads, a-tiinio.ads,
a-wtfiio.ads, a-timoio.ads, sem_ch12.adb, a-tifiio.ads, a-ztinio.ads,
rtsfind.adb, rtsfind.ads, a-ztmoio.ads, a-wtdeio.ads, a-ztfiio.ads,
a-tideio.ads, a-wtflio.ads, a-ztdeio.ads, sem_ch8.adb, a-tiflio.ads,
sprint.adb, a-ztflio.ads, snames.ads-tmpl, a-wtenio.ads,
a-tienio.ads: Rename Text_IO_Kludge to Text_IO_Special_Unit.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@212725 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/sem_ch12.adb')
-rw-r--r-- | gcc/ada/sem_ch12.adb | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/ada/sem_ch12.adb b/gcc/ada/sem_ch12.adb index 65ce631456e..49adf852a52 100644 --- a/gcc/ada/sem_ch12.adb +++ b/gcc/ada/sem_ch12.adb @@ -2362,7 +2362,7 @@ package body Sem_Ch12 is -- Start of processing for Analyze_Formal_Package_Declaration begin - Text_IO_Kludge (Gen_Id); + Check_Text_IO_Special_Unit (Gen_Id); Init_Env; Check_Generic_Child_Unit (Gen_Id, Parent_Installed); @@ -3426,7 +3426,7 @@ package body Sem_Ch12 is -- Very first thing: apply the special kludge for Text_IO processing -- in case we are instantiating one of the children of [Wide_]Text_IO. - Text_IO_Kludge (Name (N)); + Check_Text_IO_Special_Unit (Name (N)); -- Make node global for error reporting @@ -4675,7 +4675,7 @@ package body Sem_Ch12 is -- Of course such an instantiation is bogus (these are packages, not -- subprograms), but we get a better error message if we do this. - Text_IO_Kludge (Gen_Id); + Check_Text_IO_Special_Unit (Gen_Id); -- Make node global for error reporting |