1 2017-09-11 Yannick Moy <moy@adacore.com>
3 * gnat1drv.adb (Adjust_Global_Switches): Set
4 Check_Validity_Of_Parameters to False in GNATprove mode.
5 * opt.ads (Check_Validity_Of_Parameters): Document switch to
8 2017-09-09 Pierre-Marie de Rodat <derodat@adacore.com>
10 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Record_Type>: Don't
11 generate debug info for inner record types if -fgnat-encodings=minimal.
12 (gnat_to_gnu_entity) <E_Record_Subtype>: Use the ultimate base record
13 type as the debug type.
15 2017-09-09 Eric Botcazou <ebotcazou@adacore.com>
17 * gcc-interface/decl.c (components_to_record): Do not reorder in non-
18 packed record types if pragma Optimize_Alignment (Space) is enabled.
20 2017-09-09 Eric Botcazou <ebotcazou@adacore.com>
22 * gcc-interface/trans.c (Subprogram_Body_to_gnu): Disregard inlining
23 limits for expression functions.
24 (gnat_to_gnu) <N_Object_Declaration>: Fix formatting.
26 2017-09-09 Eric Botcazou <ebotcazou@adacore.com>
28 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Record_Type>: Copy the
29 layout of the record from the parent type only if both are or are not
31 (is_stored_discriminant): Return false for an unchecked union.
33 2017-09-09 Eric Botcazou <ebotcazou@adacore.com>
35 * gcc-interface/utils2.c (build_allocator): In type_annotate_only mode
38 2017-09-09 Eric Botcazou <ebotcazou@adacore.com>
40 * gcc-interface/decl.c (promote_object_alignment): New function taken
42 (gnat_to_gnu_entity) <E_Variable>: ...here. Invoke it.
43 (gnat_to_gnu_field): If the field is Atomic or VFA, invoke it and
44 create a padding type on success before doing the atomic check.
46 2017-09-09 Eric Botcazou <ebotcazou@adacore.com>
48 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Variable>: Apply the
49 promotion to static memory earlier in the processing.
51 2017-09-09 Eric Botcazou <ebotcazou@adacore.com>
53 * gcc-interface/decl.c (gnat_to_gnu_entity): Only set the TYPE_ALIGN_OK
54 and TYPE_BY_REFERENCE_P flags on types after various promotions.
55 * gcc-interface/trans.c (node_has_volatile_full_access) <N_Identifier>:
56 Consider all kinds of entities.
58 2017-09-09 Eric Botcazou <ebotcazou@adacore.com>
60 * gcc-interface/utils.c (convert): When converting to a padding type,
61 reuse an existing CONSTRUCTOR if it has got the right size.
63 2017-09-08 Nicolas Roche <roche@adacore.com>
65 * gcc-interface/Make-lang.in, gcc-interface/Makefile.in: Find runtime
67 * a-lfztio.ads, g-timsta.ads, g-sercom-linux.adb, s-osprim-solaris.adb,
68 a-inteio.ads, s-stchop-rtems.adb, s-casuti.adb, s-pack39.adb,
69 i-vxwork-x86.ads, a-strbou.adb, a-stzmap.adb, s-assert.adb,
70 a-sfecin.ads, a-cohama.adb, s-casuti.ads, a-suenco.adb, s-pack39.ads,
71 a-stzmap.ads, a-strbou.ads, s-stalib.adb, s-trasym.adb, g-comver.adb,
72 s-assert.ads, s-vector.ads, g-cgi.adb, a-cohama.ads, s-wchcnv.adb,
73 a-titest.adb, s-pack48.adb, a-suenco.ads, a-strunb.adb, s-stalib.ads,
74 s-trasym.ads, a-nudira.adb, g-comver.ads, a-nuflra.adb, g-cgi.ads,
75 a-chacon.adb, s-wchcnv.ads, a-excach.adb, s-pack48.ads, a-titest.ads,
76 a-strunb.ads, s-dwalin.adb, a-nudira.ads, a-chtgbo.adb, s-resfil.adb,
77 a-scteio.ads, a-nuflra.ads, g-soliop-mingw.ads, s-pack57.adb,
78 a-chacon.ads, s-bytswa.ads, s-pooloc.adb, g-os_lib.adb, s-dwalin.ads,
79 a-szuzha.adb, s-resfil.ads, a-chtgbo.ads, s-spsufi.adb, s-pack57.ads,
80 s-pooloc.ads, g-os_lib.ads, a-stfiha.ads, a-lcteio.ads, a-wtcoau.adb,
81 a-szuzha.ads, s-mmosin-unix.adb, a-stmaco.ads, s-spsufi.ads,
82 s-stchop-limit.ads, a-wtcoau.ads, a-exctra.adb, s-mmosin-unix.ads,
83 s-sequio.adb, s-conca2.adb, g-table.adb, s-imglli.adb,
84 a-numaux-x86.adb, a-strsea.adb, s-wchstw.adb, a-clrefi.adb,
85 a-wwboio.adb, a-exctra.ads, s-sequio.ads, s-conca2.ads, a-wwunio.ads,
86 system-linux-hppa.ads, g-table.ads, s-dimkio.ads, s-imglli.ads,
87 a-cofove.adb, a-numaux-x86.ads, s-wchstw.ads, a-strsea.ads,
88 a-clrefi.ads, a-wwboio.ads, s-stratt-xdr.adb, s-crc32.adb,
89 s-excmac-arm.adb, g-busora.adb, a-cofove.ads, s-osprim-unix.adb,
90 g-io.adb, s-pack49.adb, s-crc32.ads, s-excmac-arm.ads, a-fzteio.ads,
91 g-busora.ads, s-stausa.adb, system-linux-mips.ads, sequenio.ads,
92 g-exctra.adb, g-rewdat.adb, a-cgaaso.adb, g-io.ads, s-pack49.ads,
93 a-wtflau.adb, a-undesu.adb, s-stausa.ads, a-ztenau.adb, g-enutst.ads,
94 calendar.ads, s-pack58.adb, g-rewdat.ads, g-exctra.ads, s-ststop.adb,
95 a-cgaaso.ads, a-strfix.adb, a-comlin.adb, a-strunb-shared.adb,
96 a-wtflau.ads, a-undesu.ads, a-cbhase.adb, a-ztenau.ads, s-os_lib.adb,
97 a-coorse.adb, a-chlat1.ads, s-pack58.ads, s-ststop.ads, a-strfix.ads,
98 a-comlin.ads, a-strunb-shared.ads, a-nscefu.ads, s-valboo.adb,
99 directio.ads, a-chtgke.adb, a-cbhase.ads, a-wtinau.adb,
100 system-linux-alpha.ads, s-os_lib.ads, a-coorse.ads,
101 system-linux-s390.ads, s-imgwiu.adb, a-chtgop.adb, s-valboo.ads,
102 a-chtgke.ads, a-tienio.adb, s-conca3.adb, a-wtinau.ads,
103 system-darwin-ppc.ads, i-c.adb, s-expllu.adb, g-expect.adb,
104 g-sha256.ads, s-vallld.adb, s-imgwiu.ads, a-chtgop.ads, a-strmap.adb,
105 a-tienio.ads, s-conca3.ads, s-imgint.adb, i-c.ads, s-expllu.ads,
106 s-osprim-darwin.adb, a-cogeso.adb, g-expect.ads, a-iwteio.ads,
107 s-vallld.ads, a-coinho-shared.adb, g-shsh64.adb, a-strmap.ads,
108 g-comlin.adb, a-excpol.adb, s-imgint.ads, a-ztdeau.adb, a-cogeso.ads,
109 a-coinho-shared.ads, g-shsh64.ads, g-comlin.ads, a-stzsup.adb,
110 a-rbtgbk.adb, a-wtmoau.adb, a-ztdeau.ads, s-exnlli.adb, g-tty.adb,
111 g-heasor.adb, g-socthi-dummy.adb, s-llflex.ads, a-zchara.ads,
112 a-stzsup.ads, a-ztcstr.adb, a-rbtgbk.ads, a-sfwtio.ads, a-wtmoau.ads,
113 a-sulcin.adb, s-exnlli.ads, system-freebsd.ads, a-stunha.adb,
114 a-charac.ads, g-tty.ads, g-heasor.ads, s-exctra.adb,
115 g-socthi-dummy.ads, a-coboho.adb, a-ztcstr.ads, a-tideio.adb,
116 a-sulcin.ads, a-wrstfi.adb, g-alleve.adb, s-pack59.adb, a-ngrear.adb,
117 a-stboha.adb, a-stunau-shared.adb, a-stunha.ads, a-lfwtio.ads,
118 s-fileio.adb, s-exctra.ads, a-coboho.ads, a-ioexce.ads, a-tideio.ads,
119 a-ngrear.ads, a-wrstfi.ads, s-pack59.ads, g-alleve.ads, a-stboha.ads,
120 s-poosiz.adb, g-traceb.adb, g-rannum.adb, machcode.ads, s-purexc.ads,
121 s-fileio.ads, a-cfinve.adb, a-crbtgk.adb, system-solaris-x86.ads,
122 s-poosiz.ads, g-rannum.ads, g-traceb.ads, a-except.adb, s-conca4.adb,
123 a-stream.adb, a-cfinve.ads, a-crbtgk.ads, s-wchwts.adb,
124 system-mingw.ads, a-except.ads, s-conca4.ads, a-chzla9.ads,
125 s-valenu.adb, s-soflin.adb, a-stream.ads, a-cgarso.adb, s-valllu.adb,
126 g-crc32.adb, s-wchwts.ads, s-fatflt.ads, s-imguns.adb, s-strcom.adb,
127 g-decstr.adb, s-valenu.ads, s-soflin.ads, a-cgarso.ads, a-cwila1.ads,
128 s-valllu.ads, g-crc32.ads, s-imguns.ads, g-spipat.adb, s-valwch.adb,
129 s-strcom.ads, g-decstr.ads, text_io.ads, g-debuti.adb, s-stchop.adb,
130 g-spipat.ads, s-valwch.ads, a-string.ads, s-exnint.adb, g-awk.adb,
131 g-tasloc.adb, s-wwdenu.adb, s-boustr.adb, a-zchuni.adb, s-stchop.ads,
132 g-debuti.ads, s-stopoo.adb, system-dragonfly-x86_64.ads,
133 system-linux-x86.ads, s-exnint.ads, g-awk.ads, a-stzhas.adb,
134 g-tasloc.ads, s-wwdenu.ads, g-debpoo.adb, g-except.ads,
135 g-sse.ads, s-boustr.ads, a-zchuni.ads, s-bitops.adb, s-wwdwch.adb,
136 s-stopoo.ads, a-catizo.adb, a-stzhas.ads, a-nlcefu.ads, g-debpoo.ads,
137 i-vxwoio.adb, s-bitops.ads, g-io-put-vxworks.adb, s-wwdwch.ads,
138 g-sehamd.adb, a-ssicst.adb, a-catizo.ads, s-mmap.adb, g-string.adb,
139 s-traceb.adb, a-swunau.adb, s-rannum.adb, a-ticoau.adb, i-vxwoio.ads,
140 g-sehamd.ads, a-stwiun.adb, a-ssicst.ads, s-conca5.adb, a-ssitio.ads,
141 s-mmap.ads, a-zttest.adb, g-string.ads, g-sercom.adb, a-cdlili.adb,
142 a-swunau.ads, s-traceb.ads, s-rannum.ads, a-ticoau.ads, system-aix.ads,
143 a-cforma.adb, a-stwiun.ads, s-conca5.ads, s-carsi8.adb, a-zttest.ads,
144 g-sercom.ads, a-cdlili.ads, a-cihama.adb, g-sptain.ads, a-cforma.ads,
145 s-maccod.ads, s-carsi8.ads, a-strsup.adb, g-sha1.adb, a-cihama.ads,
146 g-stseme.adb, s-traent.adb, s-valcha.adb, g-curexc.ads, a-strsup.ads,
147 g-sha1.ads, a-sflcin.ads, s-traent.ads, s-pack10.adb, s-valcha.ads,
148 a-coteio.ads, s-tasloc.adb, g-utf_32.adb, a-suteio.adb, s-except.adb,
149 a-direct.adb, g-stsifd-sockets.adb, a-numaux-vxworks.ads, s-winext.ads,
150 s-pack10.ads, a-ztexio.adb, a-tiflau.adb, system-vxworks-arm.ads,
151 s-tasloc.ads, a-suteio.ads, g-utf_32.ads, s-except.ads,
152 a-direct.ads, a-swbwha.adb, g-hesorg.adb, s-wwdcha.adb, a-wtedit.adb,
153 a-ztexio.ads, a-wtcoio.adb, a-tiflau.ads, a-ssizti.ads, s-casi32.adb,
154 a-swbwha.ads, s-veboop.adb, g-hesorg.ads, s-parame-rtems.adb,
155 s-wwdcha.ads, a-wtedit.ads, a-stuten.adb, a-coinve.adb, a-wtcoio.ads,
156 s-casi32.ads, s-string.adb, a-tiinau.adb, a-cusyqu.adb, s-conca6.adb,
157 s-veboop.ads, a-cgcaso.adb, a-numaux-darwin.adb, a-envvar.adb,
158 a-stuten.ads, s-secsta.adb, a-coinve.ads, s-string.ads, a-cusyqu.ads,
159 a-tiinau.ads, s-osprim-vxworks.adb, s-conca6.ads, g-spchge.adb,
160 s-parint.adb, a-cuprqu.adb, a-cgcaso.ads, a-numaux-darwin.ads,
161 a-envvar.ads, s-secsta.ads, g-spchge.ads, s-parint.ads, a-cuprqu.ads,
162 a-swuwti.adb, a-flteio.ads, a-sbhcin.adb, a-coprnu.adb, g-u3spch.adb,
163 s-atocou.adb, g-ctrl_c.adb, a-swuwti.ads, a-calend.adb, a-sbhcin.ads,
164 a-coprnu.ads, g-dirope.adb, g-sha512.ads, g-u3spch.ads, s-atocou.ads,
165 g-ctrl_c.ads, a-timoau.adb, a-witeio.adb, s-pack11.adb, a-strhas.adb,
166 a-wtflio.adb, g-spitbo.adb, a-calend.ads, a-ztenio.adb, g-dirope.ads,
167 a-slcain.adb, g-sechas.adb, a-timoau.ads, a-witeio.ads, s-pack11.ads,
168 s-shasto.adb, s-traceb-mastop.adb, a-ciorse.adb, s-utf_32.adb,
169 a-strhas.ads, a-wtflio.ads, g-spitbo.ads, a-ztenio.ads, a-slcain.ads,
170 g-sechas.ads, s-gearop.adb, a-siztio.ads, s-pack20.adb, s-shasto.ads,
171 a-ciorse.ads, s-utf_32.ads, s-crtl.ads, a-wtinio.adb, s-elaall.adb,
172 s-explli.adb, s-chepoo.ads, s-gearop.ads, a-einuoc.adb, s-pack20.ads,
173 system-linux-ia64.ads, a-swunau-shared.adb, a-wtinio.ads, g-alvety.ads,
174 a-liztio.ads, g-calend.adb, s-conca7.adb, s-elaall.ads, s-explli.ads,
175 a-einuoc.ads, s-widboo.adb, s-imgdec.adb, a-cbhama.adb, g-calend.ads,
176 s-conca7.ads, a-llitio.ads, i-cexten.ads, a-coorma.adb, s-widboo.ads,
177 s-diflio.adb, g-souinf.ads, s-imgdec.ads, g-strhas.ads, a-cbhama.ads,
178 g-shshco.adb, a-ztdeio.adb, s-gloloc.adb, a-coorma.ads, g-wispch.adb,
179 s-pack03.adb, g-eacodu.adb, s-casi16.adb, s-diflio.ads, a-colien.adb,
180 g-shshco.ads, a-wtmoio.adb, a-rbtgbo.adb, a-ztdeio.ads,
181 system-rtems.ads, s-gloloc.ads, a-csquin.ads, a-cofuse.adb,
182 g-wispch.ads, s-pack03.ads, s-casi16.ads, s-io.adb, a-colien.ads,
183 g-alveop.adb, gnat.ads, s-diinio.adb, a-cfdlli.adb, g-pehage.adb,
184 a-wtmoio.ads, a-stwiha.adb, a-locale.adb, a-tirsfi.adb, a-nscoty.ads,
185 a-rbtgbo.ads, s-pack12.adb, a-cofuse.ads, a-sfteio.ads, s-io.ads,
186 g-alveop.ads, a-cfdlli.ads, s-diinio.ads, a-stwiha.ads, g-pehage.ads,
187 a-locale.ads, a-tirsfi.ads, s-pack12.ads, s-valuti.adb, g-cppexc.adb,
188 system-vxworks-ppc.ads, g-memdum.adb, a-lfteio.ads, s-pack21.adb,
189 s-unstyp.ads, s-valuti.ads, g-cppexc.ads, system-hpux-ia64.ads,
190 g-memdum.ads, g-soccon.ads, g-altive.ads, a-crbtgo.adb, s-pack21.ads,
191 a-llizti.ads, a-numaux-libc-x86.ads, s-expint.adb, s-conca8.adb,
192 a-crbtgo.ads, s-pack30.adb, s-vallli.adb, s-geveop.adb, s-expint.ads,
193 a-direio.adb, s-conca8.ads, a-widcha.ads, s-pack30.ads, s-vallli.ads,
194 s-strhas.adb, s-geveop.ads, g-md5.adb, a-direio.ads, a-numaux.ads,
195 s-ransee.adb, a-szbzha.adb, i-cobol.adb, g-busorg.adb, s-strhas.ads,
196 g-md5.ads, s-widenu.adb, s-ransee.ads, s-widllu.adb, a-szbzha.ads,
197 a-ststio.adb, i-cobol.ads, g-busorg.ads, g-regpat.adb, s-widenu.ads,
198 a-secain.adb, s-widllu.ads, s-pack13.adb, g-encstr.adb, a-ztcoau.adb,
199 a-ststio.ads, s-widwch.adb, g-regpat.ads, s-atacco.adb, a-cborse.adb,
200 a-secain.ads, s-pack13.ads, g-encstr.ads, a-ztcoau.ads, s-widwch.ads,
201 g-io_aux.adb, s-atacco.ads, a-ncelfu.ads, interfac.ads, a-cborse.ads,
202 g-regexp.adb, s-pack22.adb, a-szuzti.adb, g-io_aux.ads, s-caun32.adb,
203 a-nselfu.ads, g-regexp.ads, s-pack22.ads, a-ticoio.adb, a-szuzti.ads,
204 g-diopit.adb, s-caun32.ads, s-conca9.adb, a-tags.adb, a-swmwco.ads,
205 a-sbecin.adb, s-pack31.adb, s-expuns.adb, a-ticoio.ads, s-valint.adb,
206 s-conca9.ads, g-diopit.ads, a-tags.ads, a-nllcef.ads, a-izteio.ads,
207 a-sbecin.ads, s-expuns.ads, s-pack31.ads, g-dyntab.adb, s-powtab.ads,
208 s-flocon-none.adb, s-valint.ads, a-ssiwti.ads, s-mmosin-mingw.adb,
209 s-pack40.adb, s-pack05.adb, a-ztflau.adb, g-dyntab.ads,
210 a-szuzti-shared.adb, g-alvevi.ads, a-stwise.adb, s-mmosin-mingw.ads,
211 s-pack40.ads, a-diocst.adb, a-ztflau.ads, s-pack05.ads, a-nlcoty.ads,
212 a-contai.ads, a-stwisu.adb, g-byorma.adb, a-siwtio.ads, a-stwise.ads,
213 s-regpat.adb, g-mbdira.adb, s-pack14.adb, a-diocst.ads, g-flocon.ads,
214 g-mbflra.adb, a-ztinau.adb, s-dim.ads, s-mantis.adb, a-stwisu.ads,
215 g-byorma.ads, s-atopri.adb, g-wistsp.ads, a-uncdea.ads, s-widcha.adb,
216 a-caldel.adb, s-regpat.ads, g-mbdira.ads, a-tiflio.adb, s-pack14.ads,
217 s-parame.adb, a-liwtio.ads, s-memory.adb, g-mbflra.ads, a-ztinau.ads,
218 a-wtgeau.adb, s-direio.adb, s-mantis.ads, s-atopri.ads, s-widcha.ads,
219 a-caldel.ads, s-pack23.adb, a-unccon.ads, a-tiflio.ads, s-parame.ads,
220 a-llftio.ads, s-memory.ads, s-regexp.adb, a-wtgeau.ads, a-exexda.adb,
221 s-direio.ads, s-pack23.ads, g-stheme.adb, a-tiinio.adb, g-sestin.ads,
222 s-regexp.ads, a-wtfiio.adb, a-comutr.adb, a-exexpr.adb, a-tiinio.ads,
223 a-ztmoau.adb, a-cohata.ads, a-wtfiio.ads, s-imgrea.adb, ada.ads,
224 a-szunau-shared.adb, a-comutr.ads, s-valuns.adb, a-ztmoau.ads,
225 system-linux-arm.ads, s-osprim-x32.adb, s-pack41.adb, s-pack06.adb,
226 s-imgrea.ads, s-valuns.ads, s-finroo.adb, s-caun16.adb, s-pooglo.adb,
227 a-zrstfi.adb, a-suenst.adb, s-pack41.ads, g-binenv.adb, s-pack06.ads,
228 a-calari.adb, a-nlcoar.ads, s-finroo.ads, a-timoio.adb, s-caun16.ads,
229 s-flocon.adb, a-suenst.ads, a-zrstfi.ads, s-pooglo.ads, s-wchcon.adb,
230 s-traceb-hpux.adb, s-pack50.adb, i-fortra.adb, s-pack15.adb,
231 a-ngcefu.adb, g-sptavs.ads, g-binenv.ads, s-wchjis.adb, a-calari.ads,
232 a-timoio.ads, a-decima.adb, s-flocon.ads, s-wchcon.ads, a-llfzti.ads,
233 i-fortra.ads, s-pack50.ads, s-pack15.ads, a-ngcefu.ads, a-cfhase.adb,
234 s-wchjis.ads, g-soliop.ads, a-decima.ads, a-chlat9.ads, s-pack24.adb,
235 a-nlelfu.ads, a-cfhase.ads, g-locfil.adb, s-atocou-builtin.adb,
236 s-memcop.ads, a-szunau.adb, s-pack24.ads, s-imgllb.adb, s-auxdec.adb,
237 g-locfil.ads, s-pack33.adb, a-szunau.ads, s-parame-vxworks.adb,
238 s-imgllb.ads, a-ciorma.adb, s-auxdec.ads, a-cobove.adb, s-dsaser.ads,
239 a-elchha.adb, s-pack33.ads, a-cofuve.adb, s-parame-vxworks.ads,
240 a-ciorma.ads, system-darwin-x86.ads, s-multip.adb, a-stwiun-shared.adb,
241 a-wichun.adb, a-cobove.ads, s-imgbiu.adb, s-tsmona-mingw.adb,
242 a-coormu.adb, a-siocst.adb, s-win32.ads, a-elchha.ads, s-pack42.adb,
243 s-pack07.adb, a-cofuve.ads, system-hpux.ads, a-teioed.adb,
244 a-convec.adb, g-speche.adb, s-multip.ads, a-stwiun-shared.ads,
245 a-wichun.ads, s-imgbiu.ads, a-numeri.ads, a-siocst.ads, a-coormu.ads,
246 a-lliwti.ads, s-pack42.ads, s-pack07.ads, a-teioed.ads, a-convec.ads,
247 g-speche.ads, g-socthi.adb, a-nucoty.ads, a-szmzco.ads, s-pack51.adb,
248 s-osprim-mingw.adb, s-casi64.adb, g-strspl.ads, g-socthi.ads,
249 g-socket-dummy.adb, s-pack51.ads, s-dimmks.ads, s-casi64.ads,
250 a-wtenau.adb, s-stchop-vxworks.adb, s-pack60.adb,
251 system-solaris-sparc.ads, s-pack25.adb, g-socket-dummy.ads,
252 a-exstat.adb, a-cofuma.adb, s-tsmona-linux.adb, a-wtenau.ads,
253 s-pack60.ads, s-pack25.ads, i-cstrea.adb, a-cofuma.ads, g-exptty.adb,
254 a-chzla1.ads, s-pack34.adb, i-cstrea.ads, s-excdeb.adb, a-iteint.ads,
255 g-exptty.ads, i-pacdec.adb, s-pack34.ads, s-rident.ads, s-sopco3.adb,
256 i-vxwork.ads, s-excdeb.ads, system-linux-ppc.ads, a-swuwti-shared.adb,
257 s-widlli.adb, s-pack43.adb, i-pacdec.ads, a-cwila9.ads, s-sopco3.ads,
258 a-fwteio.ads, s-widlli.ads, s-pack43.ads, a-suhcin.adb, a-wtdeau.adb,
259 g-allein.ads, a-suezst.adb, a-dirval-mingw.adb, g-zspche.adb,
260 s-bignum.adb, a-ztedit.adb, g-regist.adb, a-nllefu.ads, a-ztcoio.adb,
261 s-pack52.adb, a-llctio.ads, a-nucoar.ads, s-pack17.adb, a-suhcin.ads,
262 a-wtdeau.ads, a-suezst.ads, a-dirval.adb, g-zspche.ads, g-regist.ads,
263 a-ztedit.ads, s-bignum.ads, a-wtcstr.adb, system.ads, s-pack52.ads,
264 a-ztcoio.ads, s-pack17.ads, s-imgboo.adb, a-rbtgso.adb, a-dirval.ads,
265 a-cohase.adb, s-pack61.adb, a-wtcstr.ads, s-pack26.adb, s-osprim.ads,
266 a-tigeau.adb, s-imgboo.ads, a-nuelfu.ads, a-swfwha.ads, s-commun.adb,
267 g-socthi-vxworks.adb, a-rbtgso.ads, a-cohase.ads, g-zstspl.ads,
268 s-pack61.ads, s-pack26.ads, a-intnam-dragonfly.ads, s-imglld.adb,
269 a-tigeau.ads, s-commun.ads, g-socthi-vxworks.ads, a-cborma.adb,
270 a-stwifi.adb, g-moreex.adb, s-pack35.adb, s-imglld.ads, s-valdec.adb,
271 a-tifiio.adb, a-cborma.ads, g-moreex.ads, a-stwifi.ads, s-pack35.ads,
272 s-sopco4.adb, g-sha224.ads, g-socket.adb, a-intnam-rtems.ads,
273 s-finmas.adb, s-valdec.ads, s-addima.adb, a-finali.adb, a-tifiio.ads,
274 s-rpc.adb, a-ztflio.adb, s-pack44.adb, s-pack09.adb, a-sblcin.adb,
275 s-sopco4.ads, a-textio.adb, g-socket.ads, g-sptabo.ads, s-finmas.ads,
276 g-shsh32.adb, s-addima.ads, a-finali.ads, s-mmauni-long.ads, s-rpc.ads,
277 a-ztflio.ads, system-djgpp.ads, s-stache.adb, s-pack44.ads,
278 s-pack09.ads, a-sblcin.ads, a-textio.ads, a-cidlli.adb, g-shsh32.ads,
279 a-chtgbk.adb, a-tiocst.adb, s-pack53.adb, s-pack18.adb, s-stache.ads,
280 a-zchhan.adb, s-fatlfl.ads, a-ztinio.adb, s-strops.adb, a-siteio.ads,
281 a-cidlli.ads, a-chtgbk.ads, g-ssvety.ads, a-tiocst.ads, s-pack53.ads,
282 s-parame-hpux.ads, s-pack18.ads, a-zchhan.ads, s-strops.ads,
283 a-ztinio.ads, a-wichha.adb, a-stwima.adb, a-nlrear.ads, a-liteio.ads,
284 s-pack62.adb, s-pack27.adb, s-fore.adb, s-vercon.adb, a-wichha.ads,
285 a-stwima.ads, s-pack62.ads, system-linux-sparc.ads, s-pack27.ads,
286 g-dynhta.adb, s-fore.ads, s-vercon.ads, a-cofuba.adb, a-cimutr.adb,
287 i-cpoint.adb, s-imgenu.adb, a-stwibo.adb, s-pack36.adb, i-cstrin.adb,
288 s-imgllu.adb, a-suteio-shared.adb, g-excact.adb, s-stoele.adb,
289 s-addope.adb, g-dynhta.ads, a-cofuba.ads, a-ztmoio.adb, a-llfwti.ads,
290 a-cimutr.ads, i-cpoint.ads, s-imgenu.ads, a-stwibo.ads, a-wttest.adb,
291 s-pack36.ads, a-tgdico.ads, s-sopco5.adb, s-scaval.adb, i-cstrin.ads,
292 s-imgllu.ads, g-excact.ads, s-stoele.ads, g-deutst.ads, s-addope.ads,
293 s-imgwch.adb, g-sha384.ads, a-ztmoio.ads, s-pack45.adb, a-wttest.ads,
294 s-sopco5.ads, s-excmac-gcc.adb, s-scaval.ads, a-storio.adb,
295 a-coinho.adb, a-btgbso.adb, s-imgwch.ads, s-carun8.adb, memtrack.adb,
296 s-pack45.ads, a-sfhcin.ads, s-excmac-gcc.ads, a-storio.ads,
297 a-coinho.ads, a-btgbso.ads, s-stratt.adb, s-carun8.ads, a-shcain.adb,
298 s-pack54.adb, s-pack19.adb, a-colire.adb, a-tigeli.adb, s-caun64.adb,
299 s-stratt.ads, s-fatgen.adb, a-shcain.ads, a-stzunb-shared.adb,
300 s-pack54.ads, s-pack19.ads, a-colire.ads, a-calcon.adb, s-caun64.ads,
301 s-fatgen.ads, s-pack63.adb, g-arrspl.adb, a-stzunb-shared.ads,
302 s-pack28.adb, a-nllrar.ads, a-zzboio.adb, a-zzunio.ads, a-stunau.adb,
303 a-calcon.ads, g-cgideb.adb, s-objrea.adb, s-mastop.adb, a-tienau.adb,
304 g-altcon.adb, g-arrspl.ads, s-pack63.ads, s-restri.adb, s-pack28.ads,
305 a-zzboio.ads, a-stunau.ads, g-cgideb.ads, g-htable.adb, g-sothco.adb,
306 s-objrea.ads, g-soliop-solaris.ads, s-mastop.ads, a-tienau.ads,
307 system-linux-m68k.ads, g-altcon.ads, s-dmotpr.ads, s-memory-mingw.adb,
308 g-cgicoo.adb, s-pack37.adb, s-restri.ads, s-fatllf.ads, s-expmod.adb,
309 a-swuwha.adb, a-exextr.adb, a-cfhama.adb, s-gloloc-mingw.adb,
310 a-tiboio.adb, g-forstr.adb, g-sothco.ads, a-stzbou.adb, a-nllcty.ads,
311 a-suecin.adb, g-htable.ads, s-exctab.adb, a-tiunio.ads, g-cgicoo.ads,
312 s-osprim-posix.adb, s-pack37.ads, a-ciormu.adb, s-atocou-x86.adb,
313 a-swuwha.ads, s-expmod.ads, a-cfhama.ads, s-ficobl.ads, a-ngcoty.adb,
314 g-forstr.ads, a-tiboio.ads, a-calfor.adb, a-stzbou.ads, a-suecin.ads,
315 a-conhel.adb, a-crbltr.ads, s-exctab.ads, a-dhfina.ads, s-imgcha.adb,
316 s-pack46.adb, a-ciormu.ads, system-linux-sh4.ads, a-chahan.adb,
317 a-ngcoty.ads, a-stzunb.adb, a-szfzha.ads, a-calfor.ads, a-cbdlli.adb,
318 a-conhel.ads, s-imgcha.ads, s-pack46.ads, a-assert.adb, a-chahan.ads,
319 a-stzunb.ads, a-crdlli.adb, s-pack55.adb, a-cbdlli.ads, a-tideau.adb,
320 a-assert.ads, ioexcept.ads, s-boarop.ads, g-hesora.adb, a-crdlli.ads,
321 s-pack55.ads, a-tideau.ads, g-bubsor.adb, a-wtenio.adb, a-cbsyqu.adb,
322 g-hesora.ads, s-pack29.adb, a-nurear.ads, g-catiio.adb, s-stposu.adb,
323 g-bubsor.ads, a-wtenio.ads, a-cbsyqu.ads, a-suewst.adb,
324 system-vxworks-x86.ads, s-pack29.ads, a-cbmutr.adb, a-cbprqu.adb,
325 s-imenne.adb, g-sothco-dummy.adb, g-casuti.adb, g-catiio.ads,
326 s-stposu.ads, a-stzsea.adb, s-pack38.adb, a-suewst.ads, s-imgllw.adb,
327 a-cbprqu.ads, a-cbmutr.ads, s-imenne.ads, g-sothco-dummy.ads,
328 g-casuti.ads, s-htable.adb, s-fatsfl.ads, g-trasym.adb, unchconv.ads,
329 a-stzsea.ads, s-arit64.adb, s-pack38.ads, a-nllcar.ads, s-valrea.adb,
330 s-imgllw.ads, s-htable.ads, a-sequio.adb, g-trasym.ads, a-ngcoar.adb,
331 s-exnllf.adb, s-pack47.adb, s-arit64.ads, g-sercom-mingw.adb,
332 s-valrea.ads, g-socthi-mingw.adb, g-bytswa.adb, g-sehash.adb,
333 unchdeal.ads, a-sequio.ads, a-ngcoar.ads, s-exnllf.ads, a-wtdeio.adb,
334 s-pack47.ads, g-socthi-mingw.ads, a-excpol-abort.adb, a-ztgeau.adb,
335 g-bytswa.ads, g-sehash.ads, s-pack56.adb, a-wtdeio.ads, a-ngelfu.adb,
336 a-ztgeau.ads, a-cforse.adb, s-filatt.ads, a-stzfix.adb, a-cihase.adb,
337 s-pack56.ads, a-sfztio.ads, a-ngelfu.ads, s-trasym-dwarf.adb,
338 a-cforse.ads, a-ztfiio.adb, g-timsta.adb, a-stzfix.ads, a-cihase.ads,
339 a-ztfiio.ads, system-darwin-arm.ads: Move non-tasking runtime sources
340 to libgnat subdirectory.
342 2017-09-08 Yannick Moy <moy@adacore.com>
344 * sem_aux.adb, sem_aux.ads (Get_Called_Entity): New function to
345 return the entity associated with the call.
346 * sem_util.adb, sem_util.ads (Check_Function_Writable_Actuals):
347 Replace the internal Get_Function_Id with the new
348 Sem_Aux.Get_Called_Entity.
349 (Iterate_Call_Parameters): New
350 procedure to iterate on formals and actuals at the same time.
351 * sem_ch12.adb (Analyze_Subprogram_Instantiation):
352 Set SPARK_Mode from spec when set, for analysis
353 of instance. Restore after analysis of instance.
354 (Instantiate_Subprogram_Body): Set SPARK_Mode from body when
355 set, for analysis of body instance. Restored automatically at
356 the end of the subprogram.
357 * gnat1drv.adb (Adjust_Global_Switches): Set
358 Check_Validity_Of_Parameters to False in GNATprove mode.
359 * opt.ads (Check_Validity_Of_Parameters): Document switch to
362 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
364 * sem_util.adb (NCT_Tables_In_Use): Move to library level from...
365 (New_Copy_Tree): ...there. Reset the hash tables only if they
366 were used in the previous invocation.
367 * s-htable.adb: Fix typo.
369 2017-09-08 Bob Duff <duff@adacore.com>
371 * a-ssicst.adb (Open): Set File.Last_Op to the appropriate value.
373 2017-09-08 Arnaud Charlet <charlet@adacore.com>
375 * sem_aggr.adb: minor style fix.
377 2017-09-08 Bob Duff <duff@adacore.com>
379 * sprint.adb (Write_Corresponding_Source): Ignore if there is
380 no current source file.
381 (Write_Name_With_Col_Check, Write_Name_With_Col_Check_Sloc):
382 Print something helpful in case N is invalid.
383 * sprint.ads: Minor comment fix.
385 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
387 * exp_aggr.adb: (Aggr_Assignment_OK_For_Backend): Add early return for
390 2017-09-08 Bob Duff <duff@adacore.com>
392 * par-prag.adb, sem_prag.adb, snames.ads-tmpl: Implement pragma
393 Ada_2020, along the same lines as the other Ada version pragmas.
395 2017-09-08 Gary Dismukes <dismukes@adacore.com>
397 * sem_ch12.adb: Minor typo fixes and reformatting.
399 2017-09-08 Yannick Moy <moy@adacore.com>
401 * sem_aggr.adb (Resolve_Record_Aggregate):
402 Rewrite bounds of aggregate subexpressions which may depend on
403 discriminants of the enclosing aggregate.
405 2017-09-08 Yannick Moy <moy@adacore.com>
407 * sem_ch5.adb: Prevent assertion failure on illegal code.
409 2017-09-08 Yannick Moy <moy@adacore.com>
411 * lib-xref-spark_specific.adb (Add_SPARK_Xrefs.Is_SPARK_Scope): Avoid
412 calling Renamed_Entity on an entity which cannot be a renaming.
414 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
416 * exp_aggr.adb: Add with & use clause for Urealp.
417 (Aggr_Assignment_OK_For_Backend): Accept (almost all)
418 elementary types instead of just discrete types.
419 * sem_eval.adb (Expr_Value): Deal with N_Null for access types.
420 * gcc-interface/trans.c (gnat_to_gnu) <N_Assignment_Statement>:
421 Be prepared for the FP zero value in the memset case. Add small
424 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
426 * s-htable.adb (Static_HTable.Reset): Use aggregate instead
429 2017-09-08 Hristian Kirtchev <kirtchev@adacore.com>
431 * exp_aggr.adb (Expand_Array_Aggregate): Use New_Copy_Tree instead
432 of New_Copy because the latter leaves the syntactic structure of
433 the tree inconsistent (a child is accessible through two parents)
434 and prevents proper replication of itypes by subsequent calls
436 * exp_ch4.adb (Expand_Concatenate): Use New_Copy_Tree instead of
437 New_Copy because the latter leaves the syntactic structure of the
438 tree inconsistent (a child is accessible through two parents)
439 and prevents proper replication of itypes by subsequent calls
441 * sem_util.adb (In_Subtree): New routine.
442 (New_Copy_Tree): Reimplemented.
443 * sem_util.ads (In_Subtree): New routine.
444 (New_Copy_Tree): Reimplemented.
446 2017-09-08 Ed Schonberg <schonberg@adacore.com>
448 * sem_ch13.adb (Resolve_Aspect_Expressions): The expression
449 for aspect Default_Value is a static scalar value, but it does
450 not freeze the type. Yhis allows for subsequent representation
451 clauses for the type.
453 2017-09-08 Javier Miranda <miranda@adacore.com>
455 * sem_ch8.adb (Find_Direct_Name.Undefined): Do
456 not add entries into the undefined reference table when we are
457 compiling with errors ignored.
459 2017-09-08 Ed Schonberg <schonberg@adacore.com>
461 * sem_ch12.adb (Check_Formal_Packages): Do not apply conformance
462 check if the instance is within an enclosing instance body. The
463 formal package was legal in the enclosing generic, and is
464 legal in the enclosing instantiation. This optimisation may be
465 applicable elsewhere, and it also removes spurious errors that
466 may arise with on-the-fly processing of instantiations that
467 contain Inline_Always subprograms.
469 2017-09-08 Vincent Celier <celier@adacore.com>
471 * gnatcmd.adb: Disregard empty argument of GNAT driver.
473 2017-09-08 Justin Squirek <squirek@adacore.com>
475 * checks.adb (Insert_Valid_Check): Manually decorate
476 the generated temporary for range valdity checks.
478 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
480 * usage.adb (Usage): Document new -gnatw.q/-gnatw.Q switches.
482 2017-09-08 Justin Squirek <squirek@adacore.com>
484 * switch-c.adb (Scan_Front_End_Switches): Add new warning switch
485 case to handle underscore flags.
486 * warnsw.adb, warnsw.ads (Set_Underscore_Warning_Switch): Create
487 new procedure to handle underscores.
489 2017-09-08 Javier Miranda <miranda@adacore.com>
491 * exp_ch4.adb (Expand_N_Op_Divide): Reordering code that handles
492 divisions with fixed point results to avoid generating twice
493 the runtime check on divide by zero.
494 * checks.adb (Apply_Divide_Checks): Ensure that operands are
495 not evaluated twice (once for their runtime checks and once for
496 their regular computation).
498 2017-09-08 Yannick Moy <moy@adacore.com>
500 * sem_prag.adb (Analyze_Part_Of): Add missing
501 return statements after issuing errors. Add detection of
502 out-of-order item and single concurrent type.
504 2017-09-08 Nicolas Roche <roche@adacore.com>
506 * gcc-interface/Makefile.in, a-extiti.ads, s-taprop-linux.adb,
507 s-osinte-solaris.adb, a-intnam.ads, s-osinte-solaris.ads,
508 s-tpobop.adb, s-intman-android.adb, s-tasinf.adb, s-tpobop.ads,
509 s-tasinf.ads, i-vxinco.adb, a-exetim-posix.adb, i-vxinco.ads,
510 a-astaco.adb, a-astaco.ads, s-tporft.adb, s-tpoaal.adb, a-taside.adb,
511 a-taside.ads, s-tpopsp-posix.adb, s-tasdeb.adb, s-tasdeb.ads,
512 s-tpoben.adb, a-dinopr.ads, s-inmaop-vxworks.adb, s-tpoben.ads,
513 s-interr-vxworks.adb, s-interr-dummy.adb, s-tassta.adb,
514 a-intnam-mingw.ads, s-tassta.ads, s-taasde.adb, a-stcoed.ads,
515 s-taasde.ads, s-osinte-darwin.adb, s-proinf.adb, s-taprop-dummy.adb,
516 s-osinte-darwin.ads, s-proinf.ads, s-linux.ads, a-intnam-linux.ads,
517 s-tasren.adb, s-tasren.ads, s-mudido.adb, g-semaph.adb, s-mudido.ads,
518 s-taprop-posix.adb, g-semaph.ads, s-osinte-mingw.ads, s-vxwork-x86.ads,
519 s-tposen.adb, s-linux-sparc.ads, s-taprop-vxworks.adb, s-tasini.adb,
520 s-tposen.ads, s-tasini.ads, a-etgrbu.ads, s-interr-hwint.adb,
521 s-osinte-linux.ads, s-taprop.ads, s-tasque.adb, s-tasque.ads,
522 s-taenca.adb, s-taspri-vxworks.ads, s-taenca.ads, a-dynpri.adb,
523 s-tpopsp-solaris.adb, a-dynpri.ads, s-taprop-hpux-dce.adb,
524 a-interr.adb, a-intnam-freebsd.ads, s-tarest.adb, a-interr.ads,
525 s-intman-susv3.adb, a-synbar.adb, a-intnam-dummy.ads, s-tadeca.adb,
526 s-osinte-vxworks.adb, s-tarest.ads, s-taskin.adb, a-synbar.ads,
527 s-taspri-hpux-dce.ads, s-tadeca.ads, s-osinte-vxworks.ads,
528 s-taskin.ads, s-intman-solaris.adb, a-sytaco.adb, s-vxwext-kernel.adb,
529 s-mudido-affinity.adb, a-sytaco.ads, s-vxwext-kernel.ads, s-taprob.adb,
530 s-intman-mingw.adb, s-taprob.ads, s-osinte-kfreebsd-gnu.ads,
531 s-osinte-dummy.ads, s-osinte-gnu.adb, s-osinte-rtems.adb, s-interr.adb,
532 s-inmaop.ads, s-vxwext-rtp.adb, s-osinte-gnu.ads, s-osinte-rtems.ads,
533 a-synbar-posix.adb, s-interr.ads, s-taspri-posix-noaltstack.ads,
534 s-vxwext-rtp.ads, a-synbar-posix.ads, a-extiin.ads, s-osinte-posix.adb,
535 s-tpinop.adb, s-tasres.ads, s-tpinop.ads, a-disedf.ads, a-diroro.ads,
536 s-linux-alpha.ads, a-tasatt.adb, s-solita.adb, a-intnam-solaris.ads,
537 a-tasatt.ads, s-solita.ads, s-tasinf-solaris.adb, s-tasinf-solaris.ads,
538 s-vxwork-arm.ads, s-tpopsp-posix-foreign.adb, s-intman-dummy.adb,
539 s-intman.ads, s-stusta.adb, s-stusta.ads, s-intman-posix.adb,
540 s-tpopsp-vxworks.adb, s-inmaop-dummy.adb, s-taspri-mingw.ads,
541 a-intnam-darwin.ads, s-osinte-aix.adb, s-osinte-dragonfly.adb,
542 s-osinte-aix.ads, s-tasinf-mingw.adb, s-osinte-dragonfly.ads,
543 s-linux-hppa.ads, s-osinte-x32.adb, s-inmaop-posix.adb,
544 s-tasinf-mingw.ads, s-intman-vxworks.adb, s-linux-mips.ads,
545 s-intman-vxworks.ads, s-osinte-android.adb, s-tasinf-linux.adb,
546 s-osinte-android.ads, s-vxwork-ppc.ads, s-tasinf-linux.ads,
547 a-dispat.adb, a-dispat.ads, s-tadert.adb, g-thread.adb, s-tadert.ads,
548 g-thread.ads, a-intnam-hpux.ads, s-linux-android.ads, s-tataat.adb,
549 a-exetim.ads, s-tataat.ads, a-reatim.adb, a-reatim.ads, thread.c,
550 g-boubuf.adb, s-osinte-freebsd.adb, g-boubuf.ads, s-osinte-freebsd.ads,
551 s-tasuti.adb, s-taspri-dummy.ads, a-exetim-mingw.adb, s-linux-x32.ads,
552 s-tasuti.ads, g-signal.adb, a-exetim-mingw.ads, s-interr-sigaction.adb,
553 g-signal.ads, s-osinte-hpux.ads, a-intnam-vxworks.ads,
554 s-osinte-hpux-dce.adb, s-taspri-posix.ads, s-osinte-hpux-dce.ads,
555 s-tasinf-vxworks.ads, g-tastus.ads, s-tpopsp-tls.adb,
556 s-taprop-solaris.adb, a-retide.adb, a-exetim-darwin.adb, a-retide.ads,
557 s-vxwext.adb, s-vxwext.ads, a-rttiev.adb, a-rttiev.ads, g-boumai.ads,
558 a-exetim-default.ads, s-taprop-mingw.adb, s-taspri-solaris.ads,
559 a-intnam-aix.ads: Move libgnarl sources to libgnarl subdir.
561 2017-09-08 Arnaud Charlet <charlet@adacore.com>
563 * doc/share/conf.py, doc/share/latex_elements.py,
564 doc/share/ada_pygments.py, doc/Makefile: Improve support for Ada
567 2017-09-08 Arnaud Charlet <charlet@adacore.com>
569 * gnat_rm.texi, gnat_ugn.texi,
570 doc/gnat_ugn/the_gnat_compilation_model.rst,
571 doc/gnat_ugn/getting_started_with_gnat.rst,
572 doc/gnat_ugn/inline_assembler.rst,
573 doc/gnat_ugn/building_executable_programs_with_gnat.rst,
574 doc/gnat_ugn/elaboration_order_handling_in_gnat.rst,
575 doc/gnat_ugn/about_this_guide.rst,
576 doc/gnat_ugn/platform_specific_information.rst,
577 doc/gnat_ugn/example_of_binder_output.rst,
578 doc/gnat_ugn/gnat_and_program_execution.rst,
579 doc/gnat_ugn/gnat_utility_programs.rst,
580 doc/gnat_rm/implementation_of_specific_ada_features.rst,
581 doc/gnat_rm/interfacing_to_other_languages.rst,
582 doc/gnat_rm/implementation_defined_aspects.rst,
583 doc/gnat_rm/intrinsic_subprograms.rst,
584 doc/gnat_rm/implementation_defined_characteristics.rst,
585 doc/gnat_rm/implementation_advice.rst,
586 doc/gnat_rm/implementation_defined_attributes.rst,
587 doc/gnat_rm/compatibility_and_porting_guide.rst,
588 doc/gnat_rm/standard_library_routines.rst,
589 doc/gnat_rm/the_gnat_library.rst,
590 doc/gnat_rm/implementation_defined_pragmas.rst,
591 doc/gnat_rm/representation_clauses_and_pragmas.rst,
592 doc/gnat_rm/standard_and_implementation_defined_restrictions.rst,
593 doc/gnat_rm/obsolescent_features.rst,
594 doc/gnat_rm/about_this_guide.rst,
595 doc/gnat_rm/the_implementation_of_standard_i_o.rst,
596 doc/gnat_rm/implementation_of_ada_2012_features.rst,
598 doc/gnat_rm.rst: Update documentation.
600 2017-09-08 Arnaud Charlet <charlet@adacore.com>
602 * s-dwalin.ads, s-dwalin.adb, s-trasym-dwarf.adb, s-objrea.ads,
603 s-objrea.adb, s-tsmona-linux.adb, s-tsmona-mingw.adb: New.
604 * gcc-interface/Makefile.in: Enable s-trasym-dwarf.adb on x86*linux.
606 2017-09-08 Bob Duff <duff@adacore.com>
608 * s-ststop.ads, s-ststop.adb, rtsfind.ads (String_Input_Tag):
609 New routine to read the Tag robustly.
610 * exp_attr.adb (Input): Change the expansion of 'Input,
611 in the class-wide case, to call String_Input_Tag instead of
614 2017-09-08 Arnaud Charlet <charlet@adacore.com>
616 * s-rident.ads (Restriction_Id): reorder enum
617 literals, so that Pure_Barriers is no longer in range of the
618 Cunit_Boolean_Restrictions subtype.
620 2017-09-08 Nicolas Roche <roche@adacore.com>
622 * a-taster.ads, a-taster.adb: Move to libgnarl
623 * gcc-interface/Makefile.in: Remove obsolete targets. Code cleanups.
624 Add support for files in libgnarl.
626 2017-09-08 Ed Schonberg <schonberg@adacore.com>
628 * exp_ch4.adb (Expand_N_Type_Conversion): Do not apply
629 accessibility check to an interface conversion, whose purpose
630 is to perform a pointer adjustment in a dispatching call.
631 * exp_ch6.adb (Expand_Call_JHelper): Add accessibility checks
632 when the actual is a construct that involves a dereference of an
633 expression that includes a formal of the enclosing subprogram,
634 In such cases, the accessibility level of the actual is that of
635 the corresponding formal, which is passed in as an additional
636 actual in the outer call.
638 2017-09-08 Bob Duff <duff@adacore.com>
640 * exp_intr.adb (Add_Source_Info): Do not decode
641 file names; they were not encoded in the first place.
643 2017-09-08 Bob Duff <duff@adacore.com>
645 * a-tags.adb (Internal_Tag): Unsuppress checks, so we get
646 exceptions instead of crashes. Check for absurdly long strings
647 and empty strings. Empty strings cause trouble because they can
648 have super-null ranges (e.g. 100..10), which causes Ext_Copy to
649 be empty, which causes an array index out of bounds.
650 * s-ststop.adb (Input): Unsuppress checks, so we get exceptions
653 2017-09-08 Arnaud Charlet <charlet@adacore.com>
655 * sem_util.adb (Is_CCT_Instance): allow use in
656 the context of protected types.
658 2017-09-08 Arnaud Charlet <charlet@adacore.com>
660 * a-tigeli.adb: minor remove extra whitespace.
662 2017-09-08 Gary Dismukes <dismukes@adacore.com>
664 * par-ch4.adb: Reformatting of an error message.
666 2017-09-08 Javier Miranda <miranda@adacore.com>
668 * sem_ch3.adb (Resolve_Name): Under ASIS mode analyze overloaded
669 identifiers to ensure their correct decoration of names on
672 2017-09-08 Yannick Moy <moy@adacore.com>
674 * exp_attr.adb (Expand_Loop_Entry_Attribute): Do
675 not skip a loop coming from source which is rewritten into a loop.
677 2017-09-08 Ed Schonberg <schonberg@adacore.com>
679 * freeze.adb (Wrap_Imported_Subprogram): Indicate that the
680 wrapper has convention Ada, to prevent spurious warnings on
681 unconstrained array parameters.
683 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
685 * sem_prag.adb (Check_Variant): Use First_Non_Pragma/Next_Non_Pragma.
686 (Analyze_Pragma) <Pragma_Unchecked_Union>: Likewise.
688 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
690 * sem_ch6.adb (Freeze_Expr_Types): Rename Spec_Id into Def_Id.
692 2017-09-08 Arnaud Charlet <charlet@adacore.com>
694 * exp_intr.adb (Append_Entity_Name): Move to ...
695 * sem_util.ads, sem_util.adb: ... here to share it.
696 (Subprogram_Name): New subprogram, to compute the name of the enclosing
698 * errutil.adb (Error_Msg): Fill new field Node.
699 * erroutc.ads (Subprogram_Name_Ptr): New.
700 (Error_Msg_Object): New field Node.
701 * erroutc.adb (dmsg, Output_Msg_Text): Take new field Node into account.
702 * errout.adb (Error_Msg): New variant with node id parameter.
703 Fill new parameter Node when emitting messages. Revert previous
704 changes for Include_Subprogram_In_Messages.
705 * sem_ch5.adb (Check_Unreachable_Code): Supply Node parameter when
706 generating warning message.
708 2017-09-08 Ed Schonberg <schonberg@adacore.com>
710 * par-ch4.adb (P_Iterated_Component_Association): Place construct
711 under -gnat2020 flag, given that it is a future feature of
713 * sem_aggr.adb (Resolve_Iterated_Component_Association): Mark
714 defining identifier as referenced to prevent spurious warnings:
715 corresponding loop is expanded into one or more loops whose
716 variable has the same name, and the expression uses those names
717 and not the original one.
719 2017-09-08 Hristian Kirtchev <kirtchev@adacore.com>
721 * sem_elab.adb (Check_A_Call): Do not consider
722 references to internal variables for SPARK semantics.
724 2017-09-08 Arnaud Charlet <charlet@adacore.com>
726 * inline.adb (In_Package_Spec): refine type of
727 the parameter from Node_Id to Entity_Id.
729 2017-09-08 Justin Squirek <squirek@adacore.com>
731 * exp_ch5.adb (Expand_Formal_Container_Loop):
732 Reset the scope of the loop parameter after it is reanalyzed.
734 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
736 * sem_util.ads (Set_Rep_Info): New inline procedure.
737 * sem_util.adb (Set_Rep_Info): Implement it.
738 * sem_ch3.adb (Process_Subtype): If the case of a constraint present,
739 always copy the representation aspects onto the subtype.
741 2017-09-08 Georges-Alex Jaloyan <jaloyan@adacore.com>
743 * g-dynhta.adb, g-dynhta.ads (Get_First_Key, Get_Next_key):
744 Correction of the return type from access type to option type.
745 (Simple_HTable): Moving the Instance_Data to ads file.
747 2017-09-08 Yannick Moy <moy@adacore.com>
749 * sem_prag.adb: Use System.Case_Util.To_Lower to simplify code.
751 2017-09-08 Arnaud Charlet <charlet@adacore.com>
753 * opt.ads (Include_Subprogram_In_Messages): New variable.
754 * errout.ads (Current_Subprogram_Ptr): New variable.
755 * errout.adb (Error_Msg): Prepend current subprogram info
756 in messages if Include_Subprogram_In_Messages is set.
757 * sem_util.adb (elab code): Initialize Current_Subprogram_Ptr to
759 * gnat1drv.adb (Adjust_Global_Switches): Set
760 Include_Subprogram_In_Messages when -gnatdJ is set.
761 * debug.adb: Document and reserve -gnatdJ.
763 2017-09-08 Georges-Axel Jaloyan <jaloyan@adacore.com>
765 * g-dynhta.adb, g-dynhta.ads (Get_First_Key, Get_Next_Key): New
766 functions to iterate over simple hastables.
767 (Load_Factor_HTable): Remove obsolete and inefficient implementation.
769 2017-09-08 Javier Miranda <miranda@adacore.com>
771 * exp_ch6.adb (Unqual_BIP_Function_Call): Adding
772 missing checks on the presence of Entity() before checking the
775 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
777 * sem_ch6.adb (Analyze_Expression_Function): Reorder some
778 statements, use local variable and remove unnecessary processing.
780 2017-09-08 Javier Miranda <miranda@adacore.com>
782 * exp_ch6.ads (Make_Build_In_Place_Iface_Call_In_Allocator): New
784 (Make_Build_In_Place_Iface_Call_In_Anonymous_Context): New subprogram.
785 (Make_Build_In_Place_Iface_Call_In_Object_Declaration): New
787 (Unqual_BIP_Iface_Function_Call): New subprogram.
788 * exp_ch6.adb (Replace_Renaming_Declaration_Id): New
789 subprogram containing code that was previously inside
790 Make_Build_In_Place_Call_In_Object_Declaration since it is also
791 required for one of the new subprograms.
793 Invoke Make_Build_In_Place_Iface_Call_In_Anonymous_Context
794 (Expand_N_Extended_Return_Statement): Extend the
795 cases covered by an assertion on expected BIP object
797 (Make_Build_In_Place_Call_In_Assignment):
798 Removing unused code; found working on this ticket.
799 (Make_Build_In_Place_Call_In_Object_Declaration): Move the code
800 that replaces the internal name of the renaming declaration
801 into the new subprogram Replace_Renaming_Declaration_Id.
802 (Make_Build_In_Place_Iface_Call_In_Allocator): New subprogram.
803 (Make_Build_In_Place_Iface_Call_In_Anonymous_Context):
805 (Make_Build_In_Place_Iface_Call_In_Object_Declaration): New
807 (Unqual_BIP_Iface_Function_Call): New subprogram.
808 * exp_ch3.adb (Expand_N_Object_Declaration): Invoke the new
809 subprogram Make_Build_In_Place_Iface_Call_In_Object_Declaration.
810 * exp_attr.adb (Expand_N_Attribute_Reference): Invoke the new
811 subprogram Make_Build_In_Place_Iface_Call_In_Anonymous_Context.
812 * exp_ch4.adb (Expand_Allocator_Expression): Invoke the new
813 subprogram Make_Build_In_Place_Iface_Call_In_Allocator.
814 (Expand_N_Indexed_Component): Invoke the new subprogram
815 Make_Build_In_Place_Iface_Call_In_Anonymous_Context.
816 (Expand_N_Selected_Component): Invoke the new subprogram
817 Make_Build_In_Place_Iface_Call_In_Anonymous_Context.
818 (Expand_N_Slice): Invoke the new subprogram
819 Make_Build_In_Place_Iface_Call_In_Anonymous_Context.
820 * exp_ch8.adb (Expand_N_Object_Renaming_Declaration):
821 Invoke the new subprogram
822 Make_Build_In_Place_Iface_Call_In_Anonymous_Context.
824 2017-09-08 Javier Miranda <miranda@adacore.com>
826 * exp_disp.adb (Expand_Interface_Conversion): Fix handling of
827 access to interface types. Remove also the accessibility check.
829 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
831 * sem_ch6.adb (Freeze_Expr_Types): Really freeze
832 all the types that are referenced by the expression.
833 (Analyze_Expression_Function): Call Freeze_Expr_Types for
834 a completion instead of manually freezing the type of the
836 (Analyze_Subprogram_Body_Helper): Do not call Freeze_Expr_Types here.
838 2017-09-08 Ed Schonberg <schonberg@adacore.com>
840 * exp_prag.adb (Replace_Discriminals_Of_Protected_Op):
841 New procedure, auxiliary to Expand_Pragma_Check, to handle
842 references to the discriminants of a protected type within a
843 precondition of a protected operation. This is needed because
844 the original precondition has been analyzed in the context of
845 the protected declaration, but in the body of the operation
846 references to the discriminants have been replaved by references
847 to the discriminants of the target object, and these references
848 are only created when expanding the protected body.
850 2017-09-08 Yannick Moy <moy@adacore.com>
852 * sem_prag.adb (Analyze_Pragma): Issue more precise error messages on
855 2017-09-08 Ed Schonberg <schonberg@adacore.com>
857 * exp_attr.adb (Build_Record_VS_Func): If the record is an
858 unchecked union, do not emit checks for its (non-existent)
859 discriminants, or for variant parts that depend on them.
861 2017-09-08 Justin Squirek <squirek@adacore.com>
863 * sem_ch4.adb (Find_Equality_Types.Try_One_Interp,
864 Find_Comparison_Type.Try_One_Interp): Add check for generic
867 2017-09-08 Arnaud Charlet <charlet@adacore.com>
869 * sem_ch3.adb, layout.adb, layout.ads, exp_attr.adb, debug.adb,
870 exp_pakd.adb, sem_prag.adb, gnat1drv.adb, targparm.adb, targparm.ads,
871 repinfo.adb, exp_ch6.adb, exp_aggr.adb, sem_eval.adb, sem_ch13.adb,
872 exp_ch3.adb: Remove references to Frontend_Layout_On_Target and
873 remaining references to AAMP_On_Target.
875 2017-09-08 Ed Schonberg <schonberg@adacore.com>
877 * style.adb: Fix typo.
879 2017-09-08 Javier Miranda <miranda@adacore.com>
881 * einfo.adb (Underlying_Type): Add missing support for class-wide
882 types that come from the limited view.
883 * exp_attr.adb (Attribute_Address): Check class-wide type
884 interfaces using the underlying type to handle limited-withed
886 (Attribute_Tag): Check class-wide type interfaces using
887 the underlying type to handle limited-withed types.
889 2017-09-08 Ed Schonberg <schonberg@adacore.com>
891 * exp_ch5.adb (Expand_Predicated_Loop): Handle properly a loop
892 over a subtype of a type with a static predicate, taking into
893 account the predicate function of the parent type and the bounds
894 given in the loop specification.
895 * sem_ch3.adb (Inherit_Predicate_Flags): For qn Itype created for
896 a loop specification that is a subtype indication whose type mark
897 is a type with a static predicate, inherit predicate function,
898 used to build case statement for rewritten loop.
900 2017-09-08 Justin Squirek <squirek@adacore.com>
902 * lib-load.adb: Modify printing of error message to exclude file
905 2017-09-08 Arnaud Charlet <charlet@adacore.com>
907 * inline.adb (Can_Be_Inlined_In_GNATprove_Mode):
908 don't inline subprograms declared in both visible and private
910 (In_Package_Spec): previously In_Package_Visible_Spec; now
911 detects subprograms declared both in visible and private parts
914 2017-09-08 Ed Schonberg <schonberg@adacore.com>
916 * exp_util.adb (Build_Invariant_Procedure_Declaration): If
917 the type is an anonymous array in an object declaration, whose
918 component type has an invariant, use the object declaration
919 as the insertion point for the invariant procedure, given that
920 there is no explicit type declaration for an anonymous array type.
922 2017-09-08 Bob Duff <duff@adacore.com>
924 * a-cbprqu.ads, a-cbdlli.adb: Suppress warnings.
926 2017-09-08 Bob Duff <duff@adacore.com>
928 * a-strfix.adb (Trim): Compute Low and High only if needed.
930 2017-09-08 Justin Squirek <squirek@adacore.com>
932 * lib-load.adb (Load_Main_Source): Add error output in the case a
933 source file is missing.
935 2017-09-08 Bob Duff <duff@adacore.com>
938 * a-textio.adb, a-witeio.adb, a-ztexio.adb (Set_WCEM): Use
939 Default_WCEM by default (i.e. if the encoding is not specified
942 2017-09-08 Bob Duff <duff@adacore.com>
944 * s-trasym.ads (Hexa_Traceback): If
945 Suppress_Hex is True, print "..." instead of a hexadecimal
947 * s-trasym.adb: Ignore No_Hex in this version.
950 2017-09-08 Bob Duff <duff@adacore.com>
952 * debug.adb: Minor reformatting.
954 2017-09-08 Bob Duff <duff@adacore.com>
956 * a-cbdlli.adb, a-cohama.adb, a-cohase.adb (Copy): Rewrite the
957 code so it doesn't trigger an "uninit var" warning.
959 2017-09-08 Nicolas Roche <roche@adacore.com>
961 * s-hibaen.ads: Remove obsolete file.
963 2017-09-08 Arnaud Charlet <charlet@adacore.com>
965 * a-locale.ads: Add comment explaining the state of this package.
967 2017-09-08 Arnaud Charlet <charlet@adacore.com>
969 * sem_util.adb (Is_CCT_Instance): Allow calls in the context
971 * sem_prag.ads, sem_prag.adb (Find_Related_Declaration_Or_Body):
972 allow calls in the context of package spec (for pragma
973 Initializes) and bodies (for pragma Refined_State).
975 2017-09-08 Bob Duff <duff@adacore.com>
977 * checks.adb (Insert_Valid_Check): Copy the Do_Range_Check flag to the
980 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
982 * debug.adb (dA): Adjust comment.
983 * gnat1drv.adb (Gnat1drv): Likewise.
984 * opt.ads (List_Representation_Info_Extended): New variable.
985 * repinfo.adb (List_Record_Info): Split implementation into...
986 (Compute_Max_Length): ...this. Recurse on records if requested.
987 (List_Record_Layout): Likewise.
988 * switch-c.adb (Scan_Front_End_Switches) <'R'>: Use case
989 statement, accept '0' and set List_Representation_Info_Extended
991 * usage.adb (Usage): Document new -gnatRe variant.
993 2017-09-08 Ed Schonberg <schonberg@adacore.com>
995 * sem_prag.adb (Analyze_Pragma, case Default_Storage_Pool):
996 Do not save the given entity in the global variable Default_Pool
997 if the pragma appears within a generic unit.
999 2017-09-08 Bob Duff <duff@adacore.com>
1001 * errout.adb (Delete_Warning): Do not
1002 decrement Warnings_Treated_As_Errors. This is called before
1003 Warnings_Treated_As_Errors has been incremented to account for
1004 this warning. Decrementing it here can lead to negative values
1005 of Warnings_Treated_As_Errors, raising Constraint_Error in
1006 checks-on builds, and causing the compiler to return an error
1007 code in checks-off builds.
1009 2017-09-08 Arnaud Charlet <charlet@adacore.com>
1011 * sem_util.ads, sem_util.adb (Is_CCT_Instance): Only expect
1012 entities of named concurrent types as Ref_Id and not of anonymous
1013 concurrent objects (because callers already know when a conversion
1014 is necessary and can easily do it); also, do not expect protected
1015 types or protected objects as Context_Id (because no flow-related
1016 SPARK pragmas are attached there); reflect these changes in a
1017 more precise comment.
1019 2017-09-08 Olivier Hainque <hainque@adacore.com>
1021 * g-altive.ads: Add documentation.
1023 2017-09-08 Bob Duff <duff@adacore.com>
1025 * sem_util.ads, debug.adb: Minor comment fix.
1026 * erroutc.ads: Comment fix.
1028 2017-09-08 Ed Schonberg <schonberg@adacore.com>
1030 * sem_ch12.adb (Validate_Array_Type_Instance): Suppress check
1031 for compatibility of component types of formal and actual in an
1032 instantiation of a child unit, when the component type of the
1033 formal is itself a formal of an enclosing generic.
1035 2017-09-08 Arnaud Charlet <charlet@adacore.com>
1037 * sem_util.ads, sem_util.adb (Is_CCT_Instance): moved from
1038 sem_prag.adb to make it available for GNATprove; for concurrent
1039 types replace custom scope climbing with Scope_Same_Or_Within; for
1040 single concurrent objects add scope climbing (with Scope_Within),
1041 which was not there (that's the primary semantic change of this
1042 commit); also, when comparing a single concurrent object with
1043 its corresponding concurrent type rely on equality of types,
1044 not of objects (because that's simpler to code).
1045 * sem_prag.adb (Is_CCT_Instance): lifted to sem_util.ads.
1046 (Analyze_Global_Item): adjust special-casing of references to the
1047 current instance of a concurrent unit in the Global contracts
1048 of task types and single tasks objects; similar for references
1049 in the protected operations and entries of protected types and
1050 single protected objects (in all these cases the current instance
1051 behaves as an implicit parameter and must not be mentioned in
1052 the Global contract).
1054 2017-09-08 Arnaud Charlet <charlet@adacore.com>
1056 * exp_ch6.adb (Expand_Call_Helper): Introduce temporary for
1057 function calls returning a record within a subprogram call,
1060 2017-09-08 Ed Schonberg <schonberg@adacore.com>
1062 * sem_ch8.adb (Find_Expanded_Name): Handle properly an expanded
1063 name that designates the current instance of a child unit in its
1064 own body and appears as the prefix of a reference to an entity
1065 local to the child unit.
1066 * exp_ch6.adb, freeze.adb, sem_ch3.adb, sem_prag.adb, sem_util.adb:
1069 2017-09-08 Yannick Moy <moy@adacore.com>
1071 * sem_res.adb (Resolve_Equality_Op): Do not warn on comparisons that
1074 2017-09-08 Tristan Gingold <gingold@adacore.com>
1076 * sem_warn.adb (Check_Unused_Withs): Remove test that disabled
1077 warnings on internal units in configurable run time mode.
1079 2017-09-08 Bob Duff <duff@adacore.com>
1081 * sem_ch3.adb (Build_Derived_Private_Type): Inherit
1082 representation items from interfaces that the derived type
1083 implements, not just from the parent type.
1084 * sem_util.ads, sem_util.adb (Abstract_Interface_List): Change
1085 this to return an empty list when there are no interfaces.
1086 * einfo.ads, sem_ch13.adb: Minor comment fixes.
1087 * sem_attr.adb: Minor comment fix.
1089 2017-09-08 Doug Rupp <rupp@adacore.com>
1091 * sigtramp-vxworks.c [i386]: Adjust the kernel context for
1094 2017-09-08 Hristian Kirtchev <kirtchev@adacore.com>
1096 * exp_ch4.adb (Expand_N_Allocator): Generate a
1097 call to Allocate_Any_Controlled when the allocation does not
1098 require any initialization.
1100 2017-09-08 Hristian Kirtchev <kirtchev@adacore.com>
1102 * sem_util.adb (Copy_Node_With_Replacement):
1103 Update the Renamed_Object field of a replicated object renaming
1106 2017-09-08 Patrick Bernardi <bernardi@adacore.com>
1108 * exp_ch9.adb (Is_Pure_Barrier): Allow type
1109 conversions and components of objects. Simplified the detection
1110 of the Count attribute by identifying the corresponding run-time
1113 2017-09-08 Yannick Moy <moy@adacore.com>
1115 * exp_ch9.adb, exp_disp.adb, repinfo.adb, sem_ch12.adb, sem_dim.adb,
1116 sem_type.adb, sinfo.ads: Minor reformatting.
1118 2017-09-08 Ed Schonberg <schonberg@adacore.com>
1120 * freeze.adb (Has_Incomplete_Compoent): New predicate, subsidiary
1121 of Freeze_Profile, used to inhibit the freezing of the profile
1122 of an expression function declared within a nested package, when
1123 some type in the profile depends on a private type declared in
1124 an enclosing package.
1126 2017-09-08 Bob Duff <duff@adacore.com>
1128 * gnat1drv.adb (Gnat1drv): Do not set the Force_ALI_Tree_File flag in
1129 the subunit case. It's still OK to set it in the "missing subunits"
1130 case, because that won't cause the obsolete .ali files that cause
1133 2017-09-08 Bob Duff <duff@adacore.com>
1135 * sinput-l.adb: Remove unused "with Unchecked_Conversion;". It's
1136 unclear why this didn't cause a warning.
1137 * a-uncdea.ads, a-unccon.ads: Add "Ada." to names in the
1138 pragmas. It's unclear why this didn't cause an error.
1140 2017-09-08 Hristian Kirtchev <kirtchev@adacore.com>
1142 * exp_spark.adb (Expand_SPARK_N_Object_Renaming_Declaration):
1144 (Expand_SPARK_Potential_Renaming): Code clean up.
1145 * sem_prag.adb (Analyze_Initialization_Item): Add a guard in case
1146 the item does not have a proper entity.
1147 (Analyze_Input_Item): Add a guard in case the item does not have a
1149 (Collect_States_And_Objects): Include object renamings in the
1150 items being collected.
1151 (Resolve_State): Update the documentation of this routine.
1152 * sem_util.adb (Entity_Of): Add circuitry to handle
1153 renamings of function results.
1154 (Remove_Entity): New routine.
1155 (Remove_Overloaded_Entity): Take advantage of factorization.
1156 * sem_util.ads (Entity_Of): Update the documentation
1158 (Remove_Entity): New routine.
1159 (Remove_Overloaded_Entity): Update the documentation of this
1162 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
1164 * repinfo.adb (List_Record_Info): During first loop,
1165 do not override the normalized position and first bit
1166 if they have already been set. Move fallback code
1167 for the packed case to the case where it belongs.
1168 * sem_ch13.adb (Adjust_Record_For_Reverse_Bit_Order):
1169 Also adjust the normalized position of components.
1170 (Adjust_Record_For_Reverse_Bit_Order_Ada_95): Likewise.
1172 2017-09-08 Ed Schonberg <schonberg@adacore.com>
1174 * exp_disp.adb (Make_DT, Set_All_DT_Position): Handle properly
1175 the placement of a primitive operation O that renames an operation
1176 R declared in an inner package, and which is thus not a primitive
1177 of the dispatching type of O. In this case O is a new primitive
1178 and does not inherit its dispatch table position from R (which
1181 2017-09-08 Ed Schonberg <schonberg@adacore.com>
1183 * sem_dim.adb (Analyze_Dimension_If_Expression,
1184 Analyze_Dimension_Case_Expression): new subprograms to verify
1185 the dimensional correctness of Ada2012 conditional expressions,
1186 and set properly the dimensions of the construct.
1187 * sem_res.adb (Resolve_If_Expression, Resolve_Case_Expression)):
1188 call Analyze_Dimension.
1190 2017-09-08 Ed Schonberg <schonberg@adacore.com>
1192 * sem_type.adb (Expand_Interface_Conversion): Prevent an infinite
1193 loop on an interface declared as a private extension of another
1194 synchronized interface.
1196 2017-09-08 Ed Schonberg <schonberg@adacore.com>
1198 * sem_ch12.adb (Check_Generic_Parent): New procedure within
1199 Analyze_Associations, to handle actual packages that depend on
1200 previous instances. If a package IAP that is an instantiation is
1201 used as an actual in a subsequent instantiation SI in the same
1202 scope, and IAP has a body, IAP must be frozen before SI. If
1203 the generic parent of IAP is itself declared in a previous
1204 instantiation in the same scope, that instantiation must also
1205 be frozen before SI.
1206 (Install_Body): Prevent double insertion of freeze node for
1209 2017-09-08 Hristian Kirtchev <kirtchev@adacore.com>
1211 * sem_prag.adb (Resolve_State): Update the
1212 comment on documentation. Generate a reference to the state once
1213 resolution takes place.
1215 2017-09-08 Ed Schonberg <schonberg@adacore.com>
1217 * sem_ch13.adb (Analyze_Aspect_Specifications, case
1218 Linker_Section): If the aspect applies to an object declaration
1219 with explicit initialization, do not delay the freezing of the
1220 object, to prevent access-before-elaboration in the generated
1221 initialization code.
1223 2017-09-08 Ed Schonberg <schonberg@adacore.com>
1225 * a-wtdeio.adb (Put, all versions): Use Long_Long_Integer
1226 (Integer_Value (Item)) when the size of the fixed decimal type
1227 is larger than Integer.
1229 2017-09-07 Eric Botcazou <ebotcazou@adacore.com>
1232 * gcc-interface/decl.c (copy_and_substitute_in_layout): Put the fields
1233 in order of increasing position in more cases.
1235 2017-09-07 Yannick Moy <moy@adacore.com>
1237 * a-exetim-mingw.ads: Add contract Global=>null
1238 on all operations that are modeled as having no read or write
1239 of global variables in SPARK.
1241 2017-09-07 Raphael Amiard <amiard@adacore.com>
1243 * a-chtgop.adb, a-chtgop.ads (Generic_Iteration_With_Position): Added
1244 to Hmaps.Generic_Ops.
1245 * a-cohama.adb (Ada.Containers.Hmaps.Iterate): Pass proper position in
1247 * a-cihama.adb (Ada.Containers.Indefinite_Hmaps.Iterate): Pass pos in
1249 * a-cohase.adb (Ada.Containers.Hashed_Sets.Iterate): Pass proper
1250 position in cursors.
1252 2017-09-07 Javier Miranda <miranda@adacore.com>
1254 * sem_elab.adb (Check_Task_Activation): Adding switch -gnatd.y to
1255 allow disabling the generation of implicit pragma Elaborate_All
1258 2017-09-07 Javier Miranda <miranda@adacore.com>
1260 * exp_disp.adb (Make_Tags): Avoid suffix counter
1261 in the external name of the elaboration flag. Required to fix
1262 the regressions introduced by the initial version of this patch.
1264 2017-09-07 Bob Duff <duff@adacore.com>
1266 * sem_ch6.adb (Analyze_Function_Return): Do not
1267 insert an explicit conversion to force the displacement of the
1268 "this" pointer to reference the secondary dispatch table in the
1269 case where the return statement is returning a raise expression,
1270 as in "return raise ...".
1272 2017-09-07 Arnaud Charlet <charlet@adacore.com>
1274 * sem_disp.adb (Is_User_Defined_Equality): Removed procedure.
1275 * sem_util.ads, sem_util.adb (Is_User_Defined_Equality): Copied
1276 procedure from sem_disp.adb.
1277 * sem_ch12.ads (Get_Unit_Instantiation_Node): rename Package
1279 * sem_ch12.adb (Get_Unit_Instantiation_Node): function extended to
1280 return the instantiation node for subprograms. Update references
1281 to Get_Unit_Instantiation_Node.
1282 * sem_ch7.adb (Install_Parent_Private_Declarations): update
1283 reference to Get_Unit_Instantiation_Node.
1284 * exp_dist.adb (Build_Package_Stubs): update reference to
1285 Get_Unit_Instantiation_Node.
1286 * sem_ch9.adb: minor typo in comment.
1287 * lib-xref-spark_specific.adb
1288 (Traverse_Declaration_Or_Statement): traverse into task type
1291 2017-09-07 Ed Schonberg <schonberg@adacore.com>
1293 * sem_dim.adb (Analyze_Dimension_Type_Conversion): New procedure
1294 to handle properly various cases of type conversions where the
1295 target type and/or the expression carry dimension information.
1296 (Dimension_System_Root); If a subtype carries dimension
1297 information, obtain the source parent type that carries the
1300 2017-09-07 Dmitriy Anisimkov <anisimko@adacore.com>
1302 * g-socket.adb, g-socket.ads (GNAT.Sockets.To_Ada): New routine.
1304 2017-09-07 Ed Schonberg <schonberg@adacore.com>
1306 * exp_attr.adb (Expand_N_Attribute_Reference, case 'Constrained):
1307 If the prefix is a reference to an object, rewrite it as an
1308 explicit dereference, as required by 3.7.2 (2) and as is done
1309 with most other attributes whose prefix is an access value.
1311 2017-09-07 Bob Duff <duff@adacore.com>
1313 * par-ch13.adb: Set the Inside_Depends flag if we are inside a
1314 Refined_Depends aspect.
1315 * par-ch2.adb: Set the Inside_Depends flag if we are inside a
1316 Refined_Depends pragma.
1317 * scans.ads: Fix documentation of Inside_Depends flag.
1318 * styleg.adb, styleg.ads: Minor reformatting and comment fixes.
1320 2017-09-07 Hristian Kirtchev <kirtchev@adacore.com>
1322 * exp_ch7.adb (Insert_Actions_In_Scope_Around):
1323 Account for the case where the are no lists to insert, but the
1324 secondary stack still requires management.
1325 * a-chtgop.adb, a-cihama.adb, a-cohama.adb, a-cohase.adb, a-tags.adb,
1326 comperr.adb, einfo.adb, exp_aggr.adb, exp_ch3.adb, exp_disp.adb,
1327 lib-xref.adb, lib-xref-spark_specific.adb, sem_ch12.adb, sem_ch13.adb,
1328 sem_ch6.adb, sem_dim.adb, sem_dim.ads, sem_elab.adb, sem_prag.adb:
1331 2017-09-07 Vincent Celier <celier@adacore.com>
1333 * clean.adb: Do not get the target parameters before calling
1336 2017-09-07 Nicolas Roche <roche@adacore.com>
1338 * s-osinte-solaris-posix.ads: Removed.
1340 2017-09-07 Arnaud Charlet <charlet@adacore.com>
1342 * sem_prag.adb (Collect_States_And_Objects): Detect also instances of
1343 single concurrent objects.
1345 2017-09-07 Javier Miranda <miranda@adacore.com>
1347 * s-regexp.ads: Fix documentation of the globbing grammar.
1349 2017-09-07 Gary Dismukes <dismukes@adacore.com>
1351 * a-tags.ads, einfo.ads, exp_disp.ads: Minor reformatting.
1353 2017-09-07 Arnaud Charlet <charlet@adacore.com>
1355 * gnat1drv.adb (Gnat1drv): Enable pragma Ignore_Pragma (Global)
1356 in CodePeer mode, to support more legacy code automatically.
1358 2017-09-07 Ed Schonberg <schonberg@adacore.com>
1360 * exp_disp.adb (Replace_Formals): If thr formal is classwide,
1361 and thus not a controlling argument, preserve its type after
1362 rewriting because it may appear in an nested call with a classwide
1365 2017-09-07 Arnaud Charlet <charlet@adacore.com>
1367 * comperr.adb (Delete_SCIL_Files): Handle case of
1368 N_Package_Instantiation.
1370 2017-09-07 Ed Schonberg <schonberg@adacore.com>
1372 * sem_ch10.adb (Remove_Private_With_Clause): If a private with
1373 clause for a unit U appears in a context that includes a regular
1374 with_clause on U, rewrite the redundant private clause into a null
1375 statement, rather than removing it altogether from the context,
1376 so that ASIS tools can reconstruct the original source.
1378 2017-09-07 Ed Schonberg <schonberg@adacore.com>
1380 * sem_ch13.adb (Check_Aspect_At_Freeze_Point): The expression
1381 for aspect Small can be of any real type (not only a universal
1382 real literal) as long as it is a static constant.
1384 2017-09-07 Thomas Quinot <quinot@adacore.com>
1386 * par_sco.adb: Minor reformatting.
1388 2017-09-07 Arnaud Charlet <charlet@adacore.com>
1390 * s-parame-ae653.ads: Removed.
1392 2017-09-07 Nicolas Roche <roche@adacore.com>
1394 * s-traces-default.adb, s-trafor-default.adb, s-trafor-default.ads,
1395 s-traces.adb, s-traces.ads, s-tratas-default.adb, s-tfsetr-default.adb,
1396 s-tfsetr-vxworks.adb, s-tratas.adb, s-tratas.ads, s-tasuti.adb,
1397 s-parame-hpux.ads, s-tassta.adb, s-taasde.adb, s-tasren.adb,
1398 s-taprob.adb, a-caldel.adb, s-parame.ads, Makefile.rtl, s-tpobop.adb,
1399 s-taenca.adb, s-parame-vxworks.ads: Remove support for System.Traces.
1401 2017-09-07 Yannick Moy <moy@adacore.com>
1403 * a-ngelfu.ads Add preconditions to all functions
1404 listed in Ada RM A.5.1(19-33) as having constraints on inputs.
1406 2017-09-07 Arnaud Charlet <charlet@adacore.com>
1408 * lib-xref.adb (Generate_Reference): ignore
1409 references to entities which are Part_Of single concurrent
1412 2017-09-07 Eric Botcazou <ebotcazou@adacore.com>
1414 * sem_ch7.adb (Hide_Public_Entities): Add paragraph to main
1417 2017-09-07 Arnaud Charlet <charlet@adacore.com>
1419 * a-taside.adb (Activation_Is_Complete): Raise Program_Error if
1420 Null_Task_Id is passed.
1422 2017-09-07 Javier Miranda <miranda@adacore.com>
1424 * einfo.ads, einfo.adb (Access_Disp_Table_Elab_Flag): New
1425 attribute. Defined for record types and subtypes.
1426 * exp_ch3.ads (Init_Secondary_Tags): Adding new formal
1427 (Init_Tags_List) to facilitate generating separate code in the
1428 IP routine to initialize the object components and for completing
1429 the elaboration of dispatch tables.
1430 * exp_ch3.adb (Build_Init_Procedure): Improve the code
1431 generated in the IP routines by means of keeping separate
1432 the initialization of the object components from the
1433 initialization of its dispatch tables. (Init_Secondary_Tags):
1434 Adding new formal (Init_Tags_List) and adjusting calls to
1435 Ada.Tags.Set_Dynamic_Offset_To_Top since it has a new formal;
1436 adjusting also calls to Ada.Tags.Register_Interface_Offset
1437 because the type of one of its formals has been changed.
1438 * a-tags.ads, a-tags.adb (Register_Interface_Offset): Profile
1439 modified. Instead of receiving a pointer to an object this
1440 routine receives now a primary tag.
1441 (Set_Dyanic_Offset_To_Top): Profile modified. This routine receives an
1442 additional formal: the tag of the primary dispatch table.
1443 * exp_disp.ads (Elab_Flag_Needed): New subprogram.
1444 * exp_disp.adb (Elab_Flag_Needed): New subprogram.
1445 (Make_Tags): Adding the declaration of the elaboration flag (if needed).
1446 * exp_aggr.adb (Build_Record_Aggr_Code): Adding actual of new
1447 formal in calls to Init_Secondary_Tags.
1449 2017-09-07 Javier Miranda <miranda@adacore.com>
1451 * ghost.adb (Mark_And_Set_Ghost_Instantiation.Check_Ghost_Actuals): New
1453 * sem_prag.adb (Pragma_Ghost): Add missing support for ghost
1454 applied to generic subprograms.
1456 2017-09-07 Arnaud Charlet <charlet@adacore.com>
1458 * sem_util.adb (Check_Part_Of_Reference): rename Conc_Typ to Conc_Obj
1459 (because it refers to the anonymous concurrent object, not its type);
1460 fix condition for emitting error message about task/protected type,
1462 2017-09-07 Bob Duff <duff@adacore.com>
1464 * binde.adb (Debug_Flag_Old): If both -do and -dp
1465 are specified, behave as if just -do was specified, rather than
1468 2017-09-07 Nicolas Roche <roche@adacore.com>
1470 * system-vxworks-sparcv9.ads, s-vxwork-m68k.ads, s-vxwork-mips.ads,
1471 system-vxworks-m68k.ads, system-vxworks-mips.ads: Removed.
1473 2017-09-07 Arnaud Charlet <charlet@adacore.com>
1475 * sem_prag.adb (Find_Role): The Global_Seen flag
1476 is now consulted not only for abstract states and variables,
1477 but for all kinds of items.
1478 (Collect_Subprogram_Inputs_Outputs): Do not process formal
1479 generic parameters, because unlike ordinary formal parameters,
1480 generic formals only act as input/ outputs if they are explicitly
1481 mentioned in a Global contract.
1483 2017-09-07 Yannick Moy <moy@adacore.com>
1485 * ghost.adb (Check_Ghost_Context): Do not err on ghost code inside
1486 predicate procedure. Check predicate pragma/aspect with Ghost entity.
1487 * exp_ch6.adb, par-ch6.adb, sem_ch13.adb, sem_prag.adb; Minor
1490 2017-09-07 Ed Schonberg <schonberg@adacore.com>
1492 * sem_aggr.adb: Move New_Copy_Tree_And_Dimensions to sem_dim
1494 * sem_ch3.adb (Build_Derived_Record_Type):i Call
1495 Copy_Dimensions_Of_Components after creating the copy of the
1497 * sem_dim.ads, sem_dim.adb (Copy_Dimensions_Of_Components): For a
1498 derived recor type, copy the dikensions if any of each component
1499 of the parent record to the corresponding component declarations
1500 of the derived record. These expressions are used among other
1501 things as default values in aggregates with box associations.
1502 * a-dirval-mingw.adb, g-cgi.adb, gnatcmd.adb, lib-xref.adb,
1503 repinfo.adb, sem_attr.adb, sem_ch10.adb, sem_ch6.adb, sem_prag.adb:
1506 2017-09-07 Arnaud Charlet <charlet@adacore.com>
1508 * sem_util.adb: Remove extra space after THEN.
1510 2017-09-07 Eric Botcazou <ebotcazou@adacore.com>
1512 * sem_ch7.adb (Has_Referencer): For a subprogram renaming,
1513 also mark the renamed subprogram as referenced.
1515 2017-09-07 Ed Schonberg <schonberg@adacore.com>
1517 * par-ch6.adb (P_Subprogram): Improve error message on null
1518 procedure with misplaced aspect specification, which the parser
1519 first attempts to interpret as a malformed expression function.
1521 2017-09-07 Gary Dismukes <dismukes@adacore.com>
1523 * sem_attr.adb (Analyze_Attribute_Old_Result):
1524 Allow attributes Result and Old in the case of an expression
1527 2017-09-07 Justin Squirek <squirek@adacore.com>
1529 * sem_prag.adb (Process_Atomic_Independent_Shared_Volatile): Propagate
1530 Volatile to subcomponents.
1532 2017-09-07 Bob Duff <duff@adacore.com>
1534 * exp_ch7.adb (Find_Last_Init): Check for the
1535 case where a build-in-place function call has been replaced by a
1536 'Reference attribute reference.
1538 2017-09-07 Eric Botcazou <ebotcazou@adacore.com>
1540 * sem_ch7.adb (Has_Referencer): Recurse on Actions of freeze
1543 2017-09-07 Bob Duff <duff@adacore.com>
1545 * exp_ch6.adb (Make_Build_In_Place_Call_In_Object_Declaration,
1546 Make_Build_In_Place_Call_In_Anonymous_Context): Do not use the
1547 secondary stack for all functions that return limited tagged
1548 types -- just do it for dispatching calls. Misc cleanup.
1549 * sem_util.ads, sem_util.adb (Unqual_Conv): New function to
1550 remove qualifications and type conversions. Fix various bugs
1551 where only a single level of qualification or conversion was
1552 removed, so e.g. "T1'(T2'(X))" would incorrectly return "T2'(X)"
1554 * checks.adb, exp_util.ads, exp_util.adb, sem_res.adb: Misc related
1557 2017-09-07 Ed Schonberg <schonberg@adacore.com>
1559 * sem_ch6.adb (setr_Actual_Subtypes): Within a predicate function
1560 do not create actual subtypes that may generate further predicate
1562 * sem_ch13.adb (Build_Predicate_Functions): Indicate that entity
1563 of body is a predicate function as well.
1564 (Resolve_Aspect_Expressions, Resolve_Name): For a component
1565 association, only the expression needs resolution, not the name.
1566 (Resolve_Aspect_Expressions, case Predicates): Construct and
1567 analyze the predicate function declaration in the scope of the
1568 type, before making the type and its discriminants visible.
1570 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
1572 * gcc-interface/decl.c (warn_on_field_placement): Issue the warning
1573 only if the record type itself comes from source.
1575 2017-09-06 Gary Dismukes <dismukes@adacore.com>
1577 * sem_ch5.adb: Minor reformatting and a typo fix
1579 2017-09-06 Arnaud Charlet <charlet@adacore.com>
1581 * sinput-l.ads: minor remove extra period at the end of comment
1583 2017-09-06 Arnaud Charlet <charlet@adacore.com>
1585 * sem_prag.adb (Add_Item_To_Name_Buffer): remove support for
1587 (Find_Role): remove support for E_Discriminant.
1589 2017-09-06 Javier Miranda <miranda@adacore.com>
1591 * exp_ch6.adb (Expand_Simple_Function_Return):
1592 Add missing implicit type conversion to force displacement of the
1595 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
1597 * sem_ch3.adb, sem_aux.adb, sem_res.adb: Minor reformatting.
1599 2017-09-06 Yannick Moy <moy@adacore.com>
1601 * sem_ch12.adb (Analyze_Instance_And_Renamings): Refactor to set
1602 global variable Ignore_SPARK_Mode_Pragmas_In_Instance only once.
1604 2017-09-06 Bob Duff <duff@adacore.com>
1606 * sem_ch8.adb: Change Assert to be consistent with
1609 2017-09-06 Bob Duff <duff@adacore.com>
1611 * binde.adb (Find_Elab_Order): Do not run Elab_Old unless
1612 requested. Previously, the -do switch meant "run Elab_New and
1613 Elab_Old and use the order chosen by Elab_Old, possibly with
1614 debugging printouts comparing the two orders." Now it means
1615 "do not run Elab_New." This is of use if there are bugs that
1616 cause Elab_New to crash.
1617 (Elab_Position, Num_Chosen): Change type to Nat, to avoid various
1619 * ali.ads (Elab_Position): Change type to Nat, to avoid various
1622 2017-09-06 Arnaud Charlet <charlet@adacore.com>
1624 * sem_prag.adb (Check_Mode_Restriction_In_Enclosing_Context): Fix
1625 reference to SPARK RM.
1627 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
1629 * layout.adb: Use SSU short hand consistently throughout the file.
1631 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
1633 * freeze.adb (Freeze_Record_Type)
1634 <Sized_Component_Total_Round_RM_Size>: New local variable to
1635 accumulate the rounded RM_Size of components. Update it for
1636 every component whose RM_Size is statically known. Add missing
1637 guard to check that bit packing is really required before issuing
1638 the error about packing. Swap condition for clarity's sake.
1639 * sem_prag.adb (Usage_Error): Fix reference to SPARK RM in comment.
1641 2017-09-06 Fedor Rybin <frybin@adacore.com>
1643 * makeutl.adb, makeutl.ads, mlib.adb, mlib.ads, mlib-fil.adb,
1644 mlib-fil.ads, mlib-prj.adb, mlib-prj.ads, mlib-tgt.adb, mlib-tgt.ads,
1645 mlib-tgt-specific.adb, mlib-tgt-specific.ads,
1646 mlib-tgt-specific-aix.adb, mlib-tgt-specific-darwin.adb,
1647 mlib-tgt-specific-hpux.adb, mlib-tgt-specific-linux.adb,
1648 mlib-tgt-specific-mingw.adb, mlib-tgt-specific-solaris.adb,
1649 mlib-tgt-specific-vxworks.adb, mlib-tgt-specific-xi.adb, mlib-utl.adb,
1650 mlib-utl.ads, prj.adb, prj.ads, prj-attr.adb, prj-attr.ads,
1651 prj-attr-pm.adb, prj-attr-pm.ads, prj-com.ads, prj-conf.adb,
1652 prj-conf.ads, prj-dect.adb, prj-dect.ads, prj-env.adb, prj-env.ads,
1653 prj-err.adb, prj-err.ads, prj-ext.adb, prj-ext.ads, prj-makr.adb,
1654 prj-makr.ads, prj-nmsc.adb, prj-nmsc.ads, prj-pars.adb, prj-pars.ads,
1655 prj-part.adb, prj-part.ads, prj-pp.adb, prj-pp.ads, prj-proc.adb,
1656 prj-proc.ads, prj-strt.adb, prj-strt.ads, prj-tree.adb, prj-tree.ads,
1657 prj-util.adb, prj-util.ads, sinput-p.adb, sinput-p.ads: Remove obsolete
1658 project manager sources.
1660 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1662 * sem_ch5.adb (Analyze_Assigment): If the left-hand side is an
1663 entity of a mutable type and the right-hand side is a conditional
1664 expression, resolve the alternatives of the conditional using
1665 the base type of the target entity, because the alternatives
1666 may have distinct subtypes. This is particularly relevant if
1667 the alternatives are aggregates.
1669 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1671 * checks.adb (Apply_Predicate_Check): If the expression is an
1672 aggregate that is the RHS of an assignment, apply the check to
1673 the LHS after the assignment, rather than to the aggregate. This
1674 is more efficient than creating a temporary for the aggregate,
1675 and prevents back-end crashes when the aggregate includes a
1676 dynamic "others' association.
1678 2017-09-06 Yannick Moy <moy@adacore.com>
1680 * sem_ch12.adb (Analyze_Instance_And_Renamings):
1681 Set variable to ignore SPARK_Mode in instance before the analysis
1682 of the generated package declaration.
1684 2017-09-06 Yannick Moy <moy@adacore.com>
1686 * sem_res.adb (Resolve_Call): Do not issue a
1687 message for calls inside expression function, unless body was
1688 seen and is candidate for inlining.
1690 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1692 * sem_aux.adb (Is_Generic_Formal): Handle properly formal packages.
1693 * sem_ch3.adb (Analyze_Declarations): In a generic subprogram
1694 body. do not freeze the formals of the generic unit.
1696 2017-09-06 Gary Dismukes <dismukes@adacore.com>
1698 * errout.adb (Error_Msg): Separate the
1699 treatment for warning vs. style messages in inlinings and
1700 instantiations. Prevents blowups on calls to Warn_Insertion for
1701 style messages, which should not be called in that case because
1702 Warning_Msg_Char is not set.
1704 2017-09-06 Justin Squirek <squirek@adacore.com>
1706 * sem_prag.adb (Check_VFA_Conflicts): Created
1707 to group all Volatile_Full_Access checks relating to other
1708 representation pragmas (Mark_Component_Or_Object): Created
1709 to centeralize the flagging of attributes for the record type
1710 component case, a pragma applied individually to a component, and
1712 (Process_Atomic_Independent_Shared_Volatile):
1713 Add propagation of certain pragmas to record components and move
1714 evaluation of VFA checks
1716 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1718 * sem_prag.adb (Check_Postcondition_Use_In_Inlined_Subprogram):
1719 Do not warn on conditions that are not obeyed for Inline_Always
1720 subprograms, when assertions are not enabled.
1722 2017-09-06 Arnaud Charlet <charlet@adacore.com>
1724 * sem_util.adb (Unique_Entity): For abstract states return their
1727 2017-09-06 Bob Duff <duff@adacore.com>
1729 * sem_ch12.adb (Copy_Generic_Node): When we copy a node
1730 that is a proper body corresponding to a stub, we defer the
1731 adjustment of the sloc until after the correct adjustment has
1732 been computed. Otherwise, Adjust_Instantiation_Sloc will ignore
1733 the adjustment, because it will be outside the range in (the old,
1734 incorrect) S_Adjustment.
1735 * inline.adb: Use named notation for readability and uniformity.
1736 * sinput-l.adb: Minor improvements to debugging output printed
1738 * sinput-l.ads (Create_Instantiation_Source): Minor comment
1741 2017-09-06 Vincent Celier <celier@adacore.com>
1743 * make.adb: Do not invoke gprbuild for -bargs -P.
1745 2017-09-06 Sylvain Dailler <dailler@adacore.com>
1747 * sem_eval.adb (Compile_Time_Known_Value_Or_Aggr): Adding a
1748 case when Op is of kind N_Qualified_Expression. In this case,
1749 the function is called recursively on the subexpression like in
1751 * make.adb: Minor reformatting
1753 2017-09-06 Justin Squirek <squirek@adacore.com>
1755 * einfo.adb (Set_Linker_Section_Pragma): Modify
1756 Set_Linker_Section_Pragma to be consistant with the "getter"
1757 Linker_Section_Pragma.
1758 * exp_ch5.adb (Expand_Formal_Container_Loop): Add proper error
1759 checking for container loops so that the index cursor is not
1760 directly changable by the user with the use of E_Loop_Parameter.
1761 * sem_ch5.adb (Analyze_Block_Statement): Revert previous change.
1762 * sem_warn.adb (Check_References): Revert previous change.
1764 2017-09-06 Bob Duff <duff@adacore.com>
1766 * exp_util.adb (Is_Displace_Call): Make sure it works for indirect
1769 2017-09-06 Yannick Moy <moy@adacore.com>
1771 * sem_prag.adb (Analyze_Depends_Global): Reinforce test on object
1772 declarations to only consider valid uses of Global/Depends those on
1773 single concurrent objects.
1775 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
1777 * sem_ch13.adb (Check_Record_Representation_Clause): Give an
1778 error as soon as one of the specified components overlaps the
1781 2017-09-06 Arnaud Charlet <charlet@adacore.com>
1783 * sem_prag.ads: minor fix typo in comment.
1785 2017-09-06 Justin Squirek <squirek@adacore.com>
1787 * sem_ch5.adb (Analyze_Block_Statement): Verify a block comes
1788 from source before checking source references.
1789 * sem_warn.adb (Check_References): Add check for internal block
1792 2017-09-06 Vincent Celier <celier@adacore.com>
1794 * make.adb, makeusg.adb, switch-m.adb, switch-m.ads, make_util.adb,
1795 make_util.ads, sinput.adb, sinput.ads, clean.adb, gnatls.adb,
1796 gnatname.adb: Remove the Project Manager from the GNAT tools.
1797 * gcc-interface/Makefile.in: ditto.
1799 2017-09-06 Bob Duff <duff@adacore.com>
1801 * sem_util.ads: Minor comment fix.
1803 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1805 * sem_ch12.adb (Analyze_Associations, case of Formal_Package):
1806 Generate a freeze node for the actual of a formal package, if
1807 the actual is declared in the same unit and has a corresponding
1808 body, to prevent the current instance from being frozen before
1811 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
1813 * sem_ch7.adb (Entity_Table_Size): Change to nearest prime number.
1815 2017-09-06 Yannick Moy <moy@adacore.com>
1817 * sem_warn.adb: Minor refactoring.
1819 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1821 * einfo.ads, einfo.adb (Get_Classwwide_Pragma): New utility,
1822 to retrieve the inherited classwide precondition/postcondition
1824 * freeze.adb (Freeze_Entity): Use Get_Classwide_Pragma when
1825 freezing a subprogram, to complete the generation of the
1826 corresponding checking code.
1828 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
1830 * exp_util.adb (Is_Controlled_Indexing): New routine.
1831 (Is_Displace_Call): Use routine Strip to remove indirections.
1832 (Is_Displacement_Of_Object_Or_Function_Result): Code clean up. Add a
1833 missing case of controlled generalized indexing.
1834 (Is_Source_Object): Use routine Strip to remove indirections.
1835 (Strip): New routine.
1837 2017-09-06 Bob Duff <duff@adacore.com>
1839 * sysdep.c (__gnat_has_cap_sys_nice): If HAVE_CAPABILITY is defined,
1840 we include the proper header. Otherwise, we just declare the necessary
1841 things from the capabilities library. This is so we can build on
1842 machines without that library, while still enabling that library.
1843 At run time, we're using weak symbols, so __gnat_has_cap_sys_nice will
1844 simply return 0 if the library is not present, or not included
1847 2017-09-06 Pierre-Marie de Rodat <derodat@adacore.com>
1849 * exp_dbug.adb (Debug_Renaming_Declaration): Do not create an encoding
1850 for renamings that involve function calls in prefix form.
1852 2017-09-06 Bob Duff <duff@adacore.com>
1854 * sem_ch3.adb (Analyze_Subtype_Declaration):
1855 Set Has_Delayed_Freeze on a subtype of an incomplete type.
1857 2017-09-06 Pierre-Marie de Rodat <derodat@adacore.com>
1859 * par_sco.adb (Extend_Statement_Sequence): When the accept statement
1860 has no parameter specification and no entry index, use the entry name
1861 as the end of the generated SCO statement.
1863 2017-09-06 Steve Baird <baird@adacore.com>
1865 * exp_util.adb (Side_Effect_Free): For CodePeer (only) treat
1866 uses of 'Image and related attributes as having side effects in
1867 order to avoid replicating such uses.
1868 * pprint.ads (Expression_Image) Add new generic formal flag
1869 Hide_Temp_Derefs. The flag defaults to False; CodePeer will
1870 (eventually) override the default.
1871 * pprint.adb (Expression_Image) If the new flag is set, then
1872 suppress the ".all" suffix when displaying a dereference whose
1873 prefix is a use of a value-capturing compiler temp of the sort
1874 generated by Expr_Util.Remove_Side_Effects .
1875 * exp_attr.adb, g-catiio.adb, inline.adb, sem_attr.adb, sem_ch13.adb,
1876 sem_ch7.adb, sem_dim.adb, sem_util.adb, sem_util.ads, sem_warn.adb:
1878 * inline.adb: Minor wording change.
1880 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
1882 * sem_ch7.adb: Update comment.
1884 2017-09-06 Yannick Moy <moy@adacore.com>
1886 * einfo.adb, einfo.ads (Is_Subprogram_Or_Entry): New predicate.
1887 * inline.adb (Can_Be_Inlined_In_GNATprove_Mode): Use new function.
1888 * sem_util.adb, sem_util.ads (Within_Protected_Type): Renaming
1889 with slight modification from Is_Subp_Or_Entry_Inside_Protected,
1890 so that applies to any entity.
1892 2017-09-06 Yannick Moy <moy@adacore.com>
1894 * sem_ch3.adb (Derived_Type_Declaration): Use
1895 Incomplete_Or_Partial_View rather than local Find_Partial_View.
1897 2017-09-06 Javier Miranda <miranda@adacore.com>
1899 * g-catiio.ads, g-catiio.adb (Value): Extended to parse an UTC time
1902 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1904 * sem_dim.adb (Analyze_Dimension): In an instance, a type
1905 conversion takes its dimensions from the expression, not from
1907 (Dimensions_Of_Operand): Ditto.
1909 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1911 * exp_ch6.adb (Expand_Call_Helper): Do not optimize calls to
1912 null procedures when GNAT coverage is used, so that their (empty)
1913 bodies are properly covered.
1915 2017-09-06 Bob Duff <duff@adacore.com>
1917 * sem_ch13.adb (Resolve_Aspect_Expressions): If
1918 the entity is a type with discriminants, make the discriminants
1919 directly visible in aspect clauses.
1921 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1923 * sem_res.adb (Resolve_Arithmentic_Op): If both operands are
1924 Universal_Real and the context is a floating-point type, resolve
1925 both operands to the target type.
1927 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
1929 * a-comlin.adb, exp_aggr.adb, exp_ch6.adb, frontend.adb, gnatbind.adb,
1930 sem_ch3.adb, sem_util.adb: Minor reformatting.
1932 2017-09-06 Yannick Moy <moy@adacore.com>
1934 * freeze.adb (Check_Inherited_Conditions): Rewriting
1935 of inherited preconditions and postconditions should only occur
1936 in GNATprove mode, that is, when GNATprove_Mode is True, not to
1937 be confused with SPARK_Mode being On.
1939 2017-09-06 Yannick Moy <moy@adacore.com>
1941 * sem_warn.adb (Check_References): Take into
1942 account possibility of attribute reference as original node.
1944 2017-09-06 Yannick Moy <moy@adacore.com>
1946 * exp_attr.adb (Expand_N_Attribute_Reference): Protect against invalid
1949 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
1951 * inline.adb (Split_Unconstrained_Function): Also set Is_Inlined
1952 on the procedure created to encapsulate the body.
1953 * sem_ch7.adb: Add with clause for GNAT.HTable.
1954 (Entity_Table_Size): New constant.
1955 (Entity_Hash): New function.
1956 (Subprogram_Table): New instantiation of GNAT.Htable.Simple_HTable.
1957 (Is_Subprogram_Ref): Rename into...
1958 (Scan_Subprogram_Ref): ...this. Record references to subprograms in
1959 the table instead of bailing out on them. Scan the value of constants
1960 if it is not known at compile time.
1961 (Contains_Subprograms_Refs): Rename into...
1962 (Scan_Subprogram_Refs): ...this.
1963 (Has_Referencer): Scan the body of all inlined subprograms. Reset the
1964 Is_Public flag on subprograms if they are not actually referenced.
1965 (Hide_Public_Entities): Beef up comment on the algorithm.
1966 Reset the table of subprograms on entry.
1968 2017-09-06 Yannick Moy <moy@adacore.com>
1970 * inline.adb: Add comments to Can_Be_Inlined_In_GNATprove_Mode.
1972 2017-09-06 Javier Miranda <miranda@adacore.com>
1974 * exp_aggr.adb (Component_Not_OK_For_Backend): The C backend
1975 cannot handle a type conversion of an array as an aggregate
1978 2017-09-06 Bob Duff <duff@adacore.com>
1980 * g-comlin.adb (Try_Help): Remove ".exe" so we
1981 get the same results on windows and unix.
1983 2017-09-06 Justin Squirek <squirek@adacore.com>
1985 * exp_imgv.adb (Expand_Image_Attribute),
1986 (Expand_Wide_Image_Attribute), (Expand_Wide_Wide_Image_Attribute):
1987 Added case to handle new-style 'Image expansion
1988 (Rewrite_Object_Image): Moved from exp_attr.adb
1989 * exp_attr.adb (Expand_N_Attribute_Reference): Modified Image
1990 attribute cases so that the relevant subprograms in exp_imgv.adb
1991 handle all expansion.
1992 (Rewrite_Object_Reference_Image): Moved to exp_imgv.adb
1993 * sem_attr.adb (Analyze_Attribute): Modified Image attribute
1994 cases to call common function Analyze_Image_Attribute.
1995 (Analyze_Image_Attribute): Created as a common path for all
1996 image attributes (Check_Object_Reference_Image): Removed
1997 * sem_util.ads, sem_util.adb (Is_Image_Applied_To_Object):
1998 Removed and refactored into Is_Object_Image (Is_Object_Image):
1999 Created as a replacement for Is_Image_Applied_To_Object
2001 2017-09-06 Yannick Moy <moy@adacore.com>
2003 * sem_prag.adb (Analyze_Depends_In_Decl_Part): Add continuation
2004 message for missing input.
2006 2017-09-06 Yannick Moy <moy@adacore.com>
2008 * inline.adb (Can_Be_Inlined_In_GNATprove_Mode): Prevent inlining
2009 of protected subprograms and entries.
2010 * sem_util.adb, sem_util.ads (Is_Subp_Or_Entry_Inside_Protected):
2011 New function to detect when a subprogram of entry is defined
2012 inside a protected object.
2014 2017-09-06 Bob Duff <duff@adacore.com>
2016 * sysdep.c (__gnat_has_cap_sys_nice): New function to determine
2017 whether the current process has the CAP_SYS_NICE capability.
2018 * s-taprop-linux.adb (Get_Ceiling_Support): Update this to allow
2019 ceiling priorities if the current process has the CAP_SYS_NICE
2022 2017-09-06 Bob Duff <duff@adacore.com>
2024 * a-comlin.ads, a-comlin.adb (Argument): Move the constraint
2025 check back to the body, because SPARK is not yet ready for
2026 "or else raise Constraint_Error".
2028 2017-09-06 Ed Schonberg <schonberg@adacore.com>
2030 * exp_ch6.adb (Expand_Call_Helper): Replace call to null
2031 procedure by a single null statement, after evaluating the
2032 actuals that require it.
2034 2017-09-06 Javier Miranda <miranda@adacore.com>
2036 * exp_aggr.adb (Backend_Processing_Possible.Component_Check):
2037 Generating C code improve the code that checks the use of nested
2038 aggregates to initialize object declarations.
2040 2017-09-06 Yannick Moy <moy@adacore.com>
2042 * sem_ch3.adb (Derived_Type_Declaration): Detect
2043 violations of new rule SPARK RM 3.4(1). Also refactor existing
2044 check to use the new function Find_Partial_View.
2046 2017-09-06 Vincent Celier <celier@adacore.com>
2048 * gnatcmd.adb: gnat ls -V -P... invokes gprls -V -P... The code
2049 from the Prj hierarchy has been removed from the GNAT driver.
2051 2017-09-06 Ed Schonberg <schonberg@adacore.com>
2053 * sem_type.adb (Interface_Present_In_Ancestor): Within an
2054 expression function, or within a spec expression (default value,
2055 etc) a reference to an incomplete type is legal: legality of
2056 the operation will be checked when some related entity (type,
2057 object or subprogram) is frozen.
2059 2017-09-06 Gary Dismukes <dismukes@adacore.com>
2061 * exp_ch5.adb, s-diinio.ads, sem_ch4.adb, s-diflio.ads: Minor spelling
2062 adjustments and a typo fix.
2064 2017-09-06 Yannick Moy <moy@adacore.com>
2066 * sem_res.adb (Resolve_Call): Do not issue info
2067 message about inlining of calls to functions in assertions,
2068 for functions whose body has not been seen yet.
2070 2017-09-06 Bob Duff <duff@adacore.com>
2072 * a-comlin.ads, a-comlin.adb (Argument): Simplify the code, now that
2073 we can use modern Ada in this package.
2074 * s-resfil.ads, s-resfil.adb, a-clrefi.ads, a-clrefi.adb:
2075 Move Ada.Command_Line.Response_File to System.Response_File,
2076 and make Ada.Command_Line.Response_File into a rename of
2077 System.Response_File. This is to avoid having gnatbind depend
2078 Ada.Command_Line, which would damage the bootstrap process now
2079 that Ada.Command_Line contains modern Ada (the raise expression).
2080 * gnatbind.adb: Avoid dependence on
2081 Ada.Command_Line. Depend on System.Response_File instead
2082 of Ada.Command_Line.Response_File. Change one call to
2083 Ada.Command_Line.Command_Name to use Fill_Arg. Change one call
2084 to Ada.Command_Line.Argument_Count to use Arg_Count.
2085 * gcc-interface/Make-lang.in, Makefile.rtl: Take note of the new files.
2087 2017-09-06 Bob Duff <duff@adacore.com>
2089 * frontend.adb (Frontend): Skip -gnatec=gnat.adc
2090 switch, because we've already read gnat.adc by default.
2092 2017-09-06 Bob Duff <duff@adacore.com>
2094 * exp_ch5.adb (Get_Default_Iterator): Replace
2095 "Assert(False)" with "return Iter", because if an iterable
2096 type is derived from a noniterable one, then we won't find an
2097 overriding or inherited default iterator.
2099 2017-09-06 Yannick Moy <moy@adacore.com>
2101 * sem_warn.adb (Warn_On_Suspicious_Index): Improve warning when the
2102 literal index used to access a string is null or negative.
2104 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
2106 * einfo.adb (Status_Flag_Or_Transient_Decl): The attribute is now
2107 allowed on loop parameters.
2108 (Set_Status_Flag_Or_Transient_Decl): The attribute is now allowed
2110 (Write_Field15_Name): Update the output for
2111 Status_Flag_Or_Transient_Decl.
2112 * einfo.ads: Attribute Status_Flag_Or_Transient_Decl now applies
2113 to loop parameters. Update the documentation of the attribute
2114 and the E_Loop_Parameter entity.
2115 * exp_ch7.adb (Process_Declarations): Remove the bogus guard
2116 which assumes that cursors can never be controlled.
2117 * exp_util.adb (Requires_Cleanup_Actions): Remove the bogus
2118 guard which assumes that cursors can never be controlled.
2120 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
2122 * exp_attr.adb, sem_util.adb, sem_attr.adb, sem_ch6.adb, sem_ch8.adb,
2123 sem_warn.adb: Minor reformatting.
2125 2017-09-06 Ed Schonberg <schonberg@adacore.com>
2127 * sem_warn.adb (Warn_On_Overlapping_Actuals): Refine previous
2128 fix and preserve older GNAT warning on overlapping actuals that
2129 are not elementary types.
2131 2017-09-06 Justin Squirek <squirek@adacore.com>
2133 * sem_attr.adb: Comment correction.
2135 2017-09-06 Gary Dismukes <dismukes@adacore.com>
2137 * sem_util.adb: Minor reformatting.
2139 2017-09-06 Yannick Moy <moy@adacore.com>
2141 * a-comlin.ads (Argument): Add precondition for analysis.
2143 2017-09-06 Yannick Moy <moy@adacore.com>
2145 * sem_res.adb (Resolve): Update message for function call as statement.
2147 2017-09-06 Ed Schonberg <schonberg@adacore.com>
2149 * sem_ch6.adb (Check_Returns): Clean up warnings coming from
2150 generated bodies for renamings that are completions, when renamed
2151 procedure is No_Return.
2152 * sem_ch8.adb (Analyze_Subprogram_Renaming): Implement legality
2153 rule in 6.5.1 (7/2): if a renaming is a completion of a subprogram
2154 with No_Return, the renamed entity must be No_Return as well.
2156 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
2158 * exp_ch5.adb, freeze.adb, exp_ch4.adb, exp_ch6.adb, lib-xref.adb:
2161 2017-09-06 Justin Squirek <squirek@adacore.com>
2163 * exp_attr.adb (Expand_N_Attribute_Reference): Modified Image
2164 attribute cases (Rewrite_Object_Reference_Image): Created to
2165 aid the rewriting of new-style 'Image attributes.
2166 * sem_attr.adb (Analyze_Attribute): Modified Image attribute cases
2167 (Check_Object_Reference_Image): Created to handle verification of
2168 'Image with object-references as prefixes.
2169 * sem_util.ads, sem_util.adb (Is_Image_Applied_To_Object):
2170 Create predicate to identify cases where an 'Image attribute's
2171 prefix applies to an object reference.
2173 2017-09-06 Ed Schonberg <schonberg@adacore.com>
2175 * freeze.adb (Freeze_Entity): Do not generate a freeze
2176 node for a generic unit, even if it includes delayed aspect
2177 specifications. Freeze nodes for generic entities must never
2178 appear in the tree that reaches the back-end of the compiler.
2180 2017-09-06 Yannick Moy <moy@adacore.com>
2182 * treepr.adb (Print_Entity_Info): Do not print empty Elist.
2184 2017-09-06 Yannick Moy <moy@adacore.com>
2186 * inline.adb (Can_Be_Inlined_In_GNATprove_Mode): Do not consider calls
2187 to subprograms in other units as possibly inlined.
2189 2017-09-06 Ed Schonberg <schonberg@adacore.com>
2191 * freeze.adb (Freeze_Entity): For a derived type that has no
2192 explicit delayed aspects but may inherit delayed aspects from its
2193 parent type, analyze aspect at freeze point for proper capture
2194 of an inherited aspect.
2196 2017-09-06 Arnaud Charlet <charlet@adacore.com>
2198 * lib-xref.adb (Get_Through_Renamings): Get through subprogram
2199 renamings; also, avoid repeated calls to Renamed_Object when getting
2200 through object renamings.
2202 2017-09-06 Ed Schonberg <schonberg@adacore.com>
2204 * sem_ch3.adb (Array_Type_Declaration): Handle properly an
2205 array type declaration in a private part, when an index is a
2206 subtype indication of a discrete type with a private partial view.
2208 2017-09-06 Javier Miranda <miranda@adacore.com>
2210 * exp_ch4.adb (Expand_Modular_Op): Force generating
2211 temporary to improve the generated code.
2213 2017-09-06 Tristan Gingold <gingold@adacore.com>
2215 * s-fatgen.adb: Minor typo fix in comment.
2217 2017-09-06 Ed Schonberg <schonberg@adacore.com>
2219 * exp_ch5.adb (Make_Field_Assign): If the type
2220 of the right-hand side has stored constraint, use its values
2221 (except for those that are renamings of parent discriminants)
2222 to produce additional assignments for the discriminants of the
2223 left-hand side, which are invisible in the righ-hand side and
2224 not retrievable as selected components.
2226 2017-09-06 Ed Schonberg <schonberg@adacore.com>
2228 * sem_util.adb (Needs_One_Formal): The first formal of such a
2229 function must be a controlling formal, so that Obj.F (X, Y)
2230 can have the interpretation F(Obj)(X, Y).
2231 * sem_util.ads: Clarify documentation.
2233 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
2235 * table.ads, table.adb: Restore original implementation.
2236 * namet.h (Names_Ptr): Adjust back.
2237 (Name_Chars_Ptr): Likewise.
2238 * uintp.h (Uints_Ptr): Likewise.
2239 (Udigits_Ptr): Likewise.
2240 * g-table.ads: Remove pragma Compiler_Unit_Warning.
2241 * par_sco.adb: Do not with GNAT.Table and use Table consistently.
2242 * scos.ads: Replace GNAT.Table with Table and adjust instantiations.
2243 * spark_xrefs.ads: Likewise.
2244 * scos.h: Undo latest changes.
2246 2017-09-06 Ed Schonberg <schonberg@adacore.com>
2248 * sem_ch12.adb (Analyze_Subprogram_Instantiation): Propagate
2249 No_Return flag to instance if pragma applies to generic unit. This
2250 must be done explicitly because the pragma does not appear
2251 directly in the generic declaration (unlike the corresponding
2252 aspect specification).
2254 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
2256 * sem_ch7.adb (Has_Referencer): Move up and expand comment
2257 explaining the test used to detect inlining. Use same test
2258 in second occurrence.
2259 (Analyze_Package_Body_Helper): Minor formatting fixes.
2261 2017-09-06 Ed Schonberg <schonberg@adacore.com>
2263 * exp_ch4.adb (Handle_Changed_Representation): For an untagged
2264 derived type with a mixture of renamed and constrained parent
2265 discriminants, the constraint for the target must obtain the
2266 discriminant values from both the operand and from the stored
2267 constraint for it, given that the constrained discriminants are
2268 not visible in the object.
2269 * exp_ch5.adb (Make_Field_Assign): The type of the right-hand
2270 side may be derived from that of the left-hand side (as in the
2271 case of an assignment with a change of representation) so the
2272 discriminant to be used in the retrieval of the value of the
2273 component must be the entity in the type of the right-hand side.
2275 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
2277 * sem_ch3.adb, sem_ch7.adb, sem_util.adb, g-debpoo.adb, sem_ch4.adb,
2278 sem_ch6.adb, sem_ch8.adb: Minor reformatting.
2279 * exp_util.adb (Is_Source_Object): Account for
2280 the cases where the source object may appear as a dereference
2281 or within a type conversion.
2282 * exp_ch6.adb: Fix missing space in error message.
2284 2017-09-06 Ed Schonberg <schonberg@adacore.com>
2286 * sem_prag.adb: Update description of Eliminate.
2288 2017-09-06 Ed Schonberg <schonberg@adacore.com>
2290 * sem_attr.adb (Analyze_Attribute, case 'Loop_Entry): Handle
2291 properly an attribute reference 'Loop_Entry that appears in the
2292 list of indices of an indexed expression, to prevent an infinite
2293 loop in the compiler.
2295 2017-09-06 Bob Duff <duff@adacore.com>
2297 * s-fileio.adb (Name): Do not raise Use_Error for temp files.
2299 2017-09-06 Ed Schonberg <schonberg@adacore.com>
2301 * sem_ch4.adb (Analyze_Set_Membership): If an alternative
2302 in a set membership is an overloaded enumeration literal, and
2303 the type of the alternative is resolved from a previous one,
2304 replace the entity of the alternative as well as the type,
2305 to prevent inconsistencies between the entity and the type.
2307 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
2309 * ali.ads (ALIs_Record): Add No_Component_Reordering component.
2310 (No_Component_Reordering_Specified): New switch.
2311 * ali.adb (Initialize_ALI): Set No_Component_Reordering_Specified.
2312 (Scan_ALI): Set No_Component_Reordering and deal with NC marker.
2313 * bcheck.adb (Check_Consistent_No_Component_Reordering):
2315 (Check_Configuration_Consistency): Invoke it.
2316 * debug.adb (d.r): Toggle the effect of the switch.
2317 (d.v): Change to no-op.
2318 * einfo.ads (Has_Complex_Representation):
2319 Restrict to record types.
2320 (No_Reordering): New alias for Flag239.
2321 (OK_To_Reorder_Components): Delete.
2322 (No_Reordering): Declare.
2323 (Set_No_Reordering): Likewise.
2324 (OK_To_Reorder_Components): Delete.
2325 (Set_OK_To_Reorder_Components): Likewise.
2326 * einfo.adb (Has_Complex_Representation): Expect record types.
2327 (No_Reordering): New function.
2328 (OK_To_Reorder_Components): Delete.
2329 (Set_Has_Complex_Representation): Expect base record types.
2330 (Set_No_Reordering): New procedure.
2331 (Set_OK_To_Reorder_Components): Delete.
2332 (Write_Entity_Flags): Adjust to above change.
2333 * fe.h (Debug_Flag_Dot_R): New macro and declaration.
2334 * freeze.adb (Freeze_Record_Type): Remove conditional code setting
2335 OK_To_Reorder_Components on record types with convention Ada.
2336 * lib-writ.adb (Write_ALI): Deal with NC marker.
2337 * opt.ads (No_Component_Reordering): New flag.
2338 (No_Component_Reordering_Config): Likewise.
2339 (Config_Switches_Type): Add No_Component_Reordering component.
2340 * opt.adb (Register_Opt_Config_Switches): Copy
2341 No_Component_Reordering onto No_Component_Reordering_Config.
2342 (Restore_Opt_Config_Switches): Restore No_Component_Reordering.
2343 (Save_Opt_Config_Switches): Save No_Component_Reordering.
2344 (Set_Opt_Config_Switches): Set No_Component_Reordering.
2345 * par-prag.adb (Prag): Deal with Pragma_No_Component_Reordering.
2346 * sem_ch3.adb (Analyze_Private_Extension_Declaration): Also set the
2347 No_Reordering flag from the default.
2348 (Build_Derived_Private_Type): Likewise.
2349 (Build_Derived_Record_Type): Likewise. Then inherit it
2350 for untagged types and clean up handling of similar flags.
2351 (Record_Type_Declaration): Likewise.
2352 * sem_ch13.adb (Same_Representation): Deal with No_Reordering and
2353 remove redundant test on Is_Tagged_Type.
2354 * sem_prag.adb (Analyze_Pragma): Handle No_Component_Reordering.
2355 (Sig_Flags): Likewise.
2356 * snames.ads-tmpl (Name_No_Component_Reordering): New name.
2357 (Pragma_Id): Add Pragma_No_Component_Reordering value.
2358 * warnsw.adb (Set_GNAT_Mode_Warnings): Enable -gnatw.q as well.
2359 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Record_Type>:
2360 Copy the layout of the parent type only if the No_Reordering
2362 (components_to_record): Reorder record types with
2363 convention Ada by default unless No_Reordering is set or -gnatd.r
2364 is specified and do not warn if No_Reordering is set in GNAT mode.
2366 2017-09-06 Ed Schonberg <schonberg@adacore.com>
2368 * sem_util.ads, sem_util.adb (Check_Previous_Null_Procedure):
2369 new predicate to reject declarations that can be completions,
2370 when there is a visible prior homograph that is a null procedure.
2371 * sem_ch6.adb (Analyze_Null_Procedure): use it.
2372 * sem_ch8.adb (Analyze_Subprogram_Renaming): ditto.
2374 2017-09-06 Thomas Quinot <quinot@adacore.com>
2376 * s-regpat.adb (Compile.Parse_Literal): Fix handling of literal
2377 run of 253 characters or more.
2379 2017-09-06 Ed Schonberg <schonberg@adacore.com>
2381 * einfo.adb (Designated_Type): Use Is_Incomplete_Type to handle
2382 properly incomplete subtypes that may be created by explicit or
2383 implicit declarations.
2384 (Is_Base_Type): Take E_Incomplete_Subtype into account.
2385 (Subtype_Kind): Ditto.
2386 * sem_ch3.adb (Build_Discriminated_Subtype): Set properly the
2387 Ekind of a subtype of a discriminated incomplete type.
2388 (Fixup_Bad_Constraint): Use Subtype_Kind in all cases, including
2389 incomplete types, to preserve error reporting.
2390 (Process_Incomplete_Dependents): Do not create a subtype
2391 declaration for an incomplete subtype that is created internally.
2392 * sem_ch7.adb (Analyze_Package_Specification): Handle properly
2393 incomplete subtypes that do not require a completion, either
2394 because they are limited views, of they are generic actuals.
2396 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
2398 * checks.adb (Insert_Valid_Check): Remove the
2399 suspicious manipulation of the Do_Range_Check flag as ths is
2400 no linger needed. Suppress validity check when analysing the
2401 validation variable.
2403 2017-09-06 Philippe Gil <gil@adacore.com>
2405 * g-debpoo.adb: adapt GNAT.Debug_Pools to allow safe thread
2408 2017-09-06 Bob Duff <duff@adacore.com>
2410 * sem_elim.adb: Minor comment fix.
2412 2017-09-06 Ed Schonberg <schonberg@adacore.com>
2414 * sem_util.adb (Is_Object_Reference): A function call is an
2415 object reference, and thus attribute references for attributes
2416 that are functions (such as Pred and Succ) as well as predefined
2417 operators are legal in contexts that require an object, such as
2418 the prefix of attribute Img and the Ada2020 version of 'Image.
2420 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
2422 * exp_util.adb, einfo.adb, sem_attr.adb, exp_ch4.adb, gnatls.adb,
2423 exp_ch3.adb, xoscons.adb: Minor reformatting.
2425 2017-09-06 Raphael Amiard <amiard@adacore.com>
2427 * a-chtgop.ads, a-chtgop.adb: Add versions of First and Next with
2428 Position parameter. If supplied, use it to provide efficient iteration.
2429 * a-cohase.ads, a-cohase.adb, a-cihama.ads, a-cihama.adb,
2430 a-cohama.ads, a-cohama.adb: Add/Use Position to provide efficient
2433 2017-09-06 Ed Schonberg <schonberg@adacore.com>
2435 * exp_util.adb (Build_Allocate_Deallocate_Proc): If the
2436 designated type is class-wide and the expression is an unchecked
2437 conversion, preserve the conversion when checking the tag of the
2438 designated object, to prevent spurious semantic errors when the
2439 expression in the conversion has an untagged type (for example
2440 an address attribute).
2442 2017-09-06 Ed Schonberg <schonberg@adacore.com>
2444 * sem_res.adb (Resolve_Entry_Call): Check whether a protected
2445 operation is subject to a pragma Eliminate.
2447 2017-09-06 Ed Schonberg <schonberg@adacore.com>
2449 * sem_elim.ads, exp_ch4.adb: Minor reformatting.
2451 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
2453 * fe.h (Eliminate_Error_Msg): Remove.
2455 2017-09-05 Richard Sandiford <richard.sandiford@linaro.org>
2457 * gcc-interface/utils.c (make_packable_type): Update call to
2460 2017-09-05 Richard Sandiford <richard.sandiford@linaro.org>
2462 * gcc-interface/utils2.c (build_load_modify_store):
2463 Use int_mode_for_size.
2465 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
2468 * gcc-interface/decl.c (gnat_to_gnu_entity): Skip regular processing
2469 for Itypes that are E_Record_Subtype with a cloned subtype.
2470 <E_Record_Subtype>: Use the DECL of the cloned type directly, if any.
2472 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
2474 * gcc-interface/trans.c (convert_with_check): Use a custom base type
2475 if the base type of the expression has a different machine mode.
2476 Rename a couple of parameters and local variable.
2478 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
2480 * gcc-interface/trans.c (Attribute_to_gnu) <Attr_Address>: Do not strip
2481 conversions around prefixes that are not references.
2483 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
2485 * gcc-interface/utils.c (unchecked_convert): When the result type is a
2486 non-biased integral type with size 0, set the result to 0 directly.
2488 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
2490 * gcc-interface/gigi.h (renaming_from_generic_instantiation_p): Turn to
2491 (renaming_from_instantiation_p): ...this.
2492 * gcc-interface/decl.c (gnat_to_gnu_entity): Use inline predicate
2493 instead of explicit tests on kind of entities. Adjust for renaming.
2494 (gnat_to_gnu_profile_type): Likewise.
2495 (gnat_to_gnu_subprog_type): Likewise.
2496 * gcc-interface/trans.c (Identifier_to_gnu): Likewise.
2497 (Case_Statement_to_gnu): Likewise.
2498 (gnat_to_gnu): Likewise.
2499 (process_freeze_entity): Likewise.
2500 (process_type): Likewise.
2501 (add_stmt_with_node): Adjust for renaming.
2502 * gcc-interface/utils.c (gnat_pushdecl): Adjust for renaming.
2503 (renaming_from_generic_instantiation_p): Rename to...
2504 (renaming_from_instantiation_p): ...this. Use inline predicate.
2505 (pad_type_hasher::keep_cache_entry): Fold.
2507 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
2509 * gcc-interface/trans.c (adjust_for_implicit_deref): New function.
2510 (gnat_to_gnu) <N_Explicit_Dereference>: Translate result type first.
2511 (N_Indexed_Component): Invoke adjust_for_implicit_deref on the prefix.
2512 (N_Slice): Likewise.
2513 (N_Selected_Component): Likewise. Do not try again to translate it.
2514 (N_Free_Statement): Invoke adjust_for_implicit_deref on the expression.
2516 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
2518 * repinfo.ads: Document new treatment of dynamic values.
2519 (TCode): Bump upper bound to 29.
2520 (Dynamic_Val): New constant set to 29.
2521 * repinfo.adb (Print_Expr) <Dynamic_Val>: New case.
2522 (Rep_Value) <Dynamic_Val>: Likewise.
2523 * repinfo.h (Dynamic_Val): New macro.
2524 * gcc-interface/decl.c (annotate_value): Tidy up and cache result for
2526 <INTEGER_CST>: Set TCODE instead of recursing.
2527 <COMPONENT_REF>: Set TCODE instead of calling Create_Node manually.
2528 <VAR_DECL>: New case.
2529 <MULT_EXPR, PLUS_EXPR>: Fold conversions into inner operations.
2530 <BIT_AND_EXPR>: Adjust.
2531 <CALL_EXPR>: Do not fall through.
2533 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
2535 * gcc-interface/trans.c (Call_to_gnu): If this is a function call and
2536 there is no target, do not create a temporary for the return value for
2537 an allocator either.
2539 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
2541 * gcc-interface/trans.c (pos_to_constructor): Skip conversions to an
2542 unconstrained array type.
2544 2017-08-30 Richard Sandiford <richard.sandiford@linaro.org>
2545 Alan Hayward <alan.hayward@arm.com>
2546 David Sherwood <david.sherwood@arm.com>
2548 * gcc-interface/decl.c (validate_size): Use NARROWEST_INT_MODE
2549 instead of GET_CLASS_NARROWEST_MODE (MODE_INT).
2551 2017-08-30 Richard Sandiford <richard.sandiford@linaro.org>
2552 Alan Hayward <alan.hayward@arm.com>
2553 David Sherwood <david.sherwood@arm.com>
2555 * gcc-interface/decl.c (check_ok_for_atomic_type): Use
2556 is_a <scalar_int_mode>.
2557 * gcc-interface/trans.c (Pragma_to_gnu): Likewise.
2558 * gcc-interface/utils.c (gnat_type_for_mode): Likewise.
2560 2017-08-30 Richard Sandiford <richard.sandiford@linaro.org>
2561 Alan Hayward <alan.hayward@arm.com>
2562 David Sherwood <david.sherwood@arm.com>
2564 * gcc-interface/decl.c (gnat_to_gnu_entity): Use int_mode_for_size
2565 instead of mode_for_size.
2566 (gnat_to_gnu_subprog_type): Likewise.
2567 * gcc-interface/utils.c (make_type_from_size): Likewise.
2569 2017-08-30 Richard Sandiford <richard.sandiford@linaro.org>
2570 Alan Hayward <alan.hayward@arm.com>
2571 David Sherwood <david.sherwood@arm.com>
2573 * gcc-interface/misc.c (fp_prec_to_size): Use opt_scalar_float_mode.
2574 (fp_size_to_prec): Likewise.
2576 2017-08-30 Richard Sandiford <richard.sandiford@linaro.org>
2577 Alan Hayward <alan.hayward@arm.com>
2578 David Sherwood <david.sherwood@arm.com>
2580 * gcc-interface/utils.c (gnat_type_for_mode): Use is_a
2581 <scalar_float_mode> instead of SCALAR_FLOAT_MODE_P.
2583 2017-08-30 Richard Sandiford <richard.sandiford@linaro.org>
2584 Alan Hayward <alan.hayward@arm.com>
2585 David Sherwood <david.sherwood@arm.com>
2587 * gcc-interface/decl.c (validate_size): Update use of
2588 GET_MODE_WIDER_MODE, forcing a wider mode to exist.
2590 2017-08-30 Richard Sandiford <richard.sandiford@linaro.org>
2591 Alan Hayward <alan.hayward@arm.com>
2592 David Sherwood <david.sherwood@arm.com>
2594 * gcc-interface/misc.c (fp_prec_to_size): Use new mode iterators.
2595 (fp_size_to_prec): Likewise.
2597 2017-08-29 Martin Liska <mliska@suse.cz>
2600 * gcc-interface/trans.c (Pragma_to_gnu): Set argument to NULL.
2602 2017-08-08 Martin Liska <mliska@suse.cz>
2604 * gcc-interface/trans.c: Include header files.
2606 2017-07-29 Jakub Jelinek <jakub@redhat.com>
2608 * gcc-interface/utils.c (gnat_write_global_declarations): Pass false
2609 as new argument to the imported_module_or_decl debug hook.
2611 2017-07-25 Javier Miranda <miranda@adacore.com>
2613 * checks.adb (Apply_Divide_Checks): Ensure that operands are not
2616 2017-07-19 Jakub Jelinek <jakub@redhat.com>
2618 * gcc-interface/ada-tree.h (TYPE_OBJECT_RECORD_TYPE,
2619 TYPE_GCC_MIN_VALUE): Use TYPE_MIN_VALUE_RAW instead of TYPE_MINVAL.
2620 (TYPE_GCC_MAX_VALUE): Use TYPE_MAX_VALUE_RAW instead of TYPE_MAXVAL.
2622 2017-07-18 Mike Frysinger <vapier@chromium.org>
2624 * gcc-interface/Makefile.in (../../gnatmake$(exeext)): Delete $(P).
2625 (../../gnatlink$(exeext)): Likewise.
2627 2017-07-15 John Paul Adrian Glaubitz <glaubitz@physik.fu-berlin.de>
2630 * system-linux-m68k.ads: Add pragma No_Elaboration_Code_All.
2631 (Backend_Overflow_Checks): Set to True.
2633 2017-06-23 Jakub Jelinek <jakub@redhat.com>
2635 * gcc-interface/trans.c (gnat_to_gnu): Initialize sync to false.
2637 2017-06-21 Pierre-Marie de Rodat <derodat@adacore.com>
2639 * gcc-interface/ada-tree.h (DECL_FUNCTION_IS_DEF): Update copyright
2641 * gcc-interface/trans.c (Subprogram_Body_to_gnu): Tag the subprogram
2643 (Compilation_Unit_to_gnu): Tag the elaboration procedure as a
2645 * gcc-interface/decl.c (gnat_to_gnu_entity): Tag declarations of
2646 imported subprograms for the current compilation unit as
2647 definitions. Disable debug info for references to variables.
2648 * gcc-interface/gigi.h (create_subprog_decl): Update declaration.
2649 * gcc-interface/utils.c (gnat_pushdecl): Add external DECLs that are
2650 not built-in functions to their binding scope.
2651 (create_subprog_decl): Add a DEFINITION parameter. If it is true, tag
2652 the function as a definition. Update all callers.
2653 (gnat_write_global_declarations): Emit debug info for imported
2654 functions. Filter out external variables for which debug info
2657 2017-06-15 Nicolas Boulenguez <nicolas.boulenguez@free.fr>
2660 * gcc-interface/Makefile.in (x86 kfreebsd): Adjust system.ads setting.
2661 (i[3456]86-pc-gnu): Likewise.
2662 (x86_64 kfreebsd): Likewise.
2664 2017-06-12 Eric Botcazou <ebotcazou@adacore.com>
2667 * exp_ch3.adb (Make_Predefined_Primitive_Specs): Use Positive index.
2669 2017-06-12 Eric Botcazou <ebotcazou@adacore.com>
2672 * s-interr-hwint.adb: Reinstate.
2673 * gcc-interface/Makefile.in (RTEMS): Use it again.
2675 2017-06-08 Olivier Hainque <hainque@adacore.com>
2677 * vx_crtbegin_auto.c: Update year in copyright notice.
2678 * vx_crtbegin.c: Likewise.
2679 * vx_crtbegin.inc: Likewise.
2680 * vx_crtend.c: Likewise.
2682 2017-06-07 Sebastian Huber <sebastian.huber@embedded-brains.de>
2684 * Makefile.in (rtems): Use TLS implementation for s-tpopsp.adb.
2685 * s-tpopsp-rtems.adb: Delete.
2687 2017-06-02 Olivier Hainque <hainque@adacore.com>
2689 * vx_crtbegin_auto.c: New file.
2690 * vx_crtbegin.c: New file.
2691 * vx_crtbegin.inc: New file.
2692 * vx_crtend.c: New file.
2694 2017-05-25 Jonathan Wakely <jwakely@redhat.com>
2696 * gcc-interface/utils2.c (compare_elmt_bitpos): Remove redundant
2697 const qualifiers that cause -Wignored-qualifiers warnings.
2699 2017-05-22 Eric Botcazou <ebotcazou@adacore.com>
2701 * gcc-interface/decl.c (gnat_to_gnu_entity): Skip regular processing
2702 for Itypes that are E_Access_Subtype.
2703 <E_Access_Subtype>: Use the DECL of the base type directly.
2705 2017-05-22 Ed Schonberg <schonberg@adacore.com>
2706 Eric Botcazou <ebotcazou@adacore.com>
2708 * sem_ch4.adb (Analyze_Call): In Ada2012 an incomplete type from a
2709 limited view may appear in the profile of a function, and a call to
2710 that function in another unit in which the full view is available must
2711 use this full view to spurious type errors at the point of call.
2712 * inline.adb (Analyze_Inlined_Bodies): Remove restriction on loading
2713 of parent body with a with clause for the main unit.
2714 * gcc-interface/decl.c (defer_limited_with_list): Document new usage.
2715 (gnat_to_gnu_entity) <E_Access_Type>: Handle completed Taft Amendment
2716 types declared in external units like types from limited with clauses.
2717 Adjust final processing of defer_limited_with_list accordingly.
2718 * gcc-interface/trans.c (gnat_to_gnu) < N_Selected_Component>: Try
2719 again to translate the prefix after the field if it is incomplete.
2721 2017-05-22 Eric Botcazou <ebotcazou@adacore.com>
2723 * gcc-interface/decl.c (gnat_to_gnu_field): Do not enforce strict
2724 alignment for simple volatile fields and remove associated errors.
2726 2017-05-15 Eric Botcazou <ebotcazou@adacore.com>
2728 * gcc-interface/gigi.h (get_elaboration_procedure): Delete.
2729 * gcc-interface/trans.c (get_elaboration_procedure): Make static.
2731 2017-05-15 Pierre-Marie de Rodat <derodat@adacore.com>
2733 * gcc-interface/utils.c (can_materialize_object_renaming_p):
2734 Synchronize with GNAT's Exp_Dbug.Debug_Renaming_Declaration:
2735 process Original_Node instead of expanded names.
2737 2017-05-15 Eric Botcazou <ebotcazou@adacore.com>
2739 * gcc-interface/trans.c (return_value_ok_for_nrv_p): Only apply the
2740 addressability check in the constrained case.
2742 2017-05-15 Eric Botcazou <ebotcazou@adacore.com>
2744 * gcc-interface/trans.c (Identifier_to_gnu): Also accept incomplete
2745 types not coming from a limited context.
2747 2017-05-15 Eric Botcazou <ebotcazou@adacore.com>
2749 * gcc-interface/trans.c (Compilation_Unit_to_gnu): Skip subprograms on
2750 the inlined list that are not public.
2751 * gcc-interface/utils.c (create_subprog_decl): Clear TREE_PUBLIC if
2752 there is a pragma Inline_Always on the subprogram.
2754 2017-05-15 Eric Botcazou <ebotcazou@adacore.com>
2756 * gcc-interface/trans.c (gnat_to_gnu) <N_Aggregate>: Fix formatting.
2757 <N_Allocator>: Use properly typed constants.
2758 (extract_values): Move around.
2759 (pos_to_constructor): Minor tweaks.
2760 (Sloc_to_locus): Fix formatting.
2761 * gcc-interface/utils.c (process_deferred_decl_context): Minor tweaks.
2762 * gcc-interface/gigi.h (MARK_VISITED): Remove blank line.
2763 (Gigi_Equivalent_Type): Adjust head comment.
2764 * gcc-interface/decl.c (Gigi_Equivalent_Type): Likewise.
2766 2017-05-15 Eric Botcazou <ebotcazou@adacore.com>
2768 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Record_Type>: When there
2769 is a representation clause on an extension, propagate the alignment of
2770 the parent type only if the platform requires strict alignment.
2772 2017-05-12 Eric Botcazou <ebotcazou@adacore.com>
2774 * system-linux-arm.ads (Memory_Size): Use Long_Integer'Size
2775 instead of Word_Size.
2778 2017-03-28 Andreas Schwab <schwab@suse.de>
2781 * system-linux-aarch64-ilp32.ads: New file.
2782 * gcc-interface/Makefile.in (LIBGNAT_TARGET_PAIRS_COMMON): Rename
2783 from LIBGNAT_TARGET_PAIRS.
2784 (LIBGNAT_TARGET_PAIRS_32, LIBGNAT_TARGET_PAIRS_64): Define.
2785 (LIBGNAT_TARGET_PAIRS): Use LIBGNAT_TARGET_PAIRS_COMMON, and
2786 LIBGNAT_TARGET_PAIRS_64 or LIBGNAT_TARGET_PAIRS_32 for -mabi=lp64
2787 or -mabi=ilp32, resp.
2789 2017-05-10 H.J. Lu <hongjiu.lu@intel.com>
2792 * system-linux-x86.ads (Memory_Size): Use Long_Integer'Size
2793 instead of Word_Size.
2795 2017-05-10 Bernd Edlinger <bernd.edlinger@hotmail.de>
2797 * raise-gcc.c (exception_class_eq): Make ec parameter const.
2799 2017-05-02 Richard Biener <rguenther@suse.de>
2801 * gcc-interface/misc.c (gnat_post_options): Do not set
2804 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
2806 * gcc-interface/trans.c (assoc_to_constructor): Make sure
2807 Corresponding_Discriminant is only called on discriminants.
2808 Skip the saving of the result only for them.
2809 (gnat_to_gnu) <N_Selected_Component>: Likewise.
2810 <N_Unchecked_Type_Conversion>: Translate the result type first.
2811 (gigi): Set TREE_NOTHROW on Begin_Handler.
2812 (stmt_list_cannot_raise_p): New predicate.
2813 (Exception_Handler_to_gnu_gcc): Emit a simple final call instead of
2814 a cleanup if the statements of the handler cannot raise.
2815 (process_freeze_entity): Use Is_Record_Type.
2816 (process_type): Likewise.
2818 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
2820 * einfo.ads (Corresponding_Record_Component): New alias
2821 for Node21 used for E_Component and E_Discriminant.
2822 * einfo.adb (Corresponding_Record_Component): New function.
2823 (Set_Corresponding_Record_Component): New procedure.
2824 (Write_Field21_Name): Handle Corresponding_Record_Component.
2825 * sem_ch3.adb (Inherit_Component): Set
2826 Corresponding_Record_Component for every component in
2827 the untagged case. Clear it afterwards for non-girder
2829 * gcc-interface/decl.c (gnat_to_gnu_entity)
2830 <E_Record_Type>: For a derived untagged type with discriminants
2831 and constraints, apply the constraints to the layout of the
2832 parent type to deduce the layout.
2833 (field_is_aliased): Delete.
2834 (components_to_record): Test DECL_ALIASED_P directly.
2835 (annotate_rep): Check that fields are present except for
2837 (create_field_decl_from): Add DEBUG_INFO_P
2838 parameter and pass it in recursive and other calls. Add guard
2839 for the manual CSE on the size.
2840 (is_stored_discriminant): New predicate.
2841 (copy_and_substitute_in_layout): Consider only
2842 stored discriminants and check that original fields are present
2843 in the old type. Deal with derived types. Adjust call to
2844 create_variant_part_from.
2846 2017-05-02 Ed Schonberg <schonberg@adacore.com>
2848 * exp_ch6.adb (Expand_Call_Helper): When locating the
2849 accessibility entity created for an access parameter, handle
2850 properly a reference to a formal of an enclosing subprogram. if
2851 the reference appears in an inherited class-wide condition, it
2852 is the rewriting of the reference in the ancestor expression,
2853 but the accessibility entity must be that of the current formal.
2855 2017-05-02 Javier Miranda <miranda@adacore.com>
2857 * exp_ch4.adb (Expand_Non_Binary_Modular_Op): New subprogram.
2858 (Expand_N_Op_Add, Expand_N_Op_Divide, Expand_N_Op_Minus,
2859 Expand_N_Op_Multiply, Expand_N_Op_Or, Expand_N_Op_Subtract):
2860 Call Expand_Non_Binary_Modular_Op.
2862 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
2864 * sem_ch3.adb (Build_Derived_Private_Type): If the parent type
2865 has discriminants, do not override the Stored_Constraint list of
2866 the full view of the derived type with that of the derived type.
2868 2017-05-02 Bob Duff <duff@adacore.com>
2870 * sem_attr.adb (Attribute_Enum_Rep): Disallow T'Enum_Rep.
2872 2017-05-02 Vasiliy Fofanov <fofanov@adacore.com>
2874 * s-os_lib.ads: Minor typo fix.
2876 2017-05-02 Vasiliy Fofanov <fofanov@adacore.com>
2878 * gnatls.adb: Merge and refactor code from Prj.Env and remove
2879 this deprecated dependency.
2881 2017-05-02 Ed Schonberg <schonberg@adacore.com>
2883 * exp_util.ads: minor comment addition.
2885 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
2887 * sem_ch3.adb (Build_Derived_Record_Type): Fix a few typos and
2888 pastos in part #3 of the head comment.
2890 2017-05-02 Ed Schonberg <schonberg@adacore.com>
2892 * exp_ch3.adb (Freeze_Type): Do not generate an invariant
2893 procedure body for a local (sub)type declaration within a
2894 predicate function. Invariant checks do not apply to these, and
2895 the expansion of the procedure will happen in the wrong scope,
2896 leading to misplaced freeze nodes.
2898 2017-05-02 Ed Schonberg <schonberg@adacore.com>
2900 * exp_util.adb (Insert_Library_Level_Action): Use proper scope
2901 to analyze generated actions. If the main unit is a body,
2902 the required scope is that of the corresponding unit declaration.
2904 2017-05-02 Arnaud Charlet <charlet@adacore.com>
2906 * einfo.adb (Declaration_Node): flip branches of
2907 an IF statement to avoid repeated negations in its condition;
2908 no change in semantics, only to improve readability.
2910 2017-05-02 Arnaud Charlet <charlet@adacore.com>
2912 * sem_case.adb: Remove extra spaces in parameter declarations.
2914 2017-05-02 Justin Squirek <squirek@adacore.com>
2916 * usage.adb: Replace space with hyphen ("run time" -> "run-time")
2917 in usage line for new -gnatwE switch.
2919 2017-05-02 Claire Dross <dross@adacore.com>
2921 * a-cofuve.ads (Remove): Remove unnecessary
2922 conditions in precondition.
2924 2017-05-02 Vasiliy Fofanov <fofanov@adacore.com>
2926 * a-stream.ads, exp_imgv.adb, sem_ch10.adb,
2927 sem_attr.adb, s-finmas.ads, osint.adb: Minor typo fix.
2929 2017-05-02 Justin Squirek <squirek@adacore.com>
2931 * sem_ch4.adb (Analyze_Case_Expression): Add check for valid
2932 alternative expression.
2933 * sem_res.adb (Resolve_Case_Expression): Ditto.
2935 2017-05-02 Ed Schonberg <schonberg@adacore.com>
2937 * exp_disp.adb (Set_All_DT_Position, In_Predef_Prim_DT):
2938 Refine predicate for the case where the primitive operation
2939 is a renaming of equality. An overriding operation that is
2940 a user-defined renaming of predefined equality inherits its
2941 slot from the overridden operation. Otherwise it is treated
2942 as a predefined op and occupies the same predefined slot as
2943 equality. A call to it is transformed into a call to its alias,
2944 which is the predefined equality. A dispatching call thus uses
2945 the proper slot if operation is further inherited and called
2946 with class-wide arguments.
2948 2017-05-02 Justin Squirek <squirek@adacore.com>
2950 * errout.adb (Set_Msg_Text): Add a case to switch the message
2951 type when the character '[' is detected signifying a warning
2952 about a run-time exception.
2953 * opt.ads Add a new Warning_Mode value for new switch
2954 * switch-b.adb (Scan_Binder_Switches): Add case for the binder
2955 to handle new warning mode
2956 * usage.adb (Usage): Add usage entry for -gnatwE
2957 * warnsw.adb (Set_Warning_Switch): Add case for the new switch
2959 2017-05-02 Ed Schonberg <schonberg@adacore.com>
2961 * sem_prag.adb (Process_Conversion): Reject an intrinsic operator
2962 declaration that operates on some fixed point type.
2964 2017-05-02 Justin Squirek <squirek@adacore.com>
2966 * a-crbtgo.adb, s-taasde.adb: Remove unused use-type clauses.
2968 2017-05-02 Hristian Kirtchev <kirtchev@adacore.com>
2970 * sem_ch6.adb (Analyze_Null_Procedure): Revert previous change.
2972 2017-05-02 Justin Squirek <squirek@adacore.com>
2974 * sem_ch4.adb (Analyze_Case_Expression): Add check for valid
2975 expression (Analyze_If_Expression): Add check for valid condition
2976 * sem_eval.adb (Eval_Case_Expression): Add check for error posted
2978 * sem_res.adb (Resolve_If_Expression): Add check for valid
2979 condition and then-expression.
2981 2017-05-02 Ed Schonberg <schonberg@adacore.com>
2983 * exp_ch3.adb (Build_Initialization_Call): Generate a null
2984 statement if the initialization call is a null procedure, as
2985 can happen with a controlled type with no explicit Initialize
2986 procedure, or an array of such.
2987 * exp_ch7.adb (Process_Object_Declaration): For a type with
2988 controlled components that has a trivial Initialize procedure,
2989 insert declaration for finalization counter after object
2991 (Make_Deep_Array_Body, Build_Initialize_statements): Do not create
2992 finalization block and attendant declarations if component has
2993 a trivial Initialize procedure.
2994 (Make_Init_Call): Do not generate a call if controlled type has
2995 a trivial Initialize procedure.
2997 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
2999 * g-forstr.ads (Data): Move Format component last.
3000 * g-forstr.adb ("+"): Adjust for above change.
3001 * g-rewdat.ads (Buffer): Move Buffer, Current, Pattern and Value last.
3002 * g-sechas.ads (Context): Move Key last.
3003 * g-socket.ads (Service_Entry_Type): Move Aliases last.
3004 * s-fileio.adb (Temp_File_Record): Move Name last.
3005 * s-regexp.adb (Regexp_Value): Move Case_Sensitive last.
3006 * xr_tabls.ads (Project_File): Move Src_Dir and Obj_Dir last.
3008 2017-05-02 Jerome Lambourg <lambourg@adacore.com>
3010 * bindusg.adb, bindgen.adb, gnatbind.adb, opt.ads: Remove the -nognarl
3011 switch introduced recently. finally not needed.
3013 2017-05-02 Hristian Kirtchev <kirtchev@adacore.com>
3015 * sem_ch6.adb (Analyze_Null_Procedure): Set the
3016 Corresponding_Body link for a null procedure declaration.
3018 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
3020 * atree.h (Flag290): Add missing terminating parenthesis.
3021 * einfo.adb (Is_Class_Wide_Clone): Use Flag290.
3022 (Set_Is_Class_Wide_Clone): Likewise.
3023 * einfo.ads (Is_Class_Wide_Clone): Likewise.
3025 2017-05-02 Gary Dismukes <dismukes@adacore.com>
3027 * checks.ads (Null_Exclusion_Static_Checks): Add Boolean
3028 parameter Array_Comp to indicate the case of an array object
3029 with null-excluding components.
3030 * checks.adb (Null_Exclusion_Static_Checks):
3031 Call Compile_Time_Constraint_Error instead of
3032 Apply_Compile_Time_Constraint_Error in the component case. Also
3033 call that when Array_Comp is True, with an appropriate warning for
3034 the array component case. Only create an explicit initialization
3035 by null in the case of an object of a null-excluding access type
3036 (and no longer do that in the component case).
3037 * sem_ch3.adb (Check_Component): Add a Boolean parameter
3038 Array_Comp defaulted to False. Pass Empty for the Comp
3039 actual when calling Null_Exclusion_Static_Checks in the case
3040 where Comp_Decl matches Object_Decl, because we don't have a
3041 component in that case. In the case of an object or component
3042 of an array type, pass True for Array_Comp on the recursive call
3045 2017-05-02 Bob Duff <duff@adacore.com>
3047 * s-taprop-linux.adb (Prio_To_Linux_Prio): New function to correctly
3048 compute the linux priority from the Ada priority. Call this everywhere
3049 required. In particular, the previous version was not doing this
3050 computation when setting the ceiling priority in various places. It
3051 was just converting to C.int, which results in a ceiling that is off
3054 2017-05-02 Ed Schonberg <schonberg@adacore.com>
3056 * sem_ch3.adb: Comment predicate inheritance.
3058 2017-05-02 Tristan Gingold <gingold@adacore.com>
3060 * s-trasym.ads: Add comment.
3062 2017-05-02 Bob Duff <duff@adacore.com>
3064 * sem_elab.adb, sem_elab.ads: Minor comment fixes.
3065 * sem_ch4.adb: Minor reformatting.
3066 * s-taprop-linux.adb, s-taspri-posix.ads: Code refactoring.
3067 * s-taspri-posix-noaltstack.ads: Minor refactoring.
3068 * sinput.ads: Minor typo fix.
3070 2017-05-02 Ed Schonberg <schonberg@adacore.com>
3072 * exp_ch9.adb (Discriminated_Size): Moved to sem_util.
3073 * sem_util.ads, sem_util.adb (Discriminated_Size): Predicate moved
3074 here from exp_ch9, to recognize objects whose creation requires
3075 dynamic allocation, so that the proper warning can be emitted
3076 when restriction No_Implicit_Heap_Allocation is in effect.
3077 * sem_ch3.adb (Analyze_Object_Declaration): Use Discriminated_Size
3078 to emit proper warning when an object that requires dynamic
3079 allocation is declared.
3081 2017-05-02 Tristan Gingold <gingold@adacore.com>
3083 * s-trasym.ads, s-trasym.adb (Enable_Cache): New.
3085 2017-05-02 Ed Schonberg <schonberg@adacore.com>
3087 * sem_ch4.adb (Find_Equality_Types, Try_One_Interp): The same relaxed
3088 visibility rules for equality operators that apply within an
3089 instantiation apply within an inlined body.
3090 * sem_type.adb (Add_One_Interp): ditto.
3092 2017-05-02 Hristian Kirtchev <kirtchev@adacore.com>
3094 * sem_prag.adb (Analyze_Pragma): Forbid pragma Contract_Cases on null
3097 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
3100 (Name_Assume, Name_Attribute_Definition, Name_Loop_Optimize,
3101 Name_No_Tagged_Streams): Move to regular pragmas. Add
3102 placeholders for Default_Scalar_Storage_Order, Dispatching_Domain,
3103 and Secondary_Stack_Size.
3104 (Pragma_Id): Move Pragma_Assume,
3105 Pragma_Attribute_Definition, Pragma_Loop_Optimize and
3106 Pragma_No_Tagged_Streams to second part.
3108 2017-05-02 Hristian Kirtchev <kirtchev@adacore.com>
3110 * exp_attr.adb: Minor reformatting.
3112 2017-05-02 Ed Schonberg <schonberg@adacore.com>
3114 * sem_ch4.adb (Analyze_Selected_Component): Improve error
3115 detection for illegal references to private components or
3116 operations of a protected type in the body of the type.
3118 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
3120 * opt.ads: Add missing GNAT markers in comments.
3121 * opt.adb (Set_Opt_Config_Switches): Do not override earlier
3122 settings of Optimize_Alignment at the end.
3124 2017-05-02 Hristian Kirtchev <kirtchev@adacore.com>
3126 * checks.adb (Apply_Constraint_Check): Do not apply
3127 a discriminant check when the associated type is a constrained
3128 subtype created for an unconstrained nominal type.
3129 * exp_attr.adb: Minor reformatting.
3131 2017-05-02 Bob Duff <duff@adacore.com>
3133 * sem_ch3.adb (OK_For_Limited_Init_In_05): Handle correctly
3134 the N_Raise_Expression case.
3135 * sem_ch6.adb (Check_Limited_Return): Minor: clarify comment,
3138 2017-05-02 Yannick Moy <moy@adacore.com>
3140 * exp_ch4.adb (Expand_N_Op_Ne): Do not bump parenthese level and
3141 optimize length comparison in GNATprove mode.
3142 * exp_spark.adb (Expand_SPARK_Op_Ne): New function to rewrite
3143 operator /= into negation of operator = when needed.
3144 (Expand_SPARK): Call new
3145 function to expand operator /=.
3147 2017-05-02 Ed Schonberg <schonberg@adacore.com>
3149 * exp_fixd.adb (Expand_Divide_Fixed_By_Fixed_Giving_Fixed):
3150 Simplify the expression for a fixed-fixed division to remove
3151 divisions by constants whenever possible, as an optimization
3152 for restricted targets.
3154 2017-05-02 Hristian Kirtchev <kirtchev@adacore.com>
3156 * checks.adb, sem_ch3.adb, sem_ch6.adb: Minor reformatting.
3158 2017-05-02 Bob Duff <duff@adacore.com>
3160 * exp_attr.adb (Callable, Identity, Terminated): Use Find_Prim_Op
3161 to find primitive ops, instead of using an Identifier that will
3162 later be looked up. This is necessary because these ops are not
3163 necessarily visible at all places where we need to call them.
3164 * exp_util.ads: Minor comment fix.
3166 2017-05-02 Ed Schonberg <schonberg@adacore.com>
3168 * sem_ch6.adb (Fully_Conformant_Expressions): Two entity
3169 references are fully conformant if they are both expansions
3170 of the discriminant of a protected type, within one of the
3171 protected operations. One occurrence may be expanded into a
3172 constant declaration while the other is an input parameter to
3173 the corresponding generated subprogram.
3175 2017-05-02 Justin Squirek <squirek@adacore.com>
3177 * sem_ch3.adb (Check_For_Null_Excluding_Components): Created for
3178 recursivly searching composite-types for null-excluding access
3179 types and verifying them.
3180 (Analyze_Object_Declaration): Add a
3181 call to Check_Null_Excluding_Components for static verification
3182 of non-initialized objects.
3183 * checks.adb, checks.ads (Null_Exclusion_Static_Checks): Added
3184 a parameter for a composite-type's component and an extra case
3185 for printing component information.
3187 2017-05-02 Yannick Moy <moy@adacore.com>
3189 * sem_ch10.adb (Analyze_Subunit): Take
3190 configuration pragma into account when restoring appropriate
3191 pragma for analysis of subunit.
3193 2017-05-02 Justin Squirek <squirek@adacore.com>
3195 * s-tasren.adb, s-tasini.adb, s-taprop-linux.adb,
3196 s-mudido-affinity.adb,, a-exetim-posix.adb, a-direio.adb,
3197 g-socket.adb, s-taenca.adb, s-fileio.adb: Remove unused use-type
3198 clauses from the runtime.
3200 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
3202 * freeze.adb (Check_Component_Storage_Order): Do not treat bit-packed
3203 array components specially.
3205 2017-05-02 Ed Schonberg <schonberg@adacore.com>
3207 * sem_ch8.adb (Premature_Usage): If the premature usage of
3208 an entity is as the expression in its own object decaration,
3209 rewrite the reference as Any_Id to prevent cascaded errors or
3210 compiler loops when such an entity is used in an address clause.
3212 2017-05-01 Eric Botcazou <ebotcazou@adacore.com>
3214 * gcc-interface/decl.c (components_to_record): Add missing guard.
3216 2017-05-01 Eric Botcazou <ebotcazou@adacore.com>
3218 * gcc-interface/decl.c (components_to_record): Add more comments.
3219 Put back pending fields onto the regular list if the misalignment
3220 happens to cancel itself.
3222 2017-04-28 Ed Schonberg <schonberg@adacore.com>
3224 * sem_ch4.adb (Complete_Object_Operation): When rewriting the
3225 controlling actual in a prefixed call, preserve the original node
3226 information if the prefix itself has been rewritten, for ASIS use.
3228 2017-04-28 Hristian Kirtchev <kirtchev@adacore.com>
3230 * exp_ch6.adb (Insert_Post_Call_Actions):
3231 Code clean up. Insert the post-call actions after an enclosing
3232 procedure call when N denotes a function call and appears as an
3233 actual parameter in the procedure call.
3235 2017-04-28 Eric Botcazou <ebotcazou@adacore.com>
3237 * freeze.adb (Check_Component_Storage_Order): If there is a clause
3238 for the component, also reject the attribute if the component
3239 doesn't end on a byte boundary and its scalar storage order is
3240 different from that of the enclosing record type.
3242 2017-04-28 Javier Miranda <miranda@adacore.com>
3244 * atree.ads (Info_Messages): Removed.
3245 (Warning_Info_Messages): New counter.
3246 (Report_Info_Messages): New counter.
3247 * err_vars.ads Update documentation.
3248 * errout.adb (Delete_Warning_And_Continuations): Update
3249 Info_Message occurrences.
3250 (Error_Msg_Internal): Update Info_Message occurrences.
3251 (Delete_Warning): Update Info_Message occurrences.
3252 (Write_Error_Summary): Update Info_Message occurrences.
3253 (Output_Messages): Update Info_Message occurrences.
3254 (To_Be_Removed): Update Info_Message occurrences.
3255 (Reset_Warnings): Update Info_Message occurrences.
3256 * errutil.adb (Error_Msg): Update Info_Message occurrences.
3257 (Finalize): Update Info_Message occurrences.
3258 (Initialize): Update Info_Message occurrences.
3259 * erroutc.adb (Delete_Msg): Update Info_Message occurrences.
3260 (Compilation_Errors): Update Info_Message_Occurences.
3262 2017-04-28 Eric Botcazou <ebotcazou@adacore.com>
3264 * exp_ch3.adb (Build_Init_Statements): Likewise on Nam.
3265 * freeze.adb (Check_Component_Storage_Order): And on Comp_Byte_Aligned.
3266 * sem_aggr.adb (Resolve_Record_Aggregate): Initialize Box_Node.
3267 * sem_attr.adb (Loop_Entry): Initialize Encl_Loop.
3268 * sem_ch12.adb (Build_Operator_Wrapper): Add pragma Warnings on Expr.
3269 * sem_ch13.adb (Validate_Address_Clauses): Initialize Y_Alignment and
3271 * sem_eval.adb (Why_Not_Static): Initialize Typ.
3272 * sem_prag.adb (Analyze_Pragma): Add pragma Warnings on Str.
3274 2017-04-28 Bob Duff <duff@adacore.com>
3276 * sem_util.ads, sem_util.adb (Might_Raise): New function
3277 that replaces Is_Exception_Safe, but has the opposite
3278 sense. Is_Exception_Safe was missing various cases -- calls inside
3279 a pragma Debug, calls inside an 'if' or assignment statement,
3280 etc. Might_Raise now walks the entire subtree looking for things
3282 * exp_ch9.adb (Is_Exception_Safe): Remove.
3283 (Build_Protected_Subprogram_Body): Replace call to
3284 Is_Exception_Safe with "not Might_Raise". Misc cleanup (use
3285 constants where possible).
3286 * exp_ch7.adb: Rename Is_Protected_Body -->
3287 Is_Protected_Subp_Body. A protected_body is something different
3290 2017-04-28 Eric Botcazou <ebotcazou@adacore.com>
3292 * inline.adb (Expand_Inlined_Call): Initialize Targ1 variable.
3293 * par-ch3.adb (P_Component_Items): Initialize Decl_Node variable.
3294 (P_Discrete_Choice_List): Initialize Expr_Node variable.
3295 * par-ch9.adb (P_Task): Initialize Aspect_Sloc variable.
3296 (P_Protected): Likewise.
3297 * sem_case.adb (Check_Duplicates):
3298 Add pragma Warnings on variable.
3299 * sem_ch12.adb (Preanalyze_Actuals): Initialize Vis variable.
3300 * sem_ch4.adb (List_Operand_Interps): Add pragma Warnings on variable.
3301 * sem_ch5.adb (Analyze_Assignment): Initialize Save_Full_Analysis.
3302 (Analyze_Exit_Statement): Initialize Scope_Id variable.
3303 (Analyze_Iterator_Specification): Initialize Bas variable.
3304 * sem_ch9.adb (Allows_Lock_Free_Implementation): Initialize
3305 Error_Count (Satisfies_Lock_Free_Requirements): Likewise.
3306 (Analyze_Accept_Statement): Initialize Task_Nam.
3308 2017-04-28 Hristian Kirtchev <kirtchev@adacore.com>
3310 * checks.adb (Install_Primitive_Elaboration_Check):
3311 Do not generate an elaboration check if all checks have been
3314 2017-04-28 Ed Schonberg <schonberg@adacore.com>
3316 * sem_ch13.adb (Analyze_Aspect_Specifications, case
3317 Interrupt_Handler and Attach_Handler): Generate reference
3318 to protected operation to prevent spurious warnings about
3319 unreferenced entities. Previous scheme failed with style checks
3322 2017-04-28 Ed Schonberg <schonberg@adacore.com>
3324 * sem_prag.adb (Relocate_Pragmas_To_Body): A pragma Warnings
3325 that follows an expression function must not be relocated to
3326 the generated body, because it applies to the code that follows.
3328 2017-04-28 Gary Dismukes <dismukes@adacore.com>
3330 * sem_util.adb (Is_Dependent_Component_Of_Mutable_Object): Test
3331 Relaxed_RM_Semantics to avoid having CodePeer issue errors on
3332 code that might violate the more stringent checking for 'Access
3333 introduced in Ada 2005.
3335 2017-04-28 Arnaud Charlet <charlet@adacore.com>
3337 * a-cforse.adb: minor style fix in comment.
3339 2017-04-28 Eric Botcazou <ebotcazou@adacore.com>
3341 * exp_ch9.adb (Build_Lock_Free_Unprotected_Subprogram_Body): Also
3342 initialize Block_Decls variable.
3343 (Expand_Entry_Barrier): Add pragma Warnings on Func_Body variable.
3344 (Build_Dispatching_Requeue): Add pragma Warnings on Op variable.
3345 * exp_disp.adb (Expand_Interface_Actuals): Initialize
3346 Formal_DDT and Actual_DDT variables.
3347 (Expand_Interface_Thunk): Initialize Iface_Formal.
3348 (Make_DT): Initialize Size_Comp.
3349 (Make_Select_Specific_Data_Table): Initialize Decls.
3350 * exp_dist.adb (Add_RACW_Primitive_Declarations_And_Bodies):
3351 Also initialize more RPC_Receiver_* variables.
3352 (Build_To_Any_Function): Initialize Cstr_Formal.
3353 * exp_prag.adb (Expand_Pragma_Contract_Cases): Initialize Msg_Str.
3355 2017-04-28 Ed Schonberg <schonberg@adacore.com>
3357 * sem_ch6.adb (Freeze_Type_Refs): For an interface conversion
3358 node between access types, freeze the designated type as well,
3359 so that dispatch table pointers are created in the proper scope,
3360 and not in the constructed body of the expression function.
3362 2017-04-28 Bob Duff <duff@adacore.com>
3364 * alloc.ads (Nodes_Initial): Go back to previous value. The large
3365 value makes large compilations faster, but small compilations slower.
3367 2017-04-28 Arnaud Charlet <charlet@adacore.com>
3369 * sem_util.adb: minor typos in Is_Child_Or_Sibling.
3371 2017-04-28 Hristian Kirtchev <kirtchev@adacore.com>
3373 * erroutc.adb (Compilation_Errors): Do not consider info messages
3374 as suitable warnings when warnings must be treated as errors.
3375 * sem_ch7.adb (Analyze_Package_Specification): Do not consider
3376 internally-generated packages when outputting completion
3378 * errout.adb (Output_Messages): Do not consider info messages as
3379 suitable warnings when warnings must be treated as errors.
3380 * errutil.adb (Finalize): Do not consider info messages as
3381 suitable warnings when warnings must be treated as errors.
3383 2017-04-28 Eric Botcazou <ebotcazou@adacore.com>
3385 * warnsw.ads: Minor fix for incorrect wording in comment.
3387 2017-04-28 Ed Schonberg <schonberg@adacore.com>
3389 * sem_res.adb (In_Instance_Code): New predicate in
3390 Valid_Conversion, to determine whether a type conversion appears
3391 as (or within) an actual for a formal object. Type conversions
3392 in instances are not rechecked in Valid_Conversion because
3393 visibility changes between generic location andi instance may
3394 lead to spurious errors, but conversions within an actual must be
3395 fully checked, and they are not fully resolved when pre-analyzing
3398 2017-04-28 Hristian Kirtchev <kirtchev@adacore.com>
3400 * exp_ch6.adb (Expand_N_Extended_Return_Statement): Use
3401 New_Copy_Tree instead of Relocate_Node as any subsequent copies
3402 of the relocated node will have mangled Parent pointers.
3403 * sem_util.adb (Build_NCT_Hash_Tables): Reset both hash
3404 tables used in conjunction with entity and itype replication.
3405 (Visit_Entity): Rewrite the restriction on which entities
3406 require duplication. The restriction now includes all types.
3408 2017-04-28 Hristian Kirtchev <kirtchev@adacore.com>
3410 * a-cofuse.ads, a-cfdlli.ads, a-cfhase.adb, a-cfhase.ads, a-cfinve.adb,
3411 a-cfinve.ads, a-cforma.adb, a-cforma.ads, a-cofuma.adb, a-cofuma.ads,
3412 a-cfhama.adb, a-cfhama.ads, a-cforse.adb: Minor reformatting and code
3415 2017-04-28 Hristian Kirtchev <kirtchev@adacore.com>
3417 * exp_util.adb, g-dyntab.adb, par-ch4.adb, sem_util.adb, sem_attr.adb,
3418 gnat1drv.adb, exp_disp.adb, namet.adb, alloc.ads: Minor reformatting.
3420 2017-04-28 Gary Dismukes <dismukes@adacore.com>
3422 * exp_util.adb: Minor reformatting.
3424 2017-04-28 Ed Schonberg <schonberg@adacore.com>
3426 * sem_ch4.adb: Fix copy/pasto.
3428 2017-04-27 Tristan Gingold <gingold@adacore.com>
3430 * gcc-interface/Make-lang.in: Define EH_MECHANISM while building
3431 raise-gcc.c. Fix include search path for raise-gcc.c
3433 2017-04-27 Eric Botcazou <ebotcazou@adacore.com>
3435 * fe.h (Warn_On_Questionable_Layout): Declare.
3436 * warnsw.ads (Warn_On_Record_Holes): Move down.
3437 (Warn_On_Questionable_Layout): New boolean variable.
3438 (Warning_Record): Add Warn_On_Questionable_Layout field.
3439 * warnsw.adb (All_Warnings): Set Warn_On_Questionable_Layout.
3440 (Restore_Warnings): Likewise.
3441 (Save_Warnings): Likewise.
3442 (Set_Dot_Warning_Switch): Handle 'q' and 'Q' letters.
3443 * gcc-interface/decl.c (gnat_to_gnu_entity): Adjust call to
3444 components_to_record.
3445 (gnu_field_to_gnat): New function.
3446 (warn_on_field_placement): Likewise.
3447 (components_to_record): Add GNAT_RECORD_TYPE and remove REORDER
3448 parameters. Rename local variables and adjust recursive call.
3449 Rework final scan of the field list and implement warnings on the
3450 problematic placement of specific sorts of fields.
3452 2017-04-27 Bob Duff <duff@adacore.com>
3454 * errout.adb, exp_aggr.adb, exp_attr.adb, exp_code.adb, fname.adb,
3455 * fname.ads, freeze.adb, inline.adb, lib.adb, lib.ads, lib-list.adb,
3456 * lib-load.adb, lib-writ.adb, par.adb, restrict.adb, rtsfind.adb,
3457 * sem.adb, sem_cat.adb, sem_ch10.adb, sem_ch12.adb, sem_ch3.adb,
3458 * sem_ch4.adb, sem_ch6.adb, sem_ch8.adb, sem_ch9.adb, sem_elab.adb,
3459 * sem_intr.adb, sem_res.adb, sem_util.adb, sem_warn.adb, sprint.adb:
3460 For efficiency, cache results of Is_Internal_File_Name and
3461 Is_Predefined_File_Name in the Units table. This avoids a lot
3462 of repeated text processing.
3464 2017-04-27 Emmanuel Briot <briot@adacore.com>
3466 * g-comlin.adb (Sort_Sections): remove useless test.
3468 2017-04-27 Claire Dross <dross@adacore.com>
3470 * a-cfhase.adb, a-cfhase.ads (=): Generic parameter removed to
3471 allow the use of regular equality over elements in contracts.
3472 (Formal_Model): Ghost package containing model functions that are
3473 used in subprogram contracts.
3474 (Current_To_Last): Removed, model functions should be used instead.
3475 (First_To_Previous): Removed, model functions should be used instead.
3476 (Strict_Equal): Removed, model functions should be used instead.
3477 (No_Overlap): Removed, model functions should be used instead.
3478 (Equivalent_Keys): Functions over cursors are removed. They were
3479 awkward with explicit container parameters.
3480 * a-cforse.adb, a-cforse.ads (=): Generic parameter removed to
3481 allow the use of regular equality over elements in contracts.
3482 (Formal_Model): Ghost package containing model functions that
3483 are used in subprogram contracts.
3484 (Current_To_Last): Removed, model functions should be used instead.
3485 (First_To_Previous): Removed, model functions should be used instead.
3486 (Strict_Equal): Removed, model functions should be used instead.
3487 (No_Overlap): Removed, model functions should be used instead.
3489 2017-04-27 Yannick Moy <moy@adacore.com>
3491 * gnat1drv.adb: Code cleanup.
3493 2017-04-27 Ed Schonberg <schonberg@adacore.com>
3495 * exp_util.adb (Replace_Entity): The prefix of a 'Result
3496 attribute reference in a post- condition is the subprogram to
3497 which the condition applies. If the condition is inherited
3498 by a type extension, the prefix becomes a reference to the
3499 inherited operation, but there is no need to create a wrapper
3500 for this operation, because 'Result is expanded independently
3501 when elaborating the postconditions.
3503 2017-04-27 Bob Duff <duff@adacore.com>
3505 * sinput.adb: Minor code cleanup.
3506 * namet.adb (Append): Create faster versions of
3507 Append(String) and Append(Name_Id) by using slice assignment
3509 * sem_util.adb (In_Instance): Speed this up by removing
3510 unnecessary tests; Is_Generic_Instance is defined for all
3512 * sem_util.ads, sem_util.adb (In_Parameter_Specification):
3513 Remove unused function.
3514 * alloc.ads (Nodes_Initial): Use a much larger value, because
3515 the compiler was spending a lot of time copying the nodes table
3516 when it grows. This number was chosen in 1996, so is rather out
3517 of date with current memory sizes. Anyway, it's virtual memory.
3518 Get rid of Orig_Nodes_...; use Node_... instead.
3519 * atree.adb (Lock): Do not release the Nodes tables; it's a
3521 Orig_Nodes_ ==> Nodes_
3522 * nlists.adb: Orig_Nodes_ ==> Nodes_
3523 * g-table.adb: Remove unused "with" clause.
3524 * g-table.ads, table.ads: Remove Big_Table_Type, which should
3525 not be used by clients.
3526 * g-dyntab.adb (Last_Allocated): New function
3527 to encapsulate T.P.Last_Allocated, which I'm thinking of changing.
3529 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3531 * sem_eval.adb (Subtypes_Statically_Compatible): Remove duplicated
3533 (Subtypes_Statically_Match): Remove duplicate check.
3534 * sem_prag.adb (Check_Arg_Is_External_Name): Remove duplicate check.
3536 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3538 * exp_aggr.adb (Replace_Type): Remove the special processing
3539 for selected components.
3540 * exp_attr.adb (Expand_N_Attribute_Reference): Merge the
3541 processing for attributes Fixed_Value and Integer_Value.
3542 * exp_util.adb (Side_Effect_Free): Merge the processing for
3543 qualified expressions, type conversions, and unchecked type
3545 * g-comlin.adb (Is_In_Config): Merge the processing for No_Space
3547 * par-ch3.adb (P_Declarative_Items): Merge the processing for
3548 tokens function, not, overriding, and procedure.
3549 * sem_ch6.adb (Fully_Conformant_Expressions): Merge the processing
3550 for qualified expressions, type conversions, and unchecked
3552 * sem_util.adb (Compile_Time_Constraint_Error): Merge the
3553 processing for Ada 83 and instances.
3554 (Object_Access_Level): Merge the processing for indexed components
3555 and selected components.
3556 * uname.adb (Add_Node_Name): Merge the processing for stubs.
3558 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3560 * checks.adb (Install_Primitive_Elaboration_Check):
3561 Do not generate the check when restriction No_Elaboration_Code
3564 2017-04-27 Ed Schonberg <schonberg@adacore.com>
3566 * exp_disp.adb (Build_Class_Wide_Check): New subsidiary
3567 of Expand_Dispatching_Call. If the denoted subprogram has a
3568 class-wide precondition, this is the only precondition that
3569 applies to the call, rather that the class-wide preconditions
3570 that may apply to the body that is executed. (This is specified
3573 2017-04-27 Yannick Moy <moy@adacore.com>
3575 * gnat1drv.adb (Adjust_Global_Switches): Issue
3576 a warning in GNATprove mode if the runtime library does not
3577 support IEEE-754 floats.
3579 2017-04-27 Ed Schonberg <schonberg@adacore.com>
3581 * sem_prag.adb (Inherit_Class_Wide_Pre): If the parent operation
3582 is itself inherited it does not carry any contract information,
3583 so examine its parent operation which is its Alias.
3585 2017-04-27 Ed Schonberg <schonberg@adacore.com>
3587 * sem_attr.adb (Analyze_Attribute, case 'Image): In Ada2012 the
3588 prefix can be an object reference in which case Obj'Image (X)
3589 can only be interpreted as an indexing of the parameterless
3590 version of the attribute.
3591 * par-ch4.adb (P_Name): An attribute reference can be the prefix of
3592 an indexing or a slice operation if the attribute does not require
3593 parameters. In Ada2012 'Image also belongs in this category,
3594 and A'Image (lo .. hi) is legal and must be parsed as a slice.
3596 2017-04-27 Yannick Moy <moy@adacore.com>
3598 * exp_ch4.adb: Minor reformatting.
3599 * gnat1drv.adb (Adjust_Global_Switches): When in GNATprove mode,
3600 disable the CodePeer and C generation modes. Similar to the
3601 opposite actions done in CodePeer mode.
3603 2017-04-27 Yannick Moy <moy@adacore.com>
3605 * sem_res.adb: Remove duplicate code.
3606 * sem_attr.adb: Delete duplicate code.
3608 2017-04-27 Bob Duff <duff@adacore.com>
3610 * g-dyntab.adb: Reduce the amount of copying in
3611 Release. No need to copy items past Last.
3613 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3615 * checks.adb Add with and use clauses for Sem_Disp.
3616 (Install_Primitive_Elaboration_Check): New routine.
3617 * checks.ads (Install_Primitive_Elaboration_Check): New routine.
3618 * exp_attr.adb (Expand_N_Attribute_Reference): Clean up the
3619 processing of 'Elaborated.
3620 * exp_ch6.adb (Expand_N_Subprogram_Body): Install a primitive
3623 2017-04-27 Bob Duff <duff@adacore.com>
3625 * g-dyntab.ads, g-dyntab.adb, g-table.ads: Remove incorrect assertion.
3626 If the table grows and then shrinks back to empty, we won't necessarily
3627 point back to the empty array. Code cleanups.
3628 * sinput.ads: Add 'Base to Size clause to match the declared
3631 2017-04-27 Claire Dross <dross@adacore.com>
3633 * a-cforma.adb, a-cforma.ads (=): Generic parameter removed to
3634 allow the use of regular equality over elements in contracts.
3635 (Formal_Model): Ghost package containing model functions that
3636 are used in subprogram contracts.
3637 (Current_To_Last): Removed, model functions should be used instead.
3638 (First_To_Previous): Removed, model functions should be used instead.
3639 (Strict_Equal): Removed, model functions should be used instead.
3640 (No_Overlap): Removed, model functions should be used instead.
3641 * a-cofuma.adb, a-cofuma.ads (Enable_Handling_Of_Equivalence)
3642 Boolean generic parameter to disable contracts for equivalence
3644 (Witness): Create a witness of a key that is used for handling of
3645 equivalence between keys.
3646 (Has_Witness): Check whether a witness is contained in a map.
3647 (W_Get): Get the element associated to a witness.
3648 (Lift_Equivalent_Keys): Removed, equivalence between keys is handled
3650 * a-cofuse.adb, a-cofuse.ads (Enable_Handling_Of_Equivalence)
3651 Boolean generic parameter to disable contracts for equivalence
3653 * a-cfhama.adb, a-cfhama.ads (Formal_Model.P) Disable handling
3654 of equivalence on functional maps.
3655 * a-cfdlli.adb, a-cfdlli.ads (Formal_Model.P) Disable handling
3656 of equivalence on functional maps.
3658 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3660 * exp_ch9.adb (Expand_Entry_Barrier): Code
3661 cleanup. Do not perform the optimization which removes the
3662 declarations of the discriminant and component renamings when
3663 validity checks on operands and attributes are in effect.
3665 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3667 * exp_spark.adb, exp_util.adb, sem_ch7.adb, g-dyntab.adb, g-dyntab.ads,
3668 freeze.adb, a-cfinve.ads, a-cofuma.adb, a-cofuma.ads, a-cfhama.adb,
3669 a-cfhama.ads, a-cofove.ads: Minor reformatting.
3671 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3673 * g-debpoo.adb (Dump_Gnatmem): Protect against a possible null
3674 pointer dereference.
3675 * g-spipat.adb (Dump): Code clean up. Protect against a possible
3676 null pointer dereference.
3678 2017-04-27 Bob Duff <duff@adacore.com>
3680 * g-dyntab.ads, g-dyntab.adb: Default for Table_Low_Bound.
3681 Rename Empty --> Empty_Table_Ptr, and don't duplicate code for it.
3682 Free renames Init, since they do the same thing.
3683 * g-table.ads: Default for Table_Low_Bound.
3684 * table.ads: Default for Table_Low_Bound, Table_Initial, and
3687 2017-04-27 Bob Duff <duff@adacore.com>
3689 * g-dyntab.ads, g-dyntab.adb: Add assertions to subprograms that
3691 * atree.adb, elists.adb, fname-uf.adb, ghost.adb, inline.adb,
3692 * lib.adb, namet.adb, nlists.adb, sem.adb, sinput.adb, stringt.adb:
3693 Reorder code so that above assertions do not fail.
3694 * table.ads: Remove obsolete comment on Locked.
3696 2017-04-27 Claire Dross <dross@adacore.com>
3698 * a-cfdlli.ads: Code cleanup.
3700 2017-04-27 Yannick Moy <moy@adacore.com>
3702 * exp_spark.adb (Expand_SPARK_Freeze_Type): Build a DIC procedure
3703 when needed for proof. (Expand_SPARK): Call the new procedure.
3704 * exp_util.ads Fix typo.
3706 2017-04-27 Gary Dismukes <dismukes@adacore.com>
3708 * a-cofuma.ads, a-cfhama.ads: Minor reformatting, grammar, and typo
3711 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3713 * sem_elab.adb Add new type Visited_Element
3714 and update the contents of table Elab_Visited. Various code clean up.
3715 (Check_Elab_Call): Determine whether a prior call to
3716 the same subprogram was already examined within the same context.
3717 (Check_Internal_Call_Continue): Register the subprogram being
3718 called as examined within a particular context. Do not suppress
3719 elaboration warnings.
3721 2017-04-27 Gary Dismukes <dismukes@adacore.com>
3723 * xoscons.adb, osint.ads: Minor reformatting.
3725 2017-04-27 Bob Duff <duff@adacore.com>
3727 * g-dyntab.ads, g-dyntab.adb: Misc cleanup. Rename
3728 Table_Count_Type --> Table_Last_Type, because the name
3729 was confusing (a "count" usually starts at zero). Add
3730 functionality supported or needed by other tables packages
3731 (Move, Release_Threshold).
3732 * g-table.ads, g-table.adb: This is now just a thin wrapper
3733 around g-dyntab.ads/g-dyntab.adb. Add functionality supported
3734 or needed by other tables packages (Save, Restore).
3735 * table.ads, table.adb: This is now just a thin wrapper around
3736 * g-table.ads/g-table.adb.
3737 * namet.h, scos.h, uintp.h: These files are reaching into the
3738 private data of some instances of g-table, whose names changed,
3739 so the above change requires some adjustment here. It now uses
3742 2017-04-27 Bob Duff <duff@adacore.com>
3744 * namet.adb, namet.ads: Minor: remove unused procedures.
3746 2017-04-27 Eric Botcazou <ebotcazou@adacore.com>
3748 * checks.adb (Apply_Scalar_Range_Check): Initialize Ok variable too.
3749 (Minimize_Eliminate_Overflows): Initialize Llo and Lhi.
3750 Add pragma Warnings on Rtype variable in nested block. *
3751 * exp_ch3.adb (Build_Init_Statements): Initialize VAR_LOC.
3752 * exp_ch4.adb (Expand_Concatenate): Initialize 3 variables.
3753 (Size_In_Storage_Elements): Add pragma Warnings on Res variable.
3754 * exp_ch7.adb (Build_Adjust_Statements): Initialize Bod_Stmts.
3755 (Process_Component_List_For_Finalize): Initialize Counter_Id.
3756 (Build_Finalize_Statements): Initialize Bod_Stmts.
3757 * exp_disp.adb (Expand_Dispatching_Call): Initialize SCIL_Node.
3759 2017-04-27 Claire Dross <dross@adacore.com>
3761 * a-cfhama.adb, a-cfhamai.ads (=): Generic parameter removed to
3762 allow the use of regular equality over elements in contracts.
3763 (Formal_Model): Ghost package containing model functions that are
3764 used in subprogram contracts.
3765 (Current_To_Last): Removed, model
3766 functions should be used instead.
3767 (First_To_Previous): Removed, model functions should be used instead.
3768 (Strict_Equal): Removed, model functions should be used instead.
3769 (No_Overlap): Removed, model functions should be used instead.
3770 (Equivalent_Keys): Functions over cursors are removed. They were
3771 awkward with explicit container parameters.
3772 * a-cofuma.adb, a-cofuma.ads (Lift_Equivalent_Keys): New lemma
3773 (proof only) procedure to help GNATprove when equivalence over
3774 keys is not equality.
3776 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3778 * exp_util.adb, a-cfdlli.adb, a-cfdlli.ads, exp_ch9.adb, g-dyntab.adb,
3779 sem_dim.adb, a-cfinve.adb, a-cfinve.ads, a-cofove.adb, a-cofove.ads:
3780 Minor reformatting and code cleanups.
3782 2017-04-27 Ed Schonberg <schonberg@adacore.com>
3784 * freeze.adb (Build_Inherited_Condition_Pragmas): New procedure,
3785 subsidiary of Check_Inherited_Conditions, to build pragmas for an
3786 operation whose ancestor has classwide pre/postconditions. This
3787 is used both to check the legality of the inheritance in Ada
3788 and in SPARK, and to determine whether a wrapper is needed for
3789 an inherited operation.
3790 * exp_util.adb (Build_Class_Wide_Expression, Replace_Entity):
3791 Improve placement of error message for inherited classwide
3792 conditions that become illegal on type derivation.
3794 2017-04-27 Yannick Moy <moy@adacore.com>
3796 * sem_ch12.adb (Analyze_Generic_Package_Declaration): Set
3797 SPARK_Mode from context on generic package.
3798 * sem_ch7.adb (Analyze_Package_Declaration): Simplify code to remove
3801 2017-04-27 Claire Dross <dross@adacore.com>
3803 * a-cofuve.ads (Range_Shifted): Rewrite precondition to avoid
3804 overflows in computations.
3805 * a-cofove.ads (Capacity_Range): Rewrite last bound to avoid
3806 overflows in computations.
3807 (Insert): Rewrite precondition to avoid overflows in computations.
3808 * a-cfinve.ads (Capacity_Range): Rewrite last bound to avoid
3809 overflows in computations.
3810 (Insert): Rewrite precondition to avoid overflows in computations.
3812 2017-04-27 Steve Baird <baird@adacore.com>
3814 * exp_ch9.adb (Expand_N_Asynchronous_Select): Initialize the Cancel
3815 flag when it is declared in order to avoid confusing CodePeer about
3816 the possibility of an uninitialized variable read.
3818 2017-04-27 Ed Schonberg <schonberg@adacore.com>
3820 * sem_dim.adb (Analyze_Dimension_Object_Declaration): There is
3821 no dimensionality error if the subtype of the expression is
3822 identical to the nominal subtype in the declaration, even though
3823 the expression itself may have been constant-folded and lack a
3825 * sem_dim.ads: Add comments on setting of dimension vectors and
3826 its interaction with node rewritings and side-effect removal.
3828 2017-04-27 Bob Duff <duff@adacore.com>
3830 * debug.adb: Minor comment correction.
3831 * sem_dim.ads: Minor reformatting and typo fixes.
3833 2017-04-27 Bob Duff <duff@adacore.com>
3835 * g-table.adb, g-table.adsa, scos.h: From the C side, access First and
3836 Last of the tables via function calls, rather than relying on layout
3839 2017-04-27 Ed Schonberg <schonberg@adacore.com>
3841 * exp_util.adb: No wrapper in GNATprove mode.
3843 2017-04-27 Yannick Moy <moy@adacore.com>
3845 * sem_res.adb (Resolve_Comparison_Op): Always
3846 evaluate comparisons between values of universal types.
3848 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3850 * sem_elab.adb (Check_Internal_Call_Continue): Do not generate
3851 an elaboration counter nor a check when in GNATprove mode.
3852 * sem_util.adb (Build_Elaboration_Entity): Do not create an
3853 elaboration counter when in GNATprove mode.
3855 2017-04-27 Ed Schonberg <schonberg@adacore.com>
3857 * freeze.adb: copy-paste typo.
3859 2017-04-27 Yannick Moy <moy@adacore.com>
3861 * sem_prag.adb (Analyze_Pre_Post_In_Decl_Part):
3862 Use correct test to detect call in GNATprove mode instead of
3865 2017-04-27 Claire Dross <dross@adacore.com>
3867 * a-cfdlli.adb, a-cfdlli.ads (Formal_Model.M_Elements_In_Union):
3868 New property function expressing that the element of a
3869 sequence are contained in the union of two sequences.
3870 (Formal_Model.M_Elements_Included): New property function
3871 expressing that the element of a sequence are another sequence.
3872 (Generic_Sorting): Use new property functions to state that
3873 elements are preserved by Sort and Merge.
3874 * a-cofove.adb, a-cofove.ads (=): Generic parameter removed to
3875 allow the use of regular equality over elements in contracts.
3876 (Formal_Model): Ghost package containing model functions
3877 that are used in subprogram contracts. (Capacity):
3878 On unbounded containers, return the maximal capacity.
3879 (Current_To_Last): Removed, model functions should be used instead.
3880 (First_To_Previous): Removed, model functions should be used instead.
3881 (Append): Default parameter value replaced
3882 by new wrapper to allow more precise contracts.
3883 (Insert): Subprogram restored, it seems it was useful to users even if
3885 (Delete): Subprogram restored, it seems it was useful to users even if
3887 (Prepend): Subprogram restored, it seems it was useful to users even
3888 if it is inefficient.
3889 (Delete_First): Subprogram restored, it seems it
3890 was useful to users even if it is inefficient. (Delete_Last):
3891 Default parameter value replaced by new wrapper to allow more
3893 (Generic_Sorting.Merge): Subprogram restored.
3894 * a-cfinve.adb, a-cfinve.ads (=): Generic parameter removed to
3895 allow the use of regular equality over elements in contracts.
3896 (Formal_Model): Ghost package containing model functions
3897 that are used in subprogram contracts. (Capacity):
3898 On unbounded containers, return the maximal capacity.
3899 (Current_To_Last): Removed, model functions should be used
3901 (First_To_Previous): Removed, model functions should be used instead.
3902 (Append): Default parameter value replaced
3903 by new wrapper to allow more precise contracts.
3904 (Insert): Subprogram restored, it seems it was useful to users even if
3906 (Delete): Subprogram restored, it seems it was useful to users even if
3908 (Prepend): Subprogram restored, it seems it was useful to users even
3909 if it is inefficient.
3910 (Delete_First): Subprogram restored, it seems it
3911 was useful to users even if it is inefficient. (Delete_Last):
3912 Default parameter value replaced by new wrapper to allow more
3914 (Generic_Sorting.Merge): Subprogram restored.
3915 (Vector): Do not reuse formal vectors, as it is no longer possible
3916 to supply them with an equality function over elements.
3918 2017-04-27 Bob Duff <duff@adacore.com>
3920 * g-dyntab.adb (Release): When allocating the new
3921 table, use the correct slice of the old table to initialize it.
3923 2017-04-27 Eric Botcazou <ebotcazou@adacore.com>
3925 * einfo.ads: Minor fixes in comments.
3927 2017-04-27 Ed Schonberg <schonberg@adacore.com>
3929 * sem_prag.adb: disable clones in SPARK_Mode.
3931 2017-04-27 Gary Dismukes <dismukes@adacore.com>
3933 * sem_util.ads, contracts.adb: Minor reformatting.
3935 2017-04-27 Ed Schonberg <schonberg@adacore.com>
3937 * sem_util.adb, sem_util.ads (Build_Class_Wide_Clone_Body):
3938 Build body of subprogram that has a class-wide condition that
3939 contains calls to other primitives.
3940 (Build_Class_Wide_Clone_Call); Build a call to the common
3941 class-wide clone of a subprogram with classwide conditions. The
3942 body of the subprogram becomes a wrapper for a call to the
3943 clone. The inherited operation becomes a similar wrapper to which
3944 modified conditions apply, and the call to the clone includes
3945 the proper conversion in a call the parent operation.
3946 (Build_Class_Wide_Clone_Decl (Spec_Id : Entity_Id): For a
3947 subprogram that has a classwide condition that contains calls to
3948 other primitives, build an internal subprogram that is invoked
3949 through a type-specific wrapper for all inherited subprograms
3950 that may have a modified condition.
3951 * sem_prag.adb (Check_References): If subprogram has a classwide
3952 condition, create entity for corresponding clone, to be invoked
3953 through wrapper subprograns.
3954 (Analyze_Pre_Post_Condition_In_Decl_Part): Do not emit error
3955 message about placement if pragma isi internally generated.
3956 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): If subprogram has
3957 a classwide clone, build body of clone as copy of original body,
3958 and rewrite original body as a wrapper as a wrapper for a call to
3959 the clone, so that it incorporates the original pre/postconditions
3961 * freeze.adb (Check_Inherited_Conditions): For an inherited
3962 subprogram that inherits a classwide condition, build spec and
3963 body of corresponding wrapper so that call to inherited operation
3964 gets the modified conditions.
3965 * contracts.adb (Analyze_Contracts): If analysis of classwide
3966 condition has created a clone for a primitive operation, analyze
3967 declaration of clone.
3969 2017-04-27 Steve Baird <baird@adacore.com>
3971 * exp_util.adb (Build_Allocate_Deallocate_Proc):
3972 Add "Suppress => All_Checks" to avoid generating unnecessary
3975 2017-04-27 Yannick Moy <moy@adacore.com>
3977 * debug.adb: Reserve debug flag 'm' for no inlining in GNATprove.
3978 * sem_ch6.adb (Anayze_Subprogram_Body_Helper): Skip creation of
3979 inlining body in GNATprove mode when switch -gnatdm used.
3980 * sem_res.adb (Resolve_Call): Skip detection of lack of inlining
3981 in GNATprove mode when switch -gnatdm used.
3983 2017-04-27 Arnaud Charlet <charlet@adacore.com>
3985 * sem_ch13.adb (Analyze_Attribute_Definition_Clause
3986 [Attribute_Address]): Call Set_Address_Taken when ignoring rep
3987 clauses, so that we keep an indication of the address clause
3988 before removing it from the tree.
3990 2017-04-27 Yannick Moy <moy@adacore.com>
3992 * exp_util.ads, exp_util.adb (Evaluate_Name): Force evaluation
3993 of expression being qualified, when not an object name, or else
3994 evaluate the underlying name.
3996 2017-04-27 Jerome Lambourg <lambourg@adacore.com>
3998 * bindusg.adb, bindgen.adb, gnatbind.adb, opt.ads: add -nognarl switch.
4000 2017-04-27 Justin Squirek <squirek@adacore.com>
4002 * exp_ch7.adb (Build_Finalize_Statements): Move Num_Comps to
4003 Process_Component_List_For_Finalization as a local variable.
4004 (Process_Component_For_Finalize): Add an extra parameter to avoid
4006 (Process_Component_List_For_Finalization): Correct calls to
4007 Process_Component_For_Finalize to take Num_Comps as a parameter.
4009 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
4011 * sem_ch8.adb (Find_Direct_Name): Account for the case where
4012 a use-visible entity is defined within a nested scope of an
4013 instance when giving priority to entities which were visible in
4014 the original generic.
4015 * sem_util.ads, sem_util.adb (Nearest_Enclosing_Instance): New routine.
4017 2017-04-27 Tristan Gingold <gingold@adacore.com>
4019 * raise-gcc.c: Don't use unwind.h while compiling
4020 for the frontend, but mimic host behavior.
4022 2017-04-27 Javier Miranda <miranda@adacore.com>
4024 * sem_ch3.adb (Build_Discriminated_Subtype):
4025 Propagate Has_Pragma_Unreferenced_Objects to the built subtype.
4027 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
4029 * sem_prag.adb (Analyze_Global_Item):
4030 Do not consider discriminants because they are not "entire
4031 objects". Remove the discriminant-related checks because they are
4033 (Analyze_Input_Output): Do not consider discriminants
4034 because they are not "entire objects".
4036 2017-04-27 Ed Schonberg <schonberg@adacore.com>
4038 * sem_ch13.adb (Check_Aspect_At_End_Of_Declarations): Do not
4039 perform check if the current scope does not come from source,
4040 as is the case for a rewritten task body, because check has
4041 been performed already, and may not be doable because of changed
4044 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
4046 * a-cofuse.adb, a-cfdlli.adb, a-cofuse.ads, a-cfdlli.ads, a-cofuve.adb,
4047 a-cofuve.ads, a-cofuma.adb, a-cofuma.ads, sem_eval.adb, a-cofuba.adb:
4050 2017-04-27 Ed Schonberg <schonberg@adacore.com>
4052 * sem_ch4.adb (Analyze_Call): If the return type of a function
4053 is incomplete in an context in which the full view is available,
4054 replace the type of the call by the full view, to prevent spurious
4056 * exp_disp.adb (Check_Premature_Freezing): Disable check on an
4057 abstract subprogram so that compiler does not reject a parameter
4058 of a primitive operation of a tagged type being frozen, when
4059 the untagged type of that parameter cannot be frozen.
4061 2017-04-27 Bob Duff <duff@adacore.com>
4063 * sem_attr.adb (Compute_Type_Key): Don't walk
4064 representation items for irrelevant types, which could be in a
4065 different source file.
4067 2017-04-27 Steve Baird <baird@adacore.com>
4069 * exp_attr.adb (Expand_N_Attribute_Reference):
4070 Don't expand Image, Wide_Image, Wide_Wide_Image attributes
4073 2017-04-27 Yannick Moy <moy@adacore.com>
4075 * exp_unst.ads: Fix typos in comments.
4077 2017-04-27 Ed Schonberg <schonberg@adacore.com>
4079 * sem_eval.adb (Choice_Matches): Handle properly a real literal
4080 whose type has a defined static predicate.
4082 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
4084 * exp_ch4.adb (Insert_Dereference_Action):
4085 Do not adjust the address of a controlled object when the
4086 associated access type is subject to pragma No_Heap_Finalization.
4089 2017-04-27 Pierre-Marie de Rodat <derodat@adacore.com>
4091 * gcc-interface/utils.c (gnat_type_for_size): Set
4092 TYPE_ARTIFICIAL on created types.
4094 2017-04-27 Claire Dross <dross@adacore.com>
4096 * a-cfdlli.adb, a-cfdlli.ads (Formal_Model): Adapt to
4097 modifications in functional containers.
4098 * a-cofuba.ads, a-cofuma.ads, a-cofuse.ads, a-cofuve.ads Reformat
4099 to improve readablity. Subprograms are separated between basic
4100 operations, constructors and properties. Universally quantified
4101 formulas in contracts are factorized in independant functions
4102 with a name and a comment. Names of parameters are improved.
4104 2017-04-27 Gary Dismukes <dismukes@adacore.com>
4106 * exp_spark.adb, sem_elab.adb: Minor reformatting and typo fix.
4108 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
4110 * sem_res.adb (Resolve_Type_Conversion): Do not
4111 install a predicate check here since this is already done during
4112 the expansion phase. Verify whether the operand satisfies the
4113 static predicate (if any) of the target type.
4114 * sem_ch3.adb (Analyze_Object_Declaration): Do
4115 not install a predicate check if the object is initialized by
4116 means of a type conversion because the conversion is subjected
4119 2017-04-27 Tristan Gingold <gingold@adacore.com>
4121 * raise.c (__gnat_builtin_longjmp): Remove.
4122 (__gnat_bracktrace):
4123 Add a dummy definition for the compiler (__gnat_eh_personality,
4124 __gnat_rcheck_04, __gnat_rcheck_10) (__gnat_rcheck_19,
4125 __gnat_rcheck_20, __gnat_rcheck_21) (__gnat_rcheck_30,
4126 __gnat_rcheck_31, __gnat_rcheck_32): Likewise.
4127 * a-exexpr.adb: Renamed from a-exexpr-gcc.adb
4128 * a-except.ads, a-except.adb: Renamed from a-except-2005.ads
4129 and a-except-2005.adb.
4130 * raise-gcc.c: Allow build in compiler, compiled as a C++
4132 (__gnat_Unwind_ForcedUnwind): Adjust prototype.
4133 (db): Constify msg_format.
4134 (get_call_site_action_for): Don't use void arithmetic.
4135 * system.ads (Frontend_Exceptions): Set to False.
4136 (ZCX_By_Default): Set to True.
4137 (GCC_ZC_Support): Set to True.
4138 * gcc-interface/Makefile.in: No more variants for a-exexpr.adb and
4140 * gcc-interface/Make-lang.in: Add support for backend zcx exceptions
4141 in gnat1 and gnatbind.
4142 * gnat1, gnatbind: link with raise-gcc.o, a-exctra.o, s-addima.o,
4143 s-excmac.o, s-imgint.o, s-traceb.o, s-trasym.o, s-wchstw.o
4144 * s-excmac.ads, s-excmac.adb: Copy of variants.
4145 * a-except.o: Adjust preequisites.
4146 Add handling of s-excmac-arm.adb and s-excmac-gcc.adb.
4148 2017-04-27 Claire Dross <dross@adacore.com>
4150 * a-cfdlli.adb, a-cfdlli.ads (Formal_Model): Adapt to
4151 modifications in functional containers.
4152 * a-cofuba.ads, a-cofuma.ads, a-cofuse.ads, a-cofuve.ads Reformat
4153 to improve readablity. Subprograms are separated between basic
4154 operations, constructors and properties. Universally quantified
4155 formulas in contracts are factorized in independant functions
4156 with a name and a comment. Names of parameters are improved.
4158 2017-04-27 Gary Dismukes <dismukes@adacore.com>
4160 * exp_spark.adb, sem_elab.adb: Minor reformatting and typo fix.
4162 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
4164 * sem_res.adb (Resolve_Type_Conversion): Do not
4165 install a predicate check here since this is already done during
4166 the expansion phase. Verify whether the operand satisfies the
4167 static predicate (if any) of the target type.
4168 * sem_ch3.adb (Analyze_Object_Declaration): Do
4169 not install a predicate check if the object is initialized by
4170 means of a type conversion because the conversion is subjected
4173 2017-04-27 Tristan Gingold <gingold@adacore.com>
4175 * a-except.ads, a-except.adb, a-exexpr.adb: Removed (will be
4176 replaced by their variants).
4178 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
4180 * exp_prag.adb, a-cofuse.adb, a-cofuse.ads, einfo.adb, sem_prag.adb,
4181 cstand.adb, par-prag.adb, a-cofuve.adb, a-cofuve.ads, a-cofuma.adb,
4182 a-cofuma.ads, a-cofuba.adb, a-cofuba.ads: Minor reformatting.
4184 2017-04-27 Tristan Gingold <gingold@adacore.com>
4186 * s-excmac-gcc.ads, s-excmac-gcc.adb,
4187 s-excmac-arm.ads, s-excmac-arm.adb (New_Occurrence): Rewrite it in
4190 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
4192 * exp_ch7.adb (Establish_Transient_Scope): Rewrite
4193 the loop which detects potential enclosing transient scopes. The
4194 loop now terminates much earlier as transient scopes are bounded
4195 by packages and subprograms.
4197 2017-04-27 Claire Dross <dross@adacore.com>
4199 * a-cfdlli.adb, a-cfdlli.ads (=): Generic parameter removed to
4200 allow the use of regular equality over elements in contracts.
4201 (Cursor): Type is now public so that it can be used in
4203 (Formal_Model): Ghost package containing
4204 model functions that are used in subprogram contracts.
4205 (Current_To_Last): Removed, model functions should be used
4207 (First_To_Previous): Removed, model functions should
4209 (Strict_Equal): Removed, model functions
4210 should be used instead.
4211 (Append): Default parameter value
4212 replaced by new wrapper to allow more precise contracts.
4213 (Insert): Default parameter value replaced by new wrapper to
4214 allow more precise contracts.
4215 (Delete): Default parameter
4216 value replaced by new wrapper to allow more precise contracts.
4217 (Prepend): Default parameter value replaced by new wrapper to
4218 allow more precise contracts.
4219 (Delete_First): Default parameter
4220 value replaced by new wrapper to allow more precise contracts.
4221 (Delete_Last): Default parameter value replaced by new wrapper
4222 to allow more precise contracts.
4224 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
4226 * exp_spark.adb (Expand_SPARK): Perform specialized expansion
4227 for object declarations.
4228 (Expand_SPARK_N_Object_Declaration): New routine.
4229 * sem_elab.adb (Check_A_Call): Include calls to the
4230 Default_Initial_Condition procedure of a type under the SPARK
4231 elaboration checks umbrella.
4233 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
4235 * sem.adb (Analyze): Diagnose an illegal iterated component
4237 * sem_util.ads, sem_util.adb
4238 (Diagnose_Iterated_Component_Association): New routine.
4240 2017-04-27 Bob Duff <duff@adacore.com>
4242 * adaint.c (__gnat_get_current_dir): Return 0 in length if
4244 * a-direct.adb, g-dirope.adb, osint.adb, s-os_lib.adb: Raise
4245 exception if getcwd failed.
4247 2017-04-27 Yannick Moy <moy@adacore.com>
4249 * exp_dbug.adb, exp_dbug.ads (Get_External_Name): Prefix ghost
4250 entities with special prefix.
4252 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
4254 * debug.adb Change the documentation of switch -gnatd.s.
4255 * exp_ch7.adb (Make_Transient_Block): Transient blocks do not need
4256 to manage the secondary stack when an enclosing scope already
4257 performs this functionality (aka relaxed management). Switch
4258 -gnatd.s may be used to force strict management in which case
4259 the block will manage the secondary stack unconditionally. Add
4260 a guard to stop the traversal when encountering a package or a
4263 2017-04-27 Ed Schonberg <schonberg@adacore.com>
4265 * sem_res.adb (Resolve_Call): Refine further the handling of
4266 limited views of return types in function calls. If the function
4267 that returns a limited view appears in the current unit,
4268 we do not replace its type by the non-limited view because
4269 this transformation is performed int the back-end. However,
4270 the type of the call itself must be the non-limited view, to
4271 prevent spurious resolution errors.
4273 2017-04-27 Ed Schonberg <schonberg@adacore.com>
4275 * einfo,ads, einfo.adb (Class_Wide_Preconds, Class_Wide_Postconds):
4276 Removed, proposed implementation using generics for class-wide
4277 preconditions proved impractical.
4278 (Class_Wide_Clone): New attribute of subprogram. Designates
4279 subprogram created for primitive operations with class-wide
4280 pre/postconditions that contain calls to other primitives. The
4281 clone holds the body of the original primitive, but the
4282 pre/postonditions do not apply to it. The original body is
4283 rewritten as a wrapper for a call to the clone.
4284 (Is_Class_Wide_Clone): New flag to identify a Class_Wide_Clone. If
4285 the flag is set, no code for the corresponding pre/postconditions
4286 is inserted into its body.
4288 2017-04-27 Bob Duff <duff@adacore.com>
4290 * exp_prag.adb, par-prag.adb, sem_ch13.adb: Ignore
4291 Scalar_Storage_Order if -gnatI is given.
4292 * sem_prag.adb (Analyze_Pragma): Ignore
4293 Default_Scalar_Storage_Order if -gnatI is given.
4295 2017-04-27 Claire Dross <dross@adacore.com>
4297 * a-cofuba.ads (Add): Take as an additional input parameter
4298 the position where the element should be inserted.
4299 (Remove): New function that removes an element from the container.
4300 * a-cofuma.ads (Add): Adapt to the new API of Base.Add.
4301 * a-cofuse.ads (Add): Adapt to the new API of Base.Add.
4302 (Remove): New function that removes an element from a set.
4303 * a-cofuve.ads (Add): Adapt to the new API of Base.Add.
4304 (Remove): New function that removes an element from a sequence.
4305 (Insert): New function that adds anywhere in a sequence.
4307 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
4309 * checks.adb (Generate_Range_Check): Revert previous change.
4311 2017-04-27 Gary Dismukes <dismukes@adacore.com>
4313 * sem_util.adb: Minor reformatting/rewording.
4315 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
4317 * lib-xref.adb (Generate_Reference): The use
4318 of attribute 'Result is not considered a violation of pragma
4321 2017-04-27 Justin Squirek <squirek@adacore.com>
4323 * cstand.adb (Create_Standard): Correctly set
4324 Directly_Designated_Type for Any_Access.
4325 * sem_type.adb (Covers): Minor grammar fixes.
4327 2017-04-27 Bob Duff <duff@adacore.com>
4329 * sem_attr.adb: Minor cleanup.
4331 2017-04-27 Claire Dross <dross@adacore.com>
4333 * a-cofuba.ads, a-cofuba.adb (Ada.Containers.Functional_Base): New
4334 private child of Ada.Containers used to implement all functional
4336 * a-cofuma.ads, a-cofuma.adb (Ada.Containers.Functional_Maps): New
4337 child of Ada.Containers. It provides functional indefinite unbounded
4338 maps which can be used as high level models for specification
4340 * a-cofuse.ads, a-cofuse.adb (Ada.Containers.Functional_Sets): New
4341 child of Ada.Containers. It provides functional indefinite unbounded
4342 sets which can be used as high level models for specification
4344 * a-cofuve.ads, a-cofuve.adb (Ada.Containers.Functional_Vectors): New
4345 child of Ada.Containers. It provides functional indefinite unbounded
4346 vectors which can be used as high level models for specification
4348 * Makefile.rtl: Add new packages.
4349 * impunit.adb: Add new packages.
4351 2017-04-27 Gary Dismukes <dismukes@adacore.com>
4353 * sem_ch4.adb: Minor reformatting.
4355 2017-04-27 Ed Schonberg <schonberg@adacore.com>
4357 * sem_ch12.adb (Analyze_Associations): minor reformatting.
4358 (Check_Fixed_Point_Actual): Do not emit a warning on a fixed
4359 point type actual that has user-defined arithmetic primitives,
4360 when there is a previous actual for a formal package that defines
4361 a fixed-point type with the parent user-defined operator.
4363 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
4365 * checks.adb (Generate_Range_Check): Reinstate part of previous change.
4366 * sem_attr.adb (Resolve_Attribute): Generate a range check when
4367 the component type allows range checks.
4369 2017-04-27 Ed Schonberg <schonberg@adacore.com>
4371 * sem_aux.adb (Is_Generic_Formal): Use original node to locate
4372 corresponding declaration, because formal derived types are
4373 rewritten as private extensions.
4375 2017-04-27 Ed Schonberg <schonberg@adacore.com>
4377 * sem_dim.adb (Analyze_Dimension_Binary_Op): Do not check
4378 dimensions of operands if node has been analyzed already, because
4379 previous analysis and dimension checking will have removed the
4380 dimension information from the operands.
4382 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
4384 * debug.adb: Document the use of switch -gnatd.s.
4385 * einfo.ads Update the documentation on attribute
4386 Sec_Stack_Needed_For_Return and attribute Uses_Sec_Stack. Remove
4387 the uses of these attributes from certain entities.
4388 * exp_ch7.adb (Make_Transient_Block): Reimplement the circuitry
4389 which determines whether the block should continue to manage
4390 the secondary stack.
4391 (Manages_Sec_Stack): New routine.
4393 2017-04-27 Bob Duff <duff@adacore.com>
4395 * atree.ads: Minor edit.
4397 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
4399 * sinfo.ads: Update the section on Ghost mode. Add
4400 a section on SPARK mode. Update the placement of section on
4401 expression functions.
4403 2017-04-27 Bob Duff <duff@adacore.com>
4405 * sinput.adb (Get_Source_File_Index): Don't
4406 assert that S is in the right range in the case where this is
4407 a .dg file under construction.
4409 2017-04-27 Yannick Moy <moy@adacore.com>
4411 * sem_util.adb (Check_Result_And_Post_State):
4412 Handle more precisely each conjunct in expressions formed by
4413 and'ing sub-expressions.
4415 2017-04-27 Gary Dismukes <dismukes@adacore.com>
4417 * exp_ch4.adb, sem_ch4.adb: Minor typo fix and reformatting.
4419 2017-04-25 Arnaud Charlet <charlet@adacore.com>
4421 * gnat_rm.texi, gnat_ugn.texi,
4422 doc/gnat_ugn/building_executable_programs_with_gnat.rst,
4423 doc/gnat_ugn/platform_specific_information.rst,
4424 doc/gnat_ugn/gnat_and_program_execution.rst,
4425 doc/gnat_ugn/gnat_utility_programs.rst,
4426 doc/gnat_ugn/the_gnat_compilation_model.rst,
4427 doc/gnat_rm/implementation_defined_attributes.rst,
4428 doc/gnat_rm/the_gnat_library.rst,
4429 doc/gnat_rm/implementation_defined_pragmas.rst,
4430 doc/gnat_rm/representation_clauses_and_pragmas.rst,
4431 doc/gnat_rm/implementation_of_specific_ada_features.rst,
4432 doc/gnat_rm/implementation_defined_aspects.rst,
4433 doc/gnat_rm/implementation_defined_characteristics.rst: Update
4436 2017-04-25 Arnaud Charlet <charlet@adacore.com>
4438 * exp_ch4.adb (Expand_N_Case_Expression): Emit error message when
4439 generating C code on complex case expressions.
4441 2017-04-25 Arnaud Charlet <charlet@adacore.com>
4443 * sem_prag.adb (Analyze_Pragma): Generate a warning instead
4444 of silently ignoring pragma Ada_xxx in Latest_Ada_Only mode.
4445 * directio.ads, ioexcept.ads, sequenio.ads, text_io.ads: Use
4446 Ada_2012 instead of Ada_2005 to be compatible with the above
4448 * bindgen.adb: Silence new warning on pragma Ada_95.
4450 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4452 * checks.adb (Generate_Range_Check): Revert part of previous change.
4454 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4456 * sem_ch4.adb (Try_Container_Indexing): Handle properly a
4457 container indexing operation that appears as a an actual in a
4458 parameter association in a procedure call.
4460 2017-04-25 Olivier Ramonat <ramonat@adacore.com>
4462 * prj-proc.adb, sem_util.adb, s-stposu.adb, sem_attr.adb, prj-conf.ads:
4463 Fix spelling mistakes.
4465 2017-04-25 Bob Duff <duff@adacore.com>
4467 * types.ads, osint.adb, sinput-c.adb, sinput-d.adb, sinput-l.adb,
4468 * sinput-p.adb: Use regular fat pointers, with bounds checking,
4469 for source buffers. Fix misc obscure bugs.
4470 * sinput.ads, sinput.adb: Use regular fat pointers, with bounds
4471 checking, for source buffers. Modify representation clause for
4472 Source_File_Record as appropriate. Move Source_File_Index_Table
4473 from spec to body, because it is not used outside the body.
4474 Move Set_Source_File_Index_Table into the private part, because
4475 it is used only in the body and in children. Use trickery to
4476 modify the dope in the generic instantiation case. It's ugly,
4477 but not as ugly as the previous method. Fix documentation.
4478 Remove obsolete code.
4479 * fname-sf.adb, targparm.adb: Fix misc out-of-bounds
4480 indexing in source buffers.
4481 * fmap.adb: Avoid conversions from one string type to another.
4482 Remove a use of global name buffer.
4483 * osint.ads, sfn_scan.ads, sfn_scan.adb, sinput-c.ads: Comment
4486 2017-04-25 Gary Dismukes <dismukes@adacore.com>
4488 * exp_util.adb, exp_ch4.adb: Minor reformatting.
4490 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4492 * checks.adb: Code clean up in various routines.
4493 (Generate_Range_Check): Do not generate a range check when the
4494 expander is not active or when index/range checks are suppressed
4496 (Insert_List_After_And_Analyze, Insert_List_Before_And_Analyze):
4497 Remove variants that include a Supress parameter. These routines
4498 are never used, and were introduced before the current scope-based
4499 check suppression method.
4501 2017-04-25 Vasiliy Fofanov <fofanov@adacore.com>
4503 * prj-part.adb, cstreams.c, osint.adb, osint.ads: Remove VMS specific
4504 code and some subprogram calls that are now noop.
4506 2017-04-25 Arnaud Charlet <charlet@adacore.com>
4508 * exp_ch4.adb (Expand_N_Case_Expression): Take
4509 Minimize_Expression_With_Actions into account when possible.
4511 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4513 * exp_util.adb (Known_Non_Null): Moved to Sem_Util.
4514 (Known_Null): Moved to Sem_Util.
4515 * exp_util.ads (Known_Non_Null): Moved to Sem_Util.
4516 (Known_Null): Moved to Sem_Util.
4517 * sem_util.adb Add new enumeration type Null_Status_Kind.
4518 (Known_Non_Null): Moved from Exp_Util. Most of the logic in
4519 this routine is now carried out by Null_Status.
4520 (Known_Null): Moved from Exp_Util. Most of the logic in this routine
4521 is now carried out by Null_Status.
4522 (Null_Status): New routine.
4523 * sem_util.ads (Known_Non_Null): Moved from Exp_Util.
4524 (Known_Null): Moved from Exp_Util.
4526 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4528 * sem_ch6.adb (Analyze_Expression_Function): Do not report an
4529 error on the return type of an expression function that is a
4530 completion, if the type is derived from a generic formal type.
4532 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4534 * sem_dim.adb (Dimensions_Of_Operand): The dimensions of a type
4535 conversion are those of the target type.
4537 2017-04-25 Bob Duff <duff@adacore.com>
4539 * a-clrefi.adb: Minor cleanup.
4541 2017-04-25 Gary Dismukes <dismukes@adacore.com>
4543 * exp_util.adb, exp_util.ads, types.ads: Minor reformatting.
4545 2017-04-25 Bob Duff <duff@adacore.com>
4547 * err_vars.ads, fmap.adb, fmap.ads, comperr.adb, fname-sf.adb,
4548 types.adb, types.ads, types.h, sinput-l.adb, targparm.adb,
4549 errout.adb, sinput.adb, sinput.ads, cstand.adb, scn.adb,
4550 scn.ads, gnatls.adb: Eliminate the vestigial Internal_Source_File and
4551 the Internal_Source buffer. This removes the incorrect call to "="
4552 the customer noticed.
4553 Wrap remaining calls to "=" in Null_Source_Buffer_Ptr. We
4554 eventually need to eliminate them altogether. Or else get rid
4555 of zero-origin addressing.
4557 2017-04-25 Claire Dross <dross@adacore.com>
4559 * exp_util.ads (Expression_Contains_Primitives_Calls_Of): New
4560 function used in GNATprove to know if an expression contains
4561 non-dispatching calls on primitives of a tagged type.
4563 2017-04-25 Bob Duff <duff@adacore.com>
4565 * rtsfind.adb (Initialize): Initialize
4566 First_Implicit_With. Building the compiler with Normalize_Scalars
4567 and validity checking finds this being used as an uninitialized
4570 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4572 * contracts.adb (Analyze_Entry_Or_Subprogram_Body_Contract):
4573 Add a warning about SPARK mode management. The routine now
4574 saves and restores both the mode and associated pragma.
4575 (Analyze_Entry_Or_Subprogram_Contract): Add a warning about
4576 SPARK mode management. The routine now saves and restores both
4577 the mode and associated pragma.
4578 (Analyze_Object_Contract):
4579 Add a warning about SPARK mode management. The routine
4580 now saves and restores both the mode and associated pragma.
4581 (Analyze_Package_Body_Contract): Add a warning about SPARK mode
4582 management. The routine now saves and restores both the mode
4583 and associated pragma. (Analyze_Package_Contract): Add a warning
4584 about SPARK mode management. The routine now saves and restores
4585 both the mode and associated pragma.
4586 (Analyze_Task_Contract):
4587 Add a warning about SPARK mode management. The routine now saves
4588 and restores both the mode and associated pragma.
4589 * expander.adb (Expand): Change the way the Ghost mode is saved
4591 * exp_ch3.adb (Freeze_Type): Change the way the Ghost mode is
4593 * exp_disp.adb (Make_DT): Change the way the Ghost mode is saved
4595 * exp_util.adb (Build_DIC_Procedure_Body):
4596 Change the way the Ghost mode is saved and restored.
4597 (Build_DIC_Procedure_Declaration): Change the way the Ghost
4598 mode is saved and restored.
4599 (Build_Invariant_Procedure_Body):
4600 Change the way the Ghost mode is saved and restored.
4601 (Build_Invariant_Procedure_Declaration): Change the way the Ghost
4602 mode is saved and restored.
4603 (Make_Predicate_Call): Change the
4604 way the Ghost mode is saved and restored.
4605 * freeze.adb (Freeze_Entity): Change the way the Ghost mode is
4607 * ghost.adb (Mark_And_Set_Ghost_Assignment): Remove parameter Mode
4609 (Mark_And_Set_Ghost_Body): Remove parameter
4610 Mode and its assignment.
4611 (Mark_And_Set_Ghost_Completion):
4612 Remove parameter Mode and its assignment.
4613 (Mark_And_Set_Ghost_Declaration): Remove parameter Mode and its
4615 (Mark_And_Set_Ghost_Instantiation): Remove parameter
4616 Mode and its assignment.
4617 (Mark_And_Set_Ghost_Procedure_Call):
4618 Remove parameter Mode and its assignment.
4620 Remove parameter Mode and its assignment.
4621 * ghost.ads (Mark_And_Set_Ghost_Assignment): Remove parameter Mode
4622 and update the comment on usage.
4623 (Mark_And_Set_Ghost_Body):
4624 Remove parameter Mode and update the comment on usage.
4625 (Mark_And_Set_Ghost_Completion): Remove parameter Mode and
4626 update the comment on usage.
4627 (Mark_And_Set_Ghost_Declaration):
4628 Remove parameter Mode and update the comment on usage.
4629 (Mark_And_Set_Ghost_Instantiation): Remove parameter Mode and
4630 update the comment on usage.
4631 (Mark_And_Set_Ghost_Procedure_Call):
4632 Remove parameter Mode and update the comment on usage.
4633 (Set_Ghost_Mode): Remove parameter Mode and update the comment
4635 * lib.ads Remove obsolete fields SPARK_Mode_Pragma from various
4637 * lib-load.adb (Create_Dummy_Package_Unit): Remove the assignment
4638 of obsolete field SPARK_Mode_Pragma.
4639 (Load_Main_Source): Remove
4640 the assignment of obsolete field SPARK_Mode_Pragma.
4641 (Load_Unit): Remove the assignment of obsolete field SPARK_Mode_Pragma.
4642 * lib-writ.adb (Add_Preprocessing_Dependency): Remove
4643 the assignment of obsolete field SPARK_Mode_Pragma.
4644 (Ensure_System_Dependency): Remove the assignment of obsolete
4645 field SPARK_Mode_Pragma.
4646 * rtsfind.adb (Load_RTU): Add a warning about Ghost and SPARK
4647 mode management. Change the way Ghost and SPARK modes are saved
4649 * sem.adb (Analyze): Change the way the Ghost mode is saved
4651 * sem_ch3.adb (Analyze_Object_Declaration): Change the way the
4652 Ghost mode is saved and restored.
4653 (Process_Full_View): Change
4654 the way the Ghost mode is saved and restored.
4655 * sem_ch5.adb (Analyze_Assignment): Change the way the Ghost
4656 mode is saved and restored.
4657 * sem_ch6.adb (Analyze_Procedure_Call): Change the way the Ghost
4658 mode is saved and restored.
4659 (Analyze_Subprogram_Body_Helper):
4660 Change the way the Ghost mode is saved and restored.
4661 * sem_ch7.adb (Analyze_Package_Body_Helper): Change the way the
4662 Ghost mode is saved and restored.
4663 * sem_ch10.adb (Analyze_Subunit): Add a warning about SPARK mode
4664 management. Save the SPARK mode-related data prior to any changes
4665 to the scope stack and contexts. The mode is then reinstalled
4666 before the subunit is analyzed in order to restore the original
4667 view of the subunit.
4668 * sem_ch12.adb (Analyze_Package_Instantiation): Update the
4669 warning on region management. Change the way the Ghost and
4670 SPARK modes are saved and restored.
4671 (Inline_Instance_Body):
4672 Add a warning about SPARK mode management. Code clean up.
4673 (Analyze_Subprogram_Instantiation): Update the warning on region
4674 management. Change the way the Ghost and SPARK modes are saved
4676 (Instantiate_Package_Body): Update the warning
4677 on region management. Change the way the Ghost and SPARK modes
4678 are saved and restored.
4679 (Instantiate_Subprogram_Body): Update
4680 the warning on region management. Change the way the Ghost and
4681 SPARK modes are saved and restored.
4682 (Set_Instance_Env): Add a
4683 warning about SPARK mode management. Change the way SPARK mode
4684 is saved and restored.
4685 * sem_ch13.adb (Build_Predicate_Functions):
4686 Change the way the Ghost mode is saved and restored.
4687 (Build_Predicate_Function_Declaration): Change the way the Ghost
4688 mode is saved and restored.
4689 * sem_elab.adb (Check_Elab_Calls): Add a warning about SPARK
4690 mode management. Change the way SPARK mode is saved and restored.
4691 * sem_prag.adb (Analyze_Contract_Cases_In_Decl_Part):
4692 Change the way the Ghost mode is saved and restored.
4693 (Analyze_Initial_Condition_In_Decl_Part): Change the way
4694 the Ghost mode is saved and restored.
4696 Change the way the Ghost mode is saved and restored.
4697 (Analyze_Pre_Post_Condition_In_Decl_Part): Change the way the
4698 Ghost mode is saved and restored.
4699 * sem_util.adb (Install_SPARK_Mode): New routine.
4700 (Restore_SPARK_Mode): New routine.
4701 (Save_SPARK_Mode_And_Set): Removed.
4702 (Set_SPARK_Mode): New routine.
4703 * sem_util.ads (Install_SPARK_Mode): New routine.
4704 (Restore_SPARK_Mode): New routine.
4705 (Save_SPARK_Mode_And_Set): Removed.
4706 (Set_SPARK_Mode): New routine.
4708 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4710 * sem_util.adb, sem_util.ads (From_Nested_Package): New predicate
4711 to determine whether a type is declared in a local package that
4712 has not yet been frozen.
4713 * freeze.adb (Freeze_Before): Use new predicate to determine
4714 whether a local package must be installed on the scope stack
4715 in order to evaluate in the proper scope actions generated by
4716 aspect specifications, such as Predicate
4717 * sem_ch13.adb: Simplify code in Analyze_Aspects_At_Freeze_Point
4718 using new predicate.
4720 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4722 * sem_warn.adb (Warn_On_Constant_Valid_Condition): Do not consider
4723 comparisons between non- scalar expressions expressions because
4724 their values cannot be invalidated.
4725 * sem_warn.ads (Warn_On_Constant_Valid_Condition): Update the
4728 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4730 * par_sco.adb: Minor reformatting.
4732 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4734 * sem_ch13.adb (Analyze_Aspects_At_Freeze_Point): If entity
4735 is a type from an unfrozen local package, install package to
4736 complete the analysis of delayed aspects of the type.
4738 2017-04-25 Tristan Gingold <gingold@adacore.com>
4740 * bingen.adb (System_Version_Control_Used): New variable.
4741 (Resolve_Binder_Options): Set the above variable.
4742 (Gen_Output_File_Ada): Conditionally call Gen_Versions.
4743 (Gen_Elab_Order): Emit blank line before.
4745 2017-04-25 Justin Squirek <squirek@adacore.com>
4747 * sem_cat.adb (Validate_RT_RAT_Component): Added
4748 an extra check to ignore incomplete types.
4750 2017-04-25 Thomas Quinot <quinot@adacore.com>
4752 * sem_prag.adb (Analyze_Pragma, case Pragma_Check): Remove
4753 bogus circuitry for the case where Name is Predicate.
4755 2017-04-25 Thomas Quinot <quinot@adacore.com>
4757 * par_sco.adb(Traverse_Declarations_Or_Statements.Traverse_Aspects):
4758 Create SCOs for Predicate aspects in disabled
4759 state initially, to be enabled later on by...
4760 * sem_ch13.adb (Build_Predicate_Functions.Add_Predicates): Mark
4761 SCO for predicate as enabled.
4763 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4765 * comperr.adb (Compiler_Abort): Remove now obsolete pair of
4766 pragmas Warnings Off / On.
4767 * namet.adb (Finalize): Remove now obsolete pair of pragmas
4769 * output.adb: Remove now obsolete pair of pragmas Warnings Off / On.
4770 * sem_warn.adb (Warn_On_Constant_Valid_Condition): Do not
4771 consider comparisons between static expressions because their
4772 values cannot be invalidated.
4773 * urealp.adb (Tree_Read): Remove now obsolete pair of pragmas
4775 (Tree_Write): Remove now obsolete pair of pragmas Warnings Off / On.
4776 * usage.adb Remove now obsolete pair of pragmas Warnings Off / On.
4778 2017-04-25 Bob Duff <duff@adacore.com>
4780 * sem_elab.adb (In_Task_Activation): Trace internal calls in
4783 2017-04-25 Gary Dismukes <dismukes@adacore.com>
4785 * sem_prag.adb, sem_warn.adb, sem_eval.adb: Minor reformatting and
4788 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4790 * comperr.adb (Compiler_Abort): Add a pair of pragma Warnings
4791 On/Off to defend against a spurious warning in conditional
4793 * exp_ch4.adb (Rewrite_Comparison): Reimplemented.
4794 * namet.adb (Finalize): Add a pair of pragma Warnings On/Off to
4795 defend against a spurious warning in conditional compilation.
4796 * output.adb Add a pair of pragma Warnings On/Off to defend
4797 against a spurious warning in conditional compilation.
4798 * sem_eval.adb (Eval_Relational_Op): Major code clean up.
4799 (Fold_General_Op): New routine.
4800 (Fold_Static_Real_Op): New routine.
4801 (Test_Comparison): New routine.
4802 * sem_eval.ads (Test_Comparison): New routine.
4803 * sem_warn.adb (Is_Attribute_Constant_Comparison): New routine.
4804 (Warn_On_Constant_Valid_Condition): New routine.
4805 (Warn_On_Known_Condition): Use Is_Attribute_Constant_Comparison
4806 to detect a specific case.
4807 * sem_warn.adb (Warn_On_Constant_Valid_Condition): New routine.
4808 * urealp.adb (Tree_Read): Add a pair of pragma Warnings On/Off
4809 to defend against a spurious warning in conditional compilation.
4810 (Tree_Write): Add a pair of pragma Warnings On/Off to defend
4811 against a spurious warning in conditional compilation.
4812 * usage.adb Add a pair of pragma Warnings On/Off to defend
4813 against a spurious warning in conditional compilation.
4815 2017-04-25 Arnaud Charlet <charlet@adacore.com>
4817 * sinfo.ads, sem_ch13.adb: Update comment.
4819 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4821 * sem_util.adb (Is_Post_State): A reference to a
4822 generic in out parameter is considered a change in the post-state
4825 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4827 * sem_ch12.adb (Load_Parent_Of_Generic); When retrieving the
4828 declaration of a subprogram instance within its wrapper package,
4829 skip over null statements that may result from the rewriting of
4832 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4834 * exp_attr.adb (Expand_Attribute_Reference, case 'Read):
4835 If the type is an unchecked_union, replace the attribute with
4836 a Raise_Program_Error (rather than inserting such before the
4837 attribute reference) to handle properly the case where we are
4838 processing a component of a larger record, and we need to prevent
4839 further expansion for the unchecked union.
4840 (Expand_Attribute_Reference, case 'Write): If the type is
4841 an unchecked_union, check whether enclosing scope is a Write
4842 subprogram. Replace attribute with a Raise_Program_Error if the
4843 discriminants of the unchecked_union type have not default values
4844 because such a use is erroneous..
4846 2017-04-25 Tristan Gingold <gingold@adacore.com>
4848 * exp_ch9.adb (Expand_N_Task_Type_Declaration):
4849 Add relative_deadline to task record on edf profile.
4850 (Make_Initialize_Protection): Pass deadline_floor value on edf profile.
4851 (Make_Task_Create_Call): Pass relative_deadline value.
4852 * par-prag.adb (Prag): Handle Pragma_Deadline_Floor.
4853 * s-rident.ads (Profile_Name): Add GNAT_Ravenscar_EDF.
4854 (Profile_Info): Add info for GNAT_Ravenscar_EDF.
4855 * sem_prag.adb (Set_Ravenscar_Profile): Handle
4856 GNAT_Ravenscar_EDF (set scheduling policy).
4857 (Analyze_Pragma): Handle GNAT_Ravenscar_EDF profile and Deadline_Floor
4859 (Sig_Flags): Add choice for Pragma_Deadline_Floor.
4860 * snames.ads-tmpl (Name_Deadline_Floor, Name_Gnat_Ravenscar_EDF):
4862 (Pragma_Deadline_Floor): New pragma.
4863 * targparm.adb (Get_Target_Parameters): Recognize
4864 GNAT_Ravenscar_EDF profile.
4866 2017-04-25 Arnaud Charlet <charlet@adacore.com trojanek>
4868 * gnatvsn.ads (Library_Version): Bump to 8. Update comment.
4870 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4872 * sem_aux.adb (Nearest_Ancestor): Use original node of type
4873 declaration to locate nearest ancestor, because derived
4874 type declarations for record types are rewritten as record
4876 * sem_ch13.adb (Add_Call): Use an unchecked conversion to handle
4877 properly derivations that are completions of private types.
4878 (Add_Predicates): If type is private, examine rep. items of full
4879 view, which may include inherited predicates.
4880 (Build_Predicate_Functions): Ditto.
4882 2017-04-25 Javier Miranda <miranda@adacore.com>
4884 * sem_util.adb (New_Copy_Tree.Visit_Entity): Extend previous change
4885 to generate new entities for subtype declarations located in
4886 Expression_With_Action nodes.
4888 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4890 * sem_elab.adb (Check_A_Call): Remove
4891 local variables Is_DIC_Proc and Issue_In_SPARK. Verify the
4892 need for Elaborate_All when SPARK elaboration checks are
4893 required. Update the checks for instances, variables, and calls
4894 to Default_Initial_Condition procedures.
4896 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4898 * aspects.ads, aspects.adb: Make the GNAT-specific pragma No_Inline
4899 into a boolean aspect, in analogy with the Ada aspect No_Return.
4901 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4903 * exp_ch6.adb, sem_ch13.adb, sem_ch6.adb: Minor reformatting.
4905 2017-04-25 Bob Duff <duff@adacore.com>
4907 * sem_res.adb (Resolve_Actuals): Under -gnatd.q, reset
4908 Is_True_Constant for an array variable that is passed to a
4909 foreign function as an 'in' parameter.
4910 * debug.adb: Document -gnatd.q.
4912 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4914 * sem_ch6.adb (Analyze_Expression_Function): If expression function
4915 is completion and return type is an access type do not freeze
4916 designated type: this will be done in the process of freezing
4917 the expression if needed.
4918 (Freeze_Expr_Types): Check whether type is complete before
4919 creating freeze node, to provide a better error message if
4920 reference is premature.
4921 * sem_ch13.adb (Check_Indexing_Functions): Ignore inherited
4922 functions created by type derivations.
4924 2017-04-25 Pascal Obry <obry@adacore.com>
4926 * g-sercom.ads: Add simple usage of GNAT.Serial_Communication.
4928 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4930 * sem_res.adb (Resolve_Type_Conversion):
4931 When resolving against any fixed type, set the type of the
4932 operand as universal real when the operand is a multiplication
4933 or a division where both operands are of any fixed type.
4934 (Unique_Fixed_Point_Type): Add local variable ErrN. Improve the
4935 placement of an error message by pointing to the operand of a
4936 type conversion rather than the conversion itself.
4938 2017-04-25 Thomas Quinot <quinot@adacore.com>
4940 * sem_ch13.adb (Build_Predicate_Function_Declaration): Set
4941 Needs_Debug_Info when producing SCOs.
4943 2017-04-25 Thomas Quinot <quinot@adacore.com>
4945 * exp_ch6.adb (Add_Finalization_Master_Actual_To_Build_In_Place_Call):
4946 Always pass a null finalization master for a library level named access
4947 type to which a pragme No_Heap_Finalization applies.
4949 2017-04-25 Arnaud Charlet <charlet@adacore.com trojanek>
4953 * a-ngcoar.adb, a-ngrear.adb (Inverse): call Unit_Matrix with First_1
4954 set to A'First(2) and vice versa.
4956 2017-04-25 Yannick Moy <moy@adacore.com>
4958 * freeze.adb (Freeze_Record_Type): Remove obsolete
4959 rule on volatile tagged record restriction on SPARK code.
4961 2017-04-25 Yannick Moy <moy@adacore.com>
4963 * sem_prag.adb (minor) Fix SPARK RM reference.
4965 2017-04-25 Yannick Moy <moy@adacore.com>
4967 * sem_util.adb, sem_util.ads (Unique_Defining_Entity): Update
4968 comment to reflect which entity is chosen as unique entity.
4969 (Unique_Entity): Return full view instead of private spec for
4970 protected type or task type. Fix possible incorrect access when
4973 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
4975 * sem_res.adb (Set_Slice_Subtype): Treat specially bit-packed
4976 array types only instead of all packed array types.
4978 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4980 * sem_ch6.adb (Conforming_Types): If type of formal as a specified
4981 dimension system, verify that dimensions of both match.
4982 (Check_Conformance): Add error message in case of dimension
4984 * sem_dim.ads, sem_dim.adb (Dimensions_Match): New utility
4987 2017-04-25 Arnaud Charlet <charlet@adacore.com trojanek>
4989 * gnatxref.adb, gnatfind.adb: Avoid using the term project file,
4992 2017-04-25 Yannick Moy <moy@adacore.com>
4994 * sem_util.adb: Minor refactoring.
4995 * freeze.adb (Freeze_Record_Type): Fix checking of SPARK RM 7.1.3(5).
4997 2017-04-25 Claire Dross <dross@adacore.com>
4999 * sem_prag.adb (Collect_Inherited_Class_Wide_Conditions): Go to
5000 ultimate alias when accessing overridden operation. Indeed, if the
5001 overridden operation is itself inherited, it won't have any explicit
5004 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5006 * sem_warn.adb (Warn_On_Overlapping_Actuals): There can be no
5007 overlap if the two formals have different types, because formally
5008 the corresponding actuals cannot designate the same objects.
5010 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5012 * sem_dim.adb (Dimensions_Of_Operand): minot cleanups: a) If
5013 dimensions are present from context, use them. b) If operand is
5014 a static constant rewritten as a literal, obtain the dimensions
5015 from the original declaration, otherwise use dimensions of type
5016 established from context.
5018 2017-04-25 Yannick Moy <moy@adacore.com>
5020 * sem_util.adb (Is_Effectively_Volatile): Protect against base type
5021 of array that is private.
5023 2017-04-25 Gary Dismukes <dismukes@adacore.com>
5025 * sem_ch3.adb, exp_util.adb, sem_prag.adb, exp_ch4.adb: Minor
5028 2017-04-25 Yannick Moy <moy@adacore.com>
5030 * a-ngelfu.adb, a-ngelfu.ads: Add SPARK_Mode On on spec, Off
5033 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5035 * sem_disp.adb (Check_Dispatching_Context): Add guard to refine
5036 the check that recognizes a call to a private overridding and
5037 replaces the called subprogram with its alias.
5039 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5041 * exp_util.adb: Minor reformatting.
5043 2017-04-25 Justin Squirek <squirek@adacore.com>
5045 * exp_ch3.adb (Freeze_Type): Add condition to always treat
5046 interface types as a partial view of a private type for the
5047 generation of invariant procedure bodies.
5048 * exp_util.adb, exp_util.ads (Add_Inherited_Invariants):
5049 Add a condition to get the Corresponding_Record_Type for
5050 concurrent types, add condition to return in the absence of a
5051 class in the pragma, remove call to Replace_Type_References,
5052 and add call to Replace_References.
5053 (Add_Interface_Invariatns),
5054 (Add_Parent_Invariants): Modify call to Add_Inherited_Invariants
5055 to including the working type T.
5056 (Add_Own_Invariants): Remove
5057 legacy condition for separate units, remove dispatching for ASIS
5058 and save a copy of the expression in the pragma expression.
5059 (Build_Invariant_Procedure_Body): Default initalize vars,
5060 remove return condition on interfaces, always use the
5061 private type for interfaces, and move the processing of types
5062 until after the processing of invariants for the full view.
5063 (Build_Invariant_Procedure_Declaration): Remove condition
5064 to return if an interface type is encountered and add
5065 condition to convert the formal parameter to its class-wide
5066 counterpart if Work_Typ is abstract.
5067 (Replace_Type): Add call to Remove_Controlling_Arguments.
5068 (Replace_Type_Ref): Remove class-wide dispatching for the current
5069 instance of the type.
5070 (Replace_Type_References): Remove parameter "Derived"
5071 (Remove_Controlling_Arguments): Created in order to removing
5072 the controlliong argument from calls to primitives in the case
5073 of the formal parameter being an class-wide abstract type.
5074 * sem_ch3.adb (Build_Assertion_Bodies_For_Type): Almost identical
5075 to the change made to Freeze_Type in exp_ch3. Add a condition
5076 to treat interface types as a partial view.
5077 * sem_prag.adb (Analyze_Pragma): Modify parameters in the call
5078 to Build_Invariant_Procedure_Declaration to properly generate a
5079 "partial" invariant procedure when Typ is an interface.
5081 2017-04-25 Bob Duff <duff@adacore.com>
5083 * a-numeri.ads: Go back to using brackets encoding for the Greek
5086 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5088 * sem_ch3.adb (Derive_Subprogram): Implement rule in RM 6.1.1
5089 (10-15): if derived type T with progenitors is abstract,
5090 and primitive P of this type inherits non-trivial classwide
5091 preconditions from both a parent operation and from an interface
5092 operation, then the inherited operation is abstract if the parent
5093 operation is not null.
5094 * sem_disp.ads, sem_disp.adb: replace function Covers_Some_Interface
5095 with Covered_Interface_Op to yield the actual interface operation
5096 that is implemented by a given inherited operation.
5098 2017-04-25 Javier Miranda <miranda@adacore.com>
5100 * exp_ch4.adb (Expand_N_Op_Expon): Relocate left
5101 and right operands after performing the validity checks. Required
5102 because validity checks may remove side effects from the operands.
5104 2017-04-25 Javier Miranda <miranda@adacore.com>
5106 * exp_attr.adb (Attribute_Unrestricted_Access):
5107 Do not disable implicit type conversion. Required to generate
5108 code that displaces the pointer to reference the secondary
5111 2017-04-25 Pascal Obry <obry@adacore.com>
5113 * prj-attr.adb, snames.ads-tmpl: Add package Install's
5114 Required_Artifacts attribute.
5116 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5118 * sem_util.adb (Same_Value): String literals are compile-time
5119 values, and comparing them must use Expr_Value_S.
5121 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5123 * sem_ch4.adb (Complete_Object_Interpretation): If an explicit
5124 dereference is introduced for the object, and the object is
5125 overloaded, do not check whether it is aliased, because it may
5126 include an implicit dereference.
5127 * sem_type.adb (Disambiguate): If two interpretations are access
5128 attribute types with the same designated type keep either of
5129 them and do not report an ambiguity. A true ambiguity will be
5132 2017-04-25 Bob Duff <duff@adacore.com>
5134 * a-numeri.ads: Change the encoding of Greek letter Pi from
5135 brackets encoding to UTF-8. Use pragma Wide_Character_Encoding
5136 to indicate the encoding. We considered using a byte order mark
5137 (BOM), but that causes various trouble (misc software eats the
5138 BOM, if you have a patch with a BOM, then it's not at the start
5139 of the patch, so it's not a BOM, the BOM affects with-ing files,
5141 * scng.adb, s-wchcnv.adb: Minor.
5143 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5145 * sem_ch3.adb, sem_ch8.adb, sem_disp.adb: Minor reformatting.
5146 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5148 * sem_ch3.adb (Add_Internal_Interface_Entities): Move
5149 Has_Non_Trivial_Precondition to sem_util. for use elsewhere.
5150 Improve error message on operations that inherit non-conforming
5151 classwide preconditions from ancestor and progenitor.
5152 * sem_util.ads, sem_util.adb (Has_Non_Trivial_Precondition):
5153 moved here from sem_ch3.
5154 * sem_ch8.adb (Analyze_Subprogram_Renaming): Implement legality
5155 check given in RM 6.1.1 (17) concerning renamings of overriding
5156 operations that inherits class-wide preconditions from ancestor
5159 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5161 * exp_ch7.adb (Build_Adjust_Or_Finalize_Statements): Code cleanup.
5162 (Build_Adjust_Statements): Code cleanup.
5163 (Build_Finalizer): Update the initialization of
5165 (Build_Finalize_Statements): Code cleanup.
5166 (Build_Initialize_Statements): Code cleanup.
5167 (Make_Deep_Array_Body): Update the initialization of
5169 (Make_Deep_Record_Body): Update the initialization of Exceptions_OK.
5170 (Process_Object_Declaration): Generate a null exception handler only
5171 when exceptions are allowed.
5172 (Process_Transients_In_Scope): Update the initialization of
5174 * exp_util.ads, exp_util.adb (Exceptions_In_Finalization_OK): New
5176 * sem_ch11.adb (Analyze_Exception_Handlers): Do not check any
5177 restrictions when the handler is internally generated and the
5180 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5182 * sem_ch3.adb (Has_Non_Trivial_Precondition): New predicate to
5183 enforce legality rule on classwide preconditions inherited from
5184 both an ancestor and a progenitor (RM 6.1.1 (10-13).
5185 * sem_disp.adb (Check_Dispatching_Context): A call to an abstract
5186 subprogram need not be dispatching if it appears in a precondition
5187 for an abstract or null subprogram.
5189 2017-04-25 Gary Dismukes <dismukes@adacore.com>
5191 * sem_ch10.adb: Minor typo fix.
5193 2017-04-25 Arnaud Charlet <charlet@adacore.com>
5195 * gcc-interface/Makefile.in: Cleanup VxWorks targets.
5197 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
5199 * fname.adb (Is_Internal_File_Name): Arrange for the slices to
5200 have a length which is a power of 2.
5201 (Is_Predefined_File_Name): Likewise. Adjust comment.
5203 2017-04-25 Bob Duff <duff@adacore.com>
5205 * exp_aggr.adb (Component_Count): Protect the
5206 arithmetic from attempting to convert a value >= 2**31 to Int,
5207 which would otherwise raise Constraint_Error.
5209 2017-04-25 Bob Duff <duff@adacore.com>
5211 * opt.ads (Locking_Policy): Fix incorrect documentation. The
5212 first character of the policy name is not unique.
5214 2017-04-25 Bob Duff <duff@adacore.com>
5216 * s-fileio.adb (Name): Raise Use_Error if the file is a temp file.
5217 * s-ficobl.ads (Is_Temporary_File): Remove incorrect comment
5218 about this flag not being used. It was already used, and it is
5221 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5223 * einfo.adb Flag301 is now known as Ignore_SPARK_Mode_Pragmas.
5224 (Ignore_SPARK_Mode_Pragmas): New routine.
5225 (Set_Ignore_SPARK_Mode_Pragmas): New routine.
5226 (Write_Entity_Flags): Add an entry for Ignore_SPARK_Mode_Pragmas.
5227 * einfo.ads Add new attribute Ignore_SPARK_Mode_Pragmas and update
5229 (Ignore_SPARK_Mode_Pragmas): New routine
5230 along with pragma Inline.
5231 (Set_Ignore_SPARK_Mode_Pragmas): New routine along with pragma Inline.
5232 * opt.ads Rename flag Ignore_Pragma_SPARK_Mode to
5233 Ignore_SPARK_Mode_Pragmas_In_Instance.
5234 * sem_ch6.adb (Analyze_Subprogram_Body_Helper):
5235 Save and restore the value of global flag
5236 Ignore_SPARK_Mode_Pragmas_In_Instance. Set or reinstate the value
5237 of global flag Ignore_SPARK_Mode_Pragmas_In_Instance when either
5238 the corresponding spec or the body must ignore all SPARK_Mode
5239 pragmas found within.
5240 (Analyze_Subprogram_Declaration): Mark
5241 the spec when it needs to ignore all SPARK_Mode pragmas found
5242 within to allow the body to infer this property in case it is
5243 instantiated or inlined later.
5244 * sem_ch7.adb (Analyze_Package_Body_Helper): Save and restore the
5245 value of global flag Ignore_SPARK_Mode_Pragmas_In_Instance. Set
5246 the value of global flag Ignore_SPARK_Mode_Pragmas_In_Instance
5247 when the corresponding spec also ignored all SPARK_Mode pragmas
5249 (Analyze_Package_Declaration): Mark the spec when
5250 it needs to ignore all SPARK_Mode pragmas found within to allow
5251 the body to infer this property in case it is instantiated or
5253 * sem_ch12.adb (Analyze_Formal_Package_Declaration):
5254 Save and restore the value of flag
5255 Ignore_SPARK_Mode_Pragmas_In_Instance. Mark the
5256 formal spec when it needs to ignore all SPARK_Mode
5257 pragmas found within to allow the body to infer this
5258 property in case it is instantiated or inlined later.
5259 (Analyze_Package_Instantiation): Save and restore the value
5260 of global flag Ignore_SPARK_Mode_Pragmas_In_Instance. Mark
5261 the instance spec when it needs to ignore all SPARK_Mode
5262 pragmas found within to allow the body to infer this
5263 property in case it is instantiated or inlined later.
5264 (Analyze_Subprogram_Instantiation): Save and restore the value
5265 of global flag Ignore_SPARK_Mode_Pragmas_In_Instance. Mark the
5266 instance spec and anonymous package when they need to ignore
5267 all SPARK_Mode pragmas found within to allow the body to infer
5268 this property in case it is instantiated or inlined later.
5269 (Instantiate_Package_Body): Save and restore the value of global
5270 flag Ignore_SPARK_Mode_Pragmas_In_Instance. Set the value of
5271 global flag Ignore_SPARK_Mode_Pragmas_In_Instance when the
5272 corresponding instance spec also ignored all SPARK_Mode pragmas
5274 (Instantiate_Subprogram_Body): Save and restore the
5275 value of global flag Ignore_SPARK_Mode_Pragmas_In_Instance. Set
5276 the value of global flag Ignore_SPARK_Mode_Pragmas_In_Instance
5277 when the corresponding instance spec also ignored all SPARK_Mode
5278 pragmas found within.
5279 * sem_prag.adb (Analyze_Pragma): Update the reference to
5280 Ignore_Pragma_SPARK_Mode.
5281 * sem_util.adb (SPARK_Mode_Is_Off): A construct which ignored
5282 all SPARK_Mode pragmas defined within yields mode "off".
5284 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5286 * bindgen.adb, exp_dbug.adb, errout.adb, fname.adb: Minor reformatting.
5288 2017-04-25 Bob Duff <duff@adacore.com>
5290 * exp_atag.adb (Build_CW_Membership): Add "Suppress =>
5291 All_Checks" to avoid generating unnecessary checks.
5292 * exp_ch4.adb (Expand_N_In, Make_Tag_Check): Add "Suppress =>
5294 * sem.ads: Fix comment.
5295 * expander.ads: Fix comment.
5296 * exp_atag.ads: Fix comment: "Index = 0" should be
5299 2017-04-25 Gary Dismukes <dismukes@adacore.com>
5301 * s-taprop-linux.adb: Minor editorial fixes.
5303 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
5305 * sem_util.adb (New_Copy_Tree): Put back the declarations of the
5306 hash tables at library level. Reinstate the NCT_Hash_Tables_Used
5307 variable and set it to True whenever the main hash table is
5308 populated. Short- circuit the Assoc function if it is false
5309 and add associated guards.
5311 2017-04-25 Olivier Hainque <hainque@adacore.com>
5313 * bindgen.adb (Gen_Elab_Calls): Also update counter of lone
5314 specs without elaboration code that have an elaboration counter
5315 nevertheless, e.g. when compiled with -fpreserve-control-flow.
5316 * sem_ch10.adb (Analyze_Compilation_Unit):
5317 Set_Elaboration_Entity_Required when requested to preserve
5318 control flow, to ensure the unit elaboration is materialized at
5319 bind time, resulting in the inclusion of the unit object file
5320 in the executable closure at link time.
5322 2017-04-25 Pierre-Marie de Rodat <derodat@adacore.com>
5324 * exp_dbug.adb: In Debug_Renaming_Declaration,
5325 when dealing with indexed component, accept to produce a renaming
5326 symbol when the index is an IN parameter or when it is a name
5327 defined in an outer scope.
5329 2017-04-25 Yannick Moy <moy@adacore.com>
5331 * errout.adb (Error_Msg): Adapt continuation
5332 message in instantiations and inlined bodies for info messages.
5334 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
5336 * fname.adb (Has_Internal_Extension): Add pragma Inline.
5337 Use direct 4-character slice comparisons.
5339 pragma Inline. (Has_Suffix): Delete.
5340 (Is_Internal_File_Name):
5341 Test Is_Predefined_File_Name first.
5342 (Is_Predefined_File_Name):
5343 Use direct slice comparisons as much as possible and limit all
5344 comparisons to at most 8 characters.
5346 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5348 * checks.adb (Insert_Valid_Check): Code cleanup.
5349 * exp_ch6.adb (Add_Validation_Call_By_Copy_Code): New routine.
5350 (Expand_Actuals): Generate proper copy-back for a validation
5351 variable when it acts as the argument of a type conversion.
5352 * sem_util.adb (Is_Validation_Variable_Reference): Augment the
5353 predicate to operate on type qualifications.
5355 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5357 * sem_prag.adb, exp_ch6.adb, binde.adb, sem_disp.adb, s-fileio.adb:
5360 2017-04-25 Bob Duff <duff@adacore.com>
5362 * sem_prag.adb (No_Return): Give an error if the pragma applies
5363 to a body. Specialize the error for the specless body case,
5364 as is done for (e.g.) pragma Convention.
5365 * debug.adb: Add switch -gnatd.J to disable the above legality
5366 checks. This is mainly for use in our test suite, to avoid
5367 rewriting a lot of illegal (but working) code. It might also
5368 be useful to customers. Under this switch, if a pragma No_Return
5369 applies to a body, and the procedure raises an exception (as it
5370 should), the pragma has no effect. If the procedure does return,
5371 execution is erroneous.
5373 2017-04-25 Bob Duff <duff@adacore.com>
5375 * exp_ch6.adb (Expand_Actuals): This is the
5376 root of the problem. It took N as an 'in out' parameter, and in
5377 some cases, rewrote N, but then set N to Original_Node(N). So
5378 the node returned in N had no Parent. The caller continued
5379 processing of this orphaned node. In some cases that caused a
5380 crash (e.g. Remove_Side_Effects climbs up Parents in a loop,
5381 and trips over the Empty Parent). The solution is to make N an
5382 'in' parameter. Instead of rewriting it, return the list of
5383 post-call actions, so the caller can do the rewriting later,
5384 after N has been fully processed.
5385 (Expand_Call_Helper): Move most of Expand_Call here. It has
5386 too many premature 'return' statements, and we want to do the
5387 rewriting on return.
5388 (Insert_Post_Call_Actions): New procedure to insert the post-call
5389 actions in the appropriate place. In the problematic case,
5390 that involves rewriting N as an Expression_With_Actions.
5391 (Expand_Call): Call the new procedures Expand_Call_Helper and
5392 Insert_Post_Call_Actions.
5394 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5396 * sem_prag.adb (Inherits_Class_Wide_Pre): Cleanup code, handle
5397 properly type derived from generic formal types, to handle
5398 properly modified version of ACATS 4.1B B611017.
5400 2017-04-25 Javier Miranda <miranda@adacore.com>
5402 * exp_unst.adb (Subp_Index): Adding missing
5403 support for renamings and functions that return a constrained
5404 array type (i.e. functions for which the frontend built a
5405 procedure with an extra out parameter).
5407 2017-04-25 Pascal Obry <obry@adacore.com>
5409 * s-string.adb: Minor code clean-up.
5411 2017-04-25 Bob Duff <duff@adacore.com>
5413 * s-os_lib.ads, s-os_lib.adb (Non_Blocking_Wait_Process): New
5415 * adaint.h, adaint.c (__gnat_portable_no_block_wait): C support
5416 function for Non_Blocking_Wait_Process.
5418 2017-04-25 Bob Duff <duff@adacore.com>
5420 * prep.adb (Preprocess): Remove incorrect
5421 Assert. Current character can be ASCII.CR.
5423 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5425 * sem_prag.adb (Set_Convention_From_Pragma): Cleanup code for
5426 convention Stdcall, which has a number of exceptions. Convention
5427 is legal on a component declaration whose type is an anonymous
5428 access to subprogram.
5430 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5432 * sem_ch4.adb: sem_ch4.adb Various reformattings.
5433 (Try_One_Prefix_Interpretation): Use the base type when dealing
5434 with a subtype created for purposes of constraining a private
5435 type with discriminants.
5437 2017-04-25 Javier Miranda <miranda@adacore.com>
5439 * einfo.ads, einfo.adb (Has_Private_Extension): new attribute.
5440 * warnsw.ads, warnsw.adb (All_Warnings): Set warning on late
5441 dispatching primitives (Restore_Warnings): Restore warning on
5442 late dispatching primitives (Save_Warnings): Save warning on late
5443 dispatching primitives (Do_Warning_Switch): Use -gnatw.j/-gnatw.J
5444 to enable/disable this warning.
5445 (WA_Warnings): Set warning on late dispatching primitives.
5446 * sem_ch3.adb (Analyze_Private_Extension_Declaration): Remember
5447 that its parent type has a private extension.
5448 * sem_disp.adb (Warn_On_Late_Primitive_After_Private_Extension):
5450 * usage.adb: Document -gnatw.j and -gnatw.J.
5452 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5454 * exp_ch7.adb, checks.adb, sem_prag.adb, eval_fat.adb: Minor
5457 2017-04-25 Bob Duff <duff@adacore.com>
5459 * binde.adb (Validate): Do not pass dynamic strings
5460 to pragma Assert, because older compilers do not support that.
5462 2017-04-25 Bob Duff <duff@adacore.com>
5464 * s-fileio.adb (Close): When a temp file is
5465 closed, delete it and clean up its Temp_File_Record immediately,
5466 rather than waiting until later.
5467 (Temp_File_Record): Add File
5468 component, so Close can know which Temp_File_Record corresponds
5469 to the file being closed.
5470 (Delete): Don't delete temp files,
5471 because they are deleted by Close.
5472 (Open): Set the File component
5473 of Temp_File_Record. This requires moving the creation of the
5474 Temp_File_Record to the end, after the AFCB has been created.
5476 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5478 * checks.adb (Insert_Valid_Check): Do not generate
5479 a validity check when inside a generic.
5481 2017-04-25 Yannick Moy <moy@adacore.com>
5483 * sem_res.adb (Resolve_Type_Conversion): Fix bad logic.
5485 2017-04-25 Arnaud Charlet <charlet@adacore.com>
5487 * snames.ads-tmpl (Snames): More names for detecting predefined
5488 potentially blocking subprograms.
5490 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5492 * sem_prag.adb (Analyze_Pre_Post_Condition): The rules
5493 concerning inheritance of class-wide preconditions do not apply
5496 2017-04-25 Bob Duff <duff@adacore.com>
5498 * s-ficobl.ads: Minor comment fix.
5500 2017-04-25 Yannick Moy <moy@adacore.com>
5502 * checks.adb (Apply_Scalar_Range_Check): Analyze precisely
5503 conversions from float to integer in GNATprove mode.
5504 (Apply_Type_Conversion_Checks): Make sure in GNATprove mode
5505 to call Apply_Type_Conversion_Checks, so that range checks
5506 are properly positioned when needed on conversions, including
5507 when converting from float to integer. (Determine_Range): In
5508 GNATprove mode, take into account the possibility of conversion
5509 from float to integer.
5510 * sem_res.adb (Resolve_Type_Conversion): Only enforce range
5511 check on conversions from fixed-point to integer, not anymore
5512 on conversions from floating-point to integer, when in GNATprove
5515 2017-04-25 Yannick Moy <moy@adacore.com>
5517 * checks.adb (Determine_Range_R): Special case type conversions
5518 from integer to float in order to get bounds in that case too.
5519 * eval_fat.adb (Machine): Avoid issuing warnings in GNATprove
5520 mode, for computations involved in interval checking.
5522 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5524 * checks.adb (Insert_Valid_Check): Partially reimplement validity
5526 * einfo.adb Node36 is now used as Validated_Object.
5527 (Validated_Object): New routine.
5528 (Set_Validated_Object): New routine.
5529 (Write_Field36_Name): Add an entry for Validated_Object.
5530 * einfo.ads Add new attribute Validated_Object along with
5532 (Validated_Object): New routine along with pragma Inline.
5533 (Set_Validated_Object): New routine along with pragma Inline.
5534 * exp_attr.adb (Make_Range_Test): Add processing for validation
5535 variables to avoid extra reads and copies of the prefix.
5536 * exp_ch6.adb (Expand_Actuals): Add copy-back for validation
5537 variables in order to reflect any changes done in the variable
5538 back into the original object.
5539 * sem_util.adb (Is_Validation_Variable_Reference): New routine.
5540 * sem_util.ads (Is_Validation_Variable_Reference): New routine.
5542 2017-04-25 Steve Baird <baird@adacore.com>
5544 * exp_ch7.adb (Build_Array_Deep_Procs,
5545 Build_Record_Deep_Procs, Make_Finalize_Address_Body): Don't
5546 generate Finalize_Address routines for CodePeer.
5548 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5550 * sem_prag.adb (Inherits_Class_Wide_Pre): subsidiary of
5551 Analyze_Pre_Post_Condition, to implement the legality checks
5552 mandated by AI12-0131: Pre'Class shall not be specified for an
5553 overriding primitive subprogram of a tagged type T unless the
5554 Pre'Class aspect is specified for the corresponding primitive
5555 subprogram of some ancestor of T.
5557 2017-04-25 Bob Duff <duff@adacore.com>
5559 * sem_ch8.adb (Use_One_Type): If a use_type_clause
5560 is redundant, set its Used_Operations to empty. This is only
5561 necessary for use clauses that appear in the parent of a generic
5562 child unit, because those use clauses get reanalyzed when we
5563 instantiate the generic, and we don't want the Used_Operations
5564 carried over from the original context (where it was probably
5567 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5569 * exp_ch6.adb: Minor reformatting.
5571 2017-04-25 Bob Duff <duff@adacore.com>
5573 * sem_prag.adb (Process_Restrictions_Or_Restriction_Warnings):
5574 Use Source_Index (Current_Sem_Unit) to find the correct casing.
5575 * exp_prag.adb (Expand_Pragma_Check): Use Source_Index
5576 (Current_Sem_Unit) to find the correct casing.
5577 * par.adb (Par): Null out Current_Source_File, to ensure that
5578 the above bugs won't rear their ugly heads again.
5580 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5582 * sem_ch8.adb (Find_Type): For an attribute reference
5583 'Class, if prefix type is synchronized and previous errors
5584 have suppressed the creation of the corresponding record type,
5585 create a spurious class-wide for the synchonized type itself,
5586 to catch other misuses of the attribute
5588 2017-04-25 Steve Baird <baird@adacore.com>
5590 * exp_ch6.adb (Expand_Simple_Function_Return): if CodePeer_Mode
5591 is True, then don't generate the accessibility check for the
5592 tag of a tagged result.
5593 * exp_intr.adb (Expand_Dispatching_Constructor_Call):
5594 if CodePeer_Mode is True, then don't generate the
5595 tag checks for the result of call to an instance of
5596 Ada.Tags.Generic_Dispatching_Constructor (i.e., both the "is a
5597 descendant of" check and the accessibility check).
5599 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5601 * sem_ch13.adb: Code cleanups.
5602 * a-strbou.ads: minor whitespace fix in Trim for bounded strings.
5603 * sem_ch8.ads: Minor comment fix.
5605 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
5607 * exp_ch4.adb (Library_Level_Target): New function.
5608 (Expand_Concatenate): When optimization is enabled, also expand
5609 the operation out-of-line if the concatenation is present within
5610 the expression of the declaration of a library-level object and
5611 not only if it is the expression of the declaration.
5613 2017-04-25 Bob Duff <duff@adacore.com>
5615 * freeze.adb (Freeze_Object_Declaration): Do
5616 not Remove_Side_Effects if there is a pragma Linker_Section,
5617 because in that case we want static initialization in the
5618 appropriate section.
5620 2017-04-25 Gary Dismukes <dismukes@adacore.com>
5622 * exp_dbug.adb: Minor rewording and reformatting.
5624 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5626 * sem_attr.adb (Statically_Denotes_Object): New predicate, to
5627 handle the proposed changes to rules concerning potentially
5628 unevaluated expressions, to include selected components that
5629 do not depend on discriminants, and indexed components with
5631 * sem_util.adb (Is_Potentially_Unevaluated): Add check for
5632 predicate in quantified expression, and fix bugs in the handling
5633 of case expressions and membership test.
5634 (Analyze_Attribute_Old_Result): use new predicate.
5635 (Analyze_Attribute, case Loop_Entry): ditto.
5637 2017-04-25 Bob Duff <duff@adacore.com>
5639 * s-secsta.adb (SS_Info): Add a comment
5640 explaining why we don't need to walk all the chunks in order to
5641 compute the total size.
5643 2017-04-25 Bob Duff <duff@adacore.com>
5645 * namet.ads, namet.adb (Global_Name_Buffer): Increase the length
5646 of the global name buffer to 4*Max_Line_Length.
5648 2017-04-25 Javier Miranda <miranda@adacore.com>
5650 * exp_ch8.adb (Expand_N_Object_Renaming_Declaration): When creating a
5651 renaming entity for debug information, mark the entity as needing debug
5652 info if it comes from sources.
5654 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5656 * sem_ch13.adb (Analyze_Attribute_Definition_Clause): Remove the
5657 restriction converning the use of 'Address where the prefix is
5658 of a controlled type.
5660 2017-04-25 Pierre-Marie de Rodat <derodat@adacore.com>
5662 * exp_dbug.adb: In Debug_Renaming_Declaration,
5663 skip slices that are made redundant by an indexed component
5665 * atree.h: New definition for Original_Node.
5667 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5669 * sem_prag.adb, sem_prag.ads: Minor reformatting.
5671 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5673 * sem_ch3.adb (Check_Entry_Contract): Call
5674 Preanalyze_Spec_Expression so that resolution takes place as well.
5675 * sem_util.adb (Check_Internal_Protected_Use): Reject properly
5676 internal calls that appear in preconditions of protected
5677 operations, in default values for same, and in contract guards
5678 for contract cases in SPARK.
5680 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
5682 * a-numaux.ads: Fix description of a-numaux-darwin
5684 (Double): Define to Long_Float.
5685 * a-numaux-vxworks.ads (Double): Likewise.
5686 * a-numaux-darwin.ads
5688 * a-numaux-libc-x86.ads (Double): Define to Long_Long_Float.
5689 * a-numaux-x86.ads: Fix package description.
5690 * a-numaux-x86.adb (Is_Nan): Minor tweak.
5691 (Reduce): Adjust and complete description. Call Is_Nan instead of
5692 testing manually. Use an integer temporary to hold rounded value.
5693 * a-numaux-darwin.adb (Reduce): Likewise.
5694 (Is_Nan): New function.
5696 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5698 * sem_ch4.adb (Analyze_Selected_Component): Additional refinement
5699 on analysis of prefix whose type is a current instance of a
5700 synchronized type, but where the prefix itself is an entity that
5703 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5705 * exp_ch5.adb (Replace_Target): When rewriting the RHS, preserve
5706 the identity of callable entities therein, because they have been
5707 properly resolved, and prefixed calls may have been rewritten
5710 2017-04-25 Patrick Bernardi <bernardi@adacore.com>
5712 * exp_ch3.adb (Build_Init_Statements): Convert
5713 the expression of the pragma/aspect Secondary_Stack_Size to
5714 internal type System.Parameters.Size_Type before assigning
5715 it to the Secondary_Stack_Size component of the task type's
5716 corresponding record.
5718 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
5720 * sem_eval.adb (Compile_Time_Compare): Reinstate the expr+literal
5721 (etc) optimizations when the type is modular and the offsets
5724 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
5726 * s-osinte-freebsd.ads: Minor comment tweaks
5728 2017-04-25 Javier Miranda <miranda@adacore.com>
5730 * urealp.adb (UR_Write): Reverse previous patch
5731 adding documentation on why we generate multiplications instead
5732 of divisions (needed to avoid expressions whose computation with
5733 large numbers may cause division by 0).
5735 2017-04-25 Bob Duff <duff@adacore.com>
5737 * erroutc.adb (Set_Specific_Warning_Off,
5738 Set_Warnings_Mode_Off): Use the correct source file for
5739 Stop. Was using Current_Source_File, which is only valid during
5740 parsing. Current_Source_File will have a leftover value from
5741 whatever file happened to be parsed last, because of a with_clause
5744 2017-04-25 Bob Duff <duff@adacore.com>
5746 * lib.ads, lib.adb (In_Internal_Unit): New functions similar
5747 to In_Predefined_Unit, but including GNAT units.
5748 * sem_util.ads, sem_util.adb (Should_Ignore_Pragma): Replace
5749 with Should_Ignore_Pragma_Par and Should_Ignore_Pragma_Sem,
5750 because Should_Ignore_Pragma was not working reliably outside
5751 the parser, because Current_Source_File is not valid.
5752 * sem_prag.adb, exp_prag.adb: Call Should_Ignore_Pragma_Sem.
5753 * par-prag.adb: Call Should_Ignore_Pragma_Par.
5755 2017-04-25 Arnaud Charlet <charlet@adacore.com trojanek>
5757 * gnat1drv.adb (Gnat1Drv): Disable Generate_Processed_File in
5760 2017-04-25 Javier Miranda <miranda@adacore.com>
5762 * urealp.adb (UR_Write): Fix output of constants with a base other
5765 2017-04-25 Justin Squirek <squirek@adacore.com>
5767 * sem_ch13.adb (Get_Interfacing_Aspects): Moved to sem_util.adb.
5768 * sem_prag.adb (Analyze_Pragma, Process_Import_Or_Interface):
5769 Add extra parameter for Process_Interface_Name.
5770 (Process_Interface_Name): Add parameter for pragma to analyze
5771 corresponding aspect.
5772 * sem_util.ads, sem_util.adb (Get_Interfacing_Aspects): Added
5775 2017-04-25 Gary Dismukes <dismukes@adacore.com>
5777 * exp_ch7.adb, einfo.ads, sem_prag.adb: Minor reformatting and typo
5780 2017-04-25 Yannick Moy <moy@adacore.com>
5782 * sem_res.adb (Resolve_Comparison_Op): Do not
5783 attempt evaluation of relational operations inside assertions.
5785 2017-04-25 Justin Squirek <squirek@adacore.com>
5787 * exp_util.adb (Add_Interface_Invariants):
5788 Restored, code moved back from Build_Invariant_Procedure_Body.
5789 (Add_Parent_Invariants): Restored, code moved back from
5790 Build_Invariant_Procedure_Body.
5791 (Build_Invariant_Procedure_Body):
5792 Remove refactored calls and integrated code from
5793 Add_Parent_Invariants and Add_Interface_Invariants.
5795 2017-04-25 Johannes Kanig <kanig@adacore.com>
5797 * errout.adb (Output_Messages): Adjust computation of total
5799 * erroutc.adb (Error_Msg): In statistics counts, deal
5800 correctly with informational messages that are not warnings.
5801 * errutil.adb (Finalize): adjust computation of total errors.
5803 2017-04-25 Arnaud Charlet <charlet@adacore.com trojanek>
5805 * terminals.c (__gnat_terminate_pid): New.
5806 * g-exptty.ads (Terminate_Process): New. Update comments.
5808 2017-04-25 Arnaud Charlet <charlet@adacore.com>
5810 * a-cfinve.ads, a-cofove.ads (Empty_Vector): add Global contract.
5812 2017-04-25 Justin Squirek <squirek@adacore.com>
5814 * sem_ch3.adb (Analyze_Declarations): Minor
5815 correction to comments, move out large conditional and scope
5816 traversal into a predicate.
5817 (Uses_Unseen_Lib_Unit_Priv): Predicate function made from extracted
5820 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5822 * sem_ch4.adb (Analyze_Selected_Component): Refine analysis
5823 of prefix whose type is a current instance of a synchronized
5824 type. If the prefix is an object this is an external call (or
5825 requeue) that can only access public operations of the object. The
5826 previous predicate was too restrictive, and did not allow public
5827 protected operations, only task entries.
5829 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5831 * sem_ch5.adb, fname.adb: Minor reformatting.
5833 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5835 * einfo.adb (Is_Anonymous_Access_Type): New routine.
5836 * einfo.ads Update the placement of
5837 E_Anonymous_Access_Subprogram_Type along with all subtypes that
5839 (Is_Anonymous_Access_Type): New routine.
5840 * exp_ch7.adb (Allows_Finalization_Master): Do not generate a
5841 master for an access type subject to pragma No_Heap_Finalization.
5842 * exp_util.adb (Build_Allocate_Deallocate_Proc): An object being
5843 allocated or deallocated does not finalization actions if the
5844 associated access type is subject to pragma No_Heap_Finalization.
5845 * opt.ads Add new global variable No_Heap_Finalization_Pragma.
5846 * par-prag.adb Pragma No_Heap_Finalization does not need special
5847 processing from the parser.
5848 * sem_ch6.adb (Check_Return_Subtype_Indication): Remove ancient
5849 ??? comments. Use the new predicate Is_Anonymous_Access_Type.
5850 * sem_prag.adb Add an entry in table Sig_Flags for pragma
5851 No_Heap_Finalization.
5852 (Analyze_Pragma): Add processing for
5853 pragma No_Heap_Finalization. Update various error messages to
5854 use Duplication_Error.
5855 * sem_util.ads, sem_util.adb (No_Heap_Finalization): New routine.
5856 * snames.ads-tmpl: Add new predefined name No_Heap_Finalization
5857 and corresponding pragma id.
5859 2017-04-25 Bob Duff <duff@adacore.com>
5861 * freeze.adb (Freeze_Record_Type): Use the
5862 underlying type of the component type to determine whether it's
5863 elementary. For representation clause purposes, a private type
5864 should behave the same as its full type.
5865 * fname.ads, fname.adb (Is_Predefined_File_Name):
5866 Make sure things like "system.ali" are recognized as predefined.
5868 2017-04-25 Javier Miranda <miranda@adacore.com>
5870 * debug.adb: Update documentation of -gnatd.6.
5872 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5874 * sem_ch5.adb (Preanalyze_Range): Handle properly an Ada2012
5875 element iterator when the name is an overloaded function call,
5876 one of whose interpretations yields an array.
5878 2017-04-25 Bob Duff <duff@adacore.com>
5880 * uname.ads, uname.adb (Is_Predefined_Unit_Name,
5881 Is_Internal_Unit_Name): New functions for operating on unit
5882 names, as opposed to file names. There's some duplicated code
5883 with fname.adb, which is unfortunate, but it seems like we don't
5884 want to add dependencies here.
5885 * fname-uf.adb (Get_File_Name): Change Is_Predefined_File_Name
5886 to Is_Predefined_Unit_Name; the former was wrong, because Uname
5887 is not a file name at all.
5888 * fname.ads, fname.adb: Document the fact that
5889 Is_Predefined_File_Name and Is_Internal_File_Name can be called
5890 for ALI files, and fix the code so it works properly for ALI
5891 files. E.g. these should return True for "system.ali".
5893 2017-04-25 Justin Squirek <squirek@adacore.com>
5895 * exp_util.adb (Add_Invariant): Removed,
5896 code moved to Add_Invariant_Check, Add_Inherited_Invariant,
5897 and Add_Own_Invariant. (Add_Invariant_Check): Used
5898 for adding runtime checks from any kind of invariant.
5899 (Add_Inherited_Invariant): Generates invariant checks for
5900 class-wide invariants (Add_Interface_Invariants): Removed, code
5901 moved to Build_Invariant_Procedure_Body (Add_Own_Invariant):
5902 Create a types own invariant procedure (Add_Parent_Invariants):
5903 Removed, code moved to Build_Invariant_Procedure_Body
5904 (Build_Invariant_Procedure_Body): Add refactored calls
5905 and integrated code from Add_Parent_Invariants and
5906 Add_Interface_Invariants.
5907 (Process_Type): Removed, the
5908 relavant code was inlined into both Add_Own_Invariant and
5909 Add_Inherited_Invariant.
5911 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5913 * make.adb, par-ch2.adb, sem_util.adb, scans.ads, sem_ch8.adb,
5914 scn.adb, osint.adb, fname.adb: Minor reformatting.
5916 2017-04-25 Pascal Obry <obry@adacore.com>
5918 * s-taprop-mingw.adb: Do not check for CloseHandle in
5921 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5923 * sem_util.adb (Check_Part_Of_Reference):
5924 Continue to examine the context if the reference appears within
5925 an expression function.
5927 2017-04-25 Justin Squirek <squirek@adacore.com>
5929 * exp_ch7.adb, exp_ch7.ads Remove Build_Invariant_Procedure_Body
5930 and Build_Invariant_Procedure_Declaration.
5931 * exp_util.ads, exp_util.adb Add Build_Invariant_Procedure_Body
5932 and Build_Invariant_Procedure_Declaration from exp_ch7
5933 and break-out Is_Untagged_Private_Derivation from
5934 Build_Invariant_Procedure_Body.
5935 (Replace_Type_References):
5936 Append an extra parameter to allow for dispatching replacements
5937 and add the corrasponding logic.
5938 (Type_Invariant): Remove
5939 Replace_Typ_Refs and replace its references with calls to
5940 Replace_Type_References.
5941 * sem_ch3.adb, sem_prag.adb: Remove with and use of exp_ch7.
5943 2017-04-25 Bob Duff <duff@adacore.com>
5945 * sem_util.ads, sem_util.adb (Should_Ignore_Pragma): New function
5946 that returns True when appropriate.
5947 * par-prag.adb, exp_prag.adb, sem_prag.adb: Do not ignore pragmas
5948 when compiling predefined files.
5949 * fname.ads, fname.adb (Is_Predefined_File_Name): Fix bug:
5950 "gnat.adc" should not be considered a predefined file name.
5951 That required (or at least encouraged) a lot of cleanup of global
5952 variable usage. We shouldn't be communicating information via
5953 the global name buffer.
5954 * bindgen.adb, errout.adb, fname-uf.adb, lib-load.adb, make.adb,
5955 * restrict.adb, sem_ch10.adb, sem_ch6.adb, sem_ch8.adb: Changes
5956 required by the above-mentioned cleanup.
5958 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5960 * osint.adb (Find_File): Handle properly a request for a
5961 configuration file whose name is a directory.
5963 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5965 * sem_attr.adb, sem_ch5.adb: Minor reformatting.
5967 2017-04-25 Bob Duff <duff@adacore.com>
5969 * types.ads: Minor: Fix '???' comment.
5970 * sem_ch8.adb: Minor comment fix.
5972 2017-04-25 Bob Duff <duff@adacore.com>
5974 * sem_prag.adb: Remove suspicious uses of Name_Buf.
5975 * stringt.ads, stringt.adb, exp_dbug.adb, sem_dim.adb: Remove
5976 Add_String_To_Name_Buffer, to avoid using the global Name_Buf.
5977 Add String_To_Name with no side effects.
5979 2017-04-25 Justin Squirek <squirek@adacore.com>
5981 * sem_ch3.adb (Analyze_Declarations): Add
5982 additional condition for edge case.
5984 2017-04-25 Bob Duff <duff@adacore.com>
5986 * par-ch2.adb, scans.ads, scn.adb: Do not give an error for
5987 reserved words inside pragmas. This is necessary to allow the
5988 pragma name Interface to be used in pragma Ignore_Pragma.
5989 * par.adb: Minor comment fix.
5991 2017-04-25 Javier Miranda <miranda@adacore.com>
5993 * a-tags.ads, a-tags.adb (Type_Is_Abstract): Renamed as Is_Abstract.
5994 * rtsfind.ads (RE_Type_Is_Abstract): Renamed as Is_Abstract.
5995 * exp_disp.adb (Make_DT): Update occurrences of RE_Type_Is_Abstract.
5996 * exp_intr.adb (Expand_Dispatching_Constructor_Call): Update
5997 occurrences of RE_Type_Is_Abstract
5999 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
6001 * exp_util.adb (Build_Chain): Account for ancestor
6002 subtypes while traversing the derivation chain.
6004 2017-04-25 Ed Schonberg <schonberg@adacore.com>
6006 * sem_attr.adb: minor reformatting.
6008 2017-04-25 Doug Rupp <rupp@adacore.com>
6010 * sigtramp-vxworks-target.inc [PPC64]: Add a .localentry pseudo-op.
6012 2017-04-25 Ed Schonberg <schonberg@adacore.com>
6014 * sem_ch5.adb (Analyze_Assignment): Reset Full_Analysis flag on
6015 the first pass over an assignment statement with target names,
6016 to prevent the generation of subtypes (such as discriminated
6017 record components)that may carry the target name outside of the
6018 tree for the assignment. The subtypes will be generated when
6019 the assignment is reanalyzed in full.
6020 (Analyze_Target_Name): Handle properly class-wide types.
6022 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
6024 * elists.ads, elists.adb (Prepend_Unique_Elmt): New routine.
6025 * exp_ch3.adb (Freeze_Type): Signal the DIC body is created for
6026 the purposes of freezing.
6027 * exp_util.adb Update the documentation and structure of the
6028 type map used in class-wide semantics of assertion expressions.
6029 (Add_Inherited_Tagged_DIC): There is really no need to preanalyze
6030 and resolve the triaged expression because all substitutions
6031 refer to the proper entities. Update the replacement of
6033 (Build_DIC_Procedure_Body): Add formal parameter
6034 For_Freeze. Add local variable Build_Body. Inherited DIC pragmas
6035 are now only processed when freezing occurs. Build a body only
6037 (Entity_Hash): Removed.
6038 (Map_Types): New routine.
6039 (Replace_Object_And_Primitive_References): Removed.
6040 (Replace_References): New routine.
6041 (Replace_Type_References): Moved to the library level of Exp_Util.
6042 (Type_Map_Hash): New routine.
6043 (Update_Primitives_Mapping): Update the mapping call.
6044 (Update_Primitives_Mapping_Of_Types): Removed.
6045 * exp_util.ads (Build_DIC_Procedure_Body): Add formal
6046 parameter For_Freeze and update the comment on usage.
6047 (Map_Types): New routine.
6048 (Replace_References): New routine.
6049 (Replace_Type_References): Moved to the library level of Exp_Util.
6050 (Update_Primitives_Mapping_Of_Types): Removed.
6051 * sem_ch7.adb (Preserve_Full_Attributes): Propagate the DIC
6052 properties of the private type to the full view in case the full
6053 view derives from a parent type and inherits a DIC pragma.
6054 * sem_prag.adb (Analyze_Pragma): Guard against a case where a
6055 DIC pragma is placed at the top of a declarative region.
6057 2017-04-25 Arnaud Charlet <charlet@adacore.com trojanek>
6059 * a-tasatt.adb: Complete previous change and use an unsigned
6060 int to avoid overflow checks.
6062 2017-04-25 Ed Schonberg <schonberg@adacore.com>
6064 * sem_attr.adb (Analyze_Attribute, case 'Access): Specialize
6065 the error message when the attribute reference is an actual in
6066 a call to a subprogram inherited from a generic formal type with
6067 unknown discriminants, which makes the subprogram and its formal
6068 parameters intrinsic (see RM 6.3.1 (8) and (13)).
6070 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
6072 * sem_aggr.adb, inline.adb, einfo.adb, einfo.ads, scng.adb,
6073 sem_prag.adb: Minor reformatting.
6075 2017-04-25 Bob Duff <duff@adacore.com>
6077 * sem_attr.adb (Type_Key): Add code in the
6078 recursive Compute_Type_Key to protect against fetching the source
6079 code for Standard, in case a component of the type is declared
6080 in Standard. There was already code to do this for the original
6081 type, but not for its components.
6083 2017-04-25 Javier Miranda <miranda@adacore.com>
6085 * exp_ch3.adb (Build_Initialization_Call): Handle
6086 subtypes of private types when searching for the underlying full
6087 view of a private type.
6089 2017-04-25 Javier Miranda <miranda@adacore.com>
6091 * sem_res.adb (Set_Mixed_Mode_Operand): A universal
6092 real conditional expression can appear in a fixed-type context
6093 and must be resolved with that context to facilitate the code
6094 generation to the backend.
6096 2017-04-25 Ed Schonberg <schonberg@adacore.com>
6098 * einfo.adb, einfo.ads (Body_Needed_For_Inlining): New flag,
6099 to indicate whether during inline processing, when some unit U1
6100 appears in the context of a unit U2 compiled for instantiation
6101 or inlining purposes, the body of U1 needs to be compiled as well.
6102 * sem_prag.adb (Process_Inline): Set Body_Needed_For_Inlining if
6103 context is a package declaration.
6104 * sem_ch12.adb (Analyze_Generic_Subprogram_Declaration,
6105 Analyze_Generic_Package_Declaration): ditto.
6106 * inline.adb (Analyze_Inlined_Bodies): Check
6107 Body_Needed_For_Inlining.
6109 2017-04-25 Ed Schonberg <schonberg@adacore.com>
6111 * par.adb (Current_Assign_Node): Global variable use to record
6112 the presence of a target_name in the right hand side of the
6113 assignment being parsed.
6114 * par-ch4.adb (P_Name): If the name is a target_name, mark the
6115 enclosing assignment node accordingly.
6116 * par-ch5.adb (P_Assignment_Statement): Set Current_Assign_Node
6118 * sem_ch5.adb (Analyze_Assignment): Disable expansion before
6119 analyzing RHS if the statement has target_names.
6120 * sem_aggr.adb (Resolve_Iterated_Component_Association): Handle
6121 properly choices that are subtype marks.
6122 * exp_ch5.adb: Code cleanup.
6124 2017-04-25 Bob Duff <duff@adacore.com>
6126 * s-memory.adb: Add a comment regarding efficiency.
6127 * atree.adb: Fix the assertion, and combine 2 assertions into one,
6128 "the source has an extension if and only if the destination does."
6129 * sem_ch3.adb, sem_ch13.adb: Address ??? comments.
6131 2017-04-25 Arnaud Charlet <charlet@adacore.com trojanek>
6133 * a-tasatt.adb (Set_Value): Fix handling of 32bits -> 64bits
6136 2017-04-25 Doug Rupp <rupp@adacore.com>
6138 * init.c (__gnat_error_handler) [vxworks]: Turn on sigtramp
6139 handling for ppc64-vx7.
6140 * sigtramp-vxworks-target.inc
6141 [SIGTRAMP_BODY]: Add section for ppc64-vx7.
6143 2017-04-25 Arnaud Charlet <charlet@adacore.com>
6145 * ada_get_targ.adb: New file.
6147 2017-04-25 Bob Duff <duff@adacore.com>
6149 * uintp.adb (Most_Sig_2_Digits): In case Direct (Right), fetch
6150 Direct_Val (Right), instead of the incorrect Direct_Val (Left).
6151 (UI_GCD): Remove ??? comment involving possible efficiency
6152 improvements. This just isn't important after all these years.
6154 * uintp.ads: Minor cleanup.
6156 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
6158 * exp_util.adb, exp_util.ads, sem_ch7.adb, sem_prag.adb, exp_ch3.adb:
6159 Revert previous changes.
6160 * scng.adb: Minor reformatting.
6161 * s-stratt.ads: Fix unbalanced parens in comment.
6163 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
6165 * sem_ch3.adb, exp_util.adb, sem_prag.adb, freeze.adb, sem_util.adb:
6168 2017-04-25 Ed Schonberg <schonberg@adacore.com>
6170 * scng.adb (Scan): Handle '@' appropriately.
6171 * sem_ch5.adb: Code cleanup.
6173 2017-04-25 Ed Schonberg <schonberg@adacore.com>
6175 * freeze.adb (Check_Expression_Function): Do not check for the
6176 use of deferred constants if the freezing of the expression
6177 function is triggered by its generated body, rather than a
6180 2017-04-25 Javier Miranda <miranda@adacore.com>
6182 * exp_attr.adb (Rewrite_Stream_Proc_Call): Handle
6183 subtypes of private types when performing the view conversion.
6185 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
6187 * exp_ch3.adb (Freeze_Type): Signal the DIC body is created for
6188 the purposes of freezing.
6189 * exp_util.adb Update the documentation and structure of the
6190 type map used in class-wide semantics of assertion expressions.
6191 (Add_Inherited_Tagged_DIC): There is really no need to preanalyze
6192 and resolve the triaged expression because all substitutions
6193 refer to the proper entities. Update the replacement of
6195 (Build_DIC_Procedure_Body): Add formal parameter
6196 For_Freeze. Add local variable Build_Body. Inherited DIC pragmas
6197 are now only processed when freezing occurs. Build a body only
6199 (Entity_Hash): Removed.
6200 (Map_Types): New routine.
6201 (Replace_Object_And_Primitive_References): Removed.
6202 (Replace_References): New routine.
6203 (Replace_Type_References): Moved to the library level of Exp_Util.
6204 (Type_Map_Hash): New routine.
6205 (Update_Primitives_Mapping): Update the mapping call.
6206 (Update_Primitives_Mapping_Of_Types): Removed.
6207 * exp_util.ads (Build_DIC_Procedure_Body): Add formal
6208 parameter For_Freeze and update the comment on usage.
6209 (Map_Types): New routine.
6210 (Replace_References): New routine.
6211 (Replace_Type_References): Moved to the library level of Exp_Util.
6212 (Update_Primitives_Mapping_Of_Types): Removed.
6213 * sem_ch7.adb (Preserve_Full_Attributes): Propagate the DIC
6214 properties of the private type to the full view in case the full
6215 view derives from a parent type and inherits a DIC pragma.
6216 * sem_prag.adb (Analyze_Pragma): Guard against a case where a
6217 DIC pragma is placed at the top of a declarative region.
6219 2017-04-25 Tristan Gingold <gingold@adacore.com>
6221 * s-mmap.ads (Data): Add pragma Inline.
6223 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
6225 * checks.adb (Insert_Valid_Check): Do not use
6226 a renaming to alias a volatile name because this will lead to
6227 multiple evaluations of the volatile name. Use a constant to
6228 capture the value instead.
6230 2017-04-25 Doug Rupp <rupp@adacore.com>
6232 * init.c [VxWorks Section]: Disable sigtramp for ppc64-vx7.
6234 2017-04-25 Ed Schonberg <schonberg@adacore.com>
6236 * exp_util.adb, exp_util.ads (Build_Class_Wide_Expression):
6237 Add out parameter to indicate to caller that a wrapper must
6238 be constructed for an inherited primitive whose inherited
6239 pre/postcondition has called to overridden primitives.
6240 * freeze.adb (Check_Inherited_Conditions): Build wrapper body
6241 for inherited primitive that requires it.
6242 * sem_disp.adb (Check_Dispatching_Operation): Such wrappers are
6243 legal primitive operations and belong to the list of bodies
6244 generated after the freeze point of a type.
6245 * sem_prag.adb (Build_Pragma_Check_Equivalent): Use new signature
6246 of Build_Class_Wide_Expression.
6247 * sem_util.adb, sem_util.ads (Build_Overriding_Spec): New procedure
6248 to construct the specification of the wrapper subprogram created
6249 for an inherited operation.
6251 2017-04-25 Bob Duff <duff@adacore.com>
6253 * s-osinte-linux.ads (pthread_mutexattr_setprotocol,
6254 pthread_mutexattr_setprioceiling): Add new interfaces for these
6256 * s-taprop-linux.adb (Initialize_Lock, Initialize_TCB): Set
6257 protocols as appropriate for Locking_Policy 'C' and 'I'.
6258 * s-taprop-posix.adb: Minor reformatting to make it more similar
6259 to s-taprop-linux.adb.
6261 2017-04-25 Ed Schonberg <schonberg@adacore.com>
6263 * sem_ch3.adb (Get_Discriminant_Value, Search_Derivation_Levels):
6264 Handle properly a multi- level derivation involving both renamed
6265 and constrained parent discriminants, when the type to be
6266 constrained has fewer discriminants that the ultimate ancestor.
6268 2017-04-25 Bob Duff <duff@adacore.com>
6270 * sem_util.adb (Is_Object_Reference): In the
6271 case of N_Explicit_Dereference, return False if it came from a
6272 conditional expression.
6274 2017-04-25 Bob Duff <duff@adacore.com>
6276 * par-ch4.adb (P_Case_Expression): If a semicolon
6277 is followed by "when", assume that ";" was meant to be ",".
6279 2017-04-25 Gary Dismukes <dismukes@adacore.com>
6281 * sem_ch9.adb, sem_ch10.adb, sem_util.adb: Minor reformatting and typo
6284 2017-04-25 Arnaud Charlet <charlet@adacore.com>
6286 * rtsfind.ads (SPARK_Implicit_Load): New procedure for forced
6287 loading of an entity.
6288 * rtsfind.adb (SPARK_Implicit_Load): Body with a pattern
6289 previously repeated in the analysis.
6290 * sem_ch9.adb (Analyze_Protected_Type_Declaration): use new
6291 procedure SPARK_Implicit_Load. (Analyze_Task_Type_Declaration):
6292 use new procedure SPARK_Implicit_Load.
6293 * sem_ch10.adb (Analyze_Compilation_Unit): Use new procedure
6294 SPARK_Implicit_Load.
6296 2017-04-25 Javier Miranda <miranda@adacore.com>
6298 * sem_util.adb (New_Copy_Tree): By default
6299 copying of defining identifiers is prohibited because
6300 this would introduce an entirely new entity into the
6301 tree. This patch introduces an exception to this general
6302 rule: the declaration of constants and variables located in
6303 Expression_With_Action nodes.
6304 (Copy_Itype_With_Replacement): Renamed as Copy_Entity_With_Replacement.
6305 (In_Map): New subprogram.
6306 (Visit_Entity): New subprogram.
6307 (Visit_Node): Handle EWA_Level,
6308 EWA_Inner_Scope_Level, and take care of defining entities defined
6309 in Expression_With_Action nodes.
6311 2017-04-25 Thomas Quinot <quinot@adacore.com>
6313 * exp_ch6.adb: minor comment edit.
6314 * sinfo.ads, sinfo.adb: New Null_Statement attribute for null
6315 procedure specifications that come from source.
6316 * par-ch6.adb (P_Subprogram, case of a null procedure): Set new
6317 Null_Statement attribute.
6318 * par_sco.adb (Traverse_Declarations_Or_Statements): For a null
6319 procedure, generate statement SCO for the generated NULL statement.
6320 * sem_ch6.adb (Analyze_Null_Procedure): Use null statement from
6321 parser, if available.
6323 2017-04-04 Andreas Krebbel <krebbel@linux.vnet.ibm.com>
6325 * system-linux-s390.ads: Use Long_Integer'Size to define
6328 2017-04-04 Eric Botcazou <ebotcazou@adacore.com>
6330 * sem_ch3.adb (Build_Derived_Record_Type): Fix long line.
6332 2017-04-03 Jonathan Wakely <jwakely@redhat.com>
6334 * doc/gnat_ugn/gnat_and_program_execution.rst: Fix typo.
6335 * g-socket.adb (To_Host_Entry): Fix typo in comment.
6336 * gnat_ugn.texi: Fix typo.
6337 * raise.c (_gnat_builtin_longjmp): Fix capitalization in comment.
6338 * s-stposu.adb (Allocate_Any_Controlled): Fix typo in comment.
6339 * sem_ch3.adb (Build_Derived_Record_Type): Likewise.
6340 * sem_util.adb (Mark_Coextensions): Likewise.
6341 * sem_util.ads (Available_Full_View_Of_Component): Likewise.
6343 2017-03-28 Andreas Schwab <schwab@suse.de>
6346 * system-linux-aarch64-ilp32.ads: New file.
6347 * gcc-interface/Makefile.in (LIBGNAT_TARGET_PAIRS_COMMON): Rename
6348 from LIBGNAT_TARGET_PAIRS.
6349 (LIBGNAT_TARGET_PAIRS_32, LIBGNAT_TARGET_PAIRS_64): Define.
6350 (LIBGNAT_TARGET_PAIRS): Use LIBGNAT_TARGET_PAIRS_COMMON, and
6351 LIBGNAT_TARGET_PAIRS_64 or LIBGNAT_TARGET_PAIRS_32 for -mabi=lp64
6352 or -mabi=ilp32, resp.
6354 2017-03-14 James Cowgill <James.Cowgill@imgtec.com>
6356 * s-osinte-linux.ads (struct_sigaction): Use correct type for sa_flags.
6358 2017-03-08 Thanassis Tsiodras <ttsiodras@gmail.com>
6361 * socket.c (__gnat_gethostbyaddr): Add missing test for __rtems__.
6363 2017-03-08 Eric Botcazou <ebotcazou@adacore.com>
6366 * system-linux-ppc.ads (Default_Bit_Order): Use Standard's setting.
6368 * system-linux-arm.ads (Default_Bit_Order): Likewise.
6369 * system-linux-mips.ads (Default_Bit_Order): Likewise.
6370 * system-linux-armeb.ads: Delete.
6371 * system-linux-mipsel.ads: Likewise.
6372 * gcc-interface/Makefile.in (MIPS/Linux): Adjust.
6373 (ARM/Linux): Likewise.
6375 2017-02-24 Jakub Jelinek <jakub@redhat.com>
6378 * gcc-interface/misc.c (gnat_handle_option): Pass true to
6379 handle_generated_option GENERATED_P.
6381 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
6383 * gcc-interface/decl.c (gnat_to_gnu_field): Do not remove the wrapper
6384 around a justified modular type if it doesn't have the same scalar
6385 storage order as the enclosing record type.
6387 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
6389 * gcc-interface/trans.c (gnat_to_gnu): Do not apply special handling
6390 of boolean rvalues to function calls.
6392 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
6394 * gcc-interface/utils.c (fold_bit_position): New function.
6395 (rest_of_record_type_compilation): Call it instead of bit_position to
6396 compute the field position and remove the call to remove_conversions.
6397 (compute_related_constant): Factor out the multiplication in both
6398 operands, if any, and streamline the final test.
6400 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
6402 * gcc-interface/trans.c (return_value_ok_for_nrv_p): Add sanity check.
6404 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
6406 * gcc-interface/decl.c: Include demangle.h.
6407 (is_cplusplus_method): Return again true for a primitive operation
6408 only if it is dispatching. For a subprogram with an interface name,
6409 call the demangler to get the number of C++ parameters and compare it
6410 with the number of Ada parameters.
6412 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
6414 * gcc-interface/trans.c (Handled_Sequence_Of_Statements_to_gnu): If
6415 there is no end label, put the location of the At_End procedure on
6416 the call to the procedure.
6418 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
6420 * gcc-interface/misc.c (gnat_type_max_size): Try to return a meaningful
6421 value for array types with TYPE_INDEX_TYPE set on their domain type.
6422 * gcc-interface/utils.c (max_size): For operations and expressions, do
6423 not build a new node if the operands have not changed or are missing.
6425 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
6427 * gcc-interface/utils.c (max_size) <tcc_expression>: Flip the second
6428 argument when recursing on TRUTH_NOT_EXPR.
6430 2017-02-12 John Marino <gnugcc@marino.st>
6432 * system-freebsd-x86.ads: Rename into...
6433 * system-freebsd.ads: ...this.
6434 (Default_Bit_Order): Define using Standard'Default_Bit_Order.
6435 * gcc-interface/Makefile.in: Support aarch64-freebsd.
6436 (x86-64/FreeBSD): Adjust to above renaming.
6437 (i386/FreeBSD): Likewise.
6439 2017-02-09 Gerald Pfeifer <gerald@pfeifer.com>
6441 * comperr.adb: Update FSF bug reporting URL.
6443 2017-02-01 Eric Botcazou <ebotcazou@adacore.com>
6444 Jakub Jelinek <jakub@redhat.com>
6447 * adaint.c (__gnat_killprocesstree): Fix broken string handling.
6449 2017-01-25 Maxim Ostapenko <m.ostapenko@samsung.com>
6452 * gcc-interface/utils.c (get_global_context): Pass main_input_filename
6453 to build_translation_unit_decl.
6455 2017-01-23 Javier Miranda <miranda@adacore.com>
6457 * sem_util.adb (New_Copy_Tree): Code cleanup:
6458 removal of the internal map (ie. variable Actual_Map, its
6459 associated local variables, and all the code handling it).
6460 * sem_ch9.adb (Analyze_Task_Type_Declaration): in GNATprove mode
6461 force loading of the System package when processing a task type.
6462 (Analyze_Protected_Type_Declaration): in GNATprove mode force
6463 loading of the System package when processing a protected type.
6464 * sem_ch10.adb (Analyze_Compilation_Unit): in GNATprove mode
6465 force loading of the System package when processing compilation
6466 unit with a main-like subprogram.
6467 * frontend.adb (Frontend): remove forced loading of the System
6470 2017-01-23 Ed Schonberg <schonberg@adacore.com>
6472 * sem_prag.adb (Default_Initial_Condition): If the desired type
6473 declaration is a derived type declaration with discriminants,
6474 it is rewritten as a private type declaration.
6475 * sem_ch13.adb (Replace_Type_References_Generic,
6476 Visible_Component): A discriminated private type with descriminnts
6477 has components that must be rewritten as selected components
6478 if they appear as identifiers in an aspect expression such as
6479 a Default_Initial_Condition.
6480 * sem_util.adb (Defining_Entity): support N_Iterator_Specification
6483 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
6485 * ghost.ads, ghost.adb (Is_Ignored_Ghost_Unit): New routine.
6486 * gnat1drv.adb Generate an empty object file for an ignored
6487 Ghost compilation unit.
6488 * inline.adb, sem_util.adb, sem_ch4.adb: Minor reformatting.
6490 2017-01-23 Yannick Moy <moy@adacore.com>
6492 * sem_ch4.adb (Analyze_Indexed_Component_Form):
6493 Adapt to inlined prefix with string literal subtype.
6494 * inline.adb (Expand_Inlined_Call): Keep unchecked
6495 conversion inside inlined call when formal type is constrained.
6497 2017-01-23 Javier Miranda <miranda@adacore.com>
6499 * sem_util.adb (New_Copy_Tree): Code cleanup:
6500 removal of global variables. All the global variables, global
6501 functions and tables of this subprogram are now declared locally.
6503 2017-01-23 Gary Dismukes <dismukes@adacore.com>
6505 * exp_strm.ads: Minor reformatting and typo fixes.
6507 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
6509 * sem_aggr.adb, par_sco.adb, exp_util.adb, sem.adb, sem_ch4.adb,
6510 exp_aggr.adb: Minor reformatting.
6511 * g-diopit.adb: minor grammar/punctuation fix in comment.
6512 * g-byorma.ads: minor fix of unbalanced parens in comment.
6514 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
6516 * par.adb: Update the documentation of component Labl.
6517 * par-ch6.adb (P_Return_Statement): Set the expected label of
6518 an extended return statement to Error.
6520 2017-01-23 Tristan Gingold <gingold@adacore.com>
6522 * s-boustr.ads, s-boustr.adb (Is_Full): New function.
6524 2017-01-23 Ed Schonberg <schonberg@adacore.com>
6526 * expander.adb: Handle N_Delta_Aggregate.
6528 2017-01-23 Javier Miranda <miranda@adacore.com>
6530 * exp_ch6.adb (Expand_Call): Improve the code that
6531 checks if some formal of the called subprogram is a class-wide
6532 interface, to handle subtypes of class-wide interfaces.
6534 2017-01-23 Javier Miranda <miranda@adacore.com>
6536 * checks.adb (Apply_Parameter_Aliasing_Checks):
6537 Remove side effects of the actuals before generating the overlap
6540 2017-01-23 Justin Squirek <squirek@adacore.com>
6542 * exp_strm.ads, exp_strm.ads
6543 (Build_Record_Or_Elementary_Input_Function): Add an extra parameter so
6544 as to avoid getting the underlying type by default.
6545 * exp_attr.adb (Expand_N_Attribute_Reference): Remove use of
6546 underlying type in the Iiput and output attribute cases when
6547 building their respective functions.
6549 2017-01-23 Gary Dismukes <dismukes@adacore.com>
6551 * scng.adb: Minor reformatting of error message.
6553 2017-01-23 Ed Schonberg <schonberg@adacore.com>
6555 * sem_ch6.adb (Analyze_Expression_Function): Do not attempt
6556 to freeze the return type of an expression funxtion that is a
6557 completion, if the type is a limited view and the non-limited
6560 2017-01-23 Ed Schonberg <schonberg@adacore.com>
6562 * par-ch4.adb (P_Aggregate_Or_Parent_Expr): Recognize delta
6563 aggregate construct.
6564 (P_Record_Or_Array_Component_Association): An array aggregate
6565 can start with an Iterated_Component_Association.
6566 * scng.adb: Modify error message on improper use of @ in earlier
6567 versions of the language.
6568 * sinfo.ads: New node kind N_Delta_Aggregate.
6569 * sinfo.adb: An N_Delta_Aggregate has component associations and
6571 * sem_res.adb (Resolve): Call Resolve_Delta_Aggregate.
6572 * sem_aggr.ads, sem_aggr.adb (Resolve_Iterated_Component_Association):
6573 Create a new index for each one of the choices in the association,
6574 to prevent spurious homonyms in the scope.
6575 (Resolve_Delta_Aggregate): New.
6576 * sem.adb: An N_Delta_Aggregate is analyzed like an aggregate.
6577 * exp_util.adb (Insert_Actions): Take into account
6579 * exp_aggr.ads: New procedure Expand_N_Delta_Aggregate.
6580 * exp_aggr.adb: New procedure Expand_N_Delta_Aggregate,
6581 and local procedures Expand_Delta_Array_Aggregate and
6582 expand_Delta_Record_Aggregate.
6583 * sprint.adb: Handle N_Delta_Aggregate.
6585 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
6587 * exp_ch11.adb (Expand_N_Exception_Declaration): Generate an
6588 empty name when the exception declaration is subject to pragma
6590 (Null_String): New routine.
6592 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
6594 * par-ch9.adb (P_Protected_Definition): Parse
6595 any optional and potentially illegal pragmas which appear in
6596 a protected operation declaration list.
6597 (P_Task_Items): Parse
6598 any optional and potentially illegal pragmas which appear in a
6601 2017-01-23 Pascal Obry <obry@adacore.com>
6603 * s-taprop-mingw.adb (Enter_Task): Initialize the Thread handle which
6604 is needed when a foreign thread call a Win32 API using a thread handle
6605 like GetThreadTimes() for example.
6607 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
6609 * sem_ch13.adb (Analyze_Attribute_Definition_Clause): Do not
6610 allow an 'Address clause to be specified on a prefix of a
6613 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
6615 * checks.adb (Insert_Valid_Check): Ensure that the prefix of
6616 attribute 'Valid is a renaming of the original expression when
6617 the expression denotes a name. For all other kinds of expression,
6618 use a constant to capture the value.
6619 * exp_util.adb (Is_Name_Reference): Moved to Sem_Util.
6620 * sem_util.ads, sem_util.adb (Is_Name_Reference): Moved from Exp_Util.
6622 2017-01-23 Justin Squirek <squirek@adacore.com>
6624 * sem_eval.adb (Eval_Integer_Literal): Add special
6625 case to avoid optimizing out check if the literal appears in
6628 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
6630 * sem_ch13.adb (Analyze_Attribute_Definition_Clause): Do not
6631 allow an 'Address clause to be specified on a prefix of a
6634 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
6636 * checks.adb (Insert_Valid_Check): Ensure that the prefix of
6637 attribute 'Valid is a renaming of the original expression when
6638 the expression denotes a name. For all other kinds of expression,
6639 use a constant to capture the value.
6640 * exp_util.adb (Is_Name_Reference): Moved to Sem_Util.
6641 * sem_util.ads, sem_util.adb (Is_Name_Reference): Moved from Exp_Util.
6643 2017-01-23 Justin Squirek <squirek@adacore.com>
6645 * sem_eval.adb (Eval_Integer_Literal): Add special
6646 case to avoid optimizing out check if the literal appears in
6649 2017-01-23 Ed Schonberg <schonberg@adacore.com>
6651 * sem_ch4.adb (Try_Primitive_Operations,
6652 Is_Valid_First_Argument_Of): argument is valid if it is a derived
6653 type with unknown discriminants that matches its underlying
6655 * exp_util.adb (Expand_Subtype_From_Expr): Do not expand
6656 expression if its type is derived from a limited type with
6657 unknown discriminants, because the expansion (which is a call)
6658 must be expanded in the enclosing context to add the proper build-
6659 in-place parameters to the call.
6660 * lib.ads, exp_ch9.adb: Minor fixes in comments.
6662 2017-01-23 Yannick Moy <moy@adacore.com>
6664 * frontend.adb (Frontend): Do not load runtime
6665 unit for GNATprove when parsing failed.
6666 * exp_ch9.adb: minor removal of extra whitespace
6667 * exp_ch6.adb: minor typo in comment
6668 * sem_util.adb: Code cleanup.
6669 * exp_ch9.ads, par-ch2.adb: minor style fixes in whitespace and comment
6670 * a-ngcefu.adb: minor style fix in whitespace
6672 2017-01-23 Thomas Quinot <quinot@adacore.com>
6674 * scos.ads: Document usage of 'd' as default SCO kind for
6676 * par_sco.adb (Traverse_Declarations_Or_Statements.
6677 Traverse_Degenerate_Subprogram): New supporting routine for expression
6678 functions and null procedures.
6679 (Traverse_Declarations_Or_Statements.Traverse_One): Add
6680 N_Expression_Function to the subprogram case; add required
6681 support for null procedures and expression functions.
6683 2017-01-23 Bob Duff <duff@adacore.com>
6685 * namet.ads (Bounded_String): Decrease the size of type
6686 Bounded_String to avoid running out of stack space.
6687 * namet.ads (Append): Don't ignore buffer overflow; raise
6688 Program_Error instead.
6690 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
6692 * exp_ch5.adb, freeze.adb, par-ch4.adb, scng.adb, sem_ch13.adb,
6693 sem_ch3.adb, sem_ch5.adb, sem_ch5.ads, sem_util.adb, sinfo.ads: Minor
6695 * exp_ch9.adb: minor style fix in comment.
6697 2017-01-23 Ed Schonberg <schonberg@adacore.com>
6699 * sem_ch4.adb (Analyze_Allocator): Handle properly a type derived
6700 for a limited record extension with unknown discriminants whose
6701 full view has no discriminants.
6703 2017-01-23 Yannick Moy <moy@adacore.com>
6705 * exp_spark.adb: Alphabetize with clauses.
6707 2017-01-23 Yannick Moy <moy@adacore.com>
6709 * sem_util.adb (Has_Enabled_Property): Treat
6710 protected objects and variables differently from other variables.
6712 2017-01-23 Thomas Quinot <quinot@adacore.com>
6714 * sem_ch13.adb (Adjust_Record_For_Reverse_Bit_Order):
6715 Split original Ada 95 part off into new subprogram
6716 below. Call that subprogram (instead of proceeding with
6717 AI95-0133 behaviour) if debug switch -gnatd.p is in use.
6718 (Adjust_Record_For_Reverse_Bit_Order_Ada_95): ... new subprogram
6719 * debug.adb Document new switch -gnatd.p
6720 * freeze.adb (Freeze_Entity.Freeze_Record_Type): Do not adjust
6721 record for reverse bit order if an error has already been posted
6722 on the record type. This avoids generating extraneous "info:"
6723 messages for illegal code.
6725 2017-01-23 Justin Squirek <squirek@adacore.com>
6727 * sem_ch3.adb (Analyze_Declarations): Correct comments
6728 * freeze.adb (Find_Constant): Add detection of deferred constants
6729 so they are not incorrectly flagged as premature.
6731 2017-01-23 Ed Schonberg <schonberg@adacore.com>
6733 * scans.ads: New token At_Sign. Remove '@' from list of illegal
6734 characters for future version of the language. '@' is legal name.
6735 * scng.ads, scng.adb (Scan): Handle '@' appropriately.
6736 * scn.adb (Scan_Reserved_Identifier): An occurrence of '@'
6737 denotes a Target_Name.
6738 * par-ch4.adb (P_Name, P_Primary): Handle Target_Name.
6739 * sinfo.ads, sinfo.adb (N_Target_Name): New non-terminal node.
6740 (Has_Target_Names): New flag on N_Assignment_Statement, to
6741 indicate that RHS has occurrences of N_Target_Name.
6742 * sem.adb: Call Analyze_Target_Name.
6743 * sem_ch5.ads, sem_ch5.adb (Analyze_Target_Name): New subpogram.
6744 (urrent_LHS): Global variable that denotes LHS of assignment,
6745 used in the analysis of Target_Name nodes.
6746 * sem_res.adb (Resolve_Target_Name): New procedure.
6747 * exp_ch5.adb (Expand_Assign_With_Target_Names): (AI12-0125):
6748 N is an assignment statement whose RHS contains occurences of @
6749 that designate the value of the LHS of the assignment. If the
6750 LHS is side-effect free the target names can be replaced with
6751 a copy of the LHS; otherwise the semantics of the assignment
6752 is described in terms of a procedure with an in-out parameter,
6753 and expanded as such.
6754 (Expand_N_Assignment_Statement): Call
6755 Expand_Assign_With_Target_Names when needed.
6756 * exp_util.adb (Insert_Actions): Take into account N_Target_Name.
6757 * sprint.adb: Handle N_Target_Name.
6759 2017-01-23 Eric Botcazou <ebotcazou@adacore.com>
6761 * checks.adb: Minor fix in comment.
6763 2017-01-23 Philippe Gil <gil@adacore.com>
6765 * g-debpoo.adb (Do_Report) remove freed chunks from chunks
6766 count in Sort = Memory_Usage or Allocations_Count
6768 2017-01-23 Justin Squirek <squirek@adacore.com>
6770 * sem_ch3.adb: Code cleanup.
6772 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
6774 * sem_prag.adb (Analyze_Refined_Depends_In_Decl_Part): Move all global
6775 variables to the local variable section. Update the profile
6776 of various nested routine that previously had visibility
6777 of those globals. One the matching phase has completed,
6778 remove certain classes of clauses which are considered noise.
6779 (Check_Dependency_Clause): Properly detect a match between two
6780 'Result attributes. Update the various post-match cases to use
6781 Is_Already_Matched as this routine now automatically recognizes
6782 a previously matched 'Result attribute.
6783 (Is_Already_Matched): New routine.
6784 (Remove_Extra_Clauses): New routine.
6785 (Report_Extra_Clauses): Remove the detection of ... => null
6786 clauses as this is now done in Remove_Extra_Clauses.
6788 2017-01-23 Ed Schonberg <schonberg@adacore.com>
6790 * sem_aggr.adb (Resolve_Array_Aggregate): In ASIS mode do not
6791 report on spurious overlaps between values involving a subtype
6792 with a static predicate, because the expansion of such a subtype
6793 into individual ranges in inhibited in ASIS mode.
6795 2017-01-23 Justin Squirek <squirek@adacore.com>
6797 * sem_ch3.adb (Analyze_Declarations): Add detection
6798 of an edge case and delay freezing if it is present.
6800 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
6802 * sem_ch3.adb, exp_spark.adb, exp_attr.adb, sem_ch9.adb, sem_prag.adb,
6803 sem_util.adb, sem_warn.adb, exp_ch3.adb: Minor reformatting.
6805 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
6807 * freeze.adb (Freeze_Subprogram): Ensure that all anonymous
6808 access-to-subprogram types inherit the convention of the
6809 associated subprogram. (Set_Profile_Convention): New routine.
6810 * sem_ch6.adb (Check_Conformance): Do not compare the conventions
6811 of the two entities directly, use Conventions_Match to account
6812 for anonymous access-to-subprogram and subprogram types.
6813 (Conventions_Match): New routine.
6815 2017-01-23 Claire Dross <dross@adacore.com>
6817 * exp_spark.adb (Expand_SPARK_Attribute_Reference): For attributes
6818 which return Universal_Integer, force the overflow check flag for
6819 Length and Range_Length for types as big as Long_Long_Integer.
6821 2017-01-23 Claire Dross <dross@adacore.com>
6823 * exp_spark.adb (Expand_SPARK_Attribute_Reference): For
6824 attributes which return Universal_Integer, introduce a conversion
6825 to the expected type with the appropriate check flags set.
6826 * sem_res.adb (Resolve_Range): The higher bound can be in Typ's
6827 base type if the range is null. It may still be invalid if it
6828 is higher than the lower bound. This is checked later in the
6829 context in which the range appears.
6831 2017-01-23 Pierre-Marie de Rodat <derodat@adacore.com>
6833 * scos.ads: Introduce a constant to represent ignored
6834 dependencies in SCO_Unit_Table_Entry.
6836 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
6838 * exp_ch9.adb (Expand_N_Protected_Type_Declaration): Remove extra
6839 spaces from error messages.
6841 2017-01-23 Ed Schonberg <schonberg@adacore.com>
6843 * exp_ch3.adb (Check_Large_Modular_Array): New procedure,
6844 subsidiary to Expand_N_Object_ Declaration, to compute a guard on
6845 an object declaration for an array type with a modular index type
6846 with the size of Long_Long_Integer. Special processing is needed
6847 in this case to compute reliably the size of the object, and
6848 eventually to raise Storage_Error, when wrap-around arithmetic
6849 might compute a meangingless size for the object.
6851 2017-01-23 Justin Squirek <squirek@adacore.com>
6853 * a-wtenau.adb, par-endh.adb, sem_prag.adb,
6854 sem_type.adb: Code cleanups.
6856 2017-01-23 Bob Duff <duff@adacore.com>
6858 * sem_res.adb (Resolve_Call): In the part of the code where
6859 it is deciding whether to turn the call into an indexed
6860 component, avoid doing so if the call is to an instance of
6861 Unchecked_Conversion. Otherwise, the compiler turns it into an
6862 indexed component, and resolution of that turns it back into a
6863 function call, and so on, resulting in infinite recursion.
6864 * sem_util.adb (Needs_One_Actual): If the first formal has a
6865 default, then return False.
6867 2017-01-21 Eric Botcazou <ebotcazou@adacore.com>
6869 * sem_eval.adb (Compile_Time_Compare): Reinstate the expr+literal (etc)
6870 optimizations when the type is modular and the offsets are equal.
6872 2017-01-20 Thomas Quinot <quinot@adacore.com>
6874 * sem_warn.adb (Warn_On_Useless_Assignment): Adjust wording of warning
6877 2017-01-20 Nicolas Roche <roche@adacore.com>
6879 * terminals.c: Ignore failures on setpgid and tcsetpgrp commands.
6881 2017-01-20 Bob Duff <duff@adacore.com>
6883 * sem_eval.adb (Compile_Time_Compare): Disable the expr+literal
6884 (etc) optimizations when the type is modular.
6886 2017-01-20 Yannick Moy <moy@adacore.com>
6888 * sem_ch6.adb (Move_Pragmas): move some pragmas,
6889 but copy the SPARK_Mode pragma instead of moving it.
6890 (Build_Subprogram_Declaration): Ensure that the generated spec
6891 and original body share the same SPARK_Pragma aspect/pragma.
6892 * sem_util.adb, sem_util.ads (Copy_SPARK_Mode_Aspect): New
6893 procedure to copy SPARK_Mode aspect.
6895 2017-01-20 Bob Duff <duff@adacore.com>
6897 * sem_ch3.adb (Analyze_Declarations): Disable Resolve_Aspects
6899 * sem_ch13.adb (Resolve_Name): Enable setting the entity to
6900 Empty even in ASIS mode.
6902 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
6904 * exp_ch9.adb: minor style fixes in comments.
6905 * sem_ch9.adb (Analyze_Delay_Relative): in GNATprove mode a delay
6906 relative statement introduces an implicit dependency on
6907 Ada.Real_Time.Clock_Time.
6908 * sem_util.adb: Minor reformatting.
6910 2017-01-20 Ed Schonberg <schonberg@adacore.com>
6912 * sem_ch13.adb (Analyze_Aspect_Specifications): Aspect Alignment
6913 must be treated as delayed aspect even if the expression is
6914 a literal, because the aspect affects the freezing and the
6915 elaboration of the object to which it applies.
6917 2017-01-20 Tristan Gingold <gingold@adacore.com>
6919 * s-osinte-vxworks.ads (Interrup_Range): New subtype.
6921 2017-01-20 Ed Schonberg <schonberg@adacore.com>
6923 * lib-xref.adb (Generate_Reference): Do not warn about the
6924 presence of a pragma Unreferenced if the entity appears as the
6925 actual in a procedure call that does not come from source.
6927 2017-01-20 Pascal Obry <obry@adacore.com>
6929 * expect.c, terminals.c: Fix some warnings about unused variables.
6930 * gsocket.h, adaint.c, adaint.h: Fix some more warnings in the C part
6933 2017-01-20 Bob Duff <duff@adacore.com>
6935 * exp_attr.adb (Constrained): Apply an access check (check that
6936 the prefix is not null) when the prefix denotes an object of an
6937 access type; that is, when there is an implicit dereference.
6939 2017-01-20 Gary Dismukes <dismukes@adacore.com>
6941 * s-rident.ads (constant Profile_Info): Remove
6942 No_Calendar from GNAT_Extended_Ravenscar restrictions.
6944 2017-01-20 Tristan Gingold <gingold@adacore.com>
6946 * s-maccod.ads: Add pragma No_Elaboration_Code_All
6948 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
6950 * ghost.adb (Mark_Ghost_Clause): New routine.
6951 (Prune_Node): Do not prune compilation unit nodes.
6952 (Remove_Ignored_Ghost_Code): Prune the compilation unit node directly.
6953 This does not touch the node itself, but does prune all its fields.
6954 * ghost.ads (Mark_Ghost_Clause): New routine.
6955 * sem_ch8.adb (Analyze_Use_Package): Emit an error when a use
6956 package clause mentions Ghost and non-Ghost packages. Mark a
6957 use package clause as Ghost when it mentions a Ghost package.
6958 (Analyze_Use_Type): Emit an error when a use type clause mentions
6959 Ghost and non-Ghost types. Mark a use type clause as Ghost when
6960 it mentions a Ghost type.
6961 * sem_ch10.adb (Analyze_With_Clause): Mark a with clause as
6962 Ghost when it withs a Ghost unit.
6964 2017-01-20 Javier Miranda <miranda@adacore.com>
6966 * sem_res.adb (Resolve_Call): If a function call
6967 returns a limited view of a type and at the point of the call the
6968 function is not declared in the extended main unit then replace
6969 it with the non-limited view, which must be available. If the
6970 called function is in the extended main unit then no action is
6971 needed since the back-end handles this case.
6973 2017-01-20 Eric Botcazou <ebotcazou@adacore.com>
6975 * sem_ch7.adb (Contains_Subp_Or_Const_Refs): Rename into...
6976 (Contains_Subprograms_Refs): ...this. Adjust comment
6977 for constants. (Is_Subp_Or_Const_Ref): Rename into...
6978 (Is_Subprogram_Ref): ...this.
6979 (Has_Referencer): Rename Has_Non_Subp_Const_Referencer variable into
6980 Has_Non_Subprograms_Referencer and adjust comment. Remove
6981 incorrect shortcut for package declarations and bodies.
6983 2017-01-20 Ed Schonberg <schonberg@adacore.com>
6985 * sem_ch3.adb (Complete_Private_Subtype): If the scope of the
6986 base type differs from that of the completion and the private
6987 subtype is an itype (created for a constraint on an access
6988 type e.g.), set Delayed_Freeze on both to prevent out-of-scope
6991 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
6993 * sem_ch6.adb (Analyze_Subprogram_Body_Helper):
6994 When inheriting the SPARK_Mode of a prior expression function,
6995 look at the properly resolved entity rather than the initial
6996 candidate which may denote a homonym.
6998 2017-01-20 Ed Schonberg <schonberg@adacore.com>
7000 * sem_prag.adb (Rewrite_Assertion_Kind): If the name is
7001 Precondition or Postcondition, and the context is pragma
7002 Check_Policy, indicate that this Pre-Ada2012 usage is deprecated
7003 and suggest the standard names Assertion_Policy /Pre /Post
7006 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
7008 * sem_ch10.adb, sem_cat.adb: Minor reformatting.
7010 2017-01-20 Javier Miranda <miranda@adacore.com>
7012 * sem_ch3.adb (Access_Type_Declaration): Protect access to the
7014 * sem_ch10.adb (Install_Siblings): Skip processing malformed trees.
7015 * sem_cat.adb (Validate_Categoriztion_Dependency): Skip processing
7018 2017-01-20 Ed Schonberg <schonberg@adacore.com>
7020 * sem_ch13.adb (Analyze_Aspect_Specification, case
7021 Dynamic_Predicate): If the entity E is a subtype that inherits
7022 a static predicate for its parent P,, the inherited and the
7023 new predicate combine in the generated predicate function,
7024 and E only has a dynamic predicate.
7026 2017-01-20 Tristan Gingold <gingold@adacore.com>
7028 * s-boustr.ads, s-boustr.adb: New package.
7029 * Makefile.rtl: Add s-boustr.
7031 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
7033 * inline.adb (Process_Formals): Qualify the
7034 expression of a return statement when it yields a universal type.
7036 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
7038 * freeze.adb (Freeze_All): Freeze the default
7039 expressions of all eligible formal parameters that appear in
7040 entries, entry families, and protected subprograms.
7042 2017-01-20 Ed Schonberg <schonberg@adacore.com>
7044 * sem_ch3.adb (Check_Nonoverridable_Aspects); Refine check
7045 for illegal inherited Implicit_Dereference aspects with renamed
7048 2017-01-20 Javier Miranda <miranda@adacore.com>
7050 * debug.adb (switch d.6): do not avoid declaring unreferenced itypes.
7051 * nlists.ads (Lock_Lists, Unlock_Lists): New subprograms.
7052 * nlists.adb (Lock_Lists, Unlock_Lists): New subprograms.
7053 (Set_First, Set_Last, Set_List_Link, Set_Next, Set_Parent,
7054 Set_Prev, Tree_Read): Adding assertion.
7055 * atree.ads (Lock_Nodes, Unlock_Nodes): New subprograms.
7056 * atree.adb (Lock_Nodes, Unlock_Nodes): New subprograms.
7057 (Set_Analyzed, Set_Check_Actuals, Set_Comes_From_Source,
7058 Set_Ekind, Set_Error_Posted, Set_Has_Aspects,
7059 Set_Is_Ignored_Ghost_Node, Set_Original_Node, Set_Paren_Count,
7060 Set_Parent, Set_Sloc, Set_Nkind, Set_FieldNN, Set_NodeNN,
7061 Set_ListNN, Set_ElistNN, Set_NameN, Set_StrN, Set_UintNN,
7062 Set_UrealNN, Set_FlagNNN, Set_NodeN_With_Parent,
7063 Set_ListN_With_Parent): Adding assertion.
7065 2017-01-20 Ed Schonberg <schonberg@adacore.com>
7067 * sem_prag.adb (Process_Convention): Diagnose properly a pragma
7068 import that applies to several homograph subprograms. when one
7069 of them is declared by a subprogram body.
7071 2017-01-20 Justin Squirek <squirek@adacore.com>
7073 * exp_ch6.adb (Expand_Call): Remove optimization
7074 that nulls out calls to null procedures.
7076 2017-01-20 Yannick Moy <moy@adacore.com>
7078 * inline.adb (Expand_Inlined_Call): Keep more
7079 precise type of actual for inlining whenever possible. In
7080 particular, do not switch to the formal type in GNATprove mode in
7081 some case where the GNAT backend might require it for visibility.
7083 2017-01-20 Ed Schonberg <schonberg@adacore.com>
7085 * sem_ch3.adb (Check_Non_Overridable_Aspects): An inherited
7086 aspect Implicit_Dereference can be inherited by a full view if
7087 the partial view has no discriminants, because there is no way
7088 to apply the aspect to the partial view.
7089 (Build_Derived_Record_Type): If derived type renames discriminants
7090 of the parent, the new discriminant inherits the aspect from
7092 * sem_ch4.adb (Analyze_Call): Handle properly a parameterless
7093 call through an access discriminant designating a subprogram.
7094 * sem_ch5.adb (Analyze_Assignment): (Analyze_Call): Handle
7095 properly a parameterless call through an access discriminant on
7096 the left-hand side of an assignment.
7097 * sem_res.adb (resolve): If an interpreation involves a
7098 discriminant with an implicit dereference and the expression is an
7099 entity, resolution takes place later in the appropriate routine.
7100 * sem_ch13.adb (Analyze_Aspect_Implicit_Dereference): Recognize
7101 access discriminants that designate a subprogram type.
7103 2017-01-20 Pascal Obry <obry@adacore.com>
7105 * a-locale.adb, a-locale.ads: Update Ada.Locales for RM 2012 COR:1:2016
7107 2017-01-20 Yannick Moy <moy@adacore.com>
7109 * sem_ch10.adb (Check_No_Elab_Code_All): Do not issue an error
7110 on implicitly with'ed units in GNATprove mode.
7111 * sinfo.ads (Implicit_With): Document use of flag for implicitly
7112 with'ed units in GNATprove mode.
7114 2017-01-20 Ed Schonberg <schonberg@adacore.com>
7116 * sem_cat.adb (Validate_Static_Object_Name): In a preelaborated
7117 unit Do not report an error on a non-static entity that appears
7118 in the context of a spec expression, such as an aspect expression.
7120 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
7122 * einfo.adb: Flag298 now denotes Is_Underlying_Full_View.
7123 (Is_Underlying_Full_View): New routine.
7124 (Set_Is_Underlying_Full_View): New routine.
7125 (Write_Entity_Flags): Add an entry for Is_Underlying_Full_View.
7126 * einfo.ads Add new attribute Is_Underlying_Full_View.
7127 (Is_Underlying_Full_View): New routine along with pragma Inline.
7128 (Set_Is_Underlying_Full_View): New routine along with pragma Inline.
7129 * exp_util.adb (Build_DIC_Procedure_Body): Do not consider
7130 class-wide types and underlying full views. The first subtype
7131 is used as the working type for all Itypes, not just array base types.
7132 (Build_DIC_Procedure_Declaration): Do not consider
7133 class-wide types and underlying full views. The first subtype
7134 is used as the working type for all Itypes, not just array
7136 * freeze.adb (Freeze_Entity): Inherit the freeze node of a full
7137 view or an underlying full view without clobbering the attributes
7138 of a previous freeze node.
7139 (Inherit_Freeze_Node): New routine.
7140 * sem_ch3.adb (Build_Derived_Private_Type): Mark an underlying
7142 (Build_Underlying_Full_View): Mark an underlying full view as such.
7143 * sem_ch7.adb (Install_Private_Declarations): Mark an underlying
7146 2017-01-20 Yannick Moy <moy@adacore.com>
7148 * sinfo.ads: Document lack of Do_Division_Check flag
7149 on float exponentiation.
7151 2017-01-19 Javier Miranda <miranda@adacore.com>
7153 * ghost.adb (Propagate_Ignored_Ghost_Code): Protect access to the
7154 identifier attribute of a block-statement node. Required to avoid
7155 assertion failure when building the new containers library.
7157 2017-01-19 Bob Duff <duff@adacore.com>
7159 * exp_ch3.adb: Update comment.
7161 2017-01-19 Vincent Celier <celier@adacore.com>
7163 * gprep.adb (Gnatprep): Parse the definition file without
7164 "replace in comments" even when switch -C is used.
7166 2017-01-19 Justin Squirek <squirek@adacore.com>
7168 * exp_ch9.adb (Is_Pure_Barrier): Create function
7169 Is_Count_Attribute to identify an expansion of the 'Count
7172 2017-01-19 Ed Schonberg <schonberg@adacore.com>
7174 * sem_ch5.adb (Analyze_Loop_Statement): In GNATprove mode the
7175 statements within an element iterator loop are only analyzed
7176 agter the loop is rewritten. Within a generic the analysis must
7177 be performed in any case to complete name capture.
7179 2017-01-19 Bob Duff <duff@adacore.com>
7181 * sem_prag.adb (Analyze_Pragma): Check for ignored pragmas first,
7182 before checking for unrecognized pragmas.
7183 Initialize Pname on its declarations; that's always good style.
7185 2017-01-19 Claire Dross <dross@adacore.com>
7187 * exp_ch7.adb (Build_Invariant_Procedure_Body): Semi-insert the
7188 body into the tree for GNATprove by setting its Parent field. The
7189 components invariants of composite types are not checked by
7190 the composite type's invariant procedure in GNATprove mode.
7191 (Build_Invariant_Procedure_Declaration): Semi-insert the
7192 declaration into the tree for GNATprove by setting its Parent
7194 * freeze.adb (Freeze_Arry_Type):In GNATprove mode, do not add
7195 the component invariants to the array type invariant procedure
7196 so that the procedure can be used to check the array type
7198 (Freeze_Record_Type): In GNATprove mode, do
7199 not add the component invariants to the record type invariant
7200 procedure so that the procedure can be used to check the record
7201 type invariants if any.
7203 2017-01-19 Hristian Kirtchev <kirtchev@adacore.com>
7205 * lib-xref-spark_specific.adb: Minor reformatting.
7206 * exp_ch7.adb (Add_Parent_Invariants): Do not process array types.
7208 2017-01-19 Javier Miranda <miranda@adacore.com>
7210 * exp_aggr.adb (Pass_Aggregate_To_Back_End): Renamed as
7211 Build_Back_End_Aggregate.
7212 (Generate_Aggregate_For_Derived_Type): Code cleanup.
7213 (Prepend_Stored_Values): Code cleanup.
7215 2017-01-19 Ed Schonberg <schonberg@adacore.com>
7217 * sem_ch6.adb (Analyze_Expression_Function): Check for an
7218 incomplete return type after attempting to freeze it, so that
7219 other freeze actiona are generated in the proper order.
7221 2017-01-19 Ed Schonberg <schonberg@adacore.com>
7223 * sem_aggr.adb (Resolve_Aggregate): If the type is a string
7224 type, ie. a type whose component is a character type, and the
7225 aggregate is positional, do not convert into a string literal
7226 if the index type is not an integer type, because the original
7227 type may be required in an enclosing operation.
7229 2017-01-19 Bob Duff <duff@adacore.com>
7231 * binde.adb, debug.adb: Enable new elaboration order algorithm
7232 by default. -dp switch reverts to the old algorithm.
7234 2017-01-19 Hristian Kirtchev <kirtchev@adacore.com>
7236 * sem_ch3.adb Add with and use clauses for Exp_Ch7.
7237 (Analyze_Declarations): Create the DIC and Invariant
7238 procedure bodies s after all freezing has taken place.
7239 (Build_Assertion_Bodies): New routine.
7240 * sem_ch7.adb Remove the with and use clauses for Exp_Ch7
7242 (Analyze_Package_Specification): Remove the
7243 generation of the DIC and Invariant procedure bodies. This is
7244 now done by Analyze_Declarations.
7245 * sem_disp.adb (Check_Dispatching_Operation): DIC and Invariant
7246 procedures are never treated as primitives.
7248 2017-01-19 Yannick Moy <moy@adacore.com>
7250 * frontend.adb: Analyze inlined bodies and check elaboration
7251 rules in GNATprove mode too.
7252 * sem_elab.adb (Delay_Element): Add Boolean component to save
7253 indication that call is in SPARK code. (Check_Elab_Calls):
7254 Check elaboration rules in GNATprove mode, and correctly set
7255 the current value of SPARK_Mode.
7256 * lib-xref-spark_specific.adb
7257 (Add_SPARK_Xrefs): Simplify iteration over dereferences.
7259 2017-01-19 Ed Schonberg <schonberg@adacore.com>
7261 * exp_ch4.adb (Expand_Concatenate): Do no enable overflow
7262 checks on the expression for the high bound of concatenation
7263 when checks are disabled, to suppress warnings about potential
7264 constraint errors in restricted runtimes.
7266 2017-01-19 Hristian Kirtchev <kirtchev@adacore.com>
7268 * exp_ch3.adb (Expand_Freeze_Enumeration_Type): Mark the
7269 representation-to-position function as inlined.
7270 * sem_cat.adb (Set_Categorization_From_Scope): Do not modify
7271 the purity of an internally generated entity if it has been
7272 explicitly marked as pure for optimization purposes.
7273 * exp_aggr.adb: Minor reformatting.
7275 2017-01-19 Javier Miranda <miranda@adacore.com>
7277 * exp_ch6.adb (Expand_Call): Remove side effects on
7278 actuals that are allocators with qualified expression since the
7279 initialization of the object is performed by means of individual
7280 statements (and hence it must be done before the call).
7282 2017-01-19 Ed Schonberg <schonberg@adacore.com>
7284 * sem_ch3.adb (Analyze_Declarations): Minor reformatting.
7285 (Build_Derived_Enumeration_Type): If the derived type inherits a
7286 dynamic predicate from its parent, the bounds of the type must
7287 freeze because an explicit constraint is constructed for the
7288 type and the corresponding range is elaborated now.
7290 2017-01-19 Arnaud Charlet <charlet@adacore.com>
7292 * sem_attr.ads: minor fix of inconsistent casing in comment
7293 * lib-writ.ads: minor align comments in columns
7294 * sem_ch3.adb: Minor reformatting.
7295 * spark_xrefs.ads: minor fix typo in SPARK-related comment
7296 * table.ads: minor style fix in comment
7297 * lib-xref-spark_specific.adb
7298 (Add_SPARK_Xrefs): simplify processing of SPARK cross-references.
7299 * sem_ch12.adb: minor whitespace fix
7300 * freeze.adb: Add comment.
7301 * sem_util.adb (Unique_Name): for instances of
7302 generic subprograms ignore the name of the wrapper package.
7304 2017-01-19 Javier Miranda <miranda@adacore.com>
7306 * exp_aggr.adb (Resolve_Record_Aggregate):
7307 Factorize code needed for aggregates of limited and unlimited
7308 types in a new routine.
7309 (Pass_Aggregate_To_Back_End): New subprogram.
7311 2017-01-19 Yannick Moy <moy@adacore.com>
7313 * sinfo.adb (Pragma_Name): Only access up to Last_Pair of Pragma_Map.
7315 2017-01-19 Ed Schonberg <schonberg@adacore.com>
7317 * sem_ch4.ads, sem_ch4.adb (Try_Object_Operation): Make subprogram
7318 public, for use elsewhere.
7319 * sem_ch6.adb (Analyze_Procedure_Call): In SPARK_Mode and within
7320 an Inlined_body, recognize a call that uses object notation
7321 and has not been rewritten as a regular call because regular
7322 expansion has not taken place.
7324 2017-01-19 Bob Duff <duff@adacore.com>
7326 * checks.adb (Apply_Type_Conversion_Checks): Disable small optimization
7327 in case of generic formal discrete types, because it causes crashes in
7328 the compiler when built with assertions on.
7330 2017-01-19 Hristian Kirtchev <kirtchev@adacore.com>
7332 * lib-xref-spark_specific.adb, sem_util.adb, sem_util.ads,
7333 sem_ch4.adb, sem_ch8.adb, lib-xref.ads: Minor reformatting.
7335 2017-01-19 Bob Duff <duff@adacore.com>
7337 * bcheck.adb (Check_Consistent_Dynamic_Elaboration_Checking):
7338 Increment Warnings_Detected. It was decrementing, which is
7339 wrong since we just issued a warning message.
7340 * binderr.ads (Errors_Detected, Warnings_Detected): Declare
7341 these variables to be of subtype Nat instead of Int, because
7342 they should never be negative.
7344 2017-01-19 Javier Miranda <miranda@adacore.com>
7346 * contracts.adb (Build_Postconditions_Procedure): Replace
7347 Generate_C_Code by Modify_Tree_For_C.
7348 * exp_aggr.adb (Build_Record_Aggr_Code, Expand_Array_Aggregate):
7349 Replace Generate_C_Code by Modify_Tree_For_C.
7350 * exp_attr.adb (Float_Valid, Is_GCC_Target): Replace Generate_C_Code by
7352 * exp_ch11.adb (Expand_N_Exception_Declaration): Replace
7353 Generate_C_Code by Modify_Tree_For_C.
7354 * exp_ch4.adb (Expand_Allocator_Expression): Replace
7355 Generate_C_Code by Modify_Tree_For_C.
7356 * exp_dbug.adb (Qualify_Entity_Name): Replace Generate_C_Code
7357 by Modify_Tree_For_C.
7358 * exp_util.adb (Remove_Side_Effects, Side_Effect_Free): Replace
7359 Generate_C_Code by Modify_Tree_For_C.
7360 * sem_res.adb (Resolve_Type_Conversion): Replace Generate_C_Code
7361 by Modify_Tree_For_C.
7362 * sinfo.ads (Modify_Tree_For_C): Adding documentation.
7364 2017-01-19 Javier Miranda <miranda@adacore.com>
7366 * sem_util.ads, sem_util.adb (Expression_Of_Expression_Function): New
7368 (Is_Inlinable_Expression_Function): New subprogram.
7369 * exp_ch6.ads, exp_ch6.adb (Expression_Of_Expression_Function): Moved
7371 (Is_Inlinable_Expression_Function): Moved to Sem_Util.
7373 2017-01-19 Ed Schonberg <schonberg@adacore.com>
7375 * sem_ch4.adb (Diagnose_Call): Improve error message when a
7376 selected component has a prefix that might be interpreted
7377 as a parameterless function call, but none of the candidate
7378 interpretations is parameterless, and there is a hidden homonym
7379 of the prefix that is a package.
7380 * sem_ch8.adb (Find_Selected_Component): If the prefix might be
7381 interpreted as a parameterless function call and its analysis
7382 fails, do not call Analyze_Selected_Component.
7384 2017-01-19 Steve Baird <baird@adacore.com>
7386 * sem_util.ads: Add new Use_Full_View Boolean parameter to
7388 * sem_util.adb (Get_Index_Bounds): replace calls to Scalar_Range with
7389 calls to a newly-defined Scalar_Range_Of_Right_View function.
7391 2017-01-19 Arnaud Charlet <charlet@adacore.com>
7393 * gnat1drv.adb: minor fix of unbalanced parens in comment
7394 * lib-xref.ads (Traverse_Compilation_Unit): declaration moved
7395 to visible part of the package to allow re-use in GNATprove.
7396 * lib-xref-spark_specific.adb (Traverse_Stub): routine refactored
7397 from repeated code of Traverse_Compilation_Unit.
7398 (Traverse_Declaration_Or_Statement): fixed detection of
7399 generic subprograms and packages; also, iteration over case
7400 statement alternatives rewritten to avoid testing if the first
7401 alternative is present (since it must be present due to Ada
7402 syntax restrictions).
7404 2017-01-19 Hristian Kirtchev <kirtchev@adacore.com>
7406 * exp_ch6.adb (Expand_N_Subprogram_Body): Mark the spec as
7407 returning by reference not just for subprogram body stubs,
7408 but for all subprogram cases.
7409 * sem_util.adb: Code reformatting.
7410 (Requires_Transient_Scope): Update the call to Results_Differ.
7411 (Results_Differ): Update the parameter profile and the associated
7414 2017-01-19 Ed Schonberg <schonberg@adacore.com>
7416 * sem_dim.adb (Analyze_Dimension): Analyze object declaration and
7417 identifier nodes that do not come from source, to handle properly
7418 dimensionality check within an inlined body which inclddes both
7419 original operands and rewritten operands. This removes spurious
7420 dimensionality errors in the presence of front-end inlining,
7421 as well as in SPARK mode.
7423 2017-01-16 Jakub Jelinek <jakub@redhat.com>
7426 * gcc-interface/lang.opt (gant, gnatO, gnat): Add Driver flag.
7428 2017-01-13 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
7430 * gcc-interface/Makefile.in (SPARC/Solaris): Fix typo.
7432 2017-01-13 Arnaud Charlet <charlet@adacore.com>
7434 * doc/gnat_ugn/getting_started_with_gnat.rst,
7435 doc/gnat_ugn/inline_assembler.rst,
7436 doc/gnat_ugn/building_executable_programs_with_gnat.rst,
7437 doc/gnat_ugn/elaboration_order_handling_in_gnat.rst,
7438 doc/gnat_ugn/about_this_guide.rst,
7439 doc/gnat_ugn/platform_specific_information.rst,
7440 doc/gnat_ugn/example_of_binder_output.rst,
7441 doc/gnat_ugn/gnat_and_program_execution.rst,
7442 doc/gnat_ugn/gnat_utility_programs.rst,
7443 doc/gnat_ugn/the_gnat_compilation_model.rst,
7444 doc/gnat_rm/implementation_defined_attributes.rst,
7445 doc/gnat_rm/compatibility_and_porting_guide.rst,
7446 doc/gnat_rm/standard_library_routines.rst,
7447 doc/gnat_rm/standard_and_implementation_defined_restrictions.rst,
7448 doc/gnat_rm/implementation_defined_pragmas.rst,
7449 doc/gnat_rm/the_gnat_library.rst,
7450 doc/gnat_rm/obsolescent_features.rst,
7451 doc/gnat_rm/about_this_guide.rst,
7452 doc/gnat_rm/the_implementation_of_standard_i_o.rst,
7453 doc/gnat_rm/implementation_of_ada_2012_features.rst,
7454 doc/gnat_rm/interfacing_to_other_languages.rst,
7455 doc/gnat_rm/implementation_defined_aspects.rst,
7456 doc/gnat_rm.rst: Update documentation.
7457 * gnat_rm.texi, gnat_ugn.texi: Regenerated.
7459 2017-01-13 Ed Schonberg <schonberg@adacore.com>
7461 * einfo.ads: minor grammar fixes in comment of Normalized_Position_Max.
7462 * scil_ll.adb: Minor style fix in comment.
7463 * sem_ch8.adb (Analyze_Expanded_Name): Perform dimension analysis
7464 even if entity is already set, because the node may be renalyzed
7465 after inlining transformations.
7467 2017-01-13 Javier Miranda <miranda@adacore.com>
7469 * sem_res.adb (Resolve_Call): Do not establish a transient scope
7470 for a call to inlinable expression function (since the call will
7471 be replaced by its returned object).
7472 * exp_ch6.ads (Is_Inlinable_Expression_Function): New subprogram.
7473 * exp_ch6.adb (Expression_Of_Expression_Function): New subprogram.
7474 (Expand_Call): For inlinable expression function call replace the
7475 call by its returned object.
7476 (Is_Inlinable_Expression_Function): New subprogram.
7478 2017-01-13 Gary Dismukes <dismukes@adacore.com>
7480 * checks.adb: Minor typo fix and reformatting.
7482 2017-01-13 Javier Miranda <miranda@adacore.com>
7484 * contracts.adb (Contract_Only_Subprograms): Remove formal.
7485 (Copy_Original_Specification): Removed.
7486 (Skip_Contract_Only_Subprogram): Move here checks previously
7487 located in the caller of this routine (to leave the code more clean).
7488 (Build_Contract_Only_Subprogram): Code cleanup.
7489 * scil_ll.ads, scil_ll.adb (Get_Contract_Only_Body_Name): Removed.
7490 (Get_Contract_Only_Missing_Body_Name): Removed.
7492 2017-01-13 Javier Miranda <miranda@adacore.com>
7494 * sem_ch6.adb (Cloned_Expression): New subprogram.
7495 (Freeze_Expr_Types): Complete previous patch since the expression
7496 of an expression-function may have iterators and loops with
7497 defining identifiers which, as part of the preanalysis of the
7498 expression, may be left decorated with itypes that will not be
7499 available in the tree passed to the backend.
7501 2017-01-13 Ed Schonberg <schonberg@adacore.com>
7503 * checks.adb (Apply_Type_Conversion_Checks): Optimize a type
7504 conversion to Integer of an expression that is an attribute
7505 reference 'Pos on an enumeration type.
7507 2017-01-13 Bob Duff <duff@adacore.com>
7509 * atree.ads: Minor comment fix.
7511 2017-01-13 Justin Squirek <squirek@adacore.com>
7513 * sem_ch6.adb (Check_Aggregate_Accessibility): Ignore function
7514 calls in accessibility check on return statement.
7516 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
7518 * sem_ch6.adb (Analyze_Subprogram_Body_Helper):
7519 Ensure that the input body is a subprogram body before trying to
7520 determine whether it denoted an expression function. Note that
7521 subprogram body stubs cannot denote expression functions.
7523 2017-01-13 Gary Dismukes <dismukes@adacore.com>
7525 * bindgen.adb, sem_ch6.adb, binde.adb, exp_ch3.adb: Minor reformatting
7528 2017-01-13 Javier Miranda <miranda@adacore.com>
7530 * einfo.ads (Component_Bit_Offset): Fix documentation.
7531 * sem_ch13.adb (Check_Record_Representation_Clause): Skip check
7532 on record holes for components with unknown compile-time offsets.
7534 2017-01-13 Bob Duff <duff@adacore.com>
7536 * ali.ads, ali.adb (Static_Elaboration_Model_Used): Remove unused flag.
7537 * g-locfil.ads: Minor comment fix.
7539 2017-01-13 Bob Duff <duff@adacore.com>
7541 * binde.adb (Elab_New): New elaboration order algorithm
7542 that is expected to cause fewer ABE issues. This is a work in
7543 progress. The new algorithm is currently disabled, and can be
7544 enable by the -dp switch, or by modifying the Do_Old and Do_New
7545 etc. flags and rebuilding. Experimental code is included to
7546 compare the results of the old and new algorithms.
7547 * binde.ads: Use GNAT.Dynamic_Tables instead of Table, so we
7548 can have multiple of these tables, so the old and new algorithms
7550 * bindgen.ads (Gen_Output_File): Pass Elab_Order as an 'in'
7551 parameter of type array. This avoids the global variable, and
7552 allows bounds checking (which is normally defeated by the tables
7553 packages). It also ensures that the Elab_Order is read-only
7555 * bindgen.adb: Pass Elab_Order as an 'in' parameter to all
7556 subprograms that need it, as above.
7557 * debug.adb: Document new -dp switch. Modify doc of old -do
7559 * gnatbind.adb (Gnatbind): Make use of new interfaces to Binde
7560 and Bindgen. Move writing of closure (-R and -Ra switches)
7561 to Binde; that's more convenient.
7563 2017-01-13 Ed Schonberg <schonberg@adacore.com>
7565 * sem_ch6.adb (Analyze_Expression_Function): If the expression
7566 function is a completion, all entities referenced in the
7567 expression are frozen. As a consequence, a reference to an
7568 uncompleted private type from an enclosing scope is illegal.
7570 2017-01-13 Javier Miranda <miranda@adacore.com>
7572 * sem_ch6.adb (Freeze_Expr_Types): New subprogram.
7573 (Analyze_Subprogram_Body_Helper): At the occurrence of an
7574 expression function declaration that is a completion, its
7575 expression causes freezing (AI12-0103).
7577 2017-01-13 Vadim Godunko <godunko@adacore.com>
7579 * a-coinho-shared.adb: Fix memory leaks in Constant_Reference and
7580 Reference functions of Ada.Containers.Indefinite_Holders.
7582 2017-01-13 Bob Duff <duff@adacore.com>
7584 * s-os_lib.ads: Minor comment fixes.
7586 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
7588 * exp_ch3.adb (Default_Initialize_Object): Do not default
7589 initialize an object when it is of a task type and restriction
7590 No_Tasking is in effect because the initialization is obsolete.
7591 * exp_ch9.adb (Build_Master_Entity): Do not generate a master when
7592 restriction No_Tasking is in effect.
7593 (Build_Master_Renaming): Do not rename a master when restriction
7594 No_Tasking is in effect.
7596 2017-01-13 Ed Schonberg <schonberg@adacore.com>
7598 * sem_aggr.adb (Resolve_Array_Aggregate): The code that verifies
7599 the legality of An others clause applies as well to a choice in
7600 an Iterated_component_ association.
7601 (Resolve_Iterated_Component_Association): An others choice
7603 * exp_aggr.adb (Aggr_Assignment_OK_For_Backend): An
7604 Iterated_Component_Association is not static.
7606 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
7608 * exp_ch3.adb (Freeze_Type): Mark the Ghost mode as set in case
7609 control is passed to the expresion handler before the new mode
7611 * sem_ch12.adb (Analyze_Package_Instantiation,
7612 Analyze_Subprogram_Instantiation): Mark the Ghost mode as set
7613 in case control is passed to the expresion handler before the
7616 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
7618 * sem_aggr.adb, sem_ch3.adb, inline.adb, sem_util.adb, exp_ch4.adb,
7619 exp_aggr.adb: Minor reformatting.
7621 2017-01-13 Gary Dismukes <dismukes@adacore.com>
7623 * inline.adb: Minor reformatting and typo fix.
7625 2017-01-13 Ed Schonberg <schonberg@adacore.com>
7627 * sem_util.ads, sem_util.adb (Choice_List): Move function here
7628 from sem_aggr.adb, for use elsewhere.
7629 * sem_ch3.adb (Analyze_Object_Declaration): Use Choice_List.
7630 * sem_aggr.adb (Resolve_Array_Aggregate): Remove
7631 Iterated_Component_Present.
7632 * exp_aggr.adb: Use Choice_List throughout, to handle
7633 Iterated_Component_Associations.
7634 (Gen_Loop): Generate proper loop for an
7635 Iterated_Component_Association: loop variable has the identifier
7636 of the original association. Generate a loop even for a single
7637 component choice, in order to make loop parameter visible in
7639 (Flatten): An Iterated_Component_Association is not static.
7641 2017-01-13 Yannick Moy <moy@adacore.com>
7643 * exp_ch4.adb (Expand_N_Op_Expon): Ensure that the value of
7644 float exponentiation for statically known small negative values
7645 is the reciprocal of the exponentiation for the opposite value
7647 * s-exnllf.adb (Exn_Float, Exn_Long_Float, Exn_Long_Long_Float):
7648 Ensure that the value of float exponentiation for negative values
7649 is the reciprocal of the exponentiation for the opposite value
7651 * inline.adb (Expand_Inlined_Call): Fix the count
7652 for the number of generated gotos.
7654 2017-01-13 Yannick Moy <moy@adacore.com>
7656 * inline.adb: Code cleanup.
7657 * sem_util.adb (Is_OK_Volatile_Context): Add
7658 expression in delay statement as OK for volatile context.
7660 2017-01-13 Ed Schonberg <schonberg@adacore.com>
7662 * sem_aggr.adb (Resolve_Array_Aggregate): In normal compilation
7663 mode a choice that is a subtype with a static predicate is
7664 replaced by the values it covers. This transformation must not
7665 be performed in ASIS mode, to preserve the source for analysis.
7667 2017-01-13 Justin Squirek <squirek@adacore.com>
7669 * nlists.ads: Correct minor typo.
7671 2017-01-13 Gary Dismukes <dismukes@adacore.com>
7673 * sem_ch13.adb: Minor reformatting and typo fix.
7675 2017-01-13 Ed Schonberg <schonberg@adacore.com>
7677 * par-ch4.adb (P_Aggregate_Or_Parent_Expr): An
7678 Iterated_Component_Association is a named association in an
7680 * sem_aggr.adb (Resolve_Iterated_Component_Association): New
7681 procedure, subsidiary of Resolve_Array_Aggregate, to analyze
7682 and resolve the discrete choices and the expression of the
7684 * sinfo.adb, sinfo.ads: In analogy with N_Component_Association,
7685 Loop_Actions and Box_Present are attributes of
7686 N_Iterated_Component_Association nodes. Box_Present is always
7688 * sprint.adb (Sprint_Node): An Iterated_Component_Association
7689 has a Discrete_Choices list, as specified in the RM. A
7690 Component_Association for aggregate uses instead a Choices list.
7691 We have to live with this small inconsistency because the new
7692 construct also has a defining identifier, and there is no way
7693 to merge the two node structures.
7695 2017-01-13 Yannick Moy <moy@adacore.com>
7697 * inline.adb (Remove_Aspects_And_Pragmas): Add Unused to the
7698 list of pragmas to remove. Remove pragmas from the list of
7699 statements in the body to inline.
7700 * namet.adb, namet.ads (Nam_In): New version with 12 parameters.
7702 2017-01-13 Ed Schonberg <schonberg@adacore.com>
7704 * sem_ch3.adb (Resolve_Aspects): New procedure, subsidiary of
7705 Analyze_Declarations, to analyze and resolve the expressions of
7706 aspect specifications in the current declarative list, so that
7707 the expressions have proper entity and type info. This is needed
7708 for ASIS when there is no subsequent expansion to generate this
7709 semantic information.
7710 * sem_ch13.adb (Check_Aspect_At_End_Of_Declarations): Use Etype of
7711 original expression, to suppress cascaded errors when expression
7712 has been constant-folded.
7713 (Resolve_Aspect_Expressions, Resolve_Name): Preserve entities in
7714 ASIS mode, because there is no subsequent expansion to decorate
7717 2017-01-13 Yannick Moy <moy@adacore.com>
7719 * inline.adb, inline.ads (Call_Can_Be_Inlined_In_GNATprove_Mode):
7720 New function to detect when a call may be inlined or not in
7722 (Expand_Inlined_Call): Ensure that a temporary
7723 is always created in the cases where a type conversion may be
7724 needed on an input parameter in GNATprove mode, so that GNATprove
7725 sees the check to perform.
7726 * sem_res.adb (Resolve_Call): In GNATprove mode, skip inlining
7727 when not applicable due to actual requiring type conversion
7728 with possible check but no temporary value can be copied for
7729 GNATprove to see the check.
7731 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
7733 * sem_aggr.adb, par_sco.adb, s-osprim-mingw.adb, exp_ch5.adb,
7734 exp_prag.adb, sem_ch3.adb, xr_tabls.adb, lib-xref-spark_specific.adb,
7735 layout.adb, sem_dist.adb, exp_spark.adb, exp_ch7.adb, gnatcmd.adb,
7736 exp_util.adb, prj-proc.adb, sem_aux.adb, comperr.adb, g-memdum.adb,
7737 exp_attr.adb, s-intman-solaris.adb, exp_ch9.adb, make.adb, live.adb,
7738 g-sercom-linux.adb, sem_dim.adb, mlib-prj.adb, s-intman-posix.adb,
7739 sem_ch9.adb, sem_ch10.adb, prep.adb, einfo.adb, scng.adb, checks.adb,
7740 prj-strt.adb, sem_prag.adb, eval_fat.adb, sem_ch12.adb, sem.adb,
7741 a-numaux-x86.adb, a-stwifi.adb, i-cobol.adb, prj.adb,
7742 get_spark_xrefs.adb, s-tasini.adb, rtsfind.adb, freeze.adb,
7743 g-arrspl.adb, par-ch4.adb, sem_util.adb, sem_res.adb, expander.adb,
7744 sem_attr.adb, exp_dbug.adb, prj-pp.adb, a-stzfix.adb, s-interr.adb,
7745 s-wchcnv.adb, switch-m.adb, gnat1drv.adb, sinput-l.adb, stylesw.adb,
7746 contracts.adb, s-intman-android.adb, g-expect.adb, exp_ch4.adb,
7747 g-comlin.adb, errout.adb, sinput.adb, s-exctra.adb, repinfo.adb,
7748 g-spipat.adb, g-debpoo.adb, exp_ch6.adb, sem_ch4.adb, exp_ch13.adb,
7749 a-wtedit.adb, validsw.adb, pprint.adb, widechar.adb, makeutl.adb,
7750 ali.adb, set_targ.adb, sem_mech.adb, sem_ch6.adb, gnatdll.adb,
7751 get_scos.adb, g-pehage.adb, s-tratas-default.adb, gnatbind.adb,
7752 prj-dect.adb, g-socthi-mingw.adb, par-prag.adb, prj-nmsc.adb,
7753 exp_disp.adb, par-ch12.adb, binde.adb, sem_ch8.adb,
7754 s-tfsetr-default.adb, s-regexp.adb, gprep.adb, s-tpobop.adb,
7755 a-teioed.adb, sem_warn.adb, sem_eval.adb, g-awk.adb, s-io.adb,
7756 a-ztedit.adb, xoscons.adb, exp_intr.adb, sem_cat.adb, sprint.adb,
7757 g-socket.adb, exp_dist.adb, sem_ch13.adb, s-tfsetr-vxworks.adb,
7758 par-ch3.adb, treepr.adb, g-forstr.adb, g-catiio.adb, par-ch5.adb,
7759 uname.adb, osint.adb, exp_ch3.adb, prj-env.adb, a-strfix.adb,
7760 a-stzsup.adb, prj-tree.adb, s-fileio.adb: Update all eligible case
7761 statements to reflect the new style for case alternatives. Various
7762 code clean up and reformatting.
7764 2017-01-13 Gary Dismukes <dismukes@adacore.com>
7766 * exp_util.adb: Minor reformatting.
7768 2017-01-13 Yannick Moy <moy@adacore.com>
7770 * exp_spark.adb: Code cleanup.
7771 * sem_ch9.adb (Analyze_Delay_Until): Resolve
7772 expression so that calls are identified as such inside delay
7775 2017-01-13 Ed Schonberg <schonberg@adacore.com>
7777 * exp_util.adb (Insert_Actions): Handle Iterated_Component_Association.
7778 * par-ch3.adb (P_Discrete_Choice_List): An
7779 Iterated_Component_Association is an array aggregate component.
7780 * par-ch4.adb (P_Iterated_Component_Association): New procedure.
7781 (Is_Quantified_Expression): New function that performs a lookahead
7782 to distinguish quantified expressions from iterated component
7784 (P_Aggregate_Or_Paren_Expr): Recognize iterated component
7786 (P_Unparen_Cond_Case_Quant_Expression, P_Primary): Ditto.
7787 * sem.adb (Analyze): Handle Iterated_Component_Association.
7788 * sem_aggr.adb (Resolve_Array_Aggregate): Dummy handling of iterated
7789 component associations.
7790 * sinfo.ads, sinfo.adb: Entries for for
7791 N_Iterated_Component_Association and its fields.
7792 * sprint.adb (Sprint_Node_Actual): Handle
7793 N_Iterated_Component_Association.
7795 2017-01-13 Justin Squirek <squirek@adacore.com>
7797 * sem_ch12.adb (Analyze_Package_Instantiation): Move disabiling
7798 of the style check until after preanalysis of acutals.
7800 2017-01-13 Yannick Moy <moy@adacore.com>
7802 * sem_ch13.adb: Minor reformatting.
7803 * par-ch11.adb: minor style fix in whitespace
7804 * gnatbind.adb (Gnatbind): Scope of Std_Lib_File
7805 reduced to Add_Artificial_ALI_File; style fix in declaration of
7806 Text; grammar fix in comment.
7807 * osint-c.adb (Read_Library_Info): strip trailing NUL from result.
7808 * freeze.adb: Cleanup to pass pragma instead of
7810 * exp_spark.adb (Expand_SPARK_Attribute_Reference): New procedure to
7811 replace System'To_Address by equivalent call.
7813 2017-01-13 Arnaud Charlet <charlet@adacore.com>
7815 * bindusg.adb: Improve usage output for -f switch.
7817 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
7819 * frontend.adb, freeze.adb, sem_res.adb, sem_attr.adb, sem_ch8.adb:
7822 2017-01-13 Ed Schonberg <schonberg@adacore.com>
7824 * sem_ch13.adb (Is_Predicate_Static): Following the intent of the RM,
7825 treat comparisons on strings as legal in a Static_Predicate.
7826 (Is_Predicate_Static, Is_Type_Ref): Predicate also returns true on
7827 a function call that is the expansion of a string comparison.The
7828 function call is built when compiling the corresponding predicate
7829 function, but the expression has been found legal as a static
7830 predicate during earlier analysis.
7831 * sem_eval.adb (Real_Or_String_Static_Predicate_Matches): Handle
7832 properly a function call that is the expansion of a string
7833 comparison operation, in order to recover the Static_Predicate
7834 expression and apply it to a static argument when needed.
7836 2017-01-13 Tristan Gingold <gingold@adacore.com>
7838 * s-mmap.adb, s-mmap.ads (Open_Read_No_Exception): New function.
7839 (Open_Read): Re-implement using Open_Read_No_Exception.
7840 (Open_Write): Raise exception in case of error.
7841 * s-mmosin-mingw.adb (Open_Common): Do not raise exception.
7842 * s-mmosin-unix.adb (Open_Read, Open_Write): Do not
7844 * s-mmosin-mingw.ads, s-mmosin-unix.ads (Open_Read): Adjust comment.
7846 2017-01-13 Yannick Moy <moy@adacore.com>
7848 * checks.adb: Code cleanup.
7850 2017-01-13 Yannick Moy <moy@adacore.com>
7852 * freeze.adb (Check_Inherited_Conditions): Use analyzed pragma
7853 expression instead of unanalyzed aspect expression for checking
7854 the validity of inheriting an operation. Also copy the expression
7855 being passing it to Build_Class_Wide_Expression, as this call
7856 modifies its argument.
7857 * sem_util.ads Fix comment to reference correct function name
7860 2017-01-13 Javier Miranda <miranda@adacore.com>
7862 * sem_res.adb (Resolve_Generalized_Indexing): Compiling in ASIS mode,
7863 when we propagate information about the indexes back to the original
7864 indexing mode and the prefix of the index is a function call, do not
7865 remove any parameter from such call.
7867 2017-01-13 Gary Dismukes <dismukes@adacore.com>
7869 * exp_ch6.ads (Needs_BIP_Finalization_Master): Update comment.
7870 * exp_ch6.adb (Needs_BIP_Finalization_Master): Return True for
7871 a build-in-place function whose result type is tagged.
7873 2017-01-13 Yannick Moy <moy@adacore.com>
7875 * sem_ch8.adb (Analyze_Subprogram_Renaming.Build_Class_Wide_Wrapper):
7876 Do not generate a wrapper when the only candidate is a class-wide
7878 (Analyze_Subprogram_Renaming): Do not freeze the renaming or renamed
7879 inside a generic context.
7881 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
7883 * exp_util.adb (Add_Inherited_Tagged_DIC):
7884 Pass the object parameters of both the parent and the derived
7885 type DIC procedure to the reference replacement circuitry.
7886 (Find_DIC_Type): Modify the circuitry to present the partial
7887 view of a private type in case the private type defines its own
7889 (Replace_Object_And_Primitive_References): Add two
7890 optional formal parameters. Update the comment on usage. Update
7891 the replacement of references to object parameters.
7893 2017-01-13 Gary Dismukes <dismukes@adacore.com>
7895 * einfo.adb, sem_ch6.adb, atree.adb: Minor reformatting and typo fix.
7897 2017-01-13 Ed Schonberg <schonberg@adacore.com>
7899 * sem_res.adb (Resolve_Actuals): Apply Scalar_Range_Check to
7900 an out parameter that is a type conversion, independently of th
7901 range check that may apply to the expression of the conversion,
7902 for use in GNATProve.
7904 2017-01-13 Yannick Moy <moy@adacore.com>
7906 * gnat1drv.adb (Gnat1drv): Move the implicit with for System in
7907 GNATprove_Mode here to Frontend.
7908 * frontend.adb (Frontend): Move the implicit with for System
7909 in GNATprove_Mode here as it ismore correct this way; the old
7910 place only worked by chance, since there were no overloaded names.
7911 * rtsfind.ads (RE_Id, RE_Unit_Table): Add RE_Tasking_State.
7912 * sem_attr.adb (Analyze_Attribute): In GNATprove_Mode, for the
7913 four attributes identified in SRM 9(18), add an implicit with
7914 to Ada.Task_Identification.
7915 * sem_ch8.adb (Analyze_Subprogram_Renaming.Build_Class_Wide_Wrapper):
7916 Deal specially with the wrapper introduced for AI05-0071 in GNATprove
7918 * checks.adb (Apply_Discriminant_Check,
7919 Apply_Selected_Length_Checks, Apply_Selected_Range_Checks):
7920 In GNATprove mode, we do not apply the checks, but we still
7921 analyze the expression to possibly issue errors on SPARK
7922 code when a run-time error can be detected at compile time.
7923 (Selected_Length_Checks, Selected_Range_Checks): Perform analysis
7926 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
7928 * expander.adb (Expand): Add a warning about using return
7929 statements in Ghost management code.
7930 * exp_ch3.adb (Freeze_Type): Add a warning about using return
7931 statements in Ghost management code.
7932 * exp_ch7.adb (Build_Invariant_Procedure_Body,
7933 Build_Invariant_Procedure_Declaration): Add a warning about
7934 using return statements in Ghost management code.
7935 * exp_disp.adb (Make_DT): Add a warning about using return
7936 statements in Ghost management code.
7937 * exp_util.adb (Build_DIC_Procedure_Body,
7938 Build_DIC_Procedure_Declaration, Make_Predicated_Call): Add a
7939 warning about using return statements in Ghost management code.
7940 * freeze.adb (Freeze_Entity): Add a warning about using return
7941 statements in Ghost management code.
7942 * sem.adb (Analyze, Do_Analyze): Add a warning about using return
7943 statements in Ghost management code.
7944 * sem_ch3.adb (Analyze_Object_Declaration, Process_Full_View): Add
7945 a warning about using return statements in Ghost management code.
7946 * sem_ch5.adb (Analyze_Assignment): Add a warning about using
7947 return statements in Ghost management code.
7948 * sem_ch6.adb (Analyze_Procedure_Call,
7949 Analyze_Subprogram_Body_Helper): Add a warning about using return
7950 statements in Ghost management code.
7951 * sem_ch7.adb (Analyze_Package_Body_Helper): Add a warning about
7952 using return statements in Ghost management code.
7953 * sem_ch12.adb (Analyze_Package_Instantiation,
7954 Analyze_Subprogram_Instantiation, Instantiate_Package_Body,
7955 Instantiate_Subprogram_Body): Add a warning about using return
7956 statements in Ghost management code.
7957 * sem_ch13.adb (Build_Predicate_Functions,
7958 Build_Predicate_Function_Declarations): Add a warning about
7959 using return statements in Ghost management code.
7960 * sem_prag.adb (Analyze_Contract_Cases_In_Decl_Part,
7961 Analyze_Initial_Condition_In_Decl_Part, Analyze_Pragma,
7962 Analyze_Pre_Post_Condition_In_Decl_Part): Add a warning about
7963 using return statements in Ghost management code.
7965 2017-01-13 Tristan Gingold <gingold@adacore.com>
7967 * s-mmosin-mingw.adb: Fix pragma import.
7969 2017-01-13 Arnaud Charlet <charlet@adacore.com>
7971 * gnat1drv.adb (Adjust_Global_Switches): Ignore -gnateE in
7974 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
7976 * atree.adb (Allocate_Initialize_Node): A newly created node is
7977 no longer marked as Ghost at this level.
7978 (Mark_New_Ghost_Node): New routine.
7979 (New_Copy): Mark the copy as Ghost.
7980 (New_Entity): Mark the entity as Ghost.
7981 (New_Node): Mark the node as Ghost.
7982 * einfo.adb (Is_Checked_Ghost_Entity): This attribute can now
7983 apply to unanalyzed entities.
7984 (Is_Ignored_Ghost_Entity): This attribute can now apply to unanalyzed
7986 (Set_Is_Checked_Ghost_Entity): This attribute now
7987 applies to all entities as well as unanalyzed entities.
7988 (Set_Is_Ignored_Ghost_Entity): This attribute now applies to
7989 all entities as well as unanalyzed entities.
7990 * expander.adb Add with and use clauses for Ghost.
7991 (Expand): Install and revert the Ghost region associated with the node
7993 * exp_ch3.adb (Expand_Freeze_Array_Type): Remove all Ghost-related code.
7994 (Expand_Freeze_Class_Wide_Type): Remoe all Ghost-related code.
7995 (Expand_Freeze_Enumeration_Type): Remove all Ghost-related code.
7996 (Expand_Freeze_Record_Type): Remove all Ghost-related code.
7997 (Freeze_Type): Install and revert the Ghost region associated
7998 with the type being frozen.
7999 * exp_ch5.adb Remove with and use clauses for Ghost.
8000 (Expand_N_Assignment_Statement): Remove all Ghost-related code.
8001 * exp_ch6.adb Remove with and use clauses for Ghost.
8002 (Expand_N_Procedure_Call_Statement): Remove all Ghost-relatd code.
8003 (Expand_N_Subprogram_Body): Remove all Ghost-related code.
8004 * exp_ch7.adb (Build_Invariant_Procedure_Body): Install and revert the
8005 Ghost region of the working type.
8006 (Build_Invariant_Procedure_Declaration): Install and revert
8007 the Ghost region of the working type.
8008 (Expand_N_Package_Body): Remove all Ghost-related code.
8009 * exp_ch8.adb Remove with and use clauses for Ghost.
8010 (Expand_N_Exception_Renaming_Declaration): Remove all Ghost-related
8012 (Expand_N_Object_Renaming_Declaration): Remove all Ghost-related code.
8013 (Expand_N_Package_Renaming_Declaration): Remove all Ghost-related code.
8014 (Expand_N_Subprogram_Renaming_Declaration): Remove all Ghost-related
8016 * exp_ch13.adb Remove with and use clauses for Ghost.
8017 (Expand_N_Freeze_Entity): Remove all Ghost-related code.
8018 * exp_disp.adb (Make_DT): Install and revert the Ghost region of
8019 the tagged type. Move the generation of various entities within
8020 the Ghost region of the type.
8021 * exp_prag.adb Remove with and use clauses for Ghost.
8022 (Expand_Pragma_Check): Remove all Ghost-related code.
8023 (Expand_Pragma_Contract_Cases): Remove all Ghost-related code.
8024 (Expand_Pragma_Initial_Condition): Remove all Ghost-related code.
8025 (Expand_Pragma_Loop_Variant): Remove all Ghost-related code.
8026 * exp_util.adb (Build_DIC_Procedure_Body): Install
8027 and revert the Ghost region of the working types.
8028 (Build_DIC_Procedure_Declaration): Install and revert the
8029 Ghost region of the working type.
8030 (Make_Invariant_Call): Install and revert the Ghost region of the
8032 (Make_Predicate_Call): Reimplemented. Install and revert the
8033 Ghost region of the associated type.
8034 * freeze.adb (Freeze_Entity): Install and revert the Ghost region
8035 of the entity being frozen.
8036 (New_Freeze_Node): Removed.
8037 * ghost.adb Remove with and use clauses for Opt.
8038 (Check_Ghost_Completion): Update the parameter profile
8039 and all references to formal parameters.
8040 (Ghost_Entity): Update the comment on usage.
8041 (Install_Ghost_Mode): New routines.
8042 (Is_Ghost_Assignment): New routine.
8043 (Is_Ghost_Declaration): New routine.
8044 (Is_Ghost_Pragma): New routine.
8045 (Is_Ghost_Procedure_Call): New routine.
8046 (Is_Ghost_Renaming): Removed.
8047 (Is_OK_Declaration): Reimplemented.
8048 (Is_OK_Pragma): Reimplemented.
8049 (Is_OK_Statement): Reimplemented.
8050 (Is_Subject_To_Ghost): Update the comment on usage.
8051 (Mark_And_Set_Ghost_Assignment): New routine.
8052 (Mark_And_Set_Ghost_Body): New routine.
8053 (Mark_And_Set_Ghost_Completion): New routine.
8054 (Mark_And_Set_Ghost_Declaration): New routine.
8055 (Mark_And_Set_Ghost_Instantiation): New routine.
8056 (Mark_And_Set_Ghost_Procedure_Call): New routine.
8057 (Mark_Full_View_As_Ghost): Removed.
8058 (Mark_Ghost_Declaration_Or_Body): New routine.
8059 (Mark_Ghost_Pragma): New routine.
8060 (Mark_Ghost_Renaming): New routine.
8061 (Mark_Pragma_As_Ghost): Removed.
8062 (Mark_Renaming_As_Ghost): Removed.
8063 (Propagate_Ignored_Ghost_Code): Update the comment on usage.
8064 (Prune_Node): Freeze nodes no longer need special pruning, they
8065 are processed by the general ignored Ghost code mechanism.
8066 (Restore_Ghost_Mode): New routine.
8067 (Set_Ghost_Mode): Reimplemented.
8068 (Set_Ghost_Mode_From_Entity): Removed.
8069 * ghost.ads Add with and use clauses for Ghost.
8070 (Check_Ghost_Completion): Update the parameter profile
8071 along with the comment on usage.
8072 (Install_Ghost_Mode): New routine.
8073 (Is_Ghost_Assignment): New routine.
8074 (Is_Ghost_Declaration): New routine.
8075 (Is_Ghost_Pragma): New routine.
8076 (Is_Ghost_Procedure_Call): New routine.
8077 (Mark_And_Set_Ghost_Assignment): New routine.
8078 (Mark_And_Set_Ghost_Body): New routine.
8079 (Mark_And_Set_Ghost_Completion): New routine.
8080 (Mark_And_Set_Ghost_Declaration): New routine.
8081 (Mark_And_Set_Ghost_Instantiation): New routine.
8082 (Mark_And_Set_Ghost_Procedure_Call): New routine.
8083 (Mark_Full_View_As_Ghost): Removed.
8084 (Mark_Ghost_Pragma): New routine.
8085 (Mark_Ghost_Renaming): New routine.
8086 (Mark_Pragma_As_Ghost): Removed.
8087 (Mark_Renaming_As_Ghost): Removed.
8088 (Restore_Ghost_Mode): New routine.
8089 (Set_Ghost_Mode): Redefined.
8090 (Set_Ghost_Mode_From_Entity): Removed.
8091 * sem.adb (Analyze): Install and revert the Ghost region of the
8092 node being analyzed.
8093 (Do_Analyze): Change the way a clean Ghost
8094 region is installed and reverted.
8095 * sem_ch3.adb (Analyze_Full_Type_Declaration): Remove
8096 all Ghost-related code.
8097 (Analyze_Incomplete_Type_Decl): Remove all Ghost-related code.
8098 (Analyze_Number_Declaration): Remove all Ghost-related code.
8099 (Analyze_Object_Declaration): Install and revert the Ghost region of
8100 a deferred object declaration's completion.
8101 (Array_Type_Declaration): Remove all Ghost-related code.
8102 (Build_Derived_Type): Update the comment on
8103 the propagation of Ghost attributes from a parent to a derived type.
8104 (Derive_Subprogram): Remove all Ghost-related code.
8105 (Make_Class_Wide_Type): Remove all Ghost-related code.
8106 (Make_Implicit_Base): Remove all Ghost-related code.
8107 (Process_Full_View): Install and revert the Ghost region of
8108 the partial view. There is no longer need to check the Ghost
8110 * sem_ch5.adb (Analyze_Assignment): Install and revert the Ghost
8111 region of the left hand side.
8112 * sem_ch6.adb (Analyze_Abstract_Subprogram_Declaration): Remove
8113 all Ghost-related code.
8114 (Analyze_Expression_Function): Remove all Ghost-related code.
8115 (Analyze_Generic_Subprogram_Body): Remove all Ghost-related code.
8116 (Analyze_Procedure_Call): Install and revert the Ghost region of
8117 the procedure being called.
8118 (Analyze_Subprogram_Body_Helper): Install and revert the Ghost
8119 region of the spec or body.
8120 (Analyze_Subprogram_Declaration): Remove all Ghost-related code.
8121 (Build_Subprogram_Declaration): Remove all Ghost-related code.
8122 (Find_Corresponding_Spec): Remove all Ghost-related code.
8123 (Process_Formals): Remove all Ghost-related code.
8124 * sem_ch7.adb (Analyze_Package_Body_Helper): Install and revert
8125 the Ghost region of the spec.
8126 (Analyze_Package_Declaration): Remove all Ghost-related code.
8127 * sem_ch8.adb (Analyze_Exception_Renaming): Mark a renaming as
8128 Ghost when it aliases a Ghost entity.
8129 (Analyze_Generic_Renaming): Mark a renaming as Ghost when it aliases
8131 (Analyze_Object_Renaming): Mark a renaming as Ghost when
8132 it aliases a Ghost entity.
8133 (Analyze_Package_Renaming): Mark a renaming as Ghost when it aliases
8135 (Analyze_Subprogram_Renaming): Mark a renaming as Ghost when it
8136 aliases a Ghost entity.
8137 * sem_ch11.adb Remove with and use clauses for Ghost.
8138 (Analyze_Exception_Declaration): Remove all Ghost-related code.
8139 * sem_ch12.adb (Analyze_Generic_Package_Declaration): Remove all
8141 (Analyze_Generic_Subprogram_Declaration): Remove all Ghost-related
8143 (Analyze_Package_Instantiation): Install and revert the Ghost region
8144 of the package instantiation.
8145 (Analyze_Subprogram_Instantiation): Install
8146 and revert the Ghost region of the subprogram instantiation.
8147 (Instantiate_Package_Body): Code clean up. Install and revert the
8148 Ghost region of the package body.
8149 (Instantiate_Subprogram_Body): Code clean up. Install and revert the
8150 Ghost region of the subprogram body.
8151 * sem_ch13.adb (Build_Predicate_Functions): Install
8152 and revert the Ghost region of the related type.
8153 (Build_Predicate_Function_Declaration): Code clean up. Install
8154 and rever the Ghost region of the related type.
8155 * sem_prag.adb (Analyze_Contract_Cases_In_Decl_Part):
8156 Install and revert the Ghost region of the pragma.
8157 (Analyze_Initial_Condition_In_Decl_Part): Install and revert the
8158 Ghost region of the pragma.
8159 (Analyze_Pragma): Install and revert the Ghost region of various
8160 pragmas. Mark a pragma as Ghost when it is related to a Ghost entity
8161 or encloses a Ghost entity.
8162 (Analyze_Pre_Post_Condition): Install and revert the Ghost
8163 region of the pragma.
8164 (Analyze_Pre_Post_Condition_In_Decl_Part): Install and revert the
8165 Ghost region of the pragma.
8166 * sem_res.adb (Resolve): Remove all Ghost-related code.
8167 * sem_util.adb (Is_Declaration): Reimplemented.
8168 (Is_Declaration_Other_Than_Renaming): New routine.
8169 * sem_util.ads (Is_Declaration_Other_Than_Renaming): New routine.
8170 * sinfo.adb (Is_Checked_Ghost_Pragma): New routine.
8171 (Is_Ghost_Pragma): Removed.
8172 (Is_Ignored_Ghost_Pragma): New routine.
8173 (Set_Is_Checked_Ghost_Pragma): New routine.
8174 (Set_Is_Ghost_Pragma): Removed.
8175 (Set_Is_Ignored_Ghost_Pragma): New routine.
8176 * sinfo.ads: Update the documentation on Ghost mode and
8177 Ghost regions. New attributes Is_Checked_Ghost_Pragma
8178 and Is_Ignored_Ghost_Pragma along with usages in nodes.
8179 Remove attribute Is_Ghost_Pragma along with usages in nodes.
8180 (Is_Checked_Ghost_Pragma): New routine along with pragma Inline.
8181 (Is_Ghost_Pragma): Removed along with pragma Inline.
8182 (Is_Ignored_Ghost_Pragma): New routine along with pragma Inline.
8183 (Set_Is_Checked_Ghost_Pragma): New routine along with pragma Inline.
8184 (Set_Is_Ghost_Pragma): Removed along with pragma Inline.
8185 (Set_Is_Ignored_Ghost_Pragma): New routine along with pragma Inline.
8187 2017-01-12 Tristan Gingold <gingold@adacore.com>
8189 * s-mmap.ads, s-mmap.adb, s-mmosin-unix.ads, s-mmosin-unix.adb,
8190 s-mmauni-long.ads, s-mmosin-mingw.ads, s-mmosin-mingw.adb: New files.
8192 2017-01-12 Yannick Moy <moy@adacore.com>
8194 * errout.adb, errout.ads (Initialize): Factor common treatment
8196 (Reset_Warnings): New procedure to reset counts related to warnings.
8197 (Record_Compilation_Errors): New variable to store the presence of an
8198 error, used in gnat2why to allow changing the Warning_Mode.
8199 (Compilation_Errors): Use new variable Record_Compilation_Errors to
8200 store the presence of an error.
8202 2017-01-12 Javier Miranda <miranda@adacore.com>
8204 * sem_ch13.adb (Analyze_Aspect_Specifications):
8205 For Interrupt_Handler and Attach_ Handler aspects, decorate the
8206 internally built reference to the protected procedure as coming
8207 from sources and force its analysis.
8209 2017-01-12 Ed Schonberg <schonberg@adacore.com>
8211 * sem_ch3.adb (Build_Derived_Type): For a scalar derived type,
8212 inherit predicates if any from the first_subtype of the parent,
8213 not from the anonymous parent type.
8214 * sem_eval.adb (Is_Static_Subtype): A type that inherits a dynamic
8215 predicate is not a static subtype.
8217 2017-01-12 Gary Dismukes <dismukes@adacore.com>
8219 * freeze.adb (Check_Suspicious_Convention): New procedure
8220 performing a warning check on discriminated record types with
8221 convention C or C++. Factored out of procedure Freeze_Record_Type,
8222 and changed to only apply to base types (to avoid spurious
8223 warnings on subtypes). Minor improvement of warning messages
8224 to refer to discriminated rather than variant record types.
8225 (Freeze_Record_Type): Remove code for performing a suspicious
8227 (Freeze_Entity): Only call Freeze_Record_Type
8228 on types that aren't declared within any enclosing generic units
8229 (rather than just excluding the type when the innermost scope
8230 is generic). Call Check_Suspicious_Convention whether or not
8231 the type is declared within a generic unit.
8232 * sem_ch8.adb (In_Generic_Scope): Move this function to Sem_Util.
8233 * sem_util.ads, sem_util.adb (In_Generic_Scope): New function (moved
8236 2017-01-12 Tristan Gingold <gingold@adacore.com>
8238 * sysdep.c, adaint.c, rtinit.c, ming32.h:
8239 (__gnat_current_codepage): Renamed from CurrentCodePage
8240 (__gnat_current_ccs_encoding): Renamed from CurrentCCSEncoding
8242 2017-01-12 Ed Schonberg <schonberg@adacore.com>
8244 * sem_ch6.adb (Fully_Conformant_Expressions): Handle properly
8245 quantified expressions, following AI12-050: the loop parameters
8246 of two quantified expressions are conformant if they have the
8249 2017-01-12 Arnaud Charlet <charlet@adacore.com>
8251 * gcc-interface/Makefile.in: Clean up VxWorks targets.
8253 2017-01-12 Ed Schonberg <schonberg@adacore.com>
8255 * sem_attr.adb (Analyze_Attribute_Reference, case Loop_Entry):
8256 Hnadle properly the attribute reference when it appears as part
8257 of an expression in another loop aspect.
8259 2017-01-12 Ed Schonberg <schonberg@adacore.com>
8261 * exp_ch3.adb (Check_Predicated_Discriminant): New procedure,
8262 subsidiary of Build_Initialization_Call, to complete generation
8263 of predicate checks on discriminants whose (sub)types have
8264 predicates, and to add checks on variants that do not have an
8266 * sem_util.adb (Gather_Components): A missing Others alternative is
8267 not an error when the type of the discriminant is a static predicate
8268 (and coverage has been checked when analyzing the case statement). A
8269 runtime check is generated to verify that a given discriminant
8270 satisfies the predicate (RM 3.8.1. (21.1/2)).
8272 2017-01-12 Yannick Moy <moy@adacore.com>
8274 * gnat1drv.adb (Adjust_Global_Switches): Only
8275 perform checking of exception mechanism when generating code.
8277 2017-01-12 Justin Squirek <squirek@adacore.com>
8279 * exp_ch7.adb (Add_Type_Invariants, Process_Array_Component):
8280 Remove handling of access component with invariant.
8281 (Build_Invariant_Procedure_Declaration): Remove return on class
8283 * freeze.adb (Freeze_Array_Type, Freeze_Record_Type): Remove
8284 conditional exception for component or array so Has_Own_Invariants
8285 flag is not falsly set.
8286 * sem_ch3.adb (Make_Class_Wide_Type): Initialize copy of class
8287 wide type to have no invariant flags.
8289 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
8291 * exp_ch9.adb, sem_prag.adb, s-tassta.adb, sem_util.adb, s-tarest.adb,
8292 sem_ch13.adb: Minor reformatting.
8294 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
8296 * exp_aggr.adb (Build_Record_Aggr_Code): Guard against a missing
8297 adjustment primitive when the ancestor type was not properly frozen.
8298 (Gen_Assign): Guard against a missing initialization
8299 primitive when the component type was not properly frozen.
8300 (Initialize_Array_Component): Guard against a missing adjustment
8301 primitive when the component type was not properly frozen.
8302 (Initialize_Record_Component): Guard against a missing adjustment
8303 primitive when the component type was not properly frozen.
8304 (Process_Transient_Component_Completion): The transient object may
8305 not be finalized when its associated type was not properly frozen.
8306 * exp_ch3.adb (Build_Assignment): Guard against a missing
8307 adjustment primitive when the component type was not properly frozen.
8308 (Build_Initialization_Call): Guard against a missing
8309 initialization primitive when the associated type was not properly
8311 (Expand_N_Object_Declaration): Guard against a missing
8312 adjustment primitive when the base type was not properly frozen.
8313 (Predefined_Primitive_Bodies): Create an empty Deep_Adjust
8314 body when there is no adjustment primitive available. Create an
8315 empty Deep_Finalize body when there is no finalization primitive
8317 * exp_ch4.adb (Apply_Accessibility_Check): Guard against a
8318 missing finalization primitive when the designated type was
8319 not properly frozen.
8320 (Expand_N_Allocator): Guard against a missing initialization primitive
8321 when the designated type was not properly frozen.
8322 * exp_ch5.adb (Make_Tag_Ctrl_Assignment): Add the adjustment call
8323 only when the corresponding adjustment primitive is available.
8324 * exp_ch7.adb (Build_Adjust_Or_Finalize_Statements): Generate the
8325 adjustment/finalization statements only when there is an available
8326 primitive to carry out the action.
8327 (Build_Initialize_Statements): Generate the initialization/finalization
8328 statements only when there is an available primitive to carry out the
8330 (Make_Adjust_Call): Do not generate a call when the underlying
8331 type is not present due to a possible missing full view.
8332 (Make_Final_Call): Do not generate a call when the underlying
8333 type is not present due to a possible missing full view.
8334 (Make_Finalize_Address_Stmts): Generate an empty body when the
8335 designated type lacks a finalization primitive.
8336 (Make_Init_Call): Do not generate a call when the underlying type is
8337 not present due to a possible missing full view.
8338 (Process_Component_For_Adjust): Add the adjustment call only when the
8339 corresponding adjustment primitive is available.
8340 (Process_Component_For_Finalize): Add the finalization call only when
8341 the corresponding finalization primitive is available.
8342 (Process_Object_Declaration): Use a null statement to emulate a
8343 missing call to the finalization primitive of the object type.
8344 * exp_ch7.ads (Make_Adjust_Call): Update the comment on usage.
8345 (Make_Final_Call): Update the comment on usage.
8346 (Make_Init_Call): Update the comment on usage.
8347 * exp_util.adb (Build_Transient_Object_Statements): Code reformatting.
8349 2017-01-12 Arnaud Charlet <charlet@adacore.com>
8351 * einfo.ads: Update documentation of Address_Taken.
8352 * sem_attr.adb (Analyze_Access_Attribute, Resolve_Attribute
8353 [Access_Attribute]): Only consider 'Access/'Unchecked_Access
8354 for subprograms when setting Address_Taken flag.
8356 2017-01-12 Patrick Bernardi <bernardi@adacore.com>
8358 * sem_ch10.adb (Analyze_With_Clause): Removed code that turned
8359 Configurable_Run_Time_Mode off when analysing with'ed predefined
8362 2017-01-12 Gary Dismukes <dismukes@adacore.com>
8364 * sem_prag.adb: Minor reformatting.
8365 * sem_util.adb (Unique_Entity): fix result for
8366 bodies of entry families.
8368 2017-01-12 Justin Squirek <squirek@adacore.com>
8370 * sem_prag.adb (Analyze_Pragma): Add appropriate calls to
8371 Resolve_Suppressible in the pragma Assertion_Policy case.
8372 (Resolve_Suppressible): Created this function to factor out
8373 common code used to resolve Suppress to either Ignore or Check
8374 * snames.ads-tmpl: Add name for Suppressible.
8376 2017-01-12 Gary Dismukes <dismukes@adacore.com>
8378 * exp_ch9.adb, s-secsta.adb, snames.ads-tmpl, exp_ch3.adb: Minor
8380 * debug.adb: Minor comment fixes.
8382 2017-01-12 Arnaud Charlet <charlet@adacore.com>
8384 * sem_util.adb (Unique_Entity): For concurrent
8385 bodies that are defined with stubs and complete a declaration
8386 of a single concurrent object return the entity of an implicit
8387 concurrent type, not the entity of the anonymous concurrent
8389 * debug.adb: -gnatd.J is no longer used.
8390 * make.adb (Globalize): Removed, no longer used.
8391 * sem_ch9.adb: minor typo in comment for entry index
8393 2017-01-12 Patrick Bernardi <bernardi@adacore.com>
8395 * aspect.adb, aspect.ads: Added new aspect Secondary_Stack_Size.
8396 * exp_ch3.adb (Build_Init_Statements): As part of initialising
8397 the value record of a task, set its _Secondary_Stack_Size field
8399 * exp_ch9.adb (Expand_N_Task_Type_Declaration): Create
8400 a _Secondary_Stack_Size field in the value record of
8401 the task if a Secondary_Stack_Size rep item is present.
8402 (Make_Task_Create_Call): Include secondary stack size
8403 parameter. If No_Secondary_Stack restriction is in place, passes
8405 * par-prag.adb, sem_prag.adb, sem_prag.ads: Added new pragma
8406 Secondary_Stack_Size.
8407 * s-secsta.adb, s-secsta.ads (Minimum_Secondary_Stack_Size): New
8408 function to define the overhead of the secondary stack.
8409 * s-tarest.adb (Create_Restricted_Task,
8410 Create_Restricted_Task_Sequential): Functions now include
8411 Secondary_Stack_Size parameter to pass to Initialize_ATCB.
8412 * s-tarest.adb (Create_Restricted_Task,
8413 Create_Restricted_Task_Sequential): Calls to Initialize_ATCB now
8414 include Secondary_Stack_Size parameter.
8415 (Task_Wrapper): Secondary stack now allocated to the size specified by
8416 the Secondary_Stack_Size parameter in the task's ATCB.
8417 * s-taskin.adb, s-taskin.adb (Common_ATCB, Initialize_ATCB): New
8418 Secondary_Stack_Size component.
8419 * s-tassta.adb, s-tassta.ads (Create_Restricted_Task,
8420 Create_Restricted_Task_Sequential): Function now include
8421 Secondary_Stack_Size parameter.
8422 (Task_Wrapper): Secondary stack now allocated to the size
8423 specified by the Secondary_Stack_Size parameter in the task's
8425 * s-tproft.adb (Register_Foreign_Thread): Amended Initialize_ATCB call
8426 to include Secondary_Stack_Size parameter.
8427 * sem_ch13.adb (Analyze_Aspect_Specification): Add support for
8428 Secondary_Stack_Size aspect, turning the aspect into its corresponding
8430 (Analyze_Attribute_Definition): Process Secondary_Stack_Size attribute.
8431 * snames.adb-tmpl, snames.ads-tmpl: Added names
8432 Name_Secondary_Stack_Size, Name_uSecondary_Stack_Size,
8433 Attribute_Secondary_Stack_Size and Pragma_Secondary_Stack_Size.
8435 2017-01-12 Yannick Moy <moy@adacore.com>
8437 * exp_spark.adb (Expand_SPARK_Potential_Renaming): Fix sloc of copied
8440 2017-01-12 Justin Squirek <squirek@adacore.com>
8442 * exp_attr.adb (Expand_N_Attribute_Reference):
8443 Fix Finalization_Size case by properly resolving the type after
8444 rewritting the node.
8446 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
8448 * exp_util.adb (Build_DIC_Procedure_Body): Semi-insert the body into
8450 (Build_DIC_Procedure_Declaration): Semi-insert the body into the tree.
8451 * binde.adb, exp_ch5.adb, sem_type.adb, sem.ads, sem_res.adb,
8452 exp_sel.ads: Minor reformatting.
8454 2017-01-12 Justin Squirek <squirek@adacore.com>
8456 * exp_ch6.adb (Expand_Call): Add guard to prevent
8457 invariant checks from being created for internally generated
8460 2017-01-12 Bob Duff <duff@adacore.com>
8462 * lib-writ.ads: Remove incorrect comment.
8464 2017-01-12 Javier Miranda <miranda@adacore.com>
8466 * debug.adb (-gnatd.K): Enable generation of contract-only
8467 procedures in CodePeer mode.
8468 * contracts.adb (Build_And_Analyze_Contract_Only_Subprograms):
8470 (Analyze_Contracts): Generate contract-only procedures if -gnatdK is
8472 * scil_ll.ads, scil_ll.adb (Get_Contract_Only_Body_Name): New
8474 (Get_Contract_Only_Missing_Body_Name): New subprogram.
8475 (Get_Contract_Only_Body): New subprogram.
8476 (Set_Contract_Only_Body): New subprogram.
8477 (Is_Contract_Only_Body): New subprogram.
8478 (Set_Is_Contract_Only_Body): New subprogram.
8479 (SCIL_Nodes): Replace table by hash-table.
8481 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
8483 * exp_ch6.adb: Minor reformatting.
8484 * spark_xrefs.ads: minor cleanup of comments for SPARK xrefs
8486 2017-01-12 Bob Duff <duff@adacore.com>
8488 * binde.adb (Forced): New reason for a dependence.
8489 (Force_Elab_Order): Implementation of the new switch.
8490 * binde.ads: Minor comment fixes.
8491 * bindusg.adb: Add -f switch. Apparently, there was an -f switch
8492 long ago that is no longer supported; removed comment about that.
8493 * opt.ads (Force_Elab_Order_File): Name of file specified for
8495 * switch-b.adb: Parse -f switch.
8497 2017-01-12 Justin Squirek <squirek@adacore.com>
8499 * exp_ch6.adb (Check_View_Conversion): Created this function
8500 to properly chain calls to check type invariants that may be
8501 present in a subprogram call after the subprogram.
8502 (Expand_Call): Add a conditional to identify when a view conversion
8503 needs to be checked.
8504 * nlists.adb, nlists.ads (Prepend_New): New routine.
8505 (Prepend_New_To): New routine.
8507 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
8509 * sinfo.ads: Minor reformatting.
8511 2017-01-12 Gary Dismukes <dismukes@adacore.com>
8513 * exp_util.adb, exp_util.ads, einfo.ads: Minor typo fixes and
8516 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
8518 * exp_ch6.adb (Make_Build_In_Place_Call_In_Anonymous_Context): Add new
8519 variable Definite. Create a local object and pass its 'Access to the
8520 BIP function when the result type is either definite or it does not
8521 require any finalization or secondary stack management.
8523 2017-01-12 Bob Duff <duff@adacore.com>
8525 * contracts.adb, einfo.adb, errout.adb, exp_attr.adb,
8526 exp_ch3.adb, exp_ch7.adb, exp_ch9.adb, exp_prag.adb, freeze.adb,
8527 frontend.adb, ghost.adb, inline.adb, lib-writ.adb, lib-xref.adb,
8528 par.adb, par-ch10.adb, par-ch2.adb, par-prag.adb, par_sco.adb,
8529 sem_attr.adb, sem_aux.adb, sem_ch10.adb, sem_ch12.adb,
8530 sem_ch13.adb, sem_ch6.adb, sem_ch8.adb, sem_ch9.adb, sem_elab.adb,
8531 sem_prag.adb, sem_res.adb, sem_util.adb, sem_util.ads,
8532 sem_warn.adb, sinfo.adb, sinfo.ads, sprint.adb (Pragma_Name):
8533 Change name to Pragma_Name_Unmapped.
8534 (Pragma_Name_Mapped): Change name to Pragma_Name.
8535 This is because the "mapped" version should be the usual case.
8537 2017-01-09 Hristian Kirtchev <kirtchev@adacore.com>
8539 * einfo.ads, einfo.adb: Remove uses of flags Has_Default_Init_Cond,
8540 Is_Default_Init_Cond_Procedure, and
8541 Has_Inherited_Default_Init_Cond. Add uses of flags
8542 Has_Own_DIC, Is_DIC_Procedure, and Has_Inherited_DIC.
8543 (Default_Init_Cond_Procedure): Removed.
8544 (DIC_Procedure): New routine.
8545 (Has_Default_Init_Cond): Removed.
8546 (Has_DIC): New routine.
8547 (Has_Inheritable_Invariants): The attribute applies to the base type.
8548 (Has_Inherited_Default_Init_Cond): Removed.
8549 (Has_Inherited_DIC): New routine.
8550 (Has_Inherited_Invariants): The attribute applies to the base type.
8551 (Has_Own_DIC): New routine.
8552 (Has_Own_Invariants): The attribute applies to the base type.
8553 (Is_Default_Init_Cond_Procedure): Removed.
8554 (Is_DIC_Procedure): New routine.
8555 (Set_Default_Init_Cond_Procedure): Removed.
8556 (Set_DIC_Procedure): New routine.
8557 (Set_Has_Default_Init_Cond): Removed.
8558 (Set_Has_Inheritable_Invariants): The attribute applies
8560 (Set_Has_Inherited_Default_Init_Cond): Removed.
8561 (Set_Has_Inherited_DIC): New routine.
8562 (Set_Has_Inherited_Invariants): The attribute applies to the base type.
8563 (Set_Has_Own_DIC): New routine.
8564 (Set_Has_Own_Invariants): The attribute applies to the base type.
8565 (Set_Is_Default_Init_Cond_Procedure): Removed.
8566 (Set_Is_DIC_Procedure): New routine.
8567 (Write_Entity_Flags): Update the output of all flags related to
8568 default initial condition.
8569 * exp_ch3.adb (Expand_N_Object_Declaration): Update the generation
8570 of the call to the DIC procedure.
8571 (Freeze_Type): Generate the body of the DIC procedure.
8572 * exp_ch7.adb (Build_Invariant_Procedure_Body): Replace
8573 all occurrences of Create_Append with Append_New_To. Do
8574 not generate an invariant procedure for a class-wide type.
8575 The generated body acts as a freeze action of the working type.
8576 (Build_Invariant_Procedure_Declaration): Do not generate an
8577 invariant procedure for a class-wide type.
8578 (Create_Append): Removed.
8579 * exp_util.adb: Add with and use clauses for Sem_Ch3, sem_ch6,
8580 sem_Ch12, Sem_Disp, and GNAT.HTable. Move the handling of
8581 class-wide pre/postcondition description and data structures from
8583 (Build_Class_Wide_Expression): Moved from Sem_Prag.
8584 (Build_DIC_Call): New routine.
8585 (Build_DIC_Procedure_Body): New routine.
8586 (Build_DIC_Procedure_Declaration): New routine.
8587 (Entity_Hash): Moved from Sem_Prag.
8588 (Find_DIC_Type): New routine.
8589 (Update_Primitives_Mapping): Reimplemented.
8590 (Update_Primitives_Mapping_Of_Types): New routine.
8591 * exp_util.ads (Build_Class_Wide_Expression): Moved from Sem_Prag.
8592 (Build_DIC_Call): New routine.
8593 (Build_DIC_Procedure_Body): New routine.
8594 (Build_DIC_Procedure_Declaration): New routine.
8595 (Update_Primitives_Mapping): Moved from Sem_Prag.
8596 (Update_Primitives_Mapping_Of_Types): New routine.
8597 * nlists.adb (Append_New): New routine.
8598 (Append_New_To): New routine.
8599 * nlists.ads (Append_New): New routine.
8600 (Append_New_To): New routine.
8601 * sem_ch3.adb (Analyze_Declarations): Do not generate the bodies
8602 of DIC procedures here. This is now done at the end of the
8603 visible declarations, private declarations, and at the freeze
8605 (Analyze_Private_Extension_Declaration):
8606 A private extension inherits the DIC pragma of a parent type.
8607 (Analyze_Subtype_Declaration): No need to propagate invariant
8608 attributes to a subtype as those apply to the base type.
8609 (Build_Derived_Record_Type): No need to inherit invariants here
8610 as this is now done in Build_Derived_Type.
8611 (Build_Derived_Type): Inherit both the DIC pragma and invariants from
8613 (Process_Full_View): Update the propagation of DIC attributes.
8614 (Propagate_Default_Init_Cond_Attributes): Removed.
8615 * sem_ch7.adb Add with and use clauses for Exp_Util.
8616 (Analyze_Package_Specification): Create the body of the DIC
8617 procedure at the end of the visible and private declarations.
8618 (Preserve_Full_Attributes): Propagate DIC attributes.
8619 * sem_ch9.adb (Analyze_Protected_Type_Declaration): Propagate
8621 (Analyze_Task_Type_Declaration): Propagate DIC attributes.
8622 * sem_elab.adb (Check_A_Call): Update the call to
8623 Is_Nontrivial_Default_Init_Cond_Procedure.
8624 * sem_prag.adb Remove the with and use clauses for
8625 GNAT.HTable. Move the handling of class- wide pre/postcondition
8626 description and data structures to Exp_Util.
8627 (Analyze_Pragma): Create the declaration of the DIC procedure. There
8628 is no need to propagate invariant-related attributes at this point
8629 as this is done in Build_Invariant_Procedure_Declaration.
8630 (Build_Class_Wide_Expression): Moved to Exp_Util.
8631 (Entity_Hash): Moved to Exp_Util.
8632 (Update_Primitives_Mapping): Moved to Exp_Util.
8633 * sem_prag.ads (Build_Class_Wide_Expression): Moved to Exp_Util.
8634 (Update_Primitives_Mapping): Moved to Exp_Util.
8635 * sem_util.adb: Remove with and use clauses for Ghost
8637 (Build_Default_Init_Cond_Call): Removed.
8638 (Build_Default_Init_Cond_Procedure_Bodies): Removed.
8639 (Build_Default_Init_Cond_Procedure_Declaration): Removed.
8640 (Get_Views): Reimplemented.
8641 (Has_Full_Default_Initialization): Reimplement the section on DIC.
8642 (Inherit_Default_Init_Cond_Procedure): Removed.
8643 (Is_Nontrivial_Default_Init_Cond_Procedure): Removed.
8644 (Is_Nontrivial_DIC_Procedure): New routine.
8645 (Is_Verifiable_DIC_Pragma): New routine.
8646 (Propagate_DIC_Attributes): New routine.
8647 * sem_util.ads (Build_Default_Init_Cond_Call): Removed.
8648 (Build_Default_Init_Cond_Procedure_Bodies): Removed.
8649 (Build_Default_Init_Cond_Procedure_Declaration): Removed.
8650 (Inherit_Default_Init_Cond_Procedure): Removed.
8651 (Is_Nontrivial_Default_Init_Cond_Procedure): Removed.
8652 (Is_Nontrivial_DIC_Procedure): New routine.
8653 (Is_Verifiable_DIC_Pragma): New routine.
8654 (Propagate_DIC_Attributes): New routine.
8655 * sem_warn.adb (Is_OK_Fully_Initialized): Reimplement the section
8657 * sinfo.ads, sinfo.adb: Add new attribute Expression_Copy along with
8659 (Expression_Copy): New routine along with pragma Inline.
8660 (Set_Expression_Copy): New routine along with pragma Inline.
8662 2017-01-06 Bob Duff <duff@adacore.com>
8664 * bindgen.adb (Gen_Adainit, Gen_Adafinal): Change
8665 "Bind_Main_Program" to "not Bind_For_Library", because otherwise
8666 we won't generate the call to s_stalib_adafinal when the main
8667 is not written in Ada.
8669 2017-01-06 Bob Duff <duff@adacore.com>
8671 * sem_prag.adb: Minor: remove pragma Warnings.
8673 2017-01-06 Tristan Gingold <gingold@adacore.com>
8675 * Makefile.rtl: Do not compile s-stchop by default.
8677 2017-01-06 Patrick Bernardi <bernardi@adacore.com>
8679 * aspects.adb, aspects.ads, exp_ch3.adb, exp_ch9.adb, par-prag.adb,
8680 sem_ch13.adb, sem_prag.adb, sem_prag.ads, snames.adb-tmpl,
8681 snames.ads-tmpl, s-secsta.adb, s-secsta.ads, s-tarest.adb,
8682 s-tarest.ads, s-taskin.adb, s-taskin.ads, s-tassta.adb, s-tassta.ads:
8683 Reverted previous change for now.
8685 2017-01-06 Ed Schonberg <schonberg@adacore.com>
8687 * exp_ch3.adb (Build_Initialization_Call): Apply predicate
8688 check to default discriminant value if checks are enabled.
8689 (Build_Assignment): If type of component has static predicate,
8690 apply check to its default value, if any.
8692 2017-01-06 Patrick Bernardi <bernardi@adacore.com>
8694 * aspect.adb, aspect.ads: Added new aspect Secondary_Stack_Size.
8695 * exp_ch3.adb (Build_Init_Statements): As part of initialising
8696 the value record of a task, set its _Secondary_Stack_Size field
8698 * exp_ch9.adb (Expand_N_Task_Type_Declaration): Create
8699 a _Secondary_Stack_Size field in the value record of
8700 the task if a Secondary_Stack_Size rep item is present.
8701 (Make_Task_Create_Call): Include secondary stack size
8702 parameter. If No_Secondary_Stack restriction is in place, passes
8704 * par-prag.adb, sem_prag.adb, sem_prag.ads: Added new pragma
8705 Secondary_Stack_Size.
8706 * s-secsta.adb, s-secsta.ads (Minimum_Secondary_Stack_Size): New
8707 function to define the overhead of the secondary stack.
8708 * s-tarest.adb (Create_Restricted_Task,
8709 Create_Restricted_Task_Sequential): Functions now include
8710 Secondary_Stack_Size parameter to pass to Initialize_ATCB.
8711 * s-tarest.adb (Create_Restricted_Task,
8712 Create_Restricted_Task_Sequential): Calls to Initialize_ATCB
8713 now include Secondary_Stack_Size parameter.
8715 Secondary stack now allocated to the size specified by the
8716 Secondary_Stack_Size parameter in the task's ATCB.
8717 * s-taskin.adb, s-taskin.adb (Common_ATCB, Initialise_ATCB): New
8718 Secondary_Stack_Size component.
8719 * s-tassta.adb, s-tassta.ads (Create_Restricted_Task,
8720 Create_Restricted_Task_Sequential): Function now include
8721 Secondary_Stack_Size parameter.
8722 (Task_Wrapper): Secondary stack
8723 now allocated to the size specified by the Secondary_Stack_Size
8724 parameter in the task's ATCB.
8725 * sem_ch13.adb (Analyze_Aspect_Specification): Add support
8726 for Secondary_Stack_Size aspect, turning the aspect into its
8727 corresponding internal attribute.
8728 (Analyze_Attribute_Definition):
8729 Process Secondary_Stack_Size attribute.
8730 * snames.adb-tmpl, snames.ads-tmpl: Added names
8731 Name_Secondary_Stack_Size, Name_uSecondary_Stack_Size,
8732 Attribute_Secondary_Stack_Size and Pragma_Secondary_Stack_Size.
8734 2017-01-06 Pascal Obry <obry@adacore.com>
8736 * a-direio.adb, a-direio.ads, a-sequio.adb, a-sequio.ads: Add Flush to
8737 Sequential_IO and Direct_IO.
8739 2017-01-06 Bob Duff <duff@adacore.com>
8741 * snames.ads-tmpl (Renamed): New name for the pragma argument.
8742 * par-ch2.adb: Allow the new pragma (with analysis deferred
8744 * sinfo.ads, sinfo.adb (Map_Pragma_Name, Pragma_Name_Mapped):
8745 Keep a mapping from new pragma names to old names.
8746 * sem_prag.adb: Check legality of pragma Rename_Pragma, and
8747 implement it by calling Map_Pragma_Name.
8748 * checks.adb, contracts.adb, einfo.adb, errout.adb,
8749 * exp_attr.adb, exp_ch3.adb, exp_ch6.adb, exp_ch7.adb, exp_ch9.adb,
8750 * exp_prag.adb, exp_util.adb, freeze.adb, frontend.adb, ghost.adb,
8751 * inline.adb, lib-writ.adb, scans.adb, scans.ads, sem_attr.adb,
8752 * sem_aux.adb, sem_ch10.adb, sem_ch13.adb, sem_ch6.adb, sem_ch9.adb,
8753 * sem_elab.adb, sem_res.adb, sem_util.adb, sem_util.ads,
8754 * sem_warn.adb: Call Pragma_Name_Mapped instead of Pragma_Name
8757 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
8759 * exp_ch9.adb: Minor reformatting.
8761 2017-01-06 Tristan Gingold <gingold@adacore.com>
8763 * exp_ch9.ads, exp_ch9.adb (Build_Entry_Names): Remove (unused).
8764 * rtsfind.ads (RE_Task_Entry_Names_Array, RO_ST_Set_Entry_Names)
8765 (RE_Protected_Entry_Names_Array, RO_PE_Set_Entry_Names): Remove
8767 * s-taskin.ads, s-taskin.adb (Set_Entry_Names,
8768 Task_Entry_Names_Array, Task_Entry_Names_Access): Remove.
8769 * s-tpoben.ads, s-tpoben.adb (Set_Entry_Names,
8770 Protected_Entry_Names_Array, Protected_Entry_Names_Access): Remove.
8772 2017-01-06 Bob Duff <duff@adacore.com>
8774 * sinfo.ads, sinfo.adb (Map_Pragma_Name): Preparation work,
8775 dummy implementation of Map_Pragma_Name.
8777 2017-01-06 Tristan Gingold <gingold@adacore.com>
8779 * exp_ch9.adb (Expand_N_Protected_Type_Declaration): Make the
8780 entry_body variable constant.
8781 * s-taprob.ads (Entry_Body_Access): Move to s-tposen.
8782 * s-tpoben.ads (Protected_Entry_Body_Access): Now access
8784 * s-tposen.ads (Entry_Body_Access): Moved from s-taprob,
8785 now access to constant.
8787 2017-01-06 Gary Dismukes <dismukes@adacore.com>
8789 * einfo.ads, sem_res.adb, sem_attr.adb, sem_ch6.adb: Minor
8790 reformatting and typo fixes.
8792 2017-01-06 Bob Duff <duff@adacore.com>
8794 * snames.ads-tmpl: New names for pragma renaming.
8795 * snames.adb-tmpl (Is_Configuration_Pragma_Name): Minor cleanup.
8796 * par-prag.adb: Add new pragma name to case statement.
8797 * sem_prag.adb (Rename_Pragma): Initial cut at semantic analysis
8799 * sinfo.ads, sinfo.adb (Pragma_Name_Mapped): Preparation work,
8800 Dummy implementation of Pragma_Name_Mapped.
8802 2017-01-06 Ed Schonberg <schonberg@adacore.com>
8804 * exp_ch6.adb (Expand_Protected_Subprogram_Call): Add guard to
8805 better detect call within an entry_wrapper.
8806 * sem_res.adb (Resolve_Call): A protected call within an
8807 entity_wrapper is analyzed in the context of the protected
8808 object but corresponds to a pre-analysis and is not an access
8810 * sem_attr.adb: Minor reformatting.
8812 2017-01-06 Justin Squirek <squirek@adacore.com>
8814 * sem_attr.adb (Analyze_Attribute): Modify semantic checks for
8815 Finalization_Size to allow a prefix of any non-class-wide type.
8816 * sem_attr.ads Modify comment for Finalization_Size to include
8817 definite type use case.
8819 2017-01-06 Ed Schonberg <schonberg@adacore.com>
8821 * einfo.ads, einfo.adb (Is_Entry_Wrapper): New flag, defined
8822 on procedures that are wrappers created for entries that have
8824 * sem_ch6.adb (Analyze_Subrogram_Body_Helper): If the subprogram
8825 body is an entry_wrapper, compile it in the context of the
8826 synchronized type, because a precondition may refer to funtions
8828 * exp_ch9.adb (Build_Contract_Wrapper): Set Is_Entry_Wrapper on
8830 * exp_ch6.adb (Expand_Protected_Subprogram_Call): if the call is
8831 within an Entry_Wrapper this is an external call whose target
8832 is the synchronized object that is the actual in the call to
8835 2017-01-06 Yannick Moy <moy@adacore.com>
8837 * sem_attr.adb (Analyze_Attribute/Attribute_Loop_Entry): Analyze node
8838 in tree, which means not analyzing the previous prefix if the node has
8839 been rewritten into its prefix.
8841 2017-01-06 Gary Dismukes <dismukes@adacore.com>
8843 * s-tpobop.adb: Minor reformatting.
8845 2017-01-06 Ed Schonberg <schonberg@adacore.com>
8847 * checks.adb (Ensure_Valid): Do not generate a validity check
8848 within a generated predicate function, validity checks will have
8849 been applied earlier when required.
8851 2017-01-06 Tristan Gingold <gingold@adacore.com>
8853 * s-tpoben.ads (Protection_Entries): Add comment and reorder
8854 components for performances.
8855 * s-tpobop.adb (PO_Do_Or_Queue): Implement Max_Queue_Length runtime
8858 2017-01-06 Ed Schonberg <schonberg@adacore.com>
8860 * sem_eval.adb (Check_Expression_Against_Static_Predicate):
8861 If expression is compile-time known and obeys a static predicate
8862 it must be labelled as static, to prevent spurious warnings and
8863 run-time errors, e.g. in case statements. This is relevant when
8864 the expression is the result of constant-folding a type conversion
8865 whose expression is a variable with a known static value.
8867 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
8869 * exp_attr.adb, sem_attr.ads: Minor reformatting.
8871 2017-01-06 Justin Squirek <squirek@adacore.com>
8873 * exp_attr.adb (Expand_N_Attribute_Reference): Add entry for
8874 expansion of Finalization_Size attribute.
8875 * sem_attr.adb (Analyze_Attribute): Add entry to check the
8876 semantics of Finalization_Size.
8877 (Eval_Attribute): Add null entry for Finalization_Size.
8878 * sem_attr.ads: Add Finalization_Size to the implementation
8879 dependent attribute list.
8880 * snames.ads-tmpl: Add name entry for Finalization_Size attribute.
8882 2017-01-06 Ed Schonberg <schonberg@adacore.com>
8884 * sem_ch5.adb (Analyze_Loop_Statement): If the loop includes an
8885 iterator specification with a serious syntactic error, transform
8886 construct into an infinite loop in order to continue analysis
8887 and prevent a compiler abort.
8889 2017-01-06 Tristan Gingold <gingold@adacore.com>
8891 * exp_ch9.adb (Expand_N_Protected_Type_Declaration): Do not generate
8892 max_queue_lengths_array if unused.
8894 2017-01-06 Bob Duff <duff@adacore.com>
8896 * errout.adb (Set_Msg_Text): Protect against out-of-bounds
8897 array access, in case "\" is at the end of Text.
8898 * stylesw.adb (Set_Style_Check_Options): Don't include input
8899 characters in the error message template, because they could
8900 be control characters such as "\", which Errout will try to
8903 2017-01-06 Ed Schonberg <schonberg@adacore.com>
8905 * sem_ch4.adb (Find_Indexing_Operations, Inspect_Declarations):
8906 For a private type examine the visible declarations that follow
8907 the partial view, not just the private declarations that follow
8910 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
8912 * exp_ch5.adb, sem_ch3.adb, checks.adb: Minor reformatting and
8915 2017-01-06 Ed Schonberg <schonberg@adacore.com>
8917 * exp_ch5.adb (Get_Default_Iterator): For a derived type, the
8918 alias of the inherited op is the parent iterator, no need to
8919 examine dispatch table positions which might not be established
8920 yet if type is not frozen.
8921 * sem_disp.adb (Check_Controlling_Formals): The formal of a
8922 predicate function may be a subtype of a tagged type.
8923 * sem_ch3.adb (Complete_Private_Subtype): Adjust inheritance
8924 of representation items for the completion of a type extension
8925 where a predicate applies to the partial view.
8926 * checks.ads, checks.adb (Apply_Predicate_Check): Add optional
8927 parameter that designates function whose actual receives a
8928 predicate check, to improve warning message when the check will
8929 lead to infinite recursion.
8930 * sem_res.adb (Resolve_Actuals): Pass additional parameter to
8931 Apply_Predicate_Check.
8933 2017-01-06 Tristan Gingold <gingold@adacore.com>
8935 * s-rident.ads (Profile_Info): Remove No_Entry_Queue from
8936 Gnat_Extended_Ravenscar.
8937 * exp_ch9.adb, s-tpoben.adb, s-tpoben.ads: Fix spelling.
8939 2017-01-06 Gary Dismukes <dismukes@adacore.com>
8941 * sem_util.ads: Minor typo fix and reformatting.
8943 2017-01-06 Yannick Moy <moy@adacore.com>
8945 * ghost.adb Minor fixing of references to SPARK RM.
8946 (Check_Ghost_Context): Check whether reference is to a lvalue
8947 before issuing an error about violation of SPARK RM 6.9(13)
8948 when declaration has Ghost policy Check and reference has Ghost
8950 * sem_util.adb Minor indentation.
8951 * sem_ch10.adb (Analyze_Package_Body_Stub, Analyze_Protected_Body_Stub,
8952 Analyze_Task_Body_Stub): Set Ekind of the defining identifier.
8953 * sem_util.ads (Unique_Defining_Entity): Document the result
8954 for package body stubs.
8956 2017-01-06 Tristan Gingold <gingold@adacore.com>
8958 * raise-gcc.c (abort): Macro to call Abort_Propagation.
8959 * s-tpoben.ads (Protected_Entry_Queue_Max_Access): Make it access
8961 * exp_ch9.adb (Expand_N_Protected_Type_Declaration):
8962 Do not generate the Entry_Max_Queue_Lengths_Array if all default
8964 * exp_util.adb (Corresponding_Runtime_Package): Consider
8965 Max_Queue_Length pragma.
8967 2017-01-06 Justin Squirek <squirek@adacore.com>
8969 * exp_ch9.adb (Expand_N_Protected_Type_Declaration):
8970 Remove declaration generation in the case of
8971 System_Tasking_Protected_Objects_Single_Entry being used,
8972 and add a warning message when this is detected to occur.
8973 (Make_Initialize_Protection): Remove reference pass in the case
8974 of System_Tasking_Protected_Objects_Single_Entry.
8975 * rtsfind.ads: Remove RE_Protected_Entry_Queue_Max
8976 * s-tposen.adb (Initialize_Protection_Entry): Remove
8977 Entry_Queue_Max parameter.
8978 * s-tposen.ads: Remove the types use to store the entry queue
8980 * sem_prag.adb (Analyze_Pragma): Remove entry families restriction
8982 2017-01-06 Yannick Moy <moy@adacore.com>
8984 * sem_util.adb, sem_util.ads (Get_Enum_Lit_From_Pos): Strengthen
8985 behavior of function, to also accept out of range positions
8986 and raise Constraint_Error in such case, and to copy sloc from
8987 literal if No_Location passed as location.
8988 * uintp.adb, uintp.ads (UI_To_Int, UI_To_CC): Strengthen behavior
8989 of functions to raise Constraint_Error in case of value not in
8992 2017-01-06 Tristan Gingold <gingold@adacore.com>
8994 * sem_util.adb, s-taprop-linux.adb (Finalize_TCB): Remove call to
8995 Invalidate_Stack_Cache.
8997 2017-01-06 Eric Botcazou <ebotcazou@adacore.com>
8999 * s-os_lib.adb: Minor fix to the signature of Readlink.
9001 2017-01-06 Javier Miranda <miranda@adacore.com>
9003 * sem_ch6.adb (Conforming_Types): Handle another
9004 confusion between views in a nested instance with an actual
9005 private type whose full view is not in scope.
9007 2017-01-06 Arnaud Charlet <charlet@adacore.com>
9009 * exp_ch5.adb (Expand_N_If_Statement): Obey existing comment and
9010 mark a rewritten if statement as explicit (Comes_From_Source).
9012 2017-01-06 Gary Dismukes <dismukes@adacore.com>
9014 * sem_prag.adb, rtsfind.adb, sem_util.adb: Minor typo fixes.
9016 2017-01-06 Tristan Gingold <gingold@adacore.com>
9018 * ada.ads, a-unccon.ads: Add pragma No_Elaboration_Code_All.
9020 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
9022 * sem_case.adb: Minor reformatting.
9024 2017-01-06 Thomas Quinot <quinot@adacore.com>
9026 * g-socthi-mingw.adb: Remove now extraneous USE TYPE clause
9028 2017-01-06 Justin Squirek <squirek@adacore.com>
9030 * aspects.adb: Register aspect in Canonical_Aspect.
9031 * aspects.ads: Associate qualities of Aspect_Max_Queue_Length
9032 into respective tables.
9033 * einfo.ads, einfo.adb: Add a new attribute for
9034 handling the parameters for Pragma_Max_Entry_Queue
9035 (Entry_Max_Queue_Lengths_Array) in E_Protected_Type. Subprograms
9036 for accessing and setting were added as well.
9037 * par-prag.adb (Prag): Register Pramga_Max_Entry_Queue.
9038 * exp_ch9.adb (Expand_N_Protected_Type_Declaration): Emit
9039 declaration for pramga arguments and store them in the protected
9041 (Make_Initialize_Protection): Pass a reference to
9042 the Entry_Max_Queue_Lengths_Array in the protected type node to
9044 * rtsfind.adb: Minor grammar fix.
9045 * rtsfind.ads: Register new types taken from the
9046 runtime libraries RE_Protected_Entry_Queue_Max and
9047 RE_Protected_Entry_Queue_Max_Array
9048 * s-tposen.adb, s-tpoben.adb
9049 (Initialize_Protection_Entry/Initialize_Protection_Entries):
9050 Add extra parameter and add assignment to local object.
9051 * s-tposen.ads, s-tpoben.ads: Add new types to
9052 store entry queue maximums and a field to the entry object record.
9053 * sem_ch13.adb (Analyze_Aspect_Specifications): Add case statement
9054 for Aspect_Max_Queue_Length.
9055 (Check_Aspect_At_Freeze_Point):
9056 Add aspect to list of aspects that don't require delayed analysis.
9057 * sem_prag.adb (Analyze_Pragma): Add case statement for
9058 Pragma_Max_Queue_Length, check semantics, and register arugments
9059 in the respective entry nodes.
9060 * sem_util.adb, sem_util.ads Add functions Get_Max_Queue_Length
9061 and Has_Max_Queue_Length
9062 * snames.ads-tmpl: Add constant for the new aspect-name
9063 Name_Max_Queue_Length and corrasponding pragma.
9065 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
9067 * exp_util.adb (Is_Controlled_Function_Call):
9068 Reimplemented. Consider any node which has an entity as the
9069 function call may appear in various ways.
9071 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
9073 * exp_attr.adb (Rewrite_Stream_Proc_Call): Use
9074 an unchecked type conversion when performing a view conversion
9075 to/from a private type. In all other cases use a regular type
9076 conversion to ensure that any relevant checks are properly
9079 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
9081 * sem_prag.adb, sem_ch8.adb: Minor reformatting.
9083 2017-01-06 Ed Schonberg <schonberg@adacore.com>
9085 * sem_case.adb (Explain_Non_Static_Bound): Suppress cascaded
9086 error on case expression that is an entity, when coverage is
9087 incomplete and entity has a static value obtained by local
9089 (Handle_Static_Predicate): New procedure, subsidiary of
9090 Check_Choices, to handle case alternatives that are either
9091 subtype names or subtype indications involving subtypes that
9092 have static predicates.
9094 2017-01-06 Thomas Quinot <quinot@adacore.com>
9096 * s-oscons-tmplt.c, g-socket.adb, g-socket.ads, g-sothco.ads:
9097 (GNAT.Socket): Add support for Busy_Polling and Generic_Option
9099 2017-01-06 Bob Duff <duff@adacore.com>
9101 * sem_elab.adb (Activate_Elaborate_All_Desirable): Don't add
9102 Elaborate_All(P) to P itself. That could happen in obscure cases,
9103 and always introduced a cycle (P body must be elaborated before
9105 * lib-writ.ads: Comment clarification.
9106 * ali-util.ads: Minor comment fix.
9107 * ali.adb: Minor reformatting.
9109 2017-01-06 Tristan Gingold <gingold@adacore.com>
9111 * a-exexpr-gcc.adb: Improve comment.
9113 2017-01-03 James Cowgill <James.Cowgill@imgtec.com>
9115 * s-linux-mips.ads: Use correct signal and errno constants.
9116 (sa_handler_pos, sa_mask_pos): Fix offsets for 64-bit MIPS.
9118 2017-01-03 James Cowgill <James.Cowgill@imgtec.com>
9120 * s-linux-mips.ads: Rename from s-linux-mipsel.ads.
9121 * gcc-interface/Makefile.in (MIPS/Linux): Merge mips and mipsel
9124 2017-01-01 Eric Botcazou <ebotcazou@adacore.com>
9126 * gnatvsn.ads: Bump copyright year.
9128 2017-01-01 Jakub Jelinek <jakub@redhat.com>
9130 * gnat_ugn.texi: Bump @copying's copyright year.
9131 * gnat_rm.texi: Likewise.
9133 Copyright (C) 2017 Free Software Foundation, Inc.
9135 Copying and distribution of this file, with or without modification,
9136 are permitted in any medium without royalty provided the copyright
9137 notice and this notice are preserved.