OSDN Git Service

* gcc-interface/Makefile.in: Remove outdated comment and reference to
[pf3gnuchains/gcc-fork.git] / gcc / ada / ChangeLog
1 2012-10-22  Eric Botcazou  <ebotcazou@adacore.com>
2
3         * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Array_Type>: Force
4         BLKmode on the type if it is passed by reference.
5         <E_Array_Subtype>: Likewise.
6         <E_Record_Type>: Guard the call to Is_By_Reference_Type predicate.
7         <E_Record_Subtype>: Likewise.
8
9         * gcc-interface/Makefile.in: Remove outdated comment and reference to
10         non-existing file.
11
12 2012-10-22  Eric Botcazou  <ebotcazou@adacore.com>
13
14         * gcc-interface/trans.c (Loop_Statement_to_gnu): Use gnat_type_for_size
15         directly to obtain an unsigned version of the base type.
16
17 2012-10-22  Eric Botcazou  <ebotcazou@adacore.com>
18
19         * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Out_Parameter>: Do not
20         generate the special PARM_DECL for an Out parameter in LTO mode.
21
22 2012-10-02  Eric Botcazou  <ebotcazou@adacore.com>
23
24         * gcc-interfaces/decl.c (elaborate_expression_1): Use the variable for
25         bounds of loop iteraration scheme only for locally defined subtypes.
26
27         * gcc-interface/trans.c (build_return_expr): Apply the NRV optimization
28         only for BLKmode.
29
30 2012-09-20  Release Manager
31
32         * GCC 4.7.2 released.
33
34 2012-09-07  Eric Botcazou  <ebotcazou@adacore.com>
35
36         * gcc-interface/trans.c (Loop_Statement_to_gnu): Revert to using
37         size_type_node instead of sizetype.
38
39 2012-07-19  Eric Botcazou  <ebotcazou@adacore.com>
40
41         * gcc-interface/decl.c (gnat_to_gnu_entity) <object>: Try to ensure
42         that an object of CW type initialized to a value is sufficiently
43         aligned for this value.
44
45 2012-07-19  Eric Botcazou  <ebotcazou@adacore.com>
46
47         * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Record_Subtype>: Do not
48         look up the REP part of the base type in advance.  Deal with that of
49         the variant types.
50         (get_rep_part): Be prepared for record types with fields.
51
52 2012-07-03  Eric Botcazou  <ebotcazou@adacore.com>
53
54         * gcc-interface/trans.c (Call_to_gnu): Robustify test for function case
55         if the CICO mechanism is used.
56
57 2012-07-03  Eric Botcazou  <ebotcazou@adacore.com>
58
59         * gcc-interface/utils2.c (build_simple_component_ref): Do not look
60         through an extension if the type contains a placeholder.
61
62 2012-07-03  Eric Botcazou  <ebotcazou@adacore.com>
63
64         * exp_disp.adb (Expand_Dispatching_Call): Propagate the convention on
65         the designated subprogram type and also set Is_Dispatch_Table_Entity.
66         (Expand_Interface_Thunk): Propagate the convention on the thunk.
67         (Set_CPP_Constructors_Old): Set Is_Constructor and Convention_CPP on
68         the internal view of the constructors.
69         (Set_CPP_Constructors): Likewise.
70         * sem_prag.adb (Analyze_Pragma) <Pragma_CPP_Constructor>: Set the
71         convention on the function.
72         * gcc-interface/gigi.h (is_cplusplus_method): Declare.
73         * gcc-interface/decl.c (Has_Thiscall_Convention): New macro.
74         (gnat_to_gnu_entity) <E_Subprogram_Type>: Test it to set the `thiscall'
75         calling convention
76         (get_minimal_subprog_decl): Likewise.
77         (is_cplusplus_method): New predicate.
78         * gcc-interface/trans.c (Attribute_to_gnu) <Attr_Access>: Issue an
79         error on access to C++ constructor or member function.
80
81 2012-07-03  Eric Botcazou  <ebotcazou@adacore.com>
82
83         * gcc-interface/utils.c (gnat_pushdecl): Set TYPE_CONTEXT for types
84         attached to a TYPE_DECL.
85
86 2012-06-15  Eric Botcazou  <ebotcazou@adacore.com>
87
88         PR ada/53592
89         * gcc-interface/gigi.h (maybe_vector_array): Make static inline.
90         * gcc-interface/utils.c (maybe_vector_array): Delete.
91         * gcc-interface/trans.c (gnat_to_gnu) <N_Indexed_Component>: Mark the
92         array object as addressable if it has vector type and is on the LHS.
93
94 2012-06-14  Jakub Jelinek  <jakub@redhat.com>
95
96         * gcc-interface/Makefile.in (gnatlib-shared-default): Append
97         $(PICFLAG_FOR_TARGET) to GNATLIBCFLAGS_FOR_C passed to submake.
98
99 2012-06-14  Release Manager
100
101         * GCC 4.7.1 released.
102
103 2012-06-13  Eric Botcazou  <ebotcazou@adacore.com>
104
105         Revert
106         2012-05-19  Eric Botcazou  <ebotcazou@adacore.com>
107
108         * gcc-interface/decl.c (Has_Thiscall_Convention): New macro.
109         (gnat_to_gnu_entity) <E_Subprogram_Type>: Test it to set the thiscall
110         calling convention
111         (get_minimal_subprog_decl): Likewise.
112         (gnat_first_param_is_class): New predicate.
113
114 2012-06-12  Olivier Hainque  <hainque@adacore.com>
115
116         * gcc-interface/Makefile.in (GNATLIBCFLAGS_FOR_C): Remove
117         $(PIC_FLAG_FOR_TARGET).
118         (gnatlib-shared-default): Add $(PIC_FLAG_FOR_TARGET) to
119         GNATLIBCFLAGS_FOR_C passed to gnatlib.
120         (gnatlib-shared-win32): Likewise.
121         (gnatlib-shared-darwin): Likewise.
122         (gnatlib-shared-dual-win32): Pass PIC_FLAG_FOR_TARGET to
123         gnatlib-shared-win32.
124
125 2012-05-26  Eric Botcazou  <ebotcazou@adacore.com>
126
127         * gcc-interface/decl.c (variant_desc): Rename 'record' to 'new_type'.
128         (build_variant_list): Adjust to above renaming.
129         (gnat_to_gnu_entity) <E_Record_Subtype>: Likewise.  Give a unique name
130         to the type of the variant containers.
131         (create_variant_part_from): Likewise.  Give a unique name to the type
132         of the variant part.
133
134 2012-05-25  Eric Botcazou  <ebotcazou@adacore.com>
135
136         PR ada/52362
137         * link.c (__gnat_object_file_option): Set to "-Wl,@" for GNU linker.
138         (__gnat_using_gnu_linker): Delete.
139         * gnatlink.adb (Gnatlink): Declare Object_File_Option_Ptr here...
140         Declare Object_File_Option string constant and Using_GNU_response_file
141         boolean constant.
142         (Process_Binder_File): ...instead of here.  Delete Using_GNU_Linker,
143         Opening and Closing local variables.  Do not handle the GNU linker
144         specially.
145         (Write_RF): New procedure to write into the response file.  Escape some
146         characters if a GNU response file is used.  Keep track of error status.
147         Invoke Write_RF to write into the response file.  Delete the file only
148         if the link was successful.
149         * mlib-utl.adb: Do not `with' package System.
150         (Gcc): Likewise.  Declare Object_File_Option string constant and
151         Using_GNU_response_file boolean constant.
152         (Write_RF): Take a string instead of address and length.  Escape some
153         characters if a GNU response file is used.
154         Invoke Write_RF to write into the response file.  Delete the file only
155         if the link was successful.  Do not warn if it cannot be deleted.
156
157 2012-05-20  Eric Botcazou  <ebotcazou@adacore.com>
158
159         * gcc-interface/utils.c (gnat_write_global_declarations): Put a name
160         on the dummy global variable.
161
162 2012-05-19  Eric Botcazou  <ebotcazou@adacore.com>
163
164         * gcc-interface/decl.c (Has_Thiscall_Convention): New macro.
165         (gnat_to_gnu_entity) <E_Subprogram_Type>: Test it to set the thiscall
166         calling convention
167         (get_minimal_subprog_decl): Likewise.
168         (gnat_first_param_is_class): New predicate.
169
170         Backport from mainline
171         2012-05-15  Javier Miranda  <miranda@adacore.com>
172
173         * exp_ch3.adb (Build_Offset_To_Top): Modify the
174         expansion of the offset_to_top functions to ensure that their
175         profile is conformant with the profile specified in Ada.Tags. No
176         change in functionality.
177
178 2012-05-18  Eric Botcazou  <ebotcazou@adacore.com>
179
180         * gcc-interface/decl.c (gnat_to_gnu_entity) <object>: For an object at
181         global level with unconstrained nominal subtype and a non-fixed size,
182         make a variable for the size.
183
184 2012-05-15  Andris Pavenis  <andris.pavenis@iki.fi>
185
186         PR ada/52494
187         * s-taprop-dummy.adb (Specific): New package.
188
189 2012-05-15  Eric Botcazou  <ebotcazou@adacore.com>
190
191         * sem_prag.adb (Process_Atomic_Shared_Volatile): Propagate
192         atomicity from an object to its underlying type only if it
193         is composite.
194
195 2012-05-06  Pascal Obry  <obry@adacore.com>
196
197         Revert
198         2012-02-24  Dave Korn  <dave.korn.cygwin@gmail.com>
199
200         * gcc-interface/Makefile.in (WIN_SO_PREFIX [windows targets]): New
201         Windows-specific make variable.
202         (WIN_SO_INSTALL_DIR [windows targets]): Likewise.
203         (install-gnatlib): Respect the above during installation when set,
204         and also install any windows import library that has been built.
205         (gnatlib-shared-win32): Use WIN_SO_PREFIX to name output DLL and also
206         build a corresponding import library.
207
208 2012-04-30  Eric Botcazou  <ebotcazou@adacore.com>
209
210         * gcc-interface/utils.c (finish_record_type): Force the traditional GCC
211         layout for bitfields on the type if it is packed or has a representation
212         clause and an alternate layout is available.
213
214 2012-04-09  Mike Stump  <mikestump@comcast.net>
215
216         * a-assert.ads: Remove execute permission.
217         * a-chacon.ads: Likewise.
218         * a-coteio.ads: Likewise.
219         * a-envvar.ads: Likewise.
220         * a-exetim-mingw.ads: Likewise.
221         * a-fzteio.ads: Likewise.
222         * a-izteio.ads: Likewise.
223         * a-lcteio.ads: Likewise.
224         * a-llctio.ads: Likewise.
225         * a-scteio.ads: Likewise.
226         * a-suenco.ads: Likewise.
227         * a-suenst.ads: Likewise.
228         * a-suewst.ads: Likewise.
229         * a-suezst.ads: Likewise.
230         * a-tirsfi.ads: Likewise.
231         * a-wichha.ads: Likewise.
232         * a-zchara.ads: Likewise.
233         * a-zchhan.ads: Likewise.
234         * a-zchuni.ads: Likewise.
235         * a-zrstfi.ads: Likewise.
236         * aspects.ads: Likewise.
237         * g-byorma.ads: Likewise.
238         * g-decstr.ads: Likewise.
239         * g-encstr.ads: Likewise.
240         * g-spchge.ads: Likewise.
241         * g-u3spch.ads: Likewise.
242         * g-wispch.ads: Likewise.
243         * g-zspche.ads: Likewise.
244         * namet-sp.ads: Likewise.
245         * s-os_lib.ads: Likewise.
246         * s-regexp.ads: Likewise.
247         * s-regpat.ads: Likewise.
248         * s-string.ads: Likewise.
249         * s-tasloc.ads: Likewise.
250         * s-utf_32.ads: Likewise.
251         * sem_aux.ads: Likewise.
252         * a-assert.adb: Likewise.
253         * a-chacon.adb: Likewise.
254         * a-envvar.adb: Likewise.
255         * a-exetim-mingw.adb: Likewise.
256         * a-suenco.adb: Likewise.
257         * a-suenst.adb: Likewise.
258         * a-suewst.adb: Likewise.
259         * a-suezst.adb: Likewise.
260         * a-tirsfi.adb: Likewise.
261         * a-wichha.adb: Likewise.
262         * a-zchhan.adb: Likewise.
263         * a-zchuni.adb: Likewise.
264         * a-zrstfi.adb: Likewise.
265         * aspects.adb: Likewise.
266         * g-byorma.adb: Likewise.
267         * g-decstr.adb: Likewise.
268         * g-encstr.adb: Likewise.
269         * g-spchge.adb: Likewise.
270         * g-u3spch.adb: Likewise.
271         * g-wispch.adb: Likewise.
272         * g-zspche.adb: Likewise.
273         * namet-sp.adb: Likewise.
274         * s-except.adb: Likewise.
275         * s-inmaop-vxworks.adb: Likewise.
276         * s-os_lib.adb: Likewise.
277         * s-regexp.adb: Likewise.
278         * s-regpat.adb: Likewise.
279         * s-string.adb: Likewise.
280         * s-tasloc.adb: Likewise.
281         * s-utf_32.adb: Likewise.
282         * s-wchcon.adb: Likewise.
283         * sem_aux.adb: Likewise.
284
285 2012-03-22  Release Manager
286
287         * GCC 4.7.0 released.
288
289 2012-02-29  Eric Botcazou  <ebotcazou@adacore.com>
290
291         * gcc-interface/decl.c (components_to_record): Add ARTIFICIAL parameter
292         and set TYPE_ARTIFICIAL according to it.  Adjust recursive call.
293         (gnat_to_gnu_entity) <E_Record_Type>: Adjust call to above function.
294         * gcc-interface/utils.c (rest_of_record_type_compilation): Do not
295         invoke rest_of_type_decl_compilation on the parallel type, if any.
296
297 2012-02-29  Eric Botcazou  <ebotcazou@adacore.com>
298
299         * gcc-interface/utils.c (gnat_write_global_declarations): Make sure the
300         dummy global built for global types is preserved.
301
302 2012-02-27  Tristan Gingold  <gingold@adacore.com>
303
304         * gcc-interface/decl.c (gnat_to_gnu_entity) [E_String_Type,
305         E_Array_Type]: Reuse dummy fat type for gnu_ptr_template and
306         gnu_template_type.
307
308 2012-02-27  Eric Botcazou  <ebotcazou@adacore.com>
309
310         * gcc-interface/ada-tree.h (TYPE_PACKED_ARRAY_TYPE_P): Add checking.
311         (TYPE_BY_REFERENCE_P): New flag.
312         (TYPE_IS_BY_REFERENCE_P): New macro.
313         (TYPE_DUMMY_P): Add checking and remove VOID_TYPE.
314         (TYPE_IS_DUMMY_P): Adjust for above change.
315         * gcc-interface/decl.c (gnat_to_gnu_entity): Use TYPE_BY_REFERENCE_P
316         and TYPE_IS_BY_REFERENCE_P instead of TREE_ADDRESSABLE.
317         (gnat_to_gnu_param): Likewise.
318         (maybe_pad_type): Likewise.
319         (make_type_from_size): Use TYPE_IS_PACKED_ARRAY_TYPE_P.
320         * gcc-interface/misc.c (must_pass_by_ref): Use TYPE_IS_BY_REFERENCE_P
321         instead of TREE_ADDRESSABLE.
322         * gcc-interface/trans.c (finalize_nrv): Likewise.
323         (call_to_gnu): Likewise.  Do not create a temporary for return values
324         with by-reference type here.
325         (gnat_to_gnu): Test TYPE_IS_DUMMY_P instead of TYPE_DUMMY_P.
326         (gnat_gimplify_expr) <ADDR_EXPR>: Don't do anything for non-constant
327         CONSTRUCTORs and calls.
328         * gcc-interface/utils.c (make_dummy_type): Get the equivalent type of
329         the underlying type and use it throughout.  Use TYPE_IS_BY_REFERENCE_P
330         instead of TREE_ADDRESSABLE.
331         * gcc-interface/utils2.c (build_cond_expr): Deal with by-reference
332         types explicitly.
333
334 2012-02-27  Eric Botcazou  <ebotcazou@adacore.com>
335
336         * gcc-interface/decl.c (gnat_to_gnu_entity) <object>: Revert previous
337         change that creates a special VAR_DECL for debugging purposes.  For an
338         aliased object with an unconstrained nominal subtype, make its type a
339         thin reference to the underlying object.
340         * gcc-interface/utils2.c (build_unary_op) <INDIRECT_REF>: Deal with
341         expressions built for the initialization of above objects.
342
343 2012-02-24  Dave Korn  <dave.korn.cygwin@gmail.com>
344
345         * gcc-interface/Makefile.in (WIN_SO_PREFIX [windows targets]): New
346         Windows-specific make variable.
347         (WIN_SO_INSTALL_DIR [windows targets]): Likewise.
348         (install-gnatlib): Respect the above during installation when set,
349         and also install any windows import library that has been built.
350         (gnatlib-shared-win32): Use WIN_SO_PREFIX to name output DLL and also
351         build a corresponding import library.
352
353 2012-02-22  Robert Dewar  <dewar@adacore.com>
354
355         * exp_util.adb, make.adb, sem_dim.adb, sem_ch4.adb, exp_disp.adb: Minor
356         reformatting.
357
358 2012-02-22  Geert Bosch  <bosch@adacore.com>
359
360         * g-bytswa-x86.adb, g-bytswa.adb, gcc-interface/Makefile.in: Remove
361         x86-specific version of byteswap and use GCC builtins instead.
362
363 2012-02-22  Tristan Gingold  <gingold@adacore.com>
364
365         * gcc-interface/decl.c (gnat_to_gnu_entity) [E_String_Type,
366         E_Array_Type]: Translate component ealier.
367
368 2012-02-22  Robert Dewar  <dewar@adacore.com>
369
370         * par-ch3.adb (P_Signed_Integer_Type_Definition): Specialize
371         error message for 'Range.
372
373 2012-02-22  Pascal Obry  <obry@adacore.com>
374
375         * s-taprop-mingw.adb (Finalize_TCB): Do not wait on thread handle as
376         this is our own thread.
377
378 2012-02-22  Sergey Rybin  <rybin@adacore.com frybin>
379
380         * tree_io.ads: Update ASIS_Version_Number because of the changes
381         in Snames.
382
383 2012-02-22  Hristian Kirtchev  <kirtchev@adacore.com>
384
385         * exp_ch7.adb (Create_Finalizer): Suppress elaboration checks on 
386         stack-related finalizers.
387
388 2012-02-22  Ed Schonberg  <schonberg@adacore.com>
389
390         * sem_ch6.adb (Analyze_Expression_Function): If the construct
391         is a completion, indicate that its formals are the formals of
392         a completion, and as such do not get a cross- reference entry.
393         (Analyze_Subprogram_Specification): Do not generate a definition
394         for the entity of an expression function, because it may be a
395         completion. Definition will be generated if needed when analyzing
396         the generated subprogram declaration.
397
398 2012-02-22  Vincent Celier  <celier@adacore.com>
399
400         * make.adb (Check): When checking if an object file is in the
401         correct object directory, get the unit name from a previous call
402         to Check_Source_Info_In_ALI.
403         * makeutl.adb (Check_Source_Info_In_ALI): Return the name of
404         the unit when everything is OK, otherwise return No_Name.
405         * makeutl.ads (Check_Source_Info_In_ALI): Return Name_Id instead
406         of Boolean
407
408 2012-02-22  Ed Schonberg  <schonberg@adacore.com>
409
410         * sem_ch4.adb (Find_Equality_Types, Try_One_Interp): In an
411         instance, the operator is visible if an operand is of some
412         numeric type which is not in use or directly visible, and the
413         other operand is a numeric literal.
414
415 2012-02-22  Tristan Gingold  <gingold@adacore.com>
416
417         * init.c: Minor code clean up.
418         * gcc-interface/Make-lang.in: Update dependencies.
419
420 2012-02-22  Arnaud Charlet  <charlet@adacore.com>
421
422         * gnatlink.adb (Gnatlink): Use -gnatcC in CodePeer_Node,
423         otherwise GCC will generate an object file.
424
425 2012-02-22  Vincent Celier  <celier@adacore.com>
426
427         * projects.texi: Correct typo related to "**" in Source_Dirs.
428
429 2012-02-22  Steve Baird  <baird@adacore.com>
430
431         * sem_prag.adb (Analyze_PPC_In_Decl_Part): Clean up generation of
432         error message text.
433
434 2012-02-22  Vincent Pucci  <pucci@adacore.com>
435
436         * rtsfind.adb (Get_Unit_Name): Ada_Numerics_Child and
437         System_Dim_Child cases added.
438         * rtsfind.ads: Ada_Numerics,
439         Ada_Numerics_Generic_Elementary_Functions, System_Dim,
440         System_Dim_Float_IO and System_Dim_Integer_IO added to the list
441         of RTU_Id.  Ada_Numerics_Child and System_Dim_Child added as
442         new RTU_Id subtypes.
443         * sem_dim.adb (Is_Dim_IO_Package_Entity): Use of
444         Rtsfind to verify the package entity is located either
445         in System.Dim.Integer_IO or in System.Dim.Float_IO.
446         (Is_Dim_IO_Package_Instantiation): Minor
447         changes.  (Is_Elementary_Function_Call): Removed.
448         (Is_Elementary_Function_Entity): New routine.
449         (Is_Procedure_Put_Call): Is_Dim_IO_Package_Entity call added.
450         * snames.ads-tmpl: Name_Dim and Name_Generic_Elementary_Functions
451         removed.
452
453 2012-02-22  Vincent Pucci  <pucci@adacore.com>
454
455         * sem_prag.adb: Minor reformatting.
456
457 2012-02-22  Ed Schonberg  <schonberg@adacore.com>
458
459         * sem_ch3.adb (Find_Type_Name): When analyzing a private type
460         declaration that is the completion of a tagged incomplete type, do
461         not associate the class-wide type already created with the private
462         type to prevent order-of-elaboration issues in the back-end.
463         * exp_disp.adb (Find_Specific_Type): Find specific type of
464         a class-wide type, and handle the case of an incomplete type
465         coming  either from a limited_with clause or from an incomplete
466         type declaration. Used when expanding a dispatchin call and
467         generating tag checks (minor refactoring).
468
469 2012-02-22  Robert Dewar  <dewar@adacore.com>
470
471         * exp_ch5.adb: Add comment.
472         * sem_ch12.adb, exp_ch6.adb: minor reformatting
473
474 2012-02-22  Ed Schonberg  <schonberg@adacore.com>
475
476         * freeze.adb (Freeze_Entity): Do not perform type layout within
477         a generic unit.
478
479 2012-02-22  Eric Botcazou  <ebotcazou@adacore.com>
480
481         * init.c (__gnat_error_handler) [Linux]: Map SIGBUS to
482         Storage_Error.
483
484 2012-02-22  Ed Schonberg  <schonberg@adacore.com>
485
486         * exp_ch5.adb (Expand_N_Assignment_Statement): Reject an
487         assignment to a classwide type whose type is limited, as
488         can happen in an instantiation in programs that run afoul or
489         AI05-0087.
490
491
492 2012-02-17  Ed Schonberg  <schonberg@adacore.com>
493
494         * exp_ch6.adb (Legal_Copy): If layout is not
495         determined in the front-end, do not emit error message when
496         by-reference actual is potentially unaligned.
497         * gcc-interface/decl.c (gnat_to_gnu_field): Better error message for
498         illegal representation clause on tagged or aliased component, or on
499         by-reference type with forced alignment.
500
501 2012-02-17  Nicolas Roche  <roche@adacore.com>
502
503         * gcc-interface/Makefile.in: Ensure FORCE_DEBUG_ADAFLAGS variables is
504         propagated by gnatlib-sjlj and gnatlib-zcx targets.
505         * gcc-interface/Make-lang.in: Update dependencies.
506
507 2012-02-17  Thomas Quinot  <quinot@adacore.com>
508
509         * sem_ch12.adb (Analyze_Package_Instantiation): For an
510         instantiation in an RCI library unit, omit the instance body
511         if the RCI library unit is the instance itself (E.2.3(18)),
512         but include the body if the instantiation is within the RCI
513         declaration (12.3(12)).
514
515 2012-02-17  Steve Baird  <baird@adacore.com>
516
517         * sem_prag.adb (Analyze_PPC_In_Decl_Part): Pre'Class and
518         Post'Class aspects can only be specified for a primitive operation
519         of a tagged type.
520
521 2012-02-17  Yannick Moy  <moy@adacore.com>
522
523         * gnat_rm.texi: Minor shuffling.
524
525 2012-02-17  Ed Schonberg  <schonberg@adacore.com>
526
527         * aspects.adb: Expression functions can carry pre/postconditions.
528         * par-ch6.adb (P_Subprogram): look for optional pre/postconditions
529         in an expression function.
530         * sem_prag (Check_Precondition_Postcondition): legal on expression
531         functions.
532
533 2012-02-17  Vincent Pucci  <pucci@adacore.com>
534
535         * a-cdlili.adb, a-cidlli.adb, a-cihama.adb, a-cimutr.adb,
536         * a-ciorma.adb, a-cohama.adb, a-coinve.adb, a-comutr.adb,
537         * a-convec.adb, a-coorma.adb (Adjust): New routine.
538         (Constant_Reference): Increment Busy and Lock counters.
539         (Reference): Increase Busy and Lock counters.
540         (Finalize): New routine.
541         * a-cihase.adb, a-ciorse.adb, a-cohase.adb, a-coorse.adb:
542         (Adjust): New routine.  (Constant_Reference): Increment Busy
543         and Lock counters.
544         (Finalize): New routine.
545         * a-cdlili.ads, a-cidlli.ads, a-cihama.ads, a-cihase.ads,
546         * a-cimutr.ads, a-ciorma.ads, a-ciorse.ads, a-cohama.ads,
547         * a-cohase.ads, a-coinve.ads, a-comutr.ads, a-convec.ads,
548         * a-coorma.ads, a-coorse: Controlled component added to the
549         reference types.
550
551 2012-02-17  Robert Dewar  <dewar@adacore.com>
552
553         * restrict.adb (Check_Restriction): Add special handling for
554         No_Obsolescent_Features.
555
556 2012-02-17  Hristian Kirtchev  <kirtchev@adacore.com>
557
558         * exp_util.adb (Find_Finalize_Address): When dealing with an
559         internally built full view for a type with unknown discriminants,
560         use the original record type.
561
562 2012-02-17  Robert Dewar  <dewar@adacore.com>
563
564         * sem_dim.adb: Minor reformatting.
565
566 2012-02-17  Yannick Moy  <moy@adacore.com>
567
568         * gnat_rm.texi: Minor rewording.
569
570 2012-02-17  Thomas Quinot  <quinot@adacore.com>
571
572         * sem_aggr.adb: Minor reformatting.
573
574 2012-02-17  Robert Dewar  <dewar@adacore.com>
575
576         * gnat_ugn.texi: Update doc for -gnatw.m to include 2*x case.
577
578 2012-02-17  Vincent Pucci  <pucci@adacore.com>
579
580         * sem_dim.adb (Is_Dim_IO_Package_Entity): New routine.
581         (Is_Dim_IO_Package_Instantiation): Is_Dim_IO_Package_Entity
582         call added.
583         (Is_Procedure_Put_Call): Is_Dim_IO_Package_Entity
584         call added.
585         * s-dim.ads: Make package Pure.
586
587 2012-02-17  Gary Dismukes  <dismukes@adacore.com>
588
589         * prj-nmsc.adb: Minor reformatting.
590
591 2012-02-17  Yannick Moy  <moy@adacore.com>
592
593         * gnat_rm.texi: Update GNAT RM with a separate chapter on restrictions.
594
595 2012-02-17  Yannick Moy  <moy@adacore.com>
596
597         * gnat_ugn.texi: Fix typos.
598
599 2012-02-17  Pascal Obry  <obry@adacore.com>
600
601         * prj-nmsc.adb: prj-nmsc.adb (Check_Aggregated): Check that an
602         aggregate is not Externally_Built.
603
604 2012-02-17  Ed Schonberg  <schonberg@adacore.com>
605
606         * sem_aggr.adb (Resolve_Record_Aggregate): If a composite
607         component has a box association, copy the default value using
608         the current scope as the scope of internal types, to prevent
609         scoping anomalies in gigi.
610
611 2012-02-17  Robert Dewar  <dewar@adacore.com>
612
613         * sem_dim.adb, sem_dim.ads, s-tasren.adb, prj.adb, prj.ads, freeze.adb,
614         sem_res.adb, exp_ch4.adb, sinput.adb, sinput.ads, exp_aggr.adb,
615         exp_intr.adb, s-os_lib.adb: Minor reformatting.
616
617 2012-02-17  Ed Schonberg  <schonberg@adacore.com>
618
619         * sem_ch6.adb (Is_Non_Overriding_Operation): Add warning if the
620         old operation is abstract, the relevant type is not abstract,
621         and the new subprogram fails to override.
622
623 2012-02-15  Eric Botcazou  <ebotcazou@adacore.com>
624
625         * gcc-interface/trans.c (Identifier_to_gnu): Move block retrieving the
626         type of the result to the end and execute it for a deferred constant of
627         a discriminated type whose full view can be elaborated statically.
628
629 2012-02-15  Eric Botcazou  <ebotcazou@adacore.com>
630
631         * gcc-interface/trans.c (gnat_to_gnu) <N_Qualified_Expression>: If the
632         type is tagged, mark it as used for debugging purposes.
633         <N_Allocator>: Likewise for a qualified expression.
634
635 2012-02-15  Eric Botcazou  <ebotcazou@adacore.com>
636
637         * gcc-interface/trans.c (call_to_gnu): Create the temporary for the
638         return value in the by-reference return type case if this isn't the
639         expression of an object declaration.  Tidy up.
640
641 2012-02-09  Tristan Gingold  <gingold@adacore.com>
642
643         * gcc-interface/Makefile.in: Remove .sym rule (not used).
644         Remove adamsg.o object (requires native message compiler).
645         * init.c (CMA$_EXIT_THREAD, MTH$_FLOOVEMAT, SS$_INTDIV): Define as a
646         macro instead of as extern int.
647         (ADA$_ALREADY_OPEN, ADA$_CONSTRAINT_ERRO, ADA$_DATA_ERROR)
648         (ADA$_DEVICE_ERROR, ADA$_END_ERROR, ADA$_FAC_MODE_MISMAT)
649         (ADA$_IOSYSFAILED, ADA$_KEYSIZERR, ADA$_KEY_MISMATCH)
650         (ADA$_LAYOUT_ERROR, ADA$_LINEXCMRS, ADA$_MAXLINEXC)
651         (ADA$_MODE_ERROR, ADA$_MRN_MISMATCH, ADA$_MRS_MISMATCH)
652         (ADA$_NAME_ERROR, ADA$_NOT_OPEN, ADA$_ORG_MISMATCH)
653         (ADA$_PROGRAM_ERROR, ADA$_RAT_MISMATCH, ADA$_RFM_MISMATCH)
654         (ADA$_STAOVF, ADA$_STATUS_ERROR, ADA$_STORAGE_ERROR)
655         (ADA$_UNSUPPORTED, ADA$_USE_ERROR): Likewise.
656         (struct cond_except): Field cond is now an unsigned int.
657         (dec_ada_cond_except_table): Adjust.
658         (cond_except_table): Likewise.
659         (cond_resignal_table): Likewise.
660         (__gnat_default_resignal_p): Fix style.
661
662 2012-02-08  Vincent Celier  <celier@adacore.com>
663
664         * gcc-interface/Make-lang.in: Add g-byorma.o to gnatbind objects
665         (g-buorma is now imported by sinput).
666         Update dependencies.
667         * scn.adb (Initialize_Scanner): Call Check_For_BOM
668         * sinput-p.adb (Source_File_Is_Subunit): Call Check_For_BOM
669         * sinput.adb: New procedure Check_For_BOM
670         * sinput.ads: New procedure Check_For_BOM
671
672 2012-02-08  Vincent Pucci  <pucci@adacore.com>
673
674         * impunit.adb: Dimension package names updated
675         * Makefile.rtl: s-dim added
676         * sem_dim.adb (Is_Procedure_Put_Call): minor changes
677         (Is_Dim_IO_Package_Instantiation): minor changes
678         * sem_dim.ads: minor changes in comments
679         * snames.ads-tmpl: Name_Dim added Name_Dim_Float_IO and
680         Name_Dim_Integer_IO removed
681         * s-dim.ads: New package. Define the dimension terminology.
682         * s-diflio.adb, s-diinio.adb, s-dimkio.ads, s-dimmks.ads,
683         * s-dmotpr.ads: Package names updated.
684         * s-diflio.ads, s-diinio.ads: Documentation added and package
685         names updated.
686
687 2012-02-08  Gary Dismukes  <dismukes@adacore.com>
688
689         * gcc-interface/utils2.c (build_call_alloc_dealloc_proc): Revise test
690         for storage pools to test for an underlying record type rather than
691         testing Is_Tagged_Type, so that simple storage pools will be handled
692         the same as normal Ada storage pools.
693
694 2012-02-08  Yannick Moy  <moy@adacore.com>
695
696         * gnat_rm.texi: Minor reshuffling to place restriction at
697         appropriate place.
698
699 2012-02-08  Bob Duff  <duff@adacore.com>
700
701         * warnsw.adb (Set_Warning_Switch): Set Warn_On_Suspicious_Modulus_Value
702         False for '-gnatwA', to suppress these warnings.
703
704 2012-02-08  Vincent Celier  <celier@adacore.com>
705
706         * sinput-p.adb (Source_File_Is_Subunit): Check for BOM before
707         starting to scan, so that UTF8 encoding is taken into account.
708
709 2012-02-08  Arnaud Charlet  <charlet@adacore.com>
710
711         * s-tasren.adb, s-tasren.ads (Internal_Complete_Rendezvous): New
712         function.
713         (Complete_Rendezvous): Now call Internal_Complete_Rendezvous.
714         (Exceptional_Complete_Rendezvous): Mark No_Return.
715
716 2012-02-08  Eric Botcazou  <ebotcazou@adacore.com>
717
718         * exp_aggr.adb (Compile_Time_Known_Composite_Value):
719         New predicate to compute whether a composite value can be
720         evaluated at compile time.
721         (Component_Not_OK_For_Backend): Use Compile_Time_Known_Value for all
722         expressions of elementary type and Compile_Time_Known_Composite_Value
723         for all other expressions.
724         (Expand_Record_Aggregate): Convert to assignments in the case
725         of a type with mutable components if the aggregate cannot be
726         built statically.
727
728 2012-02-08  Gary Dismukes  <dismukes@adacore.com>
729
730         * aspects.ads (type Aspect_Id): Add Simple_Storage_Pool_Type.
731         (Impl_Defined_Aspects): Add association for
732         Aspect_Simple_Storage_Pool_Type.
733         (Aspect_Names): Add
734         association for Aspect_Simple_Storage_Pool_Type.
735         * aspects.adb:
736         (Canonical_Aspect): Add association for Simple_Storage_Pool_Type.
737         * exp_attr.adb (Expand_N_Attribute_Reference):
738         Change name to Name_Simple_Storage_Pool_Type.
739         * exp_ch4.adb (Expand_N_Allocator): Change
740         name to Name_Simple_Storage_Pool_Type.
741         * exp_intr.adb (Expand_Unc_Deallocation): Change name to
742         Name_Simple_Storage_Pool_Type.  * freeze.adb (Freeze_Entity):
743         Change names to Name_Simple_Storage_Pool_Type.  * par-prag.adb:
744         Change names to Name_Simple_Storage_Pool_Type.  * sem_attr.adb:
745         (Analyze_Attribute): Change name to Name_Simple_Storage_Pool_Type.
746         * sem_ch13.adb (Analyze_Attribute_Definition_Clause):
747         Change name to Name_Simple_Storage_Pool_Type.
748         * sem_prag.adb:
749         (Analyze_Pragma): Change name to Name_Simple_Storage_Pool_Type.
750         (Sig_Flags): Change name to Name_Simple_Storage_Pool_Type.
751         * sem_res.adb (Resolve_Allocator): Change name to
752         Name_Simple_Storage_Pool_Type.  * snames.ads-tmpl:
753         (Name_Simple_Storage_Pool_Type): New name constant.
754         (type Pragma_Id): Change name to Name_Simple_Storage_Pool_Type and
755         move to main pragma section because it no longer matches the
756         attribute name.
757         * snames.adb-tmpl (Get_Pragma_Id): Remove test for
758         Name_Simple_Storage_Pool.
759         (Is_Pragma_Name): Remove test for Name_Simple_Storage_Pool.
760
761 2012-02-08  Robert Dewar  <dewar@adacore.com>
762
763         * gnat_ugn.texi: Add some clarification to -gnatwA and -gnatws.
764
765 2012-02-08  Pascal Obry  <obry@adacore.com>
766
767         * prj.adb (Compute_All_Imported_Projects): Use new
768         For_Project_And_Aggregated_Context to ensure proper context is
769         used for encapsulated aggregate libraries.
770         * prj-proc.adb (Recursive_Process): Call
771         Process_Aggregated_Projects earlier to ensure that all dependent
772         projects are set with the proper encapsulated status.
773
774 2012-02-08  Pascal Obry  <obry@adacore.com>
775
776         * s-os_lib.adb (Normalize_Arguments): Properly escape last \ in null
777         terminated string.
778
779 2012-02-08  Pascal Obry  <obry@adacore.com>
780
781         * prj.ads, prj.adb (For_Project_And_Aggregated_Context): New
782         generic routine with a context parameter.
783
784 2012-02-08  Robert Dewar  <dewar@adacore.com>
785
786         * a-coinve.adb, sem_util.adb, sem_ch8.adb, a-cobove.adb,
787         a-convec.adb: Minor reformatting and code reorganization.
788
789 2012-02-08  Steve Baird  <baird@adacore.com>
790
791         * sem_cat.adb (In_Preelaborated_Unit): A child
792         unit instantiation does not inherit preelaboration requirements
793         from its parent.
794
795 2012-02-08  Gary Dismukes  <dismukes@adacore.com>
796
797         * aspects.ads (type Aspect_Id): Add Aspect_Simple_Storage_Pool.
798         (Impl_Defined_Aspects): Add entry for Aspect_Simple_Storage_Pool.
799         (Aspect_Argument): Add Name entry for Aspect_Simple_Storage_Pool.
800         (Aspect_Names): Add entry for Aspect_Simple_Storage_Pool.
801         * aspects.adb (Canonical_Aspect): Add entry for
802         Aspect_Simple_Storage_Pool.
803         * exp_attr.adb (Expand_N_Attribute_Reference): Handle case of
804         Attribute_Simple_Storage_Pool in the same way as Storage_Pool
805         (add conversion, analyze/resolve). For the Storage_Size attribute,
806         for the simple pool case, locate and use the simple pool type's
807         Storage_Size function (if any), otherwise evaluate to zero.
808         * exp_ch4.adb (Expand_N_Allocator): In the case of an allocator
809         for an access type with an associated simple storage pool,
810         locate and use the pool type's Allocate.
811         * exp_intr.adb (Expand_Unc_Deallocation): In the case where the
812         access type has a simple storage pool, locate the pool type's
813         Deallocate procedure (if present) and use it as the procedure
814         to call on the Free operation.
815         * freeze.adb (Freeze_Entity): In the case of a full type for
816         a private type defined with pragma Simple_Storage_Pool, check
817         that the full type is also appropriate for the pragma. For
818         a simple storage pool type, validate that the operations
819         Allocate, Deallocate (if present), and Storage_Size
820         (if present) are defined with appropriate expected profiles.
821         (Validate_Simple_Pool_Op_Formal): New procedure
822         (Validate_Simple_Pool_Operation): New procedure Add with and
823         use of Rtsfind.
824         * par-prag.adb: Add Pragma_Simple_Storage_Pool to case statement
825         (no action required).
826         * sem_attr.adb (Analyze_Attribute): For the case of the
827         Storage_Pool attribute, give a warning if the prefix type has an
828         associated simple storage pool, and rewrite the attribute as a
829         raise of Program_Error. In the case of the Simple_Storage_Pool
830         attribute, check that the prefix type has an associated simple
831         storage pool, and set the attribute type to the pool's type.
832         * sem_ch13.adb (Analyze_Aspect_Specifications): Add
833         Aspect_Simple_Storage_Pool case choice.
834         (Analyze_Attribute_Definition_Clause): Add
835         Aspect_Simple_Storage_Pool to case for Ignore_Rep_Clauses
836         (no action). Add handling for Simple_Storage_Pool attribute
837         definition, requiring the name to denote a simple storage pool
838         object.
839         (Check_Aspect_At_Freeze_Point): For a simple storage pool
840         aspect, set the type to that of the name specified for the aspect.
841         * sem_prag.adb (Analyze_Pragma): Add handling for pragma
842         Simple_Storage_Pool, requiring that it applies to a library-level
843         type declared in a package declaration that is a limited private
844         or limited record type.
845         * sem_res.adb (Resolve_Allocator): Flag an attempt to call a
846         build-in-place function in an allocator for an access type with
847         a simple storage pool as unsupported.
848         * snames.ads-tmpl: Add Name_Simple_Storage_Pool.
849         (type Attribute_Id): Add Attribute_Simple_Storage_Pool.
850         (type Pragma_Id): Add Pragma_Simple_Storage_Pool.
851         * snames.adb-tmpl (Get_Pragma_Id): Handle case of
852         Name_Simple_Storage_Pool.
853         (Is_Pragma_Name): Return True for Name_Simple_Storage_Pool.
854
855 2012-02-08  Cyrille Comar  <comar@adacore.com>
856
857         * projects.texi: Clarify doc for interfaces.
858
859 2012-02-07  Eric Botcazou  <ebotcazou@adacore.com>
860
861         * gcc-interface/Make-lang.in (GCC_LINKERFLAGS): New variable.
862         (GCC_LINK): Use it.
863
864 2012-02-01  Tristan Gingold  <gingold@adacore.com>
865
866         * gcc-interface/trans.c (Loop_Statement_to_gnu): Use sizetype
867         instead of size_type_node.
868
869 2012-01-30  Nicolas Roche  <roche@adacore.com>
870
871         * gcc-interface/Make-lang.in: Update dependencies.
872         * gcc-interface/Makefile.in: Use system-vxworks-system-ppc-mils.ads
873         when needed.
874         Remove Linker_Options -crtbe when building sjlj run-time.
875
876 2012-01-30  Robert Dewar  <dewar@adacore.com>
877
878         * sem.adb (Analyze): Call Analyze_Mod for N_Op_Mod mode.
879         * sem_ch3.adb (Modular_Type_Declaration): Warn on mod value of
880         form 2 * small-literal.
881         * sem_ch4.adb (Analyze_Mod): New procedure (warn on suspicious
882         mod value).
883         * sem_ch4.ads (Analyze_Mod): New procedure.
884
885 2012-01-30  Ed Schonberg  <schonberg@adacore.com>
886
887         * sem_ch6.adb: sem_ch6.adb (Analyze_Expression_Function): Copy
888         types and return expression when building spec for implicit
889         body, to preserve global references that may be present in an
890         instantiation.
891
892 2012-01-30  Matthew Heaney  <heaney@adacore.com>
893
894         * a-convec.adb, a-coinve.adb, a-cobove.adb (Sort,
895         Reverse_Elements): Check for cursor tampering.
896
897 2012-01-30  Ed Schonberg  <schonberg@adacore.com>
898
899         * sem_util.adb (Is_Fully_Initialized_Type): In Ada 2012, a
900         type with aspect Default_Value or Default_Component_Value is
901         fully initialized, and use of variables of such types do not
902         generate warnings.
903
904 2012-01-30  Javier Miranda  <miranda@adacore.com>
905
906 PR ada/15846
907         * sem_ch8.adb (Analyze_Subprogram_Renaming):
908         Handle self-renaming when the renamed entity is referenced using
909         its expanded name.
910
911 2012-01-30  Vincent Celier  <celier@adacore.com>
912
913         * projects.texi: Add documentation for attribute Interfaces.
914
915 2012-01-30  Hristian Kirtchev  <kirtchev@adacore.com>
916
917         * exp_ch7.adb (Build_Finalizer_Call): Set loc again.
918         * exp_ch11.adb (Expand_At_End_Handler): Do not provide a source
919         location for the wrapped call to the original AT_END routine
920         and the subsequent return statement.
921
922 2012-01-30  Pascal Obry  <obry@adacore.com>
923
924         * s-rannum.adb: Minor reformatting.
925
926 2012-01-30  Hristian Kirtchev  <kirtchev@adacore.com>
927
928         * a-calend-vms.adb, a-calend.adb: Increment the number of leap seconds
929         to 25 and add the hard time value for 2012-06-30.
930
931 2012-01-30  Robert Dewar  <dewar@adacore.com>
932
933         * a-strhas.ads, einfo.adb, einfo.ads, exp_ch7.adb, exp_ch9.adb,
934         freeze.adb, prj.adb, prj.ads, prj-nmsc.adb, prj-proc.adb, s-llflex.ads,
935         s-ransee.adb, s-ransee.ads, sem_ch13.adb, sem_dim.adb, sem_prag.adb:
936         Minor reformatting/code reorganization.
937
938 2012-01-30  Thomas Quinot  <quinot@adacore.com>
939
940         * s-rannum.adb, s-ransee.adb, s-ransee.ads (Get_Seed): Return
941         Unsigned_64 rather than Duration.
942         (System.Random_Numbers.Reset): Use full value of seed
943         (do not truncate sub-second bits).
944
945 2012-01-30  Thomas Quinot  <quinot@adacore.com>
946
947         * sem_cat.adb, sem_ch12.adb: Minor reformatting.
948
949 2012-01-30  Yannick Moy  <moy@adacore.com>
950
951         * gnat_ugn.texi: Minor correction of GNAT UG, to take into
952         account changes to -gnatwa and more recent warnings.
953
954 2012-01-30  Hristian Kirtchev  <kirtchev@adacore.com>
955
956         * exp_ch7.adb (Build_Finalizer_Call): Do not provide a source
957         location when creating a call to a finalizer.
958         * exp_ch11.adb (Expand_Exception_Handlers): Do not provide
959         a source location for the first actual of Save_Occurrence for
960         consistency sake.
961
962 2012-01-30  Ed Schonberg  <schonberg@adacore.com>
963
964         * einfo.ads, einfo,adb: New attribute on scalar types:
965         Default_Aspect_Value New attribute on  array types:
966         Default_Aspect_Component_Value Move attribute Related_Array_Object
967         to a different position to accomodate new aspect attributes.
968         * freeze.adb (Freeze_Entity): Use new attributes to retrieve value
969         of defaults set with an aspect specification, rather than using
970         the list of aspects attached to the type, to prevent issues with
971         partial views.
972         * sem_ch13.adb (Analyze_Aspect_Specifications): For aspects
973         Default_Value and Default_Component _Value, store corresponding
974         expression in type entity.
975         (Check_Aspect_At_End_Of_Declaration): If the default aspects
976         are declared on the full view, use the full view to resolve the
977         correseponding expression.
978         * exp_ch3.adb (Init_Component): Use attribute
979         Default_Aspect_Component_Value to perform default initialization,
980         rather than relying on the rep item list for the type.
981         (Get_Simple_Init_Val): Ditto.
982
983 2012-01-30  Thomas Quinot  <quinot@adacore.com>
984
985         * a-strhas.ads: Document risk of collision attack.
986
987 2012-01-30  Yannick Moy  <moy@adacore.com>
988
989         * gnat_ugn.texi: Minor update wrt warning switches.
990
991 2012-01-30  Vincent Celier  <celier@adacore.com>
992
993         * prj-nmsc.adb (Check_Interfaces): Report an error when a
994         unit from Library_Interface is not a unit of the project.
995
996 2012-01-30  Vincent Pucci  <pucci@adacore.com>
997
998         * sem_prag.adb (Make_Aspect_For_PPC_In_Gen_Sub_Decl): Parent
999         links fixed inside PPC pragmas.
1000         * sem_ch12.adb: Move call to Make_Aspect_For_PPC_In_Gen_Sub_Decl.
1001
1002 2012-01-30  Thomas Quinot  <quinot@adacore.com>
1003
1004         * s-ransee.ads: Minor reformatting.
1005
1006 2012-01-30  Pascal Obry  <obry@adacore.com>
1007
1008         * prj.ads, prj.adb (For_Each_Source): Add support for skipping
1009         sources coming from an encapsulated library.
1010
1011 2012-01-30  Ed Schonberg  <schonberg@adacore.com>
1012
1013         * sem_ch3.adb (Process-Full_View): fix typo.
1014         * sem_ch13.adb (Aalyze_Aspect_Specifications): if predicates
1015         appear on a private type and the full view is available, ensure
1016         existence of freeze node for full view.
1017         (Build_Predicate_Function): Attach predicate function to both
1018         views of a private type.
1019
1020 2012-01-30  Vincent Celier  <celier@adacore.com>
1021
1022         * prj-nmsc.adb (Check_Interfaces): Compute the Lib_Interface_ALIs
1023         for the project if either attribute Library_Interface or
1024         Interfaces is declared.
1025         (Check_Stand_Alone_Library): Use Lib_Interface_ALIs computed in
1026         Check_Interfaces.
1027
1028 2012-01-30  Pascal Obry  <obry@adacore.com>
1029
1030         * prj-proc.adb (Recursive_Process): Set From_Encapsulated_Lib
1031         boolean value to true in the process list created by this routine.
1032         * prj.ads (Project_List_Element): New field From_Encapsulated_Lib.
1033         Continued work for KA06-021.
1034         * prj.adb (Compute_All_Imported_Projects): Set
1035         From_Encapsulated_Lib boolean flag.
1036
1037 2012-01-30  Vincent Pucci  <pucci@adacore.com>
1038
1039         * sem_dim.adb (Expand_Put_Call_With_Dimension_Symbol): Minor
1040         code clean up.
1041         * s-diflio.ads: Minor change.
1042
1043 2012-01-30  Javier Miranda  <miranda@adacore.com>
1044
1045         * exp_ch9.adb (Build_Dispatching_Requeue): Add missing call
1046         to Get_Entry_Index.  Required to generate code which provides
1047         the correct value of Entry_Index in the target entry.
1048
1049 2012-01-30  Nicolas Roche  <roche@adacore.com>
1050
1051         * system-vxworks-ppc.ads: Add pragma Linker_Options -crtbe to
1052         fix issue with zcx on VxWorks5.
1053
1054 2012-01-30  Pascal Obry  <obry@adacore.com>
1055
1056         * prj.ads, prj.adb (For_Every_Project_Imported): Remove
1057         In_Aggregate_Lib.
1058         (For_Every_Project_Imported_Context): New generic routine with
1059         a context parameter.
1060         * prj-nmsc.adb: Revert to use For_Every_Project_Imported Avoid
1061         distributed complexity.
1062         * prj-env.adb, prj-conf.adb, makeutl.adb, gnatcmd.adb: Ditto.
1063
1064 2012-01-30  Thomas Quinot  <quinot@adacore.com>
1065
1066         * exp_aggr.adb (Expand_Record_Aggregate): After creating the
1067         _parent aggregate for an extension aggregate, check whether it
1068         requires delayed (top-down) expansion.
1069
1070 2012-01-30  Vincent Pucci  <pucci@adacore.com>
1071
1072         * sem_dim.adb (Expand_Put_Call_With_Dimension_Symbol): Rewritten.
1073         * snames.ads-tmpl: Name_Item and Name_Symbols added.
1074         * s-diflio.adb, s-diflio.ads, s-diinio.adb, s-diinio.ads: Rename
1075         and change the position of parameter Symbols in every Put routine.
1076         * s-dimmks.ads: Convert long float type Mks_Type into long
1077         long float.
1078         * s-llflex.ads: Modifications in comments.
1079
1080 2012-01-30  Hristian Kirtchev  <kirtchev@adacore.com>
1081
1082         * sem_ch12.adb (Earlier): Do not use the
1083         top level source locations of the two input nodes.
1084
1085 2012-01-30  Robert Dewar  <dewar@adacore.com>
1086
1087         * einfo.ads, sem_prag.adb, sem_attr.adb, aspects.ads,
1088         sem_cat.adb, sem_aggr.adb, exp_aggr.adb: Minor reformatting.
1089
1090 2012-01-30  Robert Dewar  <dewar@adacore.com>
1091
1092         * a-cdlili.adb, a-cidlli.adb, a-cbdlli.adb: Minor reformatting.
1093
1094 2012-01-30  Olivier Hainque  <hainque@adacore.com>
1095
1096         * sigtramp-ppcvxw.c (CFI_COMMON_REGS): Add rule for r1 back +
1097         comments.
1098
1099 2012-01-30  Thomas Quinot  <quinot@adacore.com>
1100
1101         * gnat_rm.texi, sem_dist.adb, sem_dist.ads, einfo.ads, sem_prag.adb,
1102         sem_ch12.adb, sem_attr.adb, aspects.adb, aspects.ads, par-prag.adb,
1103         sem_cat.adb, snames.ads-tmpl (Sem_Dist.Is_Valid_Remote_Object_Type):
1104         New subprogram (extracted from
1105         Sem_Cat.Validate_Remote_Access_Object_Type_Declaration).
1106         (Einfo.Is_Remote_Types): Now applies to generic types. Update
1107         documentation accordingly.
1108         (Sem_Ch12.Analyze_Associations): A RACW type is acceptable as
1109         actual for a formal type to which a pragma Remote_Access_Type
1110         applies.
1111         (Aspects, Par.Prag, Sem_Prag): Support for new pramga/aspect
1112         Remote_Access_Type.
1113         (Sem_Attr.Analyze_Attribute, case Stub_Type): Attribute can
1114         be applied to a generic type if pragma Remote_Access_Type
1115         applies, in which case the type of the attribute is
1116         System.Partition_Interface.RACW_Stub_Type.
1117
1118 2012-01-27  Eric Botcazou  <ebotcazou@adacore.com>
1119
1120         * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Procedure>: Do not set
1121         an alignment on fields of the RETURN type built for the CICO mechanism.
1122
1123 2012-01-27  Eric Botcazou  <ebotcazou@adacore.com>
1124
1125         * gcc-interface/trans.c (gnat_to_gnu): Avoid making a SAVE_EXPR for
1126         a call to a function that returns an unconstrained type with default
1127         discriminant.  Similarly, avoid doing the conversion to the nominal
1128         result type in this case.
1129
1130 2012-01-27  Eric Botcazou  <ebotcazou@adacore.com>
1131
1132         * gcc-interface/ada-tree.h (DECL_ALIASED_P): New flag.
1133         * gcc-interface/decl.c (is_variable_size): Rename to...
1134         (type_has_variable_size): ...this.
1135         (adjust_packed): Adjust to above renaming.
1136         (gnat_to_gnu_field): Set DECL_ALIASED_P on the field.
1137         (field_is_artificial): New predicate.
1138         (field_is_aliased): Likewise.
1139         (field_has_self_size): Likewise.
1140         (field_has_variable_size): Likewise.
1141         (components_to_record): Record information for the final layout during
1142         the first pass on fields.
1143         If there is an aliased field placed after a field whose length depends
1144         on discriminants, put all the fields of the latter sort, last.
1145
1146 2012-01-27  Eric Botcazou  <ebotcazou@adacore.com>
1147
1148         * gcc-interface/gigi.h (get_minimal_subprog_decl): Declare.
1149         * gcc-interface/decl.c (get_minimal_subprog_decl): New function.
1150         * gcc-interface/trans.c (Attribute_to_gnu): Use it for the prefix of an
1151         Access-like attribute in a dispatch table if the subprogram is public.
1152
1153 2012-01-27  Eric Botcazou  <ebotcazou@adacore.com>
1154
1155         * gcc-interface/gigi.h (create_label_decl): Adjust.
1156         * gcc-interface/utils.c (create_label_decl): Add GNAT_NODE parameter
1157         and invoke gnat_pushdecl on it.  Remove obsolete settings.
1158         * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Label>: Adjust call to
1159         create_label_decl.
1160         * gcc-interface/trans.c (gnat_to_gnu) <N_Null): Likewise.  Ignore the
1161         label for debugging purposes.
1162
1163 2012-01-27  Eric Botcazou  <ebotcazou@adacore.com>
1164
1165         * gcc-interface/decl.c (gnat_to_gnu_entity) <object>: For an aliased
1166         object with an unconstrained nominal subtype and if optimization isn't
1167         enabled, create a special VAR_DECL for debugging purposes.
1168
1169 2012-01-23  Robert Dewar  <dewar@adacore.com>
1170
1171         * sem_prag.ads, sem_prag.adb: Minor reformatting.
1172
1173 2012-01-23  Robert Dewar  <dewar@adacore.com>
1174
1175         * sem_ch13.adb (Analyze_Aspect_Specifications): Check for
1176         language defined aspect applied to renaming or formal type
1177         declaration (not permitted)
1178
1179 2012-01-23  Matthew Heaney  <heaney@adacore.com>
1180
1181         * a-cdlili.adb, a-cidlli.adb, a-cbdlli.adb (Vet): Replaced
1182         comment with pragma Assert.
1183
1184 2012-01-23  Vincent Pucci  <pucci@adacore.com>
1185
1186         * sem_ch12.adb (Analyze_Generic_Subprogram_Declaration): Call
1187         to Make_Aspect_For_PPC_In_Gen_Sub_Decl added in ASIS mode.
1188         * sem_prag.adb, sem_prag.ads (Make_Aspect_For_PPC_In_Gen_Sub_Decl): New
1189         routine. In ASIS mode, convert any PPC pragmas into aspects in generic
1190         subprogram declaration in order to enable the analysis of PPC boolean
1191         expressions.
1192
1193 2012-01-23  Robert Dewar  <dewar@adacore.com>
1194
1195         * sem_ch3.adb (Analyze_Object_Declaration): Properly
1196         handle Current_Value for volatile variables (also propagate
1197         Treat_As_Volatile from type to object).
1198
1199 2012-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
1200
1201         * sem_ch12.adb (Install_Body): Detect the case
1202         where the enclosing context is a package with a stub body that
1203         has already been replaced by the actual body. In such cases,
1204         the freeze node for the enclosing context must be inserted after
1205         the real body.
1206
1207 2012-01-23  Ed Schonberg  <schonberg@adacore.com>
1208
1209         * sem_prag.adb (Analyze_Pragma, case Debug): Freeze the called
1210         subprogram before expanding the pragma into an if-statement with
1211         a block, to ensure that when the subprogram is null its body is
1212         properly generated before expansion.
1213
1214 2012-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
1215
1216         * sem_ch12.adb (Analyze_Associations): Alphabetize local variables and
1217         constants. Rename Actual_Types to Actuals_To_Freeze. Rename Next_Formal
1218         to Saved_Formal.
1219         Freeze all eligible subprograms which appear as actuals in
1220         the instantiation.
1221         (Has_Fully_Defined_Profile): New routine.
1222         (Renames_Standard_Subprogram): New routine.
1223         (Earlier): Add local variable N. Comment update. Do not use source
1224         locations when trying to determine whether one node precedes another.
1225
1226 2012-01-23  Gary Dismukes  <dismukes@adacore.com>
1227
1228         * exp_ch4.adb (Expand_Concatenate): In the case
1229         where the result of a concatentation can be null, set the to
1230         result have both the low and high bounds of the right operand (not
1231         just the high bound, as was the case prior to this fix). Also,
1232         fix the saved high bound setting (Last_Opnd_High_Bound) in the
1233         empty string literal case (should have been low bound minus one,
1234         rather than plus one).
1235
1236 2012-01-23  Thomas Quinot  <quinot@adacore.com>
1237
1238         * scos.ads, put_scos.adb, get_scos.adb (Get_SCOs, Put_SCOs): Do not
1239         omit statement SCOs for disabled pragmas.
1240
1241 2012-01-23  Matthew Heaney  <heaney@adacore.com>
1242
1243         * a-cohase.ads, a-cihase.ads, a-cbhase.ads, a-coorse.ads,
1244         a-ciorse.ads, a-cborse.ads, a-cohama.ads, a-cihama.ads, a-cbhama.ads,
1245         a-coorma.ads, a-ciorma.ads, a-cborma.ads, a-cdlili.ads, a-cidlli.ads,
1246         a-cbdlli.ads, a-convec.ads, a-coinve.ads, a-cobove.ads (Cursor'Read,
1247         Cursor'Write): Declare in private part.
1248         (Reference_Type'Read, Reference_Type'Write): Ditto.
1249         (Constant_Reference_Type'Read, Constant_Reference_Type'Write): Ditto.
1250
1251 2012-01-23  Robert Dewar  <dewar@adacore.com>
1252
1253         * a-catizo.ads, a-calend.adb, a-calend.ads, par-ch13.adb: Minor
1254         reformatting.
1255
1256 2012-01-23  Ed Schonberg  <schonberg@adacore.com>
1257
1258         * sem_ch6.adb (Analyze_Subprogram_Declaration): Do not set the
1259         Corresponding_Body on a defaulted null formal subprogram.
1260         * sem_ch12.adb (Check_Formal_Package_Instance): No check needed
1261         on a defaulted formal subprogram that is a null procedure.
1262
1263 2012-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
1264
1265         * exp_ch9.adb: Update the comments involving pragma Implemented.
1266         * sem_ch3.adb (Check_Pragma_Implemented (Entity_Id)): Add local
1267         constant Subp_Alias and local variable Impl_Subp. Properly
1268         handle aliases of synchronized wrappers. Code cleanup.
1269         (Check_Pragma_Implemented (Entity_Id; Entity_Id)): Add
1270         Name_Optional as part of the condition.
1271         * sem_prag.adb (Analyze_Pragma): Add "Optional" as one of the
1272         valid choices of implementation kind.
1273         (Check_Arg_Is_One_Of): New routine.
1274         * snames.ads-tmlp: Add Name_Optional.
1275
1276 2012-01-23  Ed Schonberg  <schonberg@adacore.com>
1277
1278         * par-ch13.adb: Better error recovery in illegal aspect
1279         specification.
1280
1281 2012-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
1282
1283         * a-calend.adb: Add with clause for Interfaces.C. Add constant
1284         Unix_Max.
1285         (Day_Of_Week): Call the internal UTC_Time_Offset.
1286         (Split): Call the internal UTC_Time_Offset.
1287         (Time_Of): Call the internal UTC_Time_Offset.
1288         (Time_Zone_Operations.UTC_Time_Offset): Call internal UTC_Time_Offset.
1289         (UTC_Time_Offset): New library-level routine.
1290         * a-calend.ads (UTC_Time_Offset): Remove parameter
1291         Is_Historic. Update related comment on usage.
1292         * a-catizo.adb (UTC_Time_Offset): Removed.
1293         (UTC_Time_Offset (Time)): Call Time_Zone_Operations.UTC_Time_Offset.
1294         * a-caltizo.ads (UTC_Time_Offset): Removed.
1295         (UTC_Time_Offset (Time)): Add back the default expression of parameter
1296         Date.
1297
1298 2012-01-23  Robert Dewar  <dewar@adacore.com>
1299
1300         * sprint.ads, sprint.adb (Sprint_Node_List): Add New_Lines parameter
1301         (pg,po,ps): Make sure each entry starts on new line.
1302
1303 2012-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
1304
1305         * a-calend.ads, a-calend.adb: Define types int and int_Pointer. Update
1306         the parameter profile of procedure localtime_tzoff and its associated
1307         comment.
1308         (Day_Of_Week): Do not treat the input date as historical
1309         with respect to time zones.
1310         (Split): Do not treat the input
1311         date as historical with respect to time zones.  (Time_Of): Do
1312         not treat the input constituents as forming a historical date
1313         with respect to time zones.
1314         (UTC_Time_Offset): Add new formal
1315         parameter Is_Historic. Add local variable Flag. Update the call
1316         to localtime_tzoff.
1317         * a-catizo.ads, a-catizo.adb (UTC_Time_Offset): New routine.
1318         (UTC_Time_Offset (Time)): Update the call to
1319         Time_Zone_Operations.UTC_Time_Offset.
1320         * sysdep.c (__gnat_localtime_tzoff): Update parameter
1321         profile. Split the processing of offsets on Windows into two - one
1322         part of historic time stamps and the other for the current time.
1323
1324 2012-01-23  Robert Dewar  <dewar@adacore.com>
1325
1326         * a-calend.adb: Minor reformatting.
1327
1328 2012-01-23  Ed Schonberg  <schonberg@adacore.com>
1329
1330         * exp_ch9.adb, sem_ch9.adb: Handle array of access to synchronized
1331         interface in requeue statement.
1332
1333 2012-01-23  Cyrille Comar  <comar@adacore.com>
1334
1335         * projects.texi: Remove references to main units and replace
1336         with references to main programs to be coherent with the
1337         documentation.
1338
1339 2012-01-23  Robert Dewar  <dewar@adacore.com>
1340
1341         * s-utf_32.adb: Minor reformatting.
1342
1343 2012-01-23  Vincent Celier  <celier@adacore.com>
1344
1345         * snames.ads-tmpl: Minor comment addition Indicate that
1346         Name_Library_Encapsulated_Options is only used in gprbuild.
1347
1348 2012-01-23  Robert Dewar  <dewar@adacore.com>
1349
1350         * sem_ch10.adb (Analyze_Subunit): Properly save/restore cunit
1351         restrictions.
1352
1353 2012-01-23  Ed Schonberg  <schonberg@adacore.com>
1354
1355         * snames.ads-tmpl: Add Name_Synchronization.
1356         * aspects.ads, aspects.adb: Add Aspect_Synchronization to
1357         enumeration type and related maps.
1358         * sem_ch13.adb (Analyze_Aspect_Specifications): Handle Aspect
1359         Synchronization, build corresponding pragma Implemented.
1360         * sem_util.adb (Implementation_Kind): Handle both explicit and
1361         implicit pragma_argument association to retrieve the given
1362         synchronization mode.
1363
1364 2012-01-23  Robert Dewar  <dewar@adacore.com>
1365
1366         * sem_ch10.adb, errout.adb: Minor reformatting.
1367
1368 2012-01-23  Ed Schonberg  <schonberg@adacore.com>
1369
1370         * sem_res.adb (Resolve_Actuals): An actual in a call to an
1371         Ada 2012 Reference function does not lead to a dangerous order
1372         dependence.
1373
1374 2012-01-23  Gary Dismukes  <dismukes@adacore.com>
1375
1376         * exp_util.adb (Is_Iterated_Container): Test
1377         Is_Entity_Name when searching for calls to the default iterator,
1378         to avoid blowing up on indirect calls which have an explicit
1379         dereference as the call name.
1380
1381 2012-01-23  Thomas Quinot  <quinot@adacore.com>
1382
1383         * errout.adb (Set_Msg_Node): For an N_Expanded_Name, output
1384         the complete expanded name, rather than just its Selector_Name.
1385
1386 2012-01-23  Thomas Quinot  <quinot@adacore.com>
1387
1388         * a-textio.adb (Put): Rewrite one-parameter Character version to
1389         just call the two-parameter one with Current_Out.
1390
1391 2012-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
1392
1393         * freeze.adb (Check_Current_Instance): Issue an
1394         error when the prefix of 'Unchecked_Access or 'Access does not
1395         denote a legal aliased view of a type.
1396         (Freeze_Record_Type): Do not halt the processing of record components
1397         once the Has_Controlled_Component is set as this bypasses the remaining
1398         checks.
1399         (Is_Aliased_View_Of_Type): New routine.
1400
1401 2012-01-23  Thomas Quinot  <quinot@adacore.com>
1402
1403         * errout.ads, freeze.adb: Minor reformatting.
1404
1405 2012-01-23  Thomas Quinot  <quinot@adacore.com>
1406
1407         * sem_ch10.adb, sem_prag.adb: Remove redundant apostrophes in error
1408         messages.
1409
1410 2012-01-23  Olivier Hainque  <hainque@adacore.com>
1411
1412         * adadecode.c (__gnat_decode): Deal with empty input early,
1413         preventing potential erroneous memory access later on.
1414
1415 2012-01-21  Eric Botcazou  <ebotcazou@adacore.com>
1416
1417         PR ada/46192
1418         * gcc-interface/decl.c (gnat_to_gnu_entity) <object>: In the case of a
1419         renaming, preserve the volatileness through the indirection, if any.
1420
1421 2012-01-14  Andreas Schwab  <schwab@linux-m68k.org>
1422
1423         * gcc-interface/Makefile.in (OSCONS_EXTRACT): Add
1424         $(GNATLIBCFLAGS).
1425
1426 2012-01-10  Pascal Obry  <obry@adacore.com>
1427
1428         * prj-nmsc.adb (Check_Library_Attributes):
1429         Kill check for object/source directories for aggregate libraries.
1430
1431 2012-01-10  Matthew Heaney  <heaney@adacore.com>
1432
1433         * a-cdlili.adb, a-cdlili.ads, a-cihama.adb, a-cihama.ads, a-coinve.adb,
1434         a-coinve.ads, a-ciorse.adb, a-ciorse.ads, a-coorma.adb, a-coorma.ads,
1435         a-cborma.adb, a-cborma.ads, a-cidlli.adb, a-cidlli.ads, a-cimutr.adb,
1436         a-cimutr.ads, a-cihase.adb, a-cihase.ads, a-cohama.adb, a-cohama.ads,
1437         a-coorse.adb, a-coorse.ads, a-cbhama.adb, a-cbhama.ads, a-cborse.adb,
1438         a-cborse.ads, a-comutr.adb, a-comutr.ads, a-ciorma.adb, a-cobove.adb,
1439         a-ciorma.ads, a-cobove.ads, a-convec.adb, a-convec.ads, a-cohase.adb,
1440         a-cohase.ads, a-cbdlli.adb, a-cbdlli.ads, a-cbmutr.adb, a-cbmutr.ads,
1441         a-cbhase.adb, a-cbhase.ads (Reference, Constant_Reference): Declare
1442         container parameter as aliased in/in out.
1443         Code clean ups.
1444
1445 2012-01-10  Bob Duff  <duff@adacore.com>
1446
1447         * s-os_lib.ads: Improve comment.
1448
1449 2012-01-10  Geert Bosch  <bosch@adacore.com>
1450
1451         * s-gearop.adb (Forward_Eliminate): Avoid improper aliasing
1452         for complex Scalar.
1453
1454 2012-01-10  Bob Duff  <duff@adacore.com>
1455
1456         * sem_intr.adb (Check_Shift): Use RM_Size instead of Esize, when
1457         checking that the 'Size is correct. If the type is "mod 2**12",
1458         for example, it's illegal, but Esize is the 'Object_Size, which
1459         will be something like 16 or 32, so the error ('Size = 12) was
1460         not detected.
1461         * gnat_rm.texi: Improve documentation of shift
1462         and rotate intrinsics.
1463
1464 2012-01-10  Pascal Obry  <obry@adacore.com>
1465
1466         * prj.adb (For_Every_Project_Imported): Fix
1467         implementation to make sure we return each project only once
1468         for aggragte libraries. It is fine to return a project twice for
1469         aggregate projects, this was the case as a Project_Id is different
1470         in each project tree. The new implementation use a table based on
1471         the project name to ensure proper detection of duplicate project
1472         in aggregate library. A new context is then created to continue
1473         retrurning duplicate project for aggregate libraries.
1474
1475 2012-01-09  Eric Botcazou  <ebotcazou@adacore.com>
1476
1477         * gcc-interface/trans.c (call_to_gnu): Create the temporary for the
1478         return value in the variable-sized return type case if the target is
1479         an array with fixed size.  However, do not create it if this is the
1480         expression of an object declaration.
1481
1482 2012-01-09  Eric Botcazou  <ebotcazou@adacore.com>
1483
1484         * gcc-interface/trans.c (addressable_p) <COMPONENT_REF>: Fix thinko.
1485
1486 2012-01-06  Robert Dewar  <dewar@adacore.com>
1487
1488         * a-wichha.ads, a-wichun.ads, a-zchhan.ads, a-zchuni.ads,
1489         s-utf_32.ads: Add pragma Pure
1490         * s-utf_32.adb: Suppress warnings on non-static constants (now
1491         that this is Pure).
1492
1493 2012-01-06  Bob Duff  <duff@adacore.com>
1494
1495         * s-rpc.ads (Read, Write): Add overriding indicators.
1496
1497 2012-01-06  Robert Dewar  <dewar@adacore.com>
1498
1499         * gnat_rm.texi: Add documentation for conventions
1500         Ada_Pass_By_Copy and Ada_Pass_By_Reference.
1501
1502 2012-01-06  Gary Dismukes  <dismukes@adacore.com>
1503
1504         * a-tienio.adb (Put): Add exception message on
1505         raise statements. Remove unneeded blocks and object declarations.
1506
1507 2012-01-06  Robert Dewar  <dewar@adacore.com>
1508
1509         * sem_prag.adb: Minor reformatting.
1510
1511 2012-01-06  Ed Schonberg  <schonberg@adacore.com>
1512
1513         * sinfo.ads, sinfo.adb (Has_Prefixed_Call): New flag to indicate
1514         that a selected component within a generic unit has been resolved
1515         as a prefixed call with local references.
1516         * sem_ch3.adb (Is_Visible_Component): In an instance body a selected
1517         component is always visible.
1518         * sem_ch4.adb (Analyze_Selected_Component): If the node is a
1519         prefixed call in an instance, do not look for visible components
1520         of the type.
1521         * sem_ch12.adb (Reset_Entity): If a selected component has resolved
1522         to a prefixed call, mark the node accordingly when prefix and
1523         selector are local references.
1524
1525 2012-01-02  Eric Botcazou  <ebotcazou@adacore.com>
1526
1527         * gnatvsn.ads (Current_Year): Bump to 2012.
1528 \f
1529 Copyright (C) 2012 Free Software Foundation, Inc.
1530
1531 Copying and distribution of this file, with or without modification,
1532 are permitted in any medium without royalty provided the copyright
1533 notice and this notice are preserved.