1 2004-10-04 Pascal Obry <obry@gnat.com>
3 * tracebak.c: Always set LOWEST_ADDR to 0 on Win32 (as done on all
6 2004-10-04 Olivier Hainque <hainque@act-europe.fr>
8 * s-tassta.adb (Task_Wrapper): Make it Convention C, which makes sense
9 in general and triggers stack alignment adjustment for thread entry
10 points on targets where this is necessary.
12 2004-10-04 Bernard Banner <banner@gnat.com>
16 * Makefile.in: Add section for powerpc linux
17 Add variant i-vxwork-x86.ads
19 * i-vxwork-x86.ads, system-linux-ppc.ads: New files.
21 2004-10-04 Olivier Hainque <hainque@act-europe.fr>
23 * init.c (__gnat_initialize): Call an Ada subprogram to perform the
24 table registration calls when need be. Ensures no reference to the crt
25 ctors symbol are issued in the SJLJ case, which avoids possible
26 undefined symbol errors in the case of modules to be statically linked
29 2004-10-04 Javier Miranda <miranda@gnat.com>
31 * sem_ch4.adb (Try_Object_Operation): Reformat the code to expand
32 in-line the code corresponding to subprogram Analyze_Actuals. In
33 addition, analyze the actuals only in case of subprogram call.
35 2004-10-04 Ed Falis <falis@gnat.com>
37 * s-vxwork-x86.ads: (FP_CONTEXT): Defined to be correct size
39 2004-10-04 Sergey Rybin <rybin@act-europe.fr>
41 * g-dirope.ads (Base_Name): Clarify the meaning of the Suffix parameter
44 2004-10-04 Robert Dewar <dewar@gnat.com>
46 * sem_ch5.adb (Unblocked_Exit_Count): Now used for blocks as well as
48 (Analyze_Block_Statement): Add circuitry to detect following dead code
49 (Check_Unreachable_Code): Handle case of block exit
51 2004-10-04 Robert Dewar <dewar@gnat.com>
53 * g-spipat.adb: (XMatch): Avoid warning for Logic_Error call
54 (XMatchD): Avoid warning for Logic_Error call
56 2004-10-04 Robert Dewar <dewar@gnat.com>
58 * exp_ch4.adb (Is_Procedure_Actual): Correct so that this does not
59 consider expressions buried within a procedure actual to be an actual.
60 This caused some blowups with uses of packed slices within a procedure
63 2004-10-04 Robert Dewar <dewar@gnat.com>
65 * exp_ch3.adb (Needs_Simple_Initialization): Modular packed arrays no
66 longer need to be initialized to zero.
67 (Get_Simple_Init_Val): Modular packed arrays no longer need to be
70 * checks.adb (Expr_Known_Valid): Packed arrays are now always
71 considered valid, even if the representation is modular. That's correct
72 now that we no longer initialize packed modular arrays to zero.
74 * exp_dbug.ads: Clarify documentation on handling of PAD and JM
75 suffixes. These are now documented as the only cases in which the
76 debugger ignores outer records.
77 Previously, the spec allowed arbitrary suffixes for this purpose.
78 Change name of LJM to JM for packed array pad records
79 Create separate section on packed array handling, and add a whole new
80 set of comments to this section describing the situation with packed
81 modular types and justification requirements depending on endianness.
83 2004-10-04 Robert Dewar <dewar@gnat.com>
85 * a-except.adb: Add a comment for last change
87 * einfo.ads: Minor spelling correction in comment
89 * exp_pakd.adb, gnatdll.adb, prj-attr.ads: Minor reformatting
91 * sem_ch11.adb: Fix a case of using | instead of \ for continuation
94 * sem_util.ads: Minor comment update
96 2004-10-04 Ed Schonberg <schonberg@gnat.com>
98 * sem_ch6.adb (Analyze_Subprogram_Body): Do not treat Inline as
99 Inline_Always when in Configurable_Run_Time mode.
101 * sem_prag.adb (Process_Convention): If entity is an inherited
102 subprogram, apply convention to parent subprogram if in same scope.
103 (Analyze_Pragma, case Inline): Do not treat Inline as Inline_Always
104 when in Configurable_Run_Time mode.
106 2004-10-04 Ed Schonberg <schonberg@gnat.com>
108 * sem_ch3.adb (Build_Derived_Record_Type): Set First/Last entity of
109 class_wide type after component list has been inherited.
111 2004-10-04 Ed Schonberg <schonberg@gnat.com>
113 * sem_ch12.adb (Check_Generic_Actuals): New predicate
114 Denotes_Previous_Actual, to handle properly the case of a private
115 actual that is also the component type of a subsequent array actual.
116 The visibility status of the first actual is not affected when the
118 (Process_Nested_Formal): Subsidiary of Instantiate_Formal_Package, to
119 make fully recursive the treatment of formals of packages declared
121 (Restore_Nested_Formal): Subsidiary of Restore_Private_Views, to undo
122 the above on exit from an instantiation.
123 (Denotes_Formal_Package): When called from Restore_Private_Views, ignore
124 current instantiation which is now complete.
125 (Analyze_Package_Instantiation): No instantiated body is needed if the
126 main unit is generic. Efficient, and avoid anomalies when a instance
127 appears in a package accessed through rtsfind.
129 2004-10-04 Ed Schonberg <schonberg@gnat.com>
131 * exp_ch6.adb (Expand_N_Function_Call): If stack checking is enabled,
132 do not generate a declaration for a temporary if the call is part of a
133 library-level instantiation.
135 2004-10-04 Ed Schonberg <schonberg@gnat.com>
137 * sem_util.adb (Explain_Limited_Type): Ignore internal components when
138 searching for a limited component to flag.
140 * exp_attr.adb (Freeze_Stream_Subprogram): Subsidiary procedure to
141 expansion of Input, to account for the fact that the implicit call
142 generated by the attribute reference must freeze the user-defined
143 stream subprogram. This is only relevant to 'Input, because it can
144 appear in an object declaration, prior to the body of the subprogram.
146 * sem_ch13.adb (Rep_Item_Too_Late): Make the error non-serious, so that
147 expansion can proceed and further errors uncovered.
148 (Minor clean up): Fix cases of using | instead of \ for continuation
151 2004-10-04 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
153 * cuintp.c, decl.c, utils2.c: Use gcc_assert and gcc_unreachable.
155 * trans.c (assoc_to_constructor): Fix unused var warning if no checking.
156 (gnat_gimplify_expr, case ADDR_EXPR): Fix error in last change.
157 Use gcc_assert and gcc_unreachable.
159 * decl.c (gnat_to_gnu_entity, case object): Check and process a
160 specified alignment before validating size.
161 (gnat_to_gnu_entity) <E_Modular_Integer_Subtype>: Create a
162 stripped-down declaration for the type of the inner field when making
165 * utils.c (finish_record_type): Do not compute the size in units
166 incrementally. Instead compute it once for the rep clause case.
167 Use gcc_assert and gcc_unreachable.
169 2004-10-04 Vincent Celier <celier@gnat.com>
171 * a-dirval-mingw.adb (Invalid_Character): Add '\' as invalid character
173 (Is_Valid_Path_Name): Take '/' as a directory separator.
175 2004-10-04 Vincent Celier <celier@gnat.com>
177 * prj-part.adb (Parse_Single_Project): Call Is_Extending_All
178 (Extended_Project) only if Extended_Project is defined, to avoid
180 (Post_Parse_Context_Clause): Always call Set_Path_Name_Of with a
182 (Parse_Single_Project): Ditto.
184 * prj-env.adb (Set_Ada_Paths.Add.Recursive_Add): Do not call
185 Add_To_Project_Path for virtual projects.
187 2004-10-04 Vincent Celier <celier@gnat.com>
189 * mlib-tgt-tru64.adb, mlib-tgt-aix.adb, mlib-tgt-irix.adb,
190 mlib-tgt-hpux.adb, mlib-tgt-linux.adb, mlib-tgt-solaris.adb,
191 mlib-tgt-vms-alpha.adb, mlib-tgt-vms-ia64.adb, mlib-tgt-mingw.adb,
192 mlib-tgt-vxworks.adb, mlib-tgt.adb (Build_Dynamic_Library): New
195 * mlib-prj.ads, mlib-prj.adb (Build_Library): Call
196 Build_Dynamic_Library with an empty Options_2.
198 * mlib-utl.ads, mlib-utl.adb (Gcc): Parameter Options_2 has no
201 * makegpr.adb (Get_Imported_Directories.add): Remove trailing
202 directory separator, if any.
203 (Gprmake): Do not allow mains on the command line for library projects.
204 Do not attempt to link when the project is a library project.
205 (Library_Opts): New table to store Library_Options.
206 (Build_Library): If Library_Options is specified, pass these options
207 when building a shared library.
209 2004-10-04 Jose Ruiz <ruiz@act-europe.fr>
211 * s-tposen.adb (Service_Entry): The object must be always unlocked at
212 the end of this procedure now that the unlock operation was inserted
215 2004-10-04 Jose Ruiz <ruiz@act-europe.fr>
217 * targparm.ads, targparm.adb (Targparm_Tags): Add PAS value
218 corresponding to the Preallocated_Stacks flags in System.
219 (Get_Target_Parameters): Including the processing for
222 * system.ads, system-vxworks-x86.ads, system-darwin-ppc.ads,
223 system-vms_64.ads, system-unixware.ads, system-linux-ia64.ads,
224 system-freebsd-x86.ads, system-lynxos-ppc.ads, system-lynxos-x86.ads,
225 system-linux-x86_64.ads, system-tru64.ads, system-aix.ads,
226 system-vxworks-sparcv9.ads, system-vxworks-xscale.ads,
227 system-solaris-x86.ads, system-irix-o32.ads, system-irix-n32.ads,
228 system-hpux.ads, system-vxworks-m68k.ads, system-linux-x86.ads,
229 system-vxworks-mips.ads, system-os2.ads, system-interix.ads,
230 system-solaris-sparc.ads, system-solaris-sparcv9.ads, system-vms.ads,
231 system-mingw.ads, system-vms-zcx.ads, system-vxworks-ppc.ads,
232 system-vxworks-alpha.ads: Add the flag Preallocated_Stacks, that is
233 used to signal whether the compiler creates the required stacks and
234 descriptors for the different tasks (when True) or it is done by the
235 underlying operating system at run time (when False).
236 It is initially set to False in all targets.
238 * exp_ch9.adb (Expand_N_Task_Type_Declaration): Create the task stack
239 if it is supported by the target.
240 (Make_Task_Create_Call): Pass the stack address if it has been
241 previously created. Otherwise pass a Null_Address.
243 * snames.adb: Add _stack.
245 * snames.ads: Add Name_uStack. Required to allow the expander to
246 statically allocated task stacks.
248 * s-tarest.ads, s-tarest.adb (Create_Restricted_Task): Add
249 Stack_Address argument.
250 Check that its value is equal to Null_Address because this target does
251 not support the static stack allocation.
253 2004-10-04 Thomas Quinot <quinot@act-europe.fr>
255 * usage.adb: Change "pragma inline" to "pragma Inline" in information
258 2004-10-04 Thomas Quinot <quinot@act-europe.fr>
260 * exp_dist.adb: Split declaration of asynchronous flag out of
261 Add_RACW_Read_Attribute.
262 Minor reformatting for better alignment with PolyORB version.
263 Store the entity for the asynchronous flag of an RACW, rather than the
264 expression, in the asynchronous flags table. This will allow this flag
265 to be used in other subprograms beside Add_RACW_Read_Attribute.
267 2004-10-04 Thomas Quinot <quinot@act-europe.fr>
269 * g-socket.ads, g-socket.adb, g-socthi.adb, socket.c,
270 g-soccon-aix.ads, g-soccon-irix.ads, g-soccon-hpux.ads,
271 g-soccon-interix.ads, g-soccon-solaris.ads, g-soccon-vms.adb,
272 g-soccon-mingw.ads, g-soccon-vxworks.ads, g-soccon-freebsd.ads,
273 g-soccon.ads, g-soccon-unixware.ads, g-soccon-tru64.ads: Add new
274 sockets constant MSG_NOSIGNAL (Linux-specific).
275 Add new sockets constant MSG_Forced_Flags, list of flags to be set on
277 For Linux, set MSG_NOSIGNAL on all send operations to prevent them
278 from trigerring SIGPIPE.
279 Rename components to avoid clash with Ada 2005 possible reserved
281 (Check_Selector): When the select system call returns with an error
282 condition, propagate Socket_Error to the caller.
284 2004-10-01 Jan Hubicka <jh@suse.cz>
286 * misc.c (gnat_expand_body): Update call of tree_rest_of_compilation.
288 2004-09-23 Robert Dewar <dewar@gnat.com>
292 * sem_prag.adb (Process_Import_Or_Interface): Don't set Is_Public here,
293 instead do this at freeze time (we won't do it if there is an address
295 Change "pragma inline" to "pragma Inline" in information and error
299 * freeze.adb (Check_Address_Clause): Remove previous change, not the
300 right way of doing things after all.
301 (Freeze_Entity): For object, set Is_Public for imported entities
302 unless there is an address clause present.
304 2004-09-21 Olivier Hainque <hainque@act-europe.fr>
306 * decl.c (gnat_to_gnu_entity) <E_General_Access_Type>: Check for a
307 dummy designated type via TYPE_MODE instead of COMPLETE_TYPE_P. This
308 ensures proper handling of types with rep clauses, which might have
309 their TYPE_SIZE set already.
311 2004-09-21 Robert Dewar <dewar@gnat.com>
313 * decl.c (gnat_to_gnu_type, case E_Modular_Integer_Type): Wrap modular
314 packed array types in both little- and big-endian cases. This change
315 ensures that we no longer count on the unused bits being initialized
316 for such types (and in particular ensures that equality testing will
317 only read the relevant bits).
318 Change name TYPE_LEFT_JUSTIFIED_MODULAR_P to TYPE_JUSTIFIED_MODULAR_P
319 These changes mean that we no longer need to initialize small packed
321 (gnat_to_gnu_entity) <E_Record_Subtype>: Apply the same
322 optimization to an LJM field as to its parent field.
324 * ada-tree.h, trans.c, utils.c, utils2.c:
325 Change name TYPE_LEFT_JUSTIFIED_MODULAR_P to TYPE_JUSTIFIED_MODULAR_P
327 2004-09-20 Jan Hubicka <jh@suse.cz>
329 * utils.c (gnat_finalize): Remove.
330 (end_subprog_body): Directly call cgraph_finalize_function;
331 do not lower the nested functions.
333 2004-09-20 Robert Dewar <dewar@gnat.com>
337 * freeze.adb (Check_Address_Clause): Reset Is_Imported and Is_Public
338 if an address clause is present, since that means that the Import
341 2004-09-20 Arnaud Charlet <charlet@act-europe.fr>
343 * 5tsystem.ads: Removed, no longer used.
345 2004-09-17 Jeffrey D. Oldham <oldham@codesourcery.com>
346 Zack Weinberg <zack@codesourcery.com>
348 * ada-tree.def: Use tree_code_class enumeration constants
349 instead of code letters.
350 * ada-tree.h, decl.c, misc.c, trans.c, utils.c, utils2.c:
351 Update for new tree-class enumeration constants.
353 2004-09-17 Vincent Celier <celier@gnat.com>
355 * prj-attr-pm.ads, prj-attr-pm.adb: New files, to split some private
356 capabilities of the general project manager.
358 2004-09-09 Vincent Celier <celier@gnat.com>
360 * a-direct.ads: Add pragma Ada_05
361 (Directory_Entry_Type): Give default value to component Kind to avoid
362 not initialized warnings.
364 * a-direct.adb (Current_Directory): Remove directory separator at the
366 (Delete_Directory, Delete_Tree): Raise Name_Error if Directory is not
367 an existing directory.
368 (Fetch_Next_Entry): Give default value to variable Kind to avoid warning
369 (Size (String)): Function C_Size returns Long_Integer, not File_Size.
370 Convert the result to File_Size.
372 * prj.ads: (Project_Error): New exception
374 * prj-attr.adb: Except in procedure Initialize, Fail comes from
375 Prj.Com, not from Osint.
376 (Attrs, Package_Attributes): Tables moved to private part of spec
377 (Add_Attribute, Add_Unknown_Package): Moved to new child package
379 (Register_New_Package (Name, Attributes), Register_New_Attribute): Raise
380 Prj.Project_Error after call to Fail.
381 (Register_New_Package (Name, Id)): Set Id to Empty_Package after calling
382 Fail. Check that package name is not already in use.
384 * prj-attr.ads: Comment updates to indicate that all subprograms may be
385 used by tools, not only by the project manager, and to indicate that
386 exception Prj.Prj_Error may be raised in case of problem.
387 (Add_Unknown_Package, Add_Attribute): Moved to new child package
389 (Attrs, Package_Attributes): Table instantiations moved from the body to
390 the private part to be accessible from Prj.Attr.PM body.
392 * prj-dect.adb (Parse_Package_Declaration): Call Add_Unknown_Package
393 from new package Prj.Attr.PM.
394 (Parse_Attribute_Declaration): Call Add_Attribute from new package
397 * Makefile.in: Add prj-attr-pm.o to gnatmake object list
399 * gnatbind.adb (Gnatbind): Correct warning message (Elaboration_Check
400 instead of Elaboration_Checks).
402 * a-calend.adb: Minor reformatting
404 2004-09-09 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
406 * gigi.h (maybe_pad_type): New declaration.
407 (create_subprog_type): New arg RETURNS_BY_TARGET_PTR.
409 * ada-tree.h: (TYPE_RETURNS_BY_TARGET_PTR_P): New macro.
411 * cuintp.c: Convert to use buildN.
413 * decl.c (maybe_pad_type): No longer static.
414 (gnat_to_gnu_entity, case E_Function): Handle case of returning by
416 Convert to use buildN.
418 * trans.c (call_to_gnu): Add arg GNU_TARGET; support
419 TYPE_RETURNS_BY_TARGET_PTR_P. All callers changed.
420 (gnat_to_gnu, case N_Assignment_Statement): Call call_to_gnu if call on
422 (gnat_to_gnu, case N_Return): Handle TYPE_RETURN_BY_TARGET_PTR_P.
423 (gnat_gimplify_expr, case ADDR_EXPR): New case.
424 Convert to use buildN.
426 * utils2.c (gnat_build_constructor): Also set TREE_INVARIANT and
427 TREE_READONLY for const.
428 Convert to use buildN.
430 * utils.c (create_subprog_type): New operand RETURNS_BY_TARGET_PTR.
431 (create_var_decl): Refine when TREE_STATIC is set.
432 Convert to use buildN.
434 2004-09-09 Gary Dismukes <dismukes@gnat.com>
436 * gnat_ugn.texi: Delete text relating to checking of ali and object
439 * a-except.adb (Rcheck_*): Add pragmas No_Return for each of these
442 2004-09-09 Jose Ruiz <ruiz@act-europe.fr>
444 * gnat_ugn.texi: Add Detect_Blocking to the list of configuration
445 pragmas recognized by GNAT.
447 * gnat_rm.texi: Document pragma Detect_Blocking.
449 * s-solita.adb (Timed_Delay_T): When pragma Detect_Blocking is active,
450 raise Program_Error if called from a protected operation.
452 * s-taprob.adb (Lock): When pragma Detect_Blocking is active increase
453 the protected action nesting level.
454 (Lock_Read_Only): When pragma Detect_Blocking is active increase the
455 protected action nesting level.
456 (Unlock): When pragma Detect_Blocking is active decrease the protected
457 action nesting level.
459 * s-taskin.adb (Initialize_ATCB): Initialize to 0 the
460 Protected_Action_Nesting.
462 * s-taskin.ads: Adding the field Protected_Action_Nesting to the
463 Common_ATCB record. It contains the dynamic level of protected action
464 nesting for each task. It is needed for checking whether potentially
465 blocking operations are called from protected operations.
466 (Detect_Blocking): Adding a Boolean constant reflecting whether pragma
467 Detect_Blocking is active or not in the partition.
469 * s-tasren.adb (Call_Simple): When pragma Detect_Blocking is active,
470 raise Program_Error if called from a protected operation.
471 (Task_Entry_Call): When pragma Detect_Blocking is active, raise
472 Program_Error if called from a protected operation.
473 (Timed_Task_Entry_Call): When pragma Detect_Blocking is active, raise
474 Program_Error if called from a protected operation.
476 * s-tassta.adb (Abort_Tasks): When pragma Detect_Blocking is active,
477 raise Program_Error if called from a protected operation.
479 * s-tpoben.adb (Lock_Entries): When pragma Detect_Blocking is active,
480 raise Program_Error if called from a protected operation, and increase
481 the protected action nesting level.
482 (Lock_Read_Only_Entries): When pragma Detect_Blocking is active, raise
483 Program_Error if called from a protected operation, and increase the
484 protected action nesting level.
485 (Unlock_Entries): When pragma Detect_Blocking is active decrease the
486 protected action nesting level.
488 * s-tposen.adb (Lock_Entry): When pragma Detect_Blocking is active,
489 raise Program_Error if called from a protected operation, and increase
490 the protected action nesting level.
491 (Lock_Read_Only_Entry): When pragma Detect_Blocking is active, raise
492 Program_Error if called from a protected operation, and increase the
493 protected action nesting level.
494 (Protected_Single_Entry_Call): When pragma Detect_Blocking is active,
495 raise Program_Error if called from a protected operation.
496 (Timed_Protected_Single_Entry_Call): When pragma Detect_Blocking is
497 active, raise Program_Error if called from a protected operation.
498 (Unlock_Entry): When pragma Detect_Blocking is active decrease the
499 protected action nesting level.
501 * sem_util.adb (Check_Potentially_Blocking_Operation): Remove the
502 insertion of the statement raising Program_Error. The run time
503 contains the required machinery for handling that.
505 * sem_util.ads: Change comment associated to procedure
506 Check_Potentially_Blocking_Operation.
507 This procedure does not insert a call for raising the exception because
508 that is currently done by the run time.
510 * raise.h (__gnat_set_globals): Pass the detect_blocking parameter.
512 * init.c: Add the global variable __gl_detect_blocking that indicates
513 whether pragma Detect_Blocking is active (1) or not (0). Needed for
514 making the pragma available at run time.
515 (__gnat_set_globals): Pass and update the detect_blocking parameter.
517 * lib-writ.adb (Write_ALI): Set the DB flag in the ali file if
518 pragma Detect_Blocking is active.
520 * lib-writ.ads: Document the Detect_Blocking flag (DB) in ali files.
522 * ali.adb (Scan_ALI): Set the Detect_Blocking value to true if the flag
523 DB is found in the ali file. Any unit compiled with pragma
524 Detect_Blocking active forces its effect in the whole partition.
526 * a-retide.adb (Delay_Until): Raise Program_Error if pragma
527 Detect_Blocking is active and delay is called from a protected
530 * bindgen.adb (Gen_Adainit_Ada): When generating the call to
531 __gnat_set_globals, pass 1 as Detect_Blocking parameter if pragma
532 Detect_Blocking is active (0 otherwise).
533 (Gen_Adainit_C): When generating the call to __gnat_set_globals, pass 1
534 as Detect_Blocking parameter if pragma Detect_Blocking is active (0
537 2004-09-09 Thomas Quinot <quinot@act-europe.fr>
539 * gnat_rm.texi: Rename GNAT.Perfect_Hash.Generators to
540 GNAT.Perfect_Hash_Generators, and remove the empty GNAT.Perfect_Hash
543 * s-parint.ads, s-parint.adb (Get_RAS_Info): New subprogram.
544 (Register_Receiving_Stub): Add Subp_Info formal parameter.
545 Update API in placeholder implemetation of s-parint to reflect changes
546 in distribution runtime library.
548 * sem_ch3.adb (Expand_Derived_Record): Rename to
549 Expand_Record_Extension.
551 * sem_disp.adb (Check_Controlling_Formals): Improve error message for
552 primitive operations of potentially distributed object types that have
553 non-controlling anonymous access formals.
555 * sem_dist.ads, sem_dist.adb (Build_RAS_Primitive_Specification): New
557 New implementation of expansion for remote access-to-subprogram types,
558 based on the RACW infrastructure.
559 This version of sem_dist is compatible with PolyORB/DSA as well as
562 * sem_prag.adb (Analyze_Pragma, case Pragma_Asynchronous): For a pragma
563 Asynchrronous that applies to a remote access-to-subprogram type, mark
564 the underlying RACW type as asynchronous.
566 * link.c: FreeBSD uses GNU ld: set __gnat_objlist_file_supported and
567 __gnat_using_gnu_linker to 1.
569 * Makefile.rtl, impunit.adb, g-perhas.ads, g-pehage.ads,
570 g-pehage.adb: Rename GNAT.Perfect_Hash.Generators to
571 GNAT.Perfect_Hash_Generators, and remove the empty
572 GNAT.Perfect_Hash package.
574 * atree.adb: Minor reformatting
576 * exp_ch3.adb (Expand_Derived_Record): Rename to
577 Expand_Record_Extension.
578 (Build_Record_Init_Proc.Build_Assignment): The default expression in
579 a component declaration must remain attached at that point in the
580 tree so New_Copy_Tree copies it if the enclosing record type is derived.
581 It is therefore necessary to take a copy of the expression when building
582 the corresponding assignment statement in the init proc.
583 As a side effect, in the case of a derived record type, we now see the
584 original expression, without any rewriting that could have occurred
585 during expansion of the ancestor type's init proc, and we do not need
586 to go back to Original_Node.
588 * exp_ch3.ads (Expand_Derived_Record): Rename to
589 Expand_Record_Extension.
591 * exp_dist.ads, exp_dist.adb (Underlying_RACW_Type): New subprogram.
592 Returns the RACW type used to implement a remote access-to-subprogram
594 (Add_RAS_Proxy_And_Analyze, Build_Remote_Subprogram_Proxy_Type):
595 New subprograms. Used to create a proxy tagged object for a remote
596 subprogram. The proxy object is used as the designated object
597 for RAS values on the same partition (unless All_Calls_Remote applies).
598 (Build_Get_Unique_RP_Call): New subprogram. Build a call to
599 System.Partition_Interface.Get_Unique_Remote_Pointer.
600 (Add_RAS_Access_TSS, Add_RAS_Dereference_TSS):
601 Renamed from Add_RAS_*_Attribute.
602 (Add_Receiving_Stubs_To_Declarations): Generate a table of local
604 New implementation of expansion for remote access-to-subprogram types,
605 based on the RACW infrastructure.
607 * exp_dist.ads (Copy_Specification): Update comment to note that this
608 function can copy the specification from either a subprogram
609 specification or an access-to-subprogram type definition.
611 2004-09-09 Ed Schonberg <schonberg@gnat.com>
613 * sem_type.adb (Disambiguate): Handle properly an accidental ambiguity
614 in an instance, between an explicit subprogram an one inherited from a
615 type derived from an actual.
617 * exp_ch6.adb (Expand_N_Subprogram_Body): If polling is enabled, do not
618 add a polling call if the subprogram is to be inlined by the back-end,
619 to avoid repeated calls with multiple inlinings.
621 * checks.adb (Apply_Alignment_Check): If the expression in the address
622 clause is a call whose name is not a static entity (e.g. a dispatching
623 call), treat as dynamic.
625 2004-09-09 Robert Dewar <dewar@gnat.com>
627 * g-trasym.ads: Minor reformatting
629 * exp_ch3.adb (Component_Needs_Simple_Initialization): Don't except
630 packed arrays, since unused bits are expected to be zero for a
633 2004-09-09 Eric Botcazou <ebotcazou@act-europe.fr>
635 * exp_pakd.ads: Fix an inacurracy and a couple of typos in the head
638 2004-09-09 Pascal Obry <obry@gnat.com>
640 * mdll.ads, mdll.adb (Build_Dynamic_Library): New parameter Map_File to
641 enable map file generation. Add the right option to generate the map
642 file if Map_File is set to True.
644 * gnatdll.adb (Gen_Map_File): New variable.
645 (Syntax): Add info about new -m (Map_File) option.
646 (Parse_Command_Line): Add support for -m option.
647 (gnatdll): Pass Gen_Map_File to Build_Dynamic_Library calls.
650 2004-09-09 Laurent Pautet <pautet@act-europe.fr>
652 * gnatls.adb: Add a very verbose mode -V. Such mode is required by the
653 new gnatdist implementation.
654 Define a subpackage isolating the output routines specific to this
657 2004-09-09 Joel Brobecker <brobecker@gnat.com>
659 * Makefile.rtl: (GNATRTL_NONTASKING_OBJS): Add g-dynhta.
661 * gnat_ugn.texi (Main Subprograms): Fix typo. Deduced, not deducted.
663 2004-09-09 Cyrille Comar <comar@act-europe.fr>
665 * opt.adb (Set_Opt_Config_Switches): Use Ada_Version_Runtime to compile
668 * opt.ads: Add Ada_Version_Runtime constant used to decide which
669 version of the language is used to compile the run time.
671 2004-09-09 Arnaud Charlet <charlet@act-europe.fr>
673 * sem_util.adb (Requires_Transient_Scope): Re-enable handling
674 of variable length temporaries for function return now that the
675 back-end and gigi support it.
677 2004-09-01 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
679 * misc.c (gnat_print_type): Use TYPE_RM_SIZE_NUM.
681 * trans.c (struct stmt_group): Delete field GLOBAL.
682 (gnat_init_stmt_group): Do not initialize it.
683 (call_to_gnu): Use save_expr, not protect_multiple_eval.
684 (Exception_Handler_to_gnu_sjlj): Call build_int_cst, not build_int_2
685 (gnat_to_gnu, case N_Character_Literal, N_String_Literal): Likewise.
686 (gnat_to_gnu, case N_Compilation_Unit): Do not set GLOBAL in stmt group.
687 (start_stmt_group): Likewise.
688 (add_stmt, add_decl_expr): Rework handling of global DECL_EXPRs.
690 * utils2.c (ggc.h): Include.
691 (build_call_raise): Call build_int_cst, not build_int_2.
693 * utils.c (gnat_init_decl_processing): Fix arg to
694 build_common_tree_nodes.
695 (create_subprog_type): Do not use SET_TYPE_CI_CO_LIST.
696 (gnat_define_builtin): Set built_in_decls.
697 (init_gigi_decls): Call build_int_cst, not build_int_2.
699 * ada-tree.h (struct lang_decl, struct lang_type): Field is type tree.
700 (GET_TYPE_LANG_SPECIFIC, SET_TYPE_LANG_SPECIFIC): New macros.
701 (GET_DECL_LANG_SPECIFIC, SET_DECL_LANG_SPECIFIC): Likewise.
702 (TYPE_CI_CO_LIST, SET_TYPE_CI_CO_LIST, TYPE_MODULE,
703 SET_TYPE_MODULE): Use them.
704 (TYPE_INDEX_TYPE, SET_TYPE_INDEX_TYPE, TYPE_DIGITS_VALUE): Likewise.
705 (SET_TYPE_DIGITS_VALUE, TYPE_UNCONSTRAINED_ARRAY): Likewise.
706 (SET_TYPE_UNCONSTRAINED_ARRAY, TYPE_ADA_SIZE,
707 SET_TYPE_ADA_SIZE): Likewise.
708 (TYPE_ACTUAL_BOUNDS, SET_TYPE_ACTUAL_BOUNDS): Likewise.
709 (DECL_CONST_CORRESPONDING_VAR,
710 SET_DECL_CONST_CORRESPONDING_VAR): Likewise.
711 (DECL_ORIGINAL_FIELD, SET_DECL_ORIGINAL_FIELD): Likewise.
712 (TYPE_RM_SIZE_INT, TYPE_RM_SIZE_ENUM, SET_TYPE_RM_SIZE_ENUM): Deleted.
713 (TYPE_RM_SIZE_NUM): New macro.
714 (TYPE_RM_SIZE): Modified to use above.
716 * cuintp.c: (build_cst_from_int): New function.
719 * decl.c (gnat_to_gnu_entity): Use TYPE_RM_SIZE_NUM.
720 (make_type_from_size): Avoid changing TYPE_UNSIGNED of a type.
721 (gnat_substitute_in_type, case ARRAY_TYPE): If old had a
722 MIN_EXPR for the size, copy it into new.
724 2004-09-01 Robert Dewar <dewar@gnat.com>
726 * exp_ch6.adb (Expand_Call): Properly handle validity checks for
727 packed indexed component where array is an IN OUT formal. This
728 generated garbage code previously.
730 * gnat_ugn.texi: Document -fverbose-asm
732 * gnat-style.texi: Minor updates (note that boolean constants and
733 variables are joined with AND/OR rather than short circuit forms).
735 2004-09-01 Ed Schonberg <schonberg@gnat.com>
737 * exp_util.adb (Safe_Unchecked_Type_Conversion): Conversion is safe if
738 it is an upward conversion of an untagged type with no representation
741 2004-09-01 Thomas Quinot <quinot@act-europe.fr>
743 * rtsfind.ads: Move RCI_Subp_Info and RCI_Subp_Info_Array to
744 System.Partition_Interface.
746 * checks.adb (Apply_Access_Checks): Do not generate checks when
747 expander is not active (but check for unset reference to prefix of
750 * sem_prag.adb (Analyze_Pragma, case Pragma_Debug): Uniformly rewrite
751 pragma Debug as an if statement with a constant condition, for
752 consistent treatment of entity references contained within the
753 enclosed procedure call.
755 2004-09-01 Vincent Celier <celier@gnat.com>
757 * bindgen.adb: (Set_EA_Last): New procedure
758 (Gen_Exception_Table_Ada, Gen_Exception_Table_C): Use new procedure
760 (Gen_Adafinal_Ada): If no finalization, adafinal does nothing
761 (Gen_Output_File_Ada): Always call Gen_Adafinal_Ada, so that SAL can be
762 linked without errors.
763 (Gen_Exception_Table_Ada): Correct bugs when generating code for arrays
765 (Gen_Exception_Table_C): Correct same bugs
767 * vms_data.ads: Add new qualifier /VERBOSE_ASM to GCC_Switches
769 * g-os_lib.adb (Normalize_Pathname.Get_Directory): When Dir is empty,
770 on Windows, make sure that the drive letter is in upper case.
772 * g-os_lib.ads (Normalize_Pathname): Add a comment to indicate that on
773 Windows, when the drive letter is added and Case_Sensitive is True, the
774 drive letter is forced to upper case.
776 * mlib-tgt-irix.adb (Build_Dynamic_Library): Transfer all -lxxx options
777 to Options_2 for the call to MLib.Utl.Gcc.
779 * bld.adb (Put_Include_Project): Use '/', not '\' on Windows as
780 directory separator when defining BASE_DIR.
782 2004-09-01 Pascal Obry <obry@gnat.com>
784 * gprcmd.adb (Extend): Do not output trailing directory separator. This
785 is not needed and it confuses Windows GNU/make which does not report
786 directory terminated by a slash as a directory.
787 (gprcmd): Idem for "pwd" internal command.
789 * Makefile.generic: Use __GPRCOLON__ instead of pipe character in
790 target names rewrite to fix regressions with recent version of
791 GNU/make. Starting with GNU/make 3.80 the pipe character was not
792 handled properly anymore.
794 2004-09-01 Andreas Schwab <schwab@suse.de>
796 * Make-lang.in (EXTRA_GNATBIND_OBJS): Revert last change.
797 * raise.c [!IN_RTS]: Undef abort.
799 2004-08-27 Nathan Sidwell <nathan@codesourcery.com>
801 * utils2.c (build_allocator): Use ssize_int.
803 * utils.c (gnat_init_decl_processing): Ada has a signed sizetype.
805 2004-08-27 Andreas Schwab <schwab@suse.de>
807 * Make-lang.in (EXTRA_GNATBIND_OBJS): Add errors.o.
809 2004-08-25 Nathan Sidwell <nathan@codesourcery.com>
810 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
812 * ada-tree.h (TYPE_RM_SIZE_INT): Use TYPE_LANG_SLOT_1.
814 2004-08-25 Nathan Sidwell <nathan@codesourcery.com>
816 * cuintp.c (UI_To_gnu): Adjust build_int_cst calls.
817 * trans.c (Exception_Handler_to_gnu_sjlj, gnat_to_gnu): Likewise.
818 * utils.c (init_gigi_decls): Likewise.
819 * utils2.c (build_call_raise, build_allocator): Likewise.
821 2004-08-24 Nathan Sidwell <nathan@codesourcery.com>
823 * utils.c (gnat_init_decl_processing): Adjust
824 build_common_tree_nodes call.
826 2004-08-20 Nathan Sidwell <nathan@codesourcery.com>
828 * utils2.c (build_allocator): Use build_int_cst for negative
831 2004-08-18 Richard Henderson <rth@redhat.com>
833 * misc.c (LANG_HOOKS_HONOR_READONLY): Remove.
835 2004-08-16 Nathan Sidwell <nathan@codesourcery.com>
837 * cuintp.c (UI_To_gnu): Be more conservative with build_int_cst
839 * trans.c (Exception_Handler_to_gnu_sjlj): Likewise.
840 (gnat_to_gnu): Likewise.
842 2004-08-16 Pascal Obry <obry@gnat.com>
844 * adaint.c (__gnat_prj_add_obj_files): Set to 0 only on Win32 for GCC
845 backend prior to GCC 3.4. With GCC 3.4 we are using the GCC's shared
846 option and not mdll anymore. Update comment.
848 2004-08-16 Pascal Obry <obry@gnat.com>
850 * bld.adb (Put_Include_Project): Properly handle directory separators
853 2004-08-16 Ed Schonberg <schonberg@gnat.com>
855 * sem_ch4.adb (Try_Object_Operation): Restructure code. Optimize by
856 decreasing the number of allocated junk nodes while searching for the
857 appropriate subprogram.
859 2004-08-15 Nathan Sidwell <nathan@codesourcery.com>
861 * cuintp.c (UI_To_gnu): Use build_int_cst..
862 * trans.c (Exception_Handler_to_gnu_sjlj, gnat_to_gnu): Likewise.
863 * utils.c (init_gigi_decls): Likewise.
864 * utils2.c (build_call_raise): Likewise.
866 2004-08-13 Olivier Hainque <hainque@act-europe.fr>
868 * decl.c (gnat_to_gnu_entity) <E_Variable>: When building an allocator
869 for a global aliased object with a variable size and an unconstrained
870 nominal subtype, pretend there is no initializer if the one we have is
871 incomplete, and avoid referencing an inexistant component in there. The
872 part we have will be rebuilt anyway and the reference may confuse
875 2004-08-13 Thomas Quinot <quinot@act-europe.fr>
877 * einfo.ads: Minor reformatting
879 * lib-writ.adb (Output_Main_Program_Line): Do not set parameter
880 restrictions in the ALI if we only want to warn about violations.
882 2004-08-13 Vincent Celier <celier@gnat.com>
884 * ali.adb (Scan_ALI): Initialize component Body_Needed_For_SAL to False
885 when creating a new Unit_Record in table Units.
887 * gnatls.adb (Output_Unit): In verbose mode, output the restrictions
888 that are violated, if any.
890 * prj-nmsc.adb (Ada_Check.Get_Path_Names_And_Record_Sources): Do not
891 add directory separator if path already ends with a directory separator.
893 2004-08-13 Ed Schonberg <schonberg@gnat.com>
895 * rtsfind.adb (Entity_Not_Defined): If the error ocurrs in a predefined
896 unit, this is an attempt to inline a construct that is not available in
897 the current restricted mode, so abort rather than trying to continue.
899 * sem_ch3.adb (Build_Underlying_Full_View): If the new type has
900 discriminants that rename those of the parent, recover names of
901 original discriminants for the constraint on the full view of the
903 (Complete_Private_Subtype): Do not create a subtype declaration if the
906 * gnat_rm.texi: Added section on implementation of discriminated
907 records with default values for discriminants.
909 2004-08-13 Ed Schonberg <schonberg@gnat.com>
912 * sem_res.adb (Make_Call_Into_Operator): Handle properly the case where
913 the second operand is overloaded.
915 2004-08-10 Richard Henderson <rth@redhat.com>
917 * utils.c (gnat_install_builtins): Remove __builtin_stack_alloc,
918 add __builtin_alloca.
920 2004-08-10 Richard Henderson <rth@redhat.com>
922 * config-lang.in (boot_language): Yes.
924 2004-08-09 Thomas Quinot <quinot@act-europe.fr>
926 * g-socket.adb (Abort_Selector): Initialize Buf to prevent valgrind
927 from complaining on potential uninitialized reference.
928 Change calls to GNAT.Sockets.Thin.Is_Socket_In_Set to account for
929 new specification and test explicitly for non-zero return value.
931 * g-socthi.ads (Is_Socket_In_Set): Declare imported function as
932 returning C.int, to avoid using a derived boolean type.
934 * exp_ch5.adb (Make_Tag_Ctrl_Assignments): Use
935 Duplicate_Subexpr_No_Checks in preference to direct use of
936 Remove_Side_Effects and New_Copy_Tree.
937 Clear Comes_From_Source on prefix of 'Size attribute reference.
939 * g-socthi.adb, g-socthi-vms.adb, g-socthi-mingw.adb,
940 g-socthi-vxworks.adb: Change calls to
941 GNAT.Sockets.Thin.Is_Socket_In_Set to account for new specification
942 and test explicitly for non-zero return value.
944 * g-socthi-vms.ads, g-socthi-mingw.ads, g-socthi-vxworks.ads:
945 (Is_Socket_In_Set): Declare imported function as returning C.int, to
946 avoid using a derived boolean type.
948 2004-08-09 Albert Lee <lee@gnat.com>
950 * system-irix-n32.ads: Refine tasking priority constants for IRIX.
952 2004-08-09 Pascal Obry <obry@gnat.com>
954 * gnat_ugn.texi: Document new way to build DLLs on Windows using
955 GCC's -shared option.
957 * mlib-tgt-mingw.adb (Build_Dynamic_Library): Pass GCC's options into
958 Options_2 parameter (options put after object files).
960 2004-08-09 Olivier Hainque <hainque@act-europe.fr>
962 * decl.c (gnat_to_gnu_entity) <E_Array_Subtype>: Adjust condition to
963 ignore overflows on low and high bounds of an index to also account for
964 differences in signedness between sizetype and gnu_index_subtype.
965 These are as legitimate as the ones caused by a lower TYPE_PRECISION
968 2004-08-09 Robert Dewar <dewar@gnat.com>
970 * s-solita.ads, s-solita.adb: Minor reformatting
972 * gnat_rm.texi: Add documentation for pragma Profile (Restricted)
973 Move pragma Restricted_Run_Time, No_Run_Time, Ravenscar to new
975 Add note that No_Implicit_Conditionals does not suppress
976 run time constraint checks.
978 * vms_conv.ads: Minor reformatting
980 * s-secsta.adb: Use SS_Ptr instead of Mark_Id as stack pointer (cleanup
981 and necessary for following change).
982 (Mark): Return new format Mark_Id containing sec stack address
983 (Release): Use sec stack address from Mark_Id avoiding Self call
985 * s-secsta.ads: Define SS_Ptr to be used instead of Mark_Id as stack
986 pointer (cleanup and necessary for following change).
987 Define Mark_Id as record containing address of secondary stack, that way
988 Release does not need to find the stack again, decreasing the number of
989 calls to Self and improving efficiency.
991 * sem_util.ads: Add a ??? comment for Is_Local_Variable_Reference
993 * sem_ch5.adb (Analyze_Case_Statement): Add circuitry to track value of
994 case variable into the individual case branches when possible.
996 * sem_ch11.adb: Minor reformatting
998 * prj.ads: Correct spelling of suffixs
1000 * prj-nmsc.adb: Minor reformatting
1001 Correct spelling suffixs throughout (also in identifiers)
1003 * freeze.adb: Minor spelling correction
1005 * exp_ch2.adb: Cleanups to handling of Current_Value
1006 (no functional effect).
1008 * bld.adb: Correct spelling of suffixs
1010 * einfo.adb (Enclosing_Dynamic_Scope): Defend against junk argument
1012 2004-08-09 Ed Schonberg <schonberg@gnat.com>
1016 * sem_ch7.adb (Install_Private_Declarations): In the body of the
1017 package or of a child, private entities are both immediately_visible
1020 2004-08-09 Ed Schonberg <schonberg@gnat.com>
1022 * sem_eval.adb (Eval_Integer_Literal): If the context is Any_Integer,
1023 there are no range checks on the value of the literal.
1025 * exp_ch7.adb (Insert_Actions_In_Scope_Around): If the node being
1026 wrapped is the triggering alternative of an asynchronous select, action
1027 statements mustbe inserted before the select itself.
1029 * sem_attr.adb (Analyze_Attribute, case 'Size): Handle properly the
1030 case where the prefix is a protected function call.
1031 (Resolve_Attribute, case 'Access): The attribute reference on a
1032 subprogram is legal in a generic body if the subprogram is declared
1035 2004-08-09 Vincent Celier <celier@gnat.com>
1037 * makegpr.adb (Build_Library): Link with g++ if C++ is one of the
1038 languages, otherwise building the library may fail with unresolved
1040 (Compile_Sources): Do not build libraries if -c switch is used
1042 * gnatlink.adb (Process_Args): New switches -M and -Mmap
1043 (Write_Usage): If map file creation is supported, output new switches
1045 (Gnatlink): When -M is specified, add the necessary switch(es) to the
1046 gcc call, when supported.
1048 * Makefile.in: Added indepsw.o to the object list for gnatlink
1049 Specified the AIX, GNU/Linux and Windows versions of indepsw.adb
1051 * indepsw-aix.adb, indepsw-linux.adb, indepsw-mingw.adb,
1052 indepsw.adb, indepsw.ads: New files.
1054 2004-08-09 Bernard Banner <banner@gnat.com>
1056 * system-vxworks-x86.ads, s-vxwork-x86.ads: New files.
1058 * Makefile.in: add section for vxworks x86
1060 2004-08-09 Hristian Kirtchev <kirtchev@gnat.com>
1062 * exp_ch3.adb (Build_Init_Statements): Add extra condition to deal with
1063 per-object constrained components where the discriminant is of an
1065 (Build_Record_Init_Proc): Add condition to prevent the inheritance of
1066 the parent initialization procedure for derived Unchecked_Unions.
1067 Instead, derived Unchecked_Unions build their own initialization
1069 (Build_Variant_Record_Equality): Implement Unchecked_Union equality.
1070 Check the body of the subprogram for details.
1071 (Freeze_Record_Type): Prevent the inheritance of discriminant checking
1072 functions for derived Unchecked_Union types by introducing a condition.
1073 Allow the creation of TSS equality functions for Unchecked_Unions.
1074 (Make_Eq_Case): Rename formal parameter Node to E in function signature.
1075 Add formal parameter Discr to function signature. Discr is used to
1076 control the generated case statement for Unchecked_Union types.
1077 (Make_Eq_If): Rename formal parameter Node to E in function signature.
1079 * exp_ch4.adb (Build_Equality_Call): Implement equality calls for
1081 Check the body of the subprogram for details.
1082 (Expand_Composite_Equality): Augment composite type equality to include
1083 correct handling of Unchecked_Union components.
1084 (Expand_N_In): Add condition to detect illegal membership tests when the
1085 subtype mark is a constrained Unchecked_Union and the expression lacks
1086 inferable discriminants, and build a Raise_Program_Error node.
1087 (Expand_N_Op_Eq): Add function Has_Unconstrained_UU_Component. Used
1088 to detect types that contain components of unconstrained Unchecked_Union
1089 subtype. Add condition to detect equality between types that have an
1090 unconstrained Unchecked_Union component, and build a Raise_Program_Error
1091 node. Add condition to detect equality between Unchecked_Union types
1092 that lack inferable discriminants, and build a Raise_Program_Error node.
1093 Otherwise build a TSS equality function call.
1094 (Expand_N_Type_Conversion): Add condition to detect illegal conversions
1095 from a derived Unchecked_Union to an unconstrained non-Unchecked_Union
1096 with the operand lacking inferable discriminants, and build a Raise_
1098 (Expand_Record_Equality): Remove guard that prevents Unchecked_Union
1100 (Has_Inferable_Discriminants): Implement new predicate for objects and
1101 expressions of Unchecked_Union type. Check the body of subprogram for
1103 (Has_Unconstrained_UU_Components): Add function
1104 Component_Is_Unconstrained_UU. It is used to detect whether a single
1105 component is of an unconstrained Unchecked_Union subtype. Add function
1106 Variant_Is_Unconstrained_UU. It is used to detect whether a single
1107 component inside a variant is of an unconstrained Unchecked_Union type.
1109 * exp_ch5.adb (Expand_Assign_Record): Add condition to copy the
1110 inferred discriminant values. Add condition to generate a case
1111 statement with an inferred discriminant as the switch.
1112 (Make_Component_List_Assign): Introduce a Boolean flag that determines
1113 the behaviour of the subprogram in the presence of an Unchecked_Union.
1114 Add condition to trigger the usage of the inferred discriminant value
1115 as the generated case statement switch.
1116 (Make_Field_Assign): Introduce a Boolean flag that determines the
1117 behaviour of the subprogram in the presence of an Unchecked_Union. Add
1118 condition to trigger the usage of the inferred discriminant value as
1119 the right-hand side of the generated assignment.
1121 * exp_ch6.adb (Expand_Call): Add condition to skip extra actual
1122 parameter generation when dealing with Unchecked_Unions.
1124 * checks.adb (Apply_Discriminant_Check): Do not apply discriminant
1125 checks for Unchecked_Unions.
1127 * einfo.ads: Update comment on usage of flag Has_Per_Object_Constraint
1129 * exp_attr.adb (Expand_N_Attribute_Reference): Produce
1130 Raise_Program_Error nodes for the execution of Read and Write
1131 attributes of Unchecked_Union types and the execution of Input and
1132 Output attributes of Unchecked_Union types that lack default
1133 discriminant values.
1135 * sem_prag.adb (Analyze_Pragma): Remodel the analysis of pragma
1136 Unchecked_Union. Add procedure Check_Component. It is used to inspect
1137 per-object constrained components of Unchecked_Unions for being
1138 Unchecked_Unions themselves. Add procedure Check_Variant. It is used to
1139 check individual components withing a variant.
1141 * sem_res.adb (Resolve_Comparison_Op): Remove guard that prevents
1142 comparison of Unchecked_Unions.
1143 (Resolve_Equality_OP): Remove guard that prevents equality between
1146 * sem_util.adb (Build_Component_Subtype): Add guard to prevent creation
1147 of component subtypes for Unchecked_Union components.
1148 (Get_Actual_Subtype): Add condition that returs the Unchecked_Union type
1149 since it is the actual subtype.
1151 * sem_ch12.adb (Instantiate_Type): Add condition to detect the correct
1152 pass of Unchecked_Union subtypes as generic actuals to formal types
1153 that lack known_discriminant_parts or that are derived Unchecked_Union
1154 types, and do nothing. In any other case, produce an error message.
1156 * sem_ch3.adb (Analyze_Component_Declaration): Add function
1157 Contains_POC. It determines whether a constraint uses the discriminant
1158 of an enclosing record type.
1159 Add condition to detect per-object constrained component and set the
1161 (Derived_Type_Declaration): Remove guard that prevents derivation from
1162 Unchecked_Union types.
1163 (Process_Subtype): Remove quard that prevents the creation of Unchecked_
1166 * sem_ch4.adb (Analyze_Selected_Component): Correct the detection of
1167 references to Unchecked_Union discriminants.
1169 * sem_ch6.adb (Create_Extra_Formals): Add condition to skip extra
1170 formal generation when dealing with Unchecked_Unions.
1171 (Set_Actual_Subtypes): Add condition to prevent generation of actual
1172 subtypes for Unchecked_Unions.
1174 * sem_ch7.adb (Analyze_Package_Specification): Add procedure
1175 Inspect_Unchecked_Union_Completion. It is used to detect incorrect
1176 completions of discriminated partial views by Unchecked_Unions and
1177 produce an error message.
1179 2004-08-09 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
1181 * trans.c (struct stmt_group): New field, GLOBAL.
1182 (global_stmt_group, gnu_elab_proc_decl, build_unit_elab): Deleted.
1183 (struct elab_info): New struct.
1184 (elab_info_list, gnu_elab_proc_stack): New variables.
1185 (Compilation_Unit_to_gnu): New procedure.
1186 (gigi): Call it and also handle elaboration procs we've saved.
1187 (gnat_init_stmt_group): Don't set global_stmt_group; instead initialize
1188 global field from parent.
1189 (gnat_to_gnu): Get decl from gnu_elab_proc_stack.
1190 (gnat_to_gnu, case N_Compilation_Unit): Call Compilation_Unit_to_gnu.
1191 (start_stmt_group): Initialize global field from parent.
1192 (add_decl_expr): Set to global for current statement group.
1193 (gnat_gimplify_expr, case NULL_EXPR): Add operand 0 to pre list, not
1196 * utils.c (global_bindings_p): True when no current_function_decl; no
1197 longer check current_binding_level.
1199 2004-08-09 Ben Brosgol <brosgol@gnat.com>
1201 * xgnatugn.adb: Added logic to deal with @ifset/@ifclear for edition
1204 * gnat_rm.texi, gnat_ugn.texi: Added edition conditionalization logic.
1206 2004-08-06 Andreas Schwab <schwab@suse.de>
1208 * utils.c (gnat_define_builtin): Remove second parameter of
1210 (begin_subprog_body): Likewise.
1212 2004-07-26 Arnaud Charlet <charlet@act-europe.fr>
1214 * sem_util.adb (Requires_Transient_Scope): Temporarily disable
1215 optimization, not supported by the tree-ssa back-end.
1217 2004-07-26 Olivier Hainque <hainque@act-europe.fr>
1219 * s-mastop-irix.adb: Update comments.
1221 * a-except.adb (Exception_Information): Raise Constraint_Error if
1222 exception Id is Null_Id.
1223 This is required behavior, which is more reliably and clearly checked
1224 at the top level interface level.
1226 2004-07-26 Javier Miranda <miranda@gnat.com>
1228 * exp_aggr.adb (Build_Array_Aggr_Code): Do not build the initialization
1229 call if a component has no default_expression and the box is used.
1231 * sem_aggr.adb (Resolve_Array_Aggregate): If a component has no
1232 default_expression and you use box, it behaves as if you had declared a
1234 (Resolve_Record_Aggregate): If a component has no default_expression and
1235 you use box, it behaves as if you had declared a stand-alone object.
1237 * sem_ch10.adb (Install_Siblings): Do not make visible the private
1238 entities of private-with siblings.
1240 2004-07-26 Ed Schonberg <schonberg@gnat.com>
1242 * sem_ch3.adb (Build_Underlying_Full_View): If this is the full view
1243 for a component of an itype, set the parent pointer for analysis,
1244 there is no list in which to insert it.
1246 * sem_res.adb (Resolve): Call Rewrite_Renamed_Operator only for
1247 bona-fide renamings, not for inherited operations.
1249 * exp_ch4.adb (Expand_Allocator_Expression): If the allocator is an
1250 actual for a formal that is an access parameter, create local
1251 finalization list even if the expression is not an aggregate.
1253 2004-07-26 Ed Schonberg <schonberg@gnat.com>
1256 * sem_ch8.adb (Attribute_Renaming, Check_Library_Level_Renaming):
1257 Diagnose properly illegal subprogram renamings that are library units.
1259 2004-07-26 Ed Schonberg <schonberg@gnat.com>
1262 * sem_util.adb (Is_OK_Variable_For_Out_Formal): If actual is a type
1263 conversion rewritten as an unchecked conversion, check that original
1264 expression is a variable.
1266 * exp_ch4.adb (Expand_N_Type_Conversion): If rewriting as an
1267 unchecked_conversion, create new node rather than rewriting in place,
1268 to preserve original construct.
1270 2004-07-26 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
1272 * gigi.h (gnat_expand_body): Deleted.
1274 * Make-lang.in: (trans.o): Depends on function.h.
1276 * misc.c: (gnat_expand_body): Moved to here.
1278 * trans.c (gnat_expand_body_1): Deleted.
1279 (gnat_expand_body): Moved from here.
1280 (gnat_to_gnu): N_Implicit_Label_Declaration forces being in elab proc.
1281 (add_stmt): Check for marked visited with global_bindings_p.
1282 (gnat_gimplify_expr, case COMPONENT_REF): New case.
1283 (gnat_gimplify_expr, case NULL_EXPR): Set TREE_NO_WARNING for temp.
1285 * utils2.c (build_binary_op, case MODIFY_EXPR): Put LHS in a
1286 VIEW_CONVERT_EXPR if not operation type.
1288 * utils.c (update_pointer_to): Set DECL_ORIGINAL_FIELD for
1291 * decl.c, cuintp.c, gigi.h, misc.c, trans.c, utils.c, utils2.c: Minor
1292 changes: reformatting of negation operators, removing unneeded
1293 inequality comparison with zero, converting equality comparisons with
1294 zero to negations, changing int/0/1 to bool/false/true, replace calls
1295 to gigi_abort with abort, and various other similar changes.
1297 2004-07-26 Vincent Celier <celier@gnat.com>
1299 * gnatcmd.adb (GNATCmd): Add processing for new built-in command
1302 * make.adb (Gnatmake): Fail when a library is not present and there is
1303 no object directory.
1305 * mlib-prj.adb (Check_Library): No need to check if the library needs
1306 to be rebuilt if there is no object directory, hence no object files
1307 to build the library.
1309 * opt.ads (Setup_Projects): New Boolean flag.
1311 * prj-nmsc.adb (Locate_Directory): New parameter Project, Kind and
1313 Create directory when Kind /= "" and in "gnat setup". Report error if
1314 directory cannot be created.
1315 (Ada_Check): Create library interface copy dir if it does not exist
1316 and we are in "gnat setup".
1317 (Find_Sources): No error if in "gnat setup" and no Ada sources were
1319 (Language_Independent_Check): Create object directory, exec directory
1320 and/or library directory if they do not exist and we are in
1323 * vms_conv.ads: (Command_Type): New command Setup.
1325 * vms_conv.adb (Initialize): Add Setup component of Cammand_List.
1327 * vms_data.ads: Add qualifiers/switches for new built-in command
1330 2004-07-25 Richard Henderson <rth@redhat.com>
1332 * utils.c (create_subprog_decl): Set DECL_ARTIFICIAL and
1333 DECL_IGNORED_P on RESULT_DECL.
1335 2004-07-20 Olivier Hainque <hainque@act-europe.fr>
1337 * a-elchha.adb (Last_Chance_Handler): Remove the bogus buffer dynamic
1338 allocation and potentially overflowing update with
1339 Tailored_Exception_Information. Use the sec-stack free procedural
1340 interface to output Exception_Information instead.
1342 * a-except.adb (To_Stderr): New subprogram for character, and string
1343 version moved from a-exextr to be visible from other separate units.
1344 (Tailored_Exception_Information): Remove the procedural version,
1345 previously used by the default Last_Chance_Handler and not any more.
1346 Adjust various comments.
1348 * a-exexda.adb: Generalize the exception information procedural
1349 interface, to minimize the use of secondary stack and the need for
1350 local buffers when the info is to be output to stderr:
1351 (Address_Image): Removed.
1352 (Append_Info_Character): New subprogram, checking for overflows and
1353 outputing to stderr if buffer to fill is of length 0.
1354 (Append_Info_String): Output to stderr if buffer to fill is of length 0.
1355 (Append_Info_Address, Append_Info_Exception_Name,
1356 Append_Info_Exception_Message, Append_Info_Basic_Exception_Information,
1357 Append_Info_Basic_Exception_Traceback,
1358 Append_Info_Exception_Information): New subprograms.
1359 (Append_Info_Nat, Append_Info_NL): Use Append_Info_Character.
1360 (Basic_Exception_Info_Maxlength, Basic_Exception_Tback_Maxlength,
1361 Exception_Info_Maxlength, Exception_Name_Length,
1362 Exception_Message_Length): New subprograms.
1363 (Exception_Information): Use Append_Info_Exception_Information.
1364 (Tailored_Exception_Information): Use
1365 Append_Info_Basic_Exception_Information.
1366 Export services for the default Last_Chance_Handler.
1368 * a-exextr.adb (To_Stderr): Remove. Now in a-except to be usable by
1369 other separate units.
1371 2004-07-20 Vincent Celier <celier@gnat.com>
1373 * clean.adb, mlib-utl.adb, osint.adb, makegpr.adb: Minor reformatting.
1375 2004-07-20 Ed Schonberg <schonberg@gnat.com>
1377 * freeze.adb (Freeze_Entity): If entity is a discriminated record type,
1378 emit itype references for the designated types of component types that
1379 are declared outside of the full record declaration, and that may
1380 denote a partial view of that record type.
1382 2004-07-20 Ed Schonberg <schonberg@gnat.com>
1385 * sem_ch3.adb (Build_Discriminated_Subtype): Do not attach a subtype
1386 which is the designated type in an access component declaration, to the
1387 list of incomplete dependents of the parent type, to avoid elaboration
1388 issues with out-of-scope subtypes.
1389 (Complete_Private_Subtype): Recompute Has_Unknown_Discriminants from the
1390 full view of the parent.
1392 2004-07-20 Ed Schonberg <schonberg@gnat.com>
1395 * sem_ch8.adb (Find_Expanded_Name): If name is overloaded, reject
1396 entities that are hidden, such as references to generic actuals
1397 outside an instance.
1399 2004-07-20 Javier Miranda <miranda@gnat.com>
1401 * sem_ch4.adb (Try_Object_Operation): New subprogram that gives
1402 support to the new notation.
1403 (Analyze_Selected_Component): Add call to Try_Object_Operation.
1405 2004-07-20 Jose Ruiz <ruiz@act-europe.fr>
1407 * s-taprob.adb: Adding the elaboration code required for initializing
1408 the tasking soft links that are common to the full and the restricted
1411 * s-tarest.adb (Init_RTS): Tasking soft links that are shared with the
1412 restricted run time has been moved to the package
1413 System.Soft_Links.Tasking.
1415 * s-tasini.adb (Init_RTS): Tasking soft links that are shared with the
1416 restricted run time has been moved to the package
1417 System.Soft_Links.Tasking.
1419 * Makefile.rtl: Add entry for s-solita.o in run-time library list.
1421 * s-solita.ads, s-solita.adb: New files.
1423 2004-07-20 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
1425 * trans.c (Identifier_to_gnu, Pragma_to_gnu, Attribute_to_gnu,
1426 Case_Statement_to_gnu): Split off from gnat_to_gnu.
1427 (Loop_Statement_to_gnu, Subprogram_Body_to_gnu, call_to_gnu,
1428 Handled_Sequence_Of_Statements_to_gnu, Exception_Handler_to_gnu_sjlj,
1429 Exception_Handler_to_gnu_zcx): Likewise.
1431 2004-07-17 Joseph S. Myers <jsm@polyomino.org.uk>
1433 * gigi.h (builtin_function): Declare.
1435 2004-07-15 Robert Dewar <dewar@gnat.com>
1437 * makegpr.adb, s-secsta.ads, sem_ch3.adb, sem_case.adb: Minor
1440 * gnat_ugn.texi: Add instantiation of direct_io or sequential_io with
1441 access values as an example of a warning.
1443 * gnat_rm.texi: Document new attribute Has_Access_Values
1445 * gnat-style.texi: Document that box comments belong on nested
1448 * sem_util.ads (Has_Access_Values): Improved documentation
1450 * s-finimp.ads, s-finimp.adb: Fix spelling error in comment
1452 * sem_prag.adb (Check_Duplicated_Export_Name): New procedure
1453 (Process_Interface_Name): Call to this new procedure
1454 (Set_Extended_Import_Export_External_Name): Call to this new procedure
1456 * s-mastop-x86.adb, 9drpc.adb: Fix spelling error in comment
1458 * a-direio.ads, a-sequio.ads: Warn if Element_Type has access values
1460 * einfo.ads: Minor comment typo fixed
1462 2004-07-15 Jose Ruiz <ruiz@act-europe.fr>
1464 * snames.adb: Add _atcb.
1466 * snames.ads: Add Name_uATCB.
1468 * s-tarest.adb (Create_Restricted_Task): ATCBs are always preallocated
1469 (in the expanded code) when using the restricted run time.
1471 * s-tarest.ads (Create_Restricted_Task): Created_Task transformed into
1472 a in parameter in order to allow ATCBs to be preallocated (in the
1475 * s-taskin.adb (Initialize_ATCB): T converted into a in parameter in
1476 order to allow ATCBs to be preallocated. In case of error, the ATCB is
1477 deallocated in System.Tasking.Stages.
1479 * s-taskin.ads (Initialize_ATCB): T converted into a in parameter in
1480 order to allow ATCBs to be preallocated.
1482 * s-tassta.adb (Create_Task): In case of error the ATCB is deallocated
1483 here. It was previously done in Initialize_ATCB.
1485 * rtsfind.ads: Make the Ada_Task_Control_Block visible.
1487 * exp_ch9.adb: Preallocate the Ada_Task_Control_Block when using the
1488 Restricted run time.
1490 * exp_ch3.adb: When using the Restricted run time, pass the
1491 preallocated Ada_Task_Control_Block when creating a task.
1493 2004-07-15 Ed Schonberg <schonberg@gnat.com>
1495 * sem_util.adb (Normalize_Actuals): If there are no actuals on a
1496 function call that is itself an actual in an enclosing call, diagnose
1497 problem here rather than assuming that resolution will catch it.
1499 * sem_ch7.adb (Analyze_Package_Specification): If the specification is
1500 the local copy of a generic unit for a formal package, and the generic
1501 is a child unit, install private part of ancestors before compiling
1502 private part of spec.
1504 * sem_cat.adb (Validate_Categorization_Dependency): Simplify code to
1505 use scope entities rather than tree structures, to handle properly
1506 parent units that are instances rewritten as bodies for inlining
1509 * sem_ch10.adb (Get_Parent_Entity, Implicit_With_On_Parent,
1510 Remove_Parents): Handle properly a parent unit that is an
1511 instantiation, when the unit has been rewritten as a body for inlining
1514 * par.adb (Goto_List): Global variable to collect goto statements in a
1515 given unit, for use in detecting natural loops.
1517 * par-ch5.adb (P_Goto_Statement): Add goto to global Goto_List, for
1518 use in detecting natural loops.
1520 * par-labl.adb (Find_Natural_Loops): Recognize loops create by
1521 backwards goto's, and rewrite as a infinite loop, to improve locality
1524 * exp_util.adb (Force_Evaluation): Recognize a left-hand side
1525 subcomponent that includes an indexed reference, to prevent the
1526 generation of copies that would miscompile the desired assignment
1528 (Build_Task_Image_Decls): Add a numeric suffix to
1529 generated name for string variable, to avoid spurious conflicts with
1530 the name of the type of a single protected object.
1532 * exp_ch4.adb (Expand_Array_Equality): If indices are distinct, use a
1533 loop with an explicit exit statement, to avoid generating an
1534 out-of-range value with 'Succ leading to spurious constraint_errors
1535 when compiling with -gnatVo.
1537 2004-07-15 Thomas Quinot <quinot@act-europe.fr>
1539 * sem_ch4.adb (Analyze_Slice): Always call Analyze on the prefix: it
1540 might not be analyzed yet, even if its Etype is already set (case of an
1541 unchecked conversion built using Unchecked_Convert_To, for example).
1542 If the prefix has already been analyzed, this will be a nop anyway.
1544 * exp_ch5.adb (Make_Tag_Ctrl_Assignment): For an assignment of a
1545 controller type, or an assignment of a record type with controlled
1546 components, copy only user data, and leave the finalization chain
1549 2004-07-15 Vincent Celier <celier@gnat.com>
1551 * make.adb (Collect_Arguments): Improve error message when attempting
1552 to compile a source not part of any project, when -x is not used.
1554 * prj.ads: (Defined_Variable_Kind): New subtype
1556 * prj-attr.adb (Register_New_Package): Two new procedures to register
1557 a package with or without its attributes.
1558 (Register_New_Attribute): Mew procedure to register a new attribute in a
1560 New attribute oriented subprograms: Attribute_Node_Id_Of,
1561 Attribute_Kind_Of, Set_Attribute_Kind_Of, Attribute_Name_Of,
1562 Variable_Kind_Of, Set_Variable_Kind_Of, Optional_Index_Of,
1564 New package oriented subprograms: Package_Node_Id_Of,
1565 Add_Unknown_Package, First_Attribute_Of, Add_Attribute.
1567 * prj-attr.ads (Attribute_Node_Id): Now a private, self initialized
1569 (Package_Node_Id): Now a private, self initialized type
1570 (Register_New_Package): New procedure to register a package with its
1572 New attribute oriented subprograms: Attribute_Node_Id_Of,
1573 Attribute_Kind_Of, Set_Attribute_Kind_Of, Attribute_Name_Of,
1574 Variable_Kind_Of, Set_Variable_Kind_Of, Optional_Index_Of,
1576 New package oriented subprograms: Package_Node_Id_Of,
1577 Add_Unknown_Package, First_Attribute_Of, Add_Attribute.
1579 * prj-dect.adb (Parse_Attribute_Declaration,
1580 Parse_Package_Declaration): Adapt to new spec of Prj.Attr.
1582 * prj-makr.adb (Make): Parse existing project file before creating
1583 other files. Fail if there was an error during parsing.
1585 * prj-proc.adb (Add_Attributes, Process_Declarative_Items): Adapt to
1586 new spec of Prj.Attr.
1588 * prj-strt.adb (Attribute_Reference, Parse_Variable_Reference): Adapt
1589 to new spec of Prj.Attr.
1591 2004-07-15 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
1593 * utils2.c: Fix typo in comment.
1595 2004-07-14 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
1597 * trans.c (add_decl_expr): Clear TREE_READONLY if clear DECL_INITIAL.
1598 * utils.c (unchecked_convert): Don't do two VIEW_CONVERT_EXPRs.
1600 2004-07-14 Andreas Schwab <schwab@suse.de>
1602 * trans.c (gnat_init_stmt_group): Remove duplicate definition.
1604 2004-07-13 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
1606 * decl.c: (gnat_to_gnu_entity, object case): Convert initializer to
1608 (gnat_to_gnu_entity, case E_Record_Subtype): Properly set
1611 * misc.c (gnat_types_compatible_p): New function.
1612 (LANG_HOOKS_TYPES_COMPATIBLE_P): New hook, to use it.
1613 (LANG_HOOKS_TYPE_MAX_SIZE, gnat_type_max_size): New.
1615 * trans.c (gigi): Move processing of main N_Compilation_Unit here.
1616 (gnat_to_gnu, case N_Compilation_Unit): Just handle nested case here.
1617 (add_stmt): Force walking of sizes and DECL_INITIAL for DECL_EXPR.
1618 (mark_visited): Don't mark dummy type.
1619 (tree_transform <N_Procedure_Call_Statement>): Unless this is an In
1620 parameter, we must remove any LJM building from GNU_NAME.
1621 (gnat_to_gnu, case N_String_Literal): Fill in indices in CONSTRUCTOR.
1622 (pos_to_constructor): Use int_const_binop.
1623 (gnat_to_gnu, case N_Identifier): Don't reference DECL_INITIAL of
1626 * utils.c (gnat_init_decl_processing): Don't make two "void" decls.
1627 (gnat_pushlevel): Set TREE_USE on BLOCK node.
1628 (gnat_install_builtins): Add __builtin_memset.
1630 2004-07-13 Olivier Hainque <hainque@act-europe.fr>
1632 * decl.c (gnat_to_gnu_entity <E_Variable>): If we are making a pointer
1633 for a renaming, stabilize the initialization expression if we are at a
1634 local level. At the local level, uses of the renaming may be performed
1635 by a direct dereference of the initializing expression, and we don't
1636 want possible variables there to be evaluated for every use.
1638 * trans.c (gnat_stabilize_reference, gnat_stabilize_reference_1):
1639 Propagate TREE_SIDE_EFFECTS and TREE_THIS_VOLATILE to avoid loosing
1640 them on the way. Account for the fact that we may introduce side
1641 effects in the process.
1643 2004-07-13 Richard Henderson <rth@redhat.com>
1645 * misc.c (default_pass_by_ref): Use pass_by_reference.
1647 2004-07-11 Joseph S. Myers <jsm@polyomino.org.uk>
1649 * misc.c (LANG_HOOKS_CLEAR_BINDING_STACK, LANG_HOOKS_PUSHLEVEL,
1650 LANG_HOOKS_POPLEVEL, LANG_HOOKS_SET_BLOCK): Remove.
1652 2004-07-08 Richard Henderson <rth@redhat.com>
1654 * trans.c (gnat_to_gnu <N_Handled_Sequence_Of_Statements>): Update
1657 2004-07-06 Vincent Celier <celier@gnat.com>
1659 * vms_conv.ads: Minor reformatting.
1660 Alphabetical order for enumerated values of type Command_Type, to have
1661 the command in alphabetical order for the usage.
1663 * vms_conv.adb (Process_Argument): Set Keep_Temporary_Files to True for
1664 the special qualifier /KEEP_TEMPORARY_FILES (minimum 6 characters).
1666 * gnat_ugn.texi: Document new switch -dn for the GNAT driver.
1668 * makegpr.adb (Global_Archive_Exists): New global Boolean variable
1669 (Add_Archive_Path): Only add the global archive if there is one.
1670 (Build_Global_Archive): Set Global_Archive_Exists depending if there is
1671 or not any object file to put in the global archive, and don't build
1672 a global archive if there is none.
1673 (X_Switches): New table
1674 (Compile_Link_With_Gnatmake): Pass to gnatmake the -X switches stored
1675 in the X_Switches table, if any.
1676 (Initialize): Make sure the X_Switches table is empty
1677 (Scan_Arg): Record -X switches in table X_Switches
1679 * opt.ads (Keep_Temporary_Files): New Boolean flag, defaulted to False.
1681 * make.adb: Minor comment fix
1683 * gnatname.adb (Gnatname): When not on VMS, and gnatname has been
1684 invoked with directory information, add the directory in front of the
1687 * gnatchop.adb (Gnatchop): When not on VMS, and gnatchop has been
1688 invoked with directory information, add the directory in front of the
1691 * gnatcmd.adb (Delete_Temp_Config_Files): Only delete temporary files
1692 when Keep_Temporary_Files is False.
1693 (GNATCmd): When not on VMS, and the GNAT driver has been invoked with
1694 directory information, add the directory in front of the path.
1695 When not on VMS, handle new switch -dn before the command to set
1696 Keep_Temporary_Files to True.
1697 (Non_VMS_Usage): Use lower case for the non VMS usage: this is valid
1700 * gnatlink.adb (Gnatlink): When not on VMS, and gnatlink has been
1701 invoked with directory information, add the directory in front of the
1704 2004-07-06 Thomas Quinot <quinot@act-europe.fr>
1706 * snames.ads, snames.adb (Name_Stub): New name for the distributed
1709 * rtsfind.ads: New RTE TC_Object, for DSA/PolyORB.
1710 New RTEs RAS_Proxy_Type and RAS_Proxy_Type_Access, for DSA.
1712 * g-socket.adb (To_Timeval): Fix incorrect conversion of
1713 Selector_Duration to Timeval for the case of 0.0.
1715 * exp_util.ads (Evolve_Or_Else): Fix overenthusiastic copy/paste of
1716 documentation from Evolve_And_Then.
1718 2004-07-06 Jose Ruiz <ruiz@act-europe.fr>
1720 * s-taprop-tru64.adb, s-taprop-os2.adb,
1721 s-taprop-mingw.adb, s-taprop-posix.adb: Update comment.
1723 2004-07-06 Robert Dewar <dewar@gnat.com>
1725 * s-osinte-hpux.ads, s-osinte-freebsd.ads,
1726 s-osinte-lynxos.ads, s-taprop-lynxos.adb, s-osinte-tru64.ads,
1727 s-osinte-aix.ads, s-osinte-irix.ads, s-taprop-irix.adb,
1728 s-interr-sigaction.adb, s-taprop-irix-athread.adb,
1729 s-osinte-hpux-dce.adb, s-taprop-hpux-dce.adb,
1730 s-taprop-linux.adb, s-taprop-dummy.adb, s-taprop-solaris.adb,
1731 s-interr-vms.adb, s-osinte-vms.ads, s-taprop-vms.adb,
1732 s-osinte-vxworks.ads, s-osprim-vxworks.adb, a-numaux-x86.adb,
1733 a-except.adb, a-exexpr.adb, a-intsig.adb, a-tags.adb,
1734 a-tags.ads, bindgen.ads, checks.adb, checks.adb,
1735 csets.ads, einfo.ads, einfo.ads, elists.adb, exp_ch4.adb,
1736 exp_ch7.adb, exp_dist.adb, exp_util.adb, freeze.adb,
1737 g-dynhta.adb, gnatmem.adb, g-regexp.adb, inline.adb,
1738 i-os2thr.ads, osint.adb, prj.adb, scng.adb, sem_cat.adb,
1739 sem_ch10.adb, sem_ch12.adb, sem_ch4.adb, sem_ch7.adb,
1740 sem_ch8.adb, sem_disp.adb, sem_prag.adb, sem_res.adb,
1741 sem_type.adb, sem_type.ads, sem_warn.adb, s-ficobl.ads,
1742 s-finimp.adb, s-htable.adb, sinfo.ads, sinput-l.ads,
1743 s-interr.adb, s-interr.ads, sprint.adb, s-tarest.adb,
1744 s-tasini.ads, s-taskin.ads, s-taskin.ads, uname.adb,
1745 vms_data.ads: Minor reformatting,
1746 Fix bad box comment format.
1748 * gnat_rm.texi: Fix minor grammatical error
1750 * sem_attr.adb, exp_attr.adb: New attribute Has_Access_Values
1752 * sem_util.ads, sem_util.adb (Requires_Transient_Scope): Allow many
1753 more cases of discriminated records to be recognized as not needing a
1755 (Has_Access_Values): New function.
1757 * snames.h, snames.adb, snames.ads: New attribute Has_Access_Values
1759 * cstand.adb, layout.ads, layout.adb, sem_ch13.ads: Change name
1760 Set_Prim_Alignment to Set_Elem_Alignment (more accurate correspondence
1761 with LRM terminology).
1762 Change terminology in comments primitive type => elementary type.
1764 2004-07-06 Ed Schonberg <schonberg@gnat.com>
1767 * sem_ch7.adb (Unit_Requires_Body): For a generic package, the formal
1768 parameters do not impose any requirements on the presence of a body.
1770 2004-07-06 Ed Schonberg <schonberg@gnat.com>
1773 * sem_ch12.adb (Analyze_Package_Instantiation): If the generic is not a
1774 compilation unit and is in an open scope at the point of instantiation,
1775 assume that a body may be present later.
1777 2004-07-06 Ed Schonberg <schonberg@gnat.com>
1779 * sem_ch13.adb (Analyze_Attribute_Definition_Clause, case 'Size):
1780 Improve error message when specified size is not supported.
1782 * sem_ch6.adb (Maybe_Primitive_Operation): A library-level subprogram
1783 is never a primitive operation.
1785 2004-07-05 Andreas Schwab <schwab@suse.de>
1787 * ada-tree.h (TYPE_LEFT_JUSTIFIED_MODULAR_P): Use
1788 RECORD_OR_UNION_CHECK.
1789 (TYPE_CONTAINS_TEMPLATE_P): Likewise.
1791 2004-07-04 Kelley Cook <kcook@gcc.gnu.org>
1793 * Make-lang.in (doc/gnat_ugn_unw.texi): Eliminate explicit
1794 dependency on xgnatugn, instead build it via a submake.
1795 (ADA_INFOFILES): Add doc/gnat_ugn_unw.texi.
1797 2004-07-04 Richard Henderson <rth@redhat.com>
1799 * utils2.c (gnat_mark_addressable): Don't put_var_into_stack.
1801 2004-07-01 Richard Henderson <rth@redhat.com>
1803 * trans.c (gnat_stabilize_reference): Don't handle RTL_EXPR.
1804 * utils.c (max_size): Likewise.
1806 2004-06-28 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
1808 * decl.c: Remove calls to add_decl_expr, pushdecl, rest_of_compilation,
1809 and rest_of_type_compilation; add arg to create_*_decl.
1810 (annotate_decl_with_node): Deleted.
1811 (gnat_to_gnu_entity, case E_Array_Type): Set location of fields.
1812 * gigi.h (get_decls, block_has_vars, pushdecl): Deleted.
1813 (get_current_block_context, gnat_pushdecl): New declarations.
1814 (gnat_init_stmt_group): Likewise.
1815 (create_var_decl, create_type_decl, create_subprog_decl): Add new arg.
1816 * misc.c (LANG_HOOKS_CLEAR_BINDING_STACK): Deleted.
1817 (LANG_HOOKS_GETDECLS, LANG_HOOKS_PUSHDECL): Deleted.
1818 (gnat_init): Call gnat_init_stmt_group.
1819 * trans.c (global_stmt_group, gnu_elab_proc_decl): New variables.
1820 (gnu_pending_elaboration_list): Deleted.
1821 (mark_visited, mark_unvisited, gnat_init_stmt_group): New functions.
1822 (gigi): Rearrange initialization calls and move some to last above.
1823 (gnat_to_gnu): If statement and not in procedure, go into elab proc.
1824 Delete calls to add_decl_expr; add arg to create_*_decl.
1825 (gnat_to_gnu, case N_Loop): Recalculate side effects on COND_EXPR.
1826 (gnat_to_gnu, case N_Subprogram_Body): Move some code to
1827 begin_subprog_body and call it.
1828 Don't push and pop ggc context.
1829 (gnat_to_gnu, case N_Compilation_Unit): Rework to support elab proc.
1830 (add_stmt): Remove handling of DECL_EXPR from here.
1831 If not in function, mark visited.
1832 (add_decl_expr): Put global at top level.
1833 Check for cases of DECL_INITIAL we have to handle here.
1834 (process_type): Add extra arg to create_type_decl.
1835 (build_unit_elab): Rework to just gimplify.
1836 * utils.c (pending_elaborations, elist_stack, getdecls): Deleted.
1837 (block_has_vars, mark_visited, add_pending_elaborations): Likewise.
1838 (get_pending_elaborations, pending_elaborations_p): Likewise.
1839 (push_pending_elaborations, pop_pending_elaborations): Likewise.
1840 (get_elaboration_location, insert_elaboration_list): Likewise.
1841 (gnat_binding_level): Renamed from ada_binding_level.
1842 (init_gnat_to_gnu): Don't clear pending_elaborations.
1843 (global_bindings_p): Treat as global if no current_binding_level.
1844 (set_current_block_context): New function.
1845 (gnat_pushdecl): Renamed from pushdecl; major rework.
1846 All callers changed.
1847 (create_type_decl, create_var_decl, create_subprog_decl): Add new arg.
1848 (finish_record_type): Call call pushdecl for stub decl.
1849 (function_nesting_depth): Deleted.
1850 (begin_subprog_body): Delete obsolete code.
1851 * utils2.c (build_call_alloc_dealloc): Add new arg to create_var_decl.
1853 2004-06-28 Robert Dewar <dewar@gnat.com>
1855 * mlib-tgt-tru64.adb, mlib-tgt-aix.adb, mlib-tgt-irix.adb,
1856 mlib-tgt-irix.adb, mlib-tgt-hpux.adb, mlib-tgt-linux.adb,
1857 mlib-tgt-linux.adb, mlib-tgt-solaris.adb, mlib-tgt-solaris.adb,
1858 mlib-tgt-vms-alpha.adb, mlib-tgt-vms-alpha.adb, mlib-tgt-vms-ia64.adb,
1859 a-strmap.adb, a-strmap.ads, clean.adb: Minor reformatting
1861 * exp_util.adb (Is_Possibly_Unaligned_Slice): Completely rewritten, to
1862 deal with problem of inefficient slices on machines with strict
1863 alignment, when the slice is a component of a composite.
1865 * checks.adb (Apply_Array_Size_Check): Do not special case 64-bit
1866 machines, we need the check there as well.
1868 2004-06-28 Ed Schonberg <schonberg@gnat.com>
1870 * exp_ch5.adb (Expand_Assign_Array): Use correct condition to
1871 determine safe copying direction for overlapping slice assignments
1872 when component is controlled.
1874 * sem_ch12.adb (Instantiate_Formal_Package): Implicit operations of a
1875 formal derived type in the actual for a formal package are visible in
1876 the enclosing instance.
1878 2004-06-28 Ed Schonberg <schonberg@gnat.com>
1881 * sem_util.adb (Trace_Components): Diagnose properly an illegal
1882 circularity involving a private type whose completion includes a
1883 self-referential component.
1884 (Enter_Name): Use Is_Inherited_Operation to distinguish a source
1885 renaming or an instantiation from an implicit derived operation.
1887 2004-06-28 Pascal Obry <obry@gnat.com>
1889 * mlib-tgt-mingw.adb: (Library_Exists_For): Remove "lib" prefix from
1891 (Library_File_Name_For): Idem.
1893 2004-06-28 Matthew Gingell <gingell@gnat.com>
1895 * g-traceb.ads: Add explanatory note on the format of addresses
1896 expected by addr2line.
1898 2004-06-28 Jerome Guitton <guitton@act-europe.fr>
1900 * Makefile.in: Force debugging information on s-tasdeb.adb,
1901 a-except.adb and s-assert.adb needed by the debugger.
1903 2004-06-28 Vincent Celier <celier@gnat.com>
1905 * make.adb (Collect_Arguments_And_Compile): Change Flag1 to
1909 * mlib-prj.adb (Check_Library): Replace Flag1 with Need_To_Build_Lib
1911 * prj.adb: Minor reformatting
1912 (Project_Empty): Change Flag1 to Need_To_Build_Lib. Remove Flag2.
1914 * prj.ads: Comment updates
1916 (Project_Data): Change Flag1 to Need_To_Build_Lib.
1917 Remove Flag2: not used.
1919 * prj-dect.adb (Parse_Declarative_Items): Accept "null" as a
1922 * gnat_ugn.texi: Put a "null;" declaration in one project file example
1924 * gnat_rm.texi: Document Empty declarations "null;".
1926 * makegpr.adb (Compile_Link_With_Gnatmake): Put the global archives in
1927 front of the linker options.
1928 (Link_Foreign): Put the global archives and the libraries in front of
1931 2004-06-28 Javier Miranda <miranda@gnat.com>
1933 * rtsfind.adb: (Get_Unit_Name): Fix typo in comment
1934 (RTU_Loaded): Code cleanup
1935 (Set_RTU_Loaded): New procedure to register as *loaded* explicitly
1936 withed predefined units.
1938 * rtsfind.ads (Set_RTU_Loaded): New procedure to register as *loaded*
1939 explicitly withed predefined units.
1942 * sem_ch10.adb (Analyze_Compilation_Unit): Register as *loaded*
1943 explicitly withed predefined units.
1945 2004-06-26 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
1947 * ada-tree.def (DECL_STMT): Deleted.
1948 * ada-tree.h (IS_ADA_STMT): Now test against STMT_STMT.
1949 (DECL_STMT_VAR): Deleted.
1950 * decl.c: add_decl_stmt now add_decl_expr.
1952 * trans.c: Likewise.
1953 (gnat_gimplify_type_sizes, gnat_gimplify_one_sizepos): Deleted.
1954 (gnat_to_gnu, case N_Subprogram_Body): Set cfun->function_end_locus.
1955 (add_stmt): Only handle padded type here.
1956 (add_stmt_with_node): Allow gnat_node to not be present.
1957 (gnat_gimplify_stmt, case USE_STMT): Set *STMT_P to null.
1958 (gnat_gimplify_stmt, case DECL_STMT): Deleted.
1959 (gnat_stabilize_reference_1): If COMPONENT_REF of fat pointer,
1960 make a SAVE_EXPR for the entire fat pointer.
1961 * utils.c (pushdecl): Walk a DECL_EXPR in global case.
1962 (create_index_type): Make a DECL_EXPR.
1963 (end_subprog_body): Don't call allocate_struct_function here but
1966 2004-06-25 Pascal Obry <obry@gnat.com>
1968 * makegpr.adb (Build_Library): Remove parameter Lib_Address and
1969 Relocatable from Build_Dynamic_Library call.
1971 * gnat_ugn.texi: Change documentation about Library_Kind. Dynamic and
1972 Relocatable are now synonym.
1974 * Makefile.in: Use s-parame-mingw.adb on MingW platform.
1976 * mlib-prj.adb (Build_Library): Remove DLL_Address constant definition.
1977 Remove parameter Lib_Address and Relocatable from Build_Dynamic_Library
1980 * mlib-tgt.ads, mlib-tgt.adb (Build_Dynamic_Library): Remove parameter
1981 Lib_Address and Relocatable.
1982 (Default_DLL_Address): Removed.
1984 * mlib-tgt-tru64.adb, mlib-tgt-aix.adb, mlib-tgt-irix.adb,
1985 mlib-tgt-hpux.adb, mlib-tgt-linux.adb, mlib-tgt-solaris.adb,
1986 mlib-tgt-vms-alpha.adb, mlib-tgt-vms-ia64.adb, mlib-tgt-vxworks.adb:
1987 (Build_Dynamic_Library): Remove parameter Lib_Address and Relocatable.
1988 (Default_DLL_Address): Removed.
1990 * mlib-tgt-mingw.adb: Ditto.
1991 (Build_Dynamic_Library): Do not add "lib" prefix to the DLL name.
1993 * s-taprop-mingw.adb (Create_Task): Use Adjust_Storage_Size to compute
1994 the initial thread stack size.
1996 * a-strmap.ads: Move package L to private part as it is not used in
1997 the spec. Found while reading code.
1999 2004-06-25 Olivier Hainque <hainque@act-europe.fr>
2001 * tracebak.c: Introduce support for a GCC infrastructure based
2002 implementation of __gnat_backtrace.
2004 * raise.c: Don't rely on a C mapping of the GNAT_GCC_Exception record
2005 any more. Use accessors instead. This eases maintenance and relaxes
2006 some alignment constraints.
2007 (_GNAT_Exception structure): Remove the Ada specific fields
2008 (EID_For, Adjust_N_Cleanups_For): New accessors, exported by
2010 (is_handled_by, __gnat_eh_personality): Replace component references to
2011 exception structure by use of the new accessors.
2013 * init.c (__gnat_initialize): Adjust comments to match the just
2014 reverted meaning of the -static link-time option.
2016 * adaint.c (convert_addresses): Arrange not to define a stub for
2017 mips-irix any more, as we now want to rely on a real version from a
2018 recent libaddr2line.
2020 * a-exexpr.adb: Provide new accessors to a GNAT_GCC occurrence, so that
2021 the personality routine can use them and not have to rely on a C
2022 counterpart of the record anymore. This simplifies maintenance and
2023 relaxes the constraint of having Standard'Maximum_Alignment match
2025 Update comments, and add a section on the common header alignment issue.
2027 2004-06-25 Geert Bosch <bosch@gnat.com>
2029 * a-ngelfu.adb (Tanh): Use full 20 digit precision for constants in
2030 polynomial approximation. Fixes inconsistency with Cody/Waite algorithm.
2032 2004-06-25 Robert Dewar <dewar@gnat.com>
2034 * gnat_rm.texi: Fix section on component clauses to indicate that the
2035 restriction on byte boundary placement still applies for bit packed
2037 Add comment on stack usage from Initialize_Scalars
2039 * gnat_ugn.texi: Add documentation for -gnatyLnnn
2041 * stylesw.ads, stylesw.adb: Implement new -gnatyLnnn option for
2042 limiting nesting level.
2044 * usage.adb: Add line for -gnatyLnnn switch
2046 * g-debpoo.ads, xtreeprs.adb, sinput.ads, sem_ch13.ads,
2047 sem_ch13.adb, exp_aggr.adb: Minor reformatting
2049 * sem_prag.adb (Process_Atomic_Shared_Volatile): Set Is_Atomic on base
2050 type as well as on the subtype. This corrects a problem in freeze in
2051 setting alignments of atomic types.
2053 * sem_eval.ads: Minor comment typo fixed
2055 * par-util.adb (Push_Scope_Stack): Check for violation of max nesting
2056 level. Minor reformatting.
2058 * fname.adb (Is_Predefined_File_Name): Require a letter after the
2059 minus sign. This means that file names like a--b.adb will not be
2060 considered predefined.
2062 * freeze.adb: Propagate new flag Must_Be_On_Byte_Boundary to containing
2063 record Test new flag and give diagnostic for bad component clause.
2064 (Freeze_Entity): Set alignment of array from component alignment in
2065 cases where this is safe to do.
2067 * exp_pakd.adb: Set new flag Must_Be_On_Byte_Boundary for large packed
2070 * cstand.adb: (Create_Standard): Set alignment of String to 1
2072 * einfo.ads, einfo.adb: Introduce new flag Must_Be_On_Byte_Boundary
2074 * exp_ch4.adb (Expand_Array_Equality): Improve efficiency of generated
2075 code in the common constrained array cases.
2077 * a-storio.adb: Change implementation to avoid possible alignment
2078 problems on machines requiring strict alignment (data should be moved
2079 as type Buffer, not type Elmt).
2081 * checks.adb (Apply_Array_Size_Check): Improve these checks by
2082 killing the overflow checks which we really do not need (64-bits is
2085 2004-06-25 Vincent Celier <celier@gnat.com>
2087 * makegpr.adb (Is_Included_In_Global_Archive): New Boolean function
2088 (Add_Archives.Recursive_Add_Archives): Call Add_Archive_Path
2089 inconditionally for the main project.
2090 (Recursive_Add_Archives.Add_Archive_Path): New procedure
2091 (Link_Executables.Check_Time_Stamps): New procedure
2092 (Link_Executables.Link_Foreign): New procedure
2093 Changes made to reduce nesting level of this package
2094 (Check): New procedure
2095 (Add_Switches): When not in quiet output, check that a switch is not
2096 the concatenation of several valid switches. If it is, issue a warning.
2097 (Build_Global_Archive): If the global archive is rebuilt, linking need
2099 (Compile_Sources): Rebuilding a library archive does not imply
2100 rebuilding the global archive.
2101 (Build_Global_Archive): New procedure
2102 (Build_Library): New name for Build_Archive, now only for library
2104 (Check_Archive_Builder): New procedure
2105 (Create_Global_Archive_Dependency_File): New procedure
2106 (Gprmake): Call Build_Global_Archive before linking
2107 * makegpr.adb: Use Other_Sources_Present instead of Sources_Present
2109 (Scan_Arg): Display the Copyright notice when -v is used
2111 * gnat_ugn.texi: Document new switch -files= (VMS qualifier /FILES=)
2114 * vms_data.ads: Add qualifier /MAX_NESTING=nnn (-gnatyLnnn) for GNAT
2116 Add new GNAT LIST qualifier /FILES=
2117 Added qualifier /DIRECTORY= to GNAT METRIC
2118 Added qualifier /FILES= to GNAT METRIC
2119 Added qualifier /FILES to GNAT PRETTY
2121 * switch.adb (Is_Front_End_Switch): Refine the test for --RTS or -fRTS,
2122 to take into account both versions of the switch.
2124 * switch-c.adb (Scan_Front_End_Switches): New switch -gnatez. Should
2125 always be the last switch to the gcc driver. Disable switch storing so
2126 that switches automatically added by the gcc driver are not put in the
2129 * prj.adb (Project_Empty): Take into account changes in components of
2132 * prj.ads (Languages_Processed): New enumaration value All_Languages.
2134 * prj.ads (Project_Data): Remove component Lib_Elaboration: never
2135 used. Split Boolean component Ada_Sources_Present in two Boolean
2136 components Ada_Sources_Present and Other_Sources_Present.
2139 * prj-env.adb (For_All_Source_Dirs.Add): Use Ada_Sources_Present
2140 instead of Sources_Present.
2141 (Set_Ada_Paths.Add.Recursive_Add): Ditto
2143 * prj-nmsc.adb: Minor reformatting
2144 (Check_Ada_Naming_Scheme): New name of procedure Check_Naming_Scheme
2145 (Check_Ada_Naming_Scheme_Validity): New name of previous procedure
2146 Check_Ada_Naming_Scheme.
2147 Change Sources_Present to Ada_Sources_Present or Other_Sources_Present
2150 * prj-part.adb (Post_Parse_Context_Clause): New Boolean parameter
2152 Make sure that all cycles where there is at least one "limited with"
2154 (Parse_Single_Project): New Boolean parameter In_Limited
2156 * prj-proc.adb (Recursive_Check): When Process_Languages is
2157 All_Languages, call first Prj.Nmsc.Ada_Check, then
2158 Prj.Nmsc.Other_Languages_Check.
2160 * prj-proc.adb (Process): Use Ada_Sources_Present or
2161 Other_Sources_Present (instead of Sources_Present) depending on
2164 * lang-specs.h: Keep -g and -m switches in the same order, and as the
2167 * lib.adb (Switch_Storing_Enabled): New global Boolean flag
2168 (Disable_Switch_Storing): New procedure. Set Switch_Storing_Enabled to
2170 (Store_Compilation_Switch): Do nothing if Switch_Storing_Enabled is
2173 * lib.ads (Disable_Switch_Storing): New procedure.
2175 * make.adb: Modifications to reduce nesting level of this package.
2176 (Check_Standard_Library): New procedure
2177 (Gnatmake.Check_Mains): New procedure
2178 (Gnatmake.Create_Binder_Mapping_File): New procedure
2179 (Compile_Sources.Compile): Add switch -gnatez as the last option
2180 (Display): Never display -gnatez
2183 When using $(MAIN_OBJECT), always use $(OBJ_DIR)/$(MAIN_OBJECT)
2185 * gnatcmd.adb (Check_Project): New function
2186 (Process_Link): New procedure to reduce nesting depth
2187 (Check_Files): New procedure to reduce the nesting depth.
2188 For GNAT METRIC, include the inherited sources in extending projects.
2189 (GNATCmd): When GNAT LS is invoked with a project file and no files,
2190 add the list of files from the sources of the project file. If this list
2191 is too long, put it in a temp text files and use switch -files=
2192 (Delete_Temp_Config_Files): Delete the temp text file that contains
2193 a list of source for gnatpp or gnatmetric, if one has been created.
2194 (GNATCmd): For GNAT METRIC and GNAT PRETTY, if the number of sources
2195 in the project file is too large, create a temporary text file that
2196 list them and pass it to the tool with "-files=<temp text file>".
2197 (GNATCmd): For GNAT METRIC add "-d=<abject dir>" as the first switch
2199 * gnatlink.adb (Gnatlink): Do not compile with --RTS= when the
2200 generated file is in not in Ada.
2202 * gnatls.adb: Remove all parameters And_Save that are no longer used.
2203 (Scan_Ls_Arg): Add processing for -files=
2204 (Usage): Add line for -files=
2206 * g-os_lib.adb (On_Windows): New global constant Boolean flag
2207 (Normalize_Pathname): When on Windows and the path starts with a
2208 directory separator, make sure that the resulting path will start with
2211 * clean.adb (Clean_Archive): New procedure
2212 (Clean_Project): When there is non-Ada code, delete the global archive,
2213 the archive dependency files, the object files and their dependency
2214 files, if they exist.
2215 (Gnatclean): Call Prj.Pars.Parse for All_Languages, not for Ada only.
2217 2004-06-25 Thomas Quinot <quinot@act-europe.fr>
2219 * sinfo.ads: Fix typo in comment.
2221 * sem_dist.adb (Process_Remote_AST_Attribute): Simplify code that uses
2222 the TSS for remote access-to-subprogram types, since these TSS are
2223 always present once the type has been analyzed.
2224 (RAS_E_Dereference): Same.
2226 * sem_attr.adb (Analyze_Attribute): When analysis of an attribute
2227 reference raises Bad_Attribute, mark the reference as analyzed so the
2228 node (and any children resulting from rewrites that could have occurred
2229 during the analysis that ultimately failed) is not analyzed again.
2231 * exp_ch7.ads (Find_Final_List): Fix misaligned comment.
2233 * exp_dist.adb: Minor comment fix.
2235 * exp_ch4.adb (Expand_N_Allocator): For an allocator whose expected
2236 type is an anonymous access type, no unchecked deallocation of the
2237 allocated object can occur. If the object is controlled, attach it with
2238 a count of 1. This allows attachment to the Global_Final_List, if
2239 no other relevant list is available.
2240 (Get_Allocator_Final_List): For an anonymous access type that is
2241 the type of a discriminant or record component, the corresponding
2242 finalisation list is the one of the scope of the type.
2244 2004-06-25 Ed Schonberg <schonberg@gnat.com>
2246 * sem_ch3.adb (Replace_Type): When computing the signature of an
2247 inherited subprogram, use the first subtype if the derived type
2248 declaration has no constraint.
2250 * exp_ch6.adb (Add_Call_By_Copy_Code): Check that formal is an array
2251 before applying previous optimization. Minor code cleanup.
2253 * exp_util.adb (Is_Possibly_Unaligned_Slice): If the component is
2254 placed at the beginning of an unpacked record without explicit
2255 alignment, a slice of it will be aligned and does not need a copy when
2258 2004-06-25 Ed Schonberg <schonberg@gnat.com>
2262 * sem_ch8.adb (Attribute_Renaming): Reject renaming if the attribute
2263 reference is written with expressions mimicking parameters.
2265 2004-06-25 Hristian Kirtchev <kirtchev@gnat.com>
2268 * sem_ch3.adb (Build_Derived_Record_Type): Add additional check to
2269 STEP 2a. The constraints of a full type declaration of a derived record
2270 type are checked for conformance with those declared in the
2271 corresponding private extension declaration. The message
2272 "not conformant with previous declaration" is emitted if an error is
2275 2004-06-25 Vasiliy Fofanov <fofanov@act-europe.fr>
2277 * g-traceb.ads: Document the need for -E binder switch in the spec.
2279 * g-trasym.ads: Document the need for -E binder switch in the spec.
2281 2004-06-25 Jose Ruiz <ruiz@act-europe.fr>
2283 * sem_prag.adb: Add handling of pragma Detect_Blocking.
2285 * snames.h, snames.ads, snames.adb: Add entry for pragma
2288 * s-rident.ads: Change reference to pragma Detect_Blocking.
2290 * targparm.ads, targparm.adb: Allow pragma Detect_Blocking in
2293 * opt.ads (Detect_Blocking): New Boolean variable (defaulted to False)
2294 to indicate whether pragma Detect_Blocking is active.
2296 * par-prag.adb: Add entry for pragma Detect_Blocking.
2298 * rtsfind.adb (RTU_Loaded): Fix the temporary kludge to get past bug
2299 of not handling WITH.
2300 Note that this replaces the previous update which was incorrect.
2302 2004-06-25 Javier Miranda <miranda@gnat.com>
2304 * sem_ch10.adb (Re_Install_Use_Clauses): Force the installation of the
2305 use-clauses to have a clean environment.
2307 * sem_ch8.adb (Install_Use_Clauses): Addition of a new formal to force
2308 the installation of the use-clauses to stablish a clean environment in
2309 case of compilation of a separate unit; otherwise the call to
2310 use_one_package is protected by the barrier Applicable_Use.
2312 * sem_ch8.ads (Install_Use_Clauses): Addition of a new formal to force
2313 the installation of the use-clauses to stablish a clean environment in
2314 case of compilation of a separate unit.
2315 (End_Use_Clauses): Minor comment cleanup.
2317 2004-06-25 Sergey Rybin <rybin@act-europe.fr>
2319 * gnat_ugn.texi: Add description of the gnatpp 'files' switch
2321 2004-06-23 Richard Henderson <rth@redhat.com>
2323 * trans.c (gnat_gimplify_stmt): Update gimplify_type_sizes call.
2325 2004-06-20 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
2327 * decl.c (elaborate_expression, elaborate_expression_1): Arguments
2328 now bool instead of int.
2329 (gnat_to_gnu_entity, elaborate_expression_1): New arg to COMPONENT_REF.
2330 * trans.c (gnu_switch_label_stack): New function.
2331 (gnat_to_gnu, N_Object_Renaming_Declaration): Result is what the
2332 elaboration of renamed entity returns.
2333 (gnat_to_gnu, case N_Case_Statement): Add branches to end label.
2334 (add_decl_stmt): Don't add TYPE_DECL for UNCONSTRAINED_ARRAY_TYPE.
2335 (gnat_gimplify_stmt): Use alloc_stmt_list, not build_empty_stmt.
2336 (gnat_gimplify_stmt, case DECL_STMT): gimplify DECL_SIZE and
2337 DECL_SIZE_UNIT and simplify variable-sized case.
2338 (gnat_gimplify_type_sizes, gnat_gimplify_one_sizepos): Deleted.
2339 Callers changes to call gimplify_type_sizes and gimplify_one_sizepos.
2340 (gnat_stabilize_reference): Add arg to COMPONENT_REF.
2341 (build_unit_elab): Disable for now.
2342 * utils.c (mark_visited): New function.
2343 (pushdecl): Walk tree to call it for global decl.
2344 (update_pointer_to): Update all variants of pointer and ref types.
2345 Add arg to COMPONENT_REF.
2346 (convert): Likewise.
2347 Move check for converting between variants lower down.
2348 * utils2.c (build_simple_component_ref): Add arg to COMPONENT_REF.
2349 (build_allocator): Don't force type of MODIFY_EXPR.
2350 (gnat_mark_addressable, case VAR_DECL): Unconditionally call
2353 2004-06-14 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
2355 * ada-tree.def (LOOP_STMT, EXIT_STMT): Update documentation.
2356 * ada-tree.h (EXIT_STMT_LABEL): Renamed from EXIT_STMT_LOOP.
2357 * decl.c (gnat_to_gnu_entity): Also set force_global for imported
2359 * trans.c (gnu_loop_label_stack): Renamed from gnu_loop_stmt_stack;
2360 all callers changed.
2361 (gnat_to_gnu, case N_Loop_Statement, case N_Exit_Statement): Change
2362 the way that EXIT_STMT finds the loop label.
2363 (gnat_gimplify_stmt, case LOOP_STMT, EXIT_STMT): Likewise.
2364 (gnat_gimplify_stmt, case DECL_STMT): Handle variable-sized decls here.
2365 (add_stmt): Use annotate_with_locus insted of setting directly.
2366 (pos_to_construct): Set TREE_PURPOSE of each entry to index.
2367 (gnat_stabilize_reference, case ARRAY_RANGE_REF): Merge with ARRAY_REF.
2368 * utils.c (gnat_install_builtins): Install __builtin_memcmp.
2369 (build_vms_descriptor): Add extra args to ARRAY_REF.
2370 (convert): Use VIEW_CONVERT_EXPR between aggregate types.
2371 * utils2.c (gnat_truthvalue_conversion, case INTEGER_CST, REAL_CST):
2373 (build_binary_op): Don't make explicit CONVERT_EXPR.
2374 Add extra rgs to ARRAY_REF.
2376 2004-06-14 Pascal Obry <obry@gnat.com>
2378 * gnat_ugn.texi: Document relocatable vs. dynamic Library_Kind on
2379 Windows. Fix minor typo.
2381 * mlib-tgt-mingw.adb: New implementation using the GCC -shared option
2382 which is now supported on Windows. With this implementation using the
2383 Library Project feature is no different on Windows than on UNIX.
2385 2004-06-14 Vincent Celier <celier@gnat.com>
2387 * makegpr.adb (Compile_Sources): Nothing to do when there are no
2390 * mlib-tgt-vxworks.adb (Library_Exists_For): Remove incorrect comment
2392 * prj-part.adb (Parse_Single_Project): When a duplicate project name is
2393 found, show the project name and the path of the previously parsed
2396 2004-06-14 Ed Schonberg <schonberg@gnat.com>
2398 * exp_ch6.adb (Add_Call_By_Copy_Code): For an out-parameter that is an
2399 array, avoid copying the actual before the call.
2401 2004-06-14 Thomas Quinot <quinot@act-europe.fr>
2403 * g-debpoo.adb: Remove alignment assumptions from GNAT.Debug_Pools.
2404 Instead, allocate memory on worst-case alignment assumptions, and then
2405 return an aligned address within the allocated zone.
2407 2004-06-14 Robert Dewar <dewar@gnat.com>
2409 * bindgen.adb (Gen_Adainit_Ada): Do not generate external references to
2410 elab entities in predefined units in No_Run_Time_Mode.
2411 (Gen_Adainit_C): Same fix
2412 (Gen_Elab_Calls_Ada): Do not generate calls to elaborate predefined
2413 units in No_Run_Time_Mode
2414 (Gen_Elab_Calls_C): Same fix
2416 * symbols-vms-alpha.adb: Minor reformatting
2418 * g-debpoo.ads: Minor reformatting
2420 * lib.adb (In_Same_Extended_Unit): Version working on node id's
2422 * lib.ads (In_Same_Extended_Unit): Version working on node id's
2424 * lib-xref.adb: Minor cleanup, use new version of In_Same_Extended_Unit
2427 * make.adb: Minor reformatting
2429 * par-ch12.adb: Minor reformatting
2431 * par-prag.adb: Add dummy entry for pragma Profile_Warnings
2433 * prj-strt.adb: Minor reformatting
2435 * restrict.ads, restrict.adb: Redo handling of profile restrictions to
2438 * sem_attr.adb: Minor reformatting
2440 * sem_ch7.adb: Minor reformatting
2442 * sem_elab.adb (Check_A_Call): Deal with problem of calling init proc
2443 for type in the same unit as the object declaration.
2445 * sem_prag.adb (Check_Arg_Is_External_Name): New procedure, allows
2446 static string expressions and not just string literals.
2448 (Set_Warning): Reset restriction warning flag for restriction pragma
2449 Implement pragma Profile_Warnings
2450 Implement pragma Profile (Restricted)
2451 Give obolescent messages for old restrictions and pragmas
2453 * snames.h, snames.ads, snames.adb: Add new entry for pragma
2456 * s-rident.ads: Add declarations for restrictions required by profile
2457 Restricted and profile Ravenscar.
2459 * targparm.ads, targparm.adb: Allow pragma Profile in system.ads
2461 * gnat_ugn.texi: Correct some missing entries in the list of GNAT
2462 configuration pragmas.
2464 2004-06-11 Vincent Celier <celier@gnat.com>
2466 * mlib-tgt-vms-alpha.adb (Build_Dynamic_Library): Issue switch -R to
2467 gnatsym, when symbol policy is Restricted.
2469 * mlib-tgt-vms-ia64.adb (Build_Dynamic_Library): Issue switch -R to
2470 gnatsym, when symbol policy is Restricted.
2472 * symbols-vms-alpha.adb (Initialize): When symbol policy is Restricted,
2473 read the symbol file.
2474 (Finalize): Fail in symbol policy Restricted if a symbol in the original
2475 symbol file is not in the object files. Do not create a new symbol file
2476 when symbol policy is Restricted.
2478 * gnatbind.adb (Gnatbind): Initialize Snames, because Snames is used
2481 * gnatsym.adb (Parse_Vmd_Line): Process new switch -R for symbol policy
2483 (Usage): Line for new switch -R
2485 * make.adb (Initialize): When the platform is not VMS, add the
2486 directory where gnatmake is invoked in the front of the path, if
2487 gnatmake is invoked with directory information. Change the Scan_Args
2488 while loop to a for loop.
2489 (Recursive_Compute_Depth): Remove parameter Visited. Improve efficiency:
2490 if Depth is equal or greater than the proposed depth, there is nothing
2492 (Initialize): Call Recursive_Compute_Depth with initial Depth equal to 1
2495 * prj.ads: Add new symbol policy Restricted.
2497 * prj-dect.adb (Parse_Case_Construction): Call End_Case_Construction
2498 with the new parameters Check_All_Labels and Case_Location.
2500 * prj-nmsc.adb (Ada_Check): Process new symbol policy Restricted
2501 (Library_Symbol_File needs to be defined).
2503 * prj-strt.adb (End_Case_Construction): New parameters Check_All_Labels
2504 and Case_Location If Check_All_Labels is True, check that all values of
2505 the string type are used, and output warning(s) if they are not.
2507 * prj-strt.ads (End_Case_Construction): New parameters Check_All_Labels
2510 * gnat_ugn.texi: Reorder subclauses in menus "Switches for gcc"
2512 * gnat_ugn.texi: Update documentation about the library directory in
2515 * makegpr.adb (Display_Command): In verbose mode, also display the
2516 value of the CPATH env var, when the compiler is gcc.
2517 (Initialize): Change the Scan_Args while loop to a for loop
2518 (Compile_Individual_Sources): Change directory to object directory
2519 before compilations.
2521 * symbols.ads: New symbol policy Restricted.
2523 2004-06-11 Olivier Hainque <hainque@act-europe.fr>
2525 * a-except.adb (Raise_After_Setup family): Remove. The responsibility
2526 is now taken care of internally in the Exception_Propagation package
2527 and does not require clients assistance any more.
2529 * a-exexpr.adb (Is_Setup_And_Not_Propagated,
2530 Set_Setup_And_Not_Propagated, and Clear_Setup_And_Not_Propagated): New
2531 functions. Helpers to maintain a predicate required in the handling of
2532 occurrence transfer between tasks.
2533 This is now handled internally and does not require clients assistance
2534 for the setup/propagate separation anymore.
2535 (Setup_Exception, Propagate_Exception): Simplify the Private_Data
2536 allocation strategy, handle the Setup_And_Not_Propagated predicate and
2539 * s-taenca.adb (Check_Exception): Use raise_with_msg instead of
2540 raise_after_setup, now that everything is handled internally within the
2541 setup/propagation engine.
2543 2004-06-11 Hristian Kirtchev <kirtchev@gnat.com>
2545 * exp_ch6.adb (Expand_Inlined_Call): Add function Formal_Is_Used_Once.
2546 Add additional conditions for the case of an actual being a simple
2547 name or literal. Improve inlining by preventing the generation
2548 of temporaries with a short lifetime (one use).
2550 2004-06-11 Hristian Kirtchev <kirtchev@gnat.com>
2554 * einfo.ads: Minor comment updates for Has_Completion and
2555 E_Constant list of flags.
2557 * sem_ch3.adb (Analyze_Object_Declaration): Full constant declarations
2558 and constant redeclarations now set the Has_Completion flag of their
2559 defining identifiers.
2561 * sem_ch7.adb (Analyze_Package_Spec): Add procedure
2562 Inspect_Deferred_Constant_Completion.
2563 Used to detect private deferred constants that have not been completed
2564 either by a constant redeclaration or pragma Import. Emits error message
2565 "constant declaration requires initialization expression".
2567 * sem_prag.adb (Process_Import_Or_Interface): An Import pragma now
2568 completes a deferred constant.
2570 2004-06-11 Geert Bosch <bosch@gnat.com>
2572 * eval_fat.adb (Decompose_Int): Fix rounding of negative numbers.
2574 * s-fatgen.adb (Gradual_Scaling): Correct off-by-one error in
2575 calculating exponent for scaling denormal numbers.
2576 (Leading_Part): Properly raise Constraint_Error for zero or negative
2578 (Remainder): Properly raise Constraint_Error for zero divisor.
2580 2004-06-11 Thomas Quinot <quinot@act-europe.fr>
2582 * sem_util.adb: Minor reformatting.
2584 * exp_ch2.adb (Expand_Entry_Parameter): Generate an explicit
2585 dereference when accessing the entry parameter record.
2586 (Check_Array_Type): Always check for possible implicit dereference.
2587 (maybe_implicit_dereference): Rename to check_no_implicit_derefence.
2588 Abort if a pointer is still present (denoting that an implicit
2589 dereference was left in the tree by the front-end).
2591 * sem_attr.adb (Expand_Entry_Parameter): Generate an explicit
2592 dereference when accessing the entry parameter record.
2593 (Check_Array_Type): Always check for possible implicit dereference.
2594 (maybe_implicit_dereference): Rename to check_no_implicit_derefence.
2595 Abort if a pointer is still present (denoting that an implicit
2596 dereference was left in the tree by the front-end).
2598 2004-06-11 Emmanuel Briot <briot@act-europe.fr>
2600 * g-debpoo.adb (Deallocate, Dereference): Add prefix "error:" to error
2601 message, like the compiler itself does. Easier to parse the output.
2603 * g-debpoo.ads: (Allocate, Deallocate, Dereference): Add comments.
2605 * gnat_ugn.texi (gnatxref, gnatfind): Clarify that source names should
2606 be base names, and not includes directories.
2608 2004-06-11 Arnaud Charlet <charlet@act-europe.fr>
2610 * Makefile.generic ($(EXEC)): Depend on $(OBJECTS), not $(OBJ_FILES),
2611 so that dependencies are properly taken into account by make.
2613 2004-06-11 Arnaud Charlet <charlet@act-europe.fr>
2616 * s-unstyp.ads, s-maccod.ads, sem_ch8.adb, s-auxdec.ads,
2617 exp_intr.adb, s-auxdec-vms_64.ads: Fix typo: instrinsic -> intrinsic
2619 2004-06-11 Jerome Guitton <guitton@act-europe.fr>
2621 * Makefile.in (install-gnatlib): install target-specific run-time files.
2623 * Make-lang.in: Remove obsolete targets.
2625 2004-06-11 Ed Schonberg <schonberg@gnat.com>
2627 * par-ch12.adb (P_Generic): Add scope before analyzing subprogram
2628 specification, to catch misuses of program unit names.
2630 * sem_res.adb (Resolve_Type_Conversion): Do not emit warnings on
2631 superfluous conversions in an instance.
2633 2004-06-11 Ed Schonberg <schonberg@gnat.com>
2637 * sem_ch12.adb (Save_References): If operator node has been folded to
2638 enumeration literal, associated_node must be discarded.
2640 2004-06-11 Jose Ruiz <ruiz@act-europe.fr>
2642 * s-stchop-vxworks.adb: Add required pragma Convention to
2643 Task_Descriptor because it is updated by a C function.
2645 2004-06-08 Arnaud Charlet <charlet@act-europe.fr>
2649 * Makefile.in: Remove target specific SO_OPT on IRIX
2651 2004-06-07 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
2653 * ada-tree.def (TRANSFORM_EXPR, ALLOCATE_EXPR, USE_EXPR): Deleted.
2654 (GNAT_NOP_EXPR, GNAT_LOOP_ID, EXPR_STMT, NULL_STMT): Likewise.
2655 (BLOCK_STMT, IF_STMT, GOTO_STMT, LABEL_STMT, RETURN_STMT): Likewise.
2656 (ASM_STMT, BREAK_STMT, REGION_STMT,HANDLER_STMT): Likewise.
2657 (STMT_STMT, USE_STMT): New statement codes.
2658 (LOOP_STMT, EXIT_STMT): Make slight semantic changes.
2659 * ada-tree.h: Reflect above changes.
2660 (struct tree_loop_id): Deleted.
2661 (union lang_tree_node, struct lang_decl, struct lang_type):
2662 Now just contains a tree node; update macros using TYPE_LANG_SPECIFIC
2663 and DECL_LANGUAGE_SPECIFIC to reflect these changes.
2664 (DECL_INIT_BY_ASSIGN_P, TRE_LOOP_NODE_ID, TREE_SLOC): Deleted.
2665 (IS_ADA_STMT): New macro.
2666 * decl.c (annotate_decl_with_node): New function.
2667 (gnat_to_gnu_entity): Use it and Sloc_to_locus instead of set_lineno.
2668 (gnat_to_gnu_entity, case object): Remove call to expand CONVERT_EXPR.
2669 Call add_stmt_with_node to do needed assignments.
2670 Add call to update setjmp buffer directly, not via EXPR_STMT.
2671 (maybe_variable): Argment GNAT_NODE deleted.
2672 * gigi.h (maybe_variable): Likewise.
2673 (make_transform, add_stmt_with_node, set_block_for_group): New.
2674 (gnat_gimplify_expr, gnat_expand_body, Sloc_to_locus): Likewise.
2675 (set_block_jmpbuf_decl, get_block_jmpbuf_decl): Likewise.
2676 (discard_file_names, gnu_block_stack, gnat_to_code): Deleted.
2677 (set_lineno, set_lineno_from_sloc): Likewise.
2678 (record_code_position, insert_code_for): Likewise.
2679 (gnat_poplevel): Now returns void.
2680 (end_subprog_body): Now takes argument.
2681 * misc.c (cgraph.h, tree-inline.h): New includes.
2682 (gnat_tree_size, LANG_HOOKS_TREE_SIZE): Deleted.
2683 (gnat_post_options, LANG_HOOKS_POST_OPTIONS): New.
2684 (LANG_HOOKS_CALLGRAPH_EXPAND_FUNCTION): Likewise.
2685 (LANG_HOOKS_RTL_EXPAND_STMT, LANG_HOOKS_GIMPLIFY_EXPR): Likewise.
2686 (gnat_parse_file): Don't set immediate_size_expand.
2687 Call cgraph functions.
2688 (gnat_expand_expr): Remove most cases.
2689 (record_code_position, insert_code_for): Remove from here.
2690 * trans.c (toplev.h, tree-gimple.h): Now included.
2691 (discard_file_names): Deleted.
2692 (gnu_block_stack, gnu_block_stmt_node, gnu_block_stmt_free_list): Del.
2693 (first_nondeleted_insn, make_expr_stmt_from_rtl): Likewise.
2694 (struct stmt_group, current_stmt_group, stmt_group_free_list): New.
2695 (gnu_stack_free_list, record_cost_position, insert_code_for): Likewise.
2696 (add_cleanup, push_stack, gnat_gimplify_stmt, add_cleanup): Likewise.
2697 (gnat_gimplify_type_sizes, gnat_gimplify_one_sizepos): Likewise.
2698 (gnat_expand_body_1, gnat_gimplify_expr, annotate_with_node): Likewise.
2699 (set_block_for_group, add_stmt_list): Likewise.
2700 (start_stmt_group): Renamed from start_block_stmt.
2701 (end_stmt_group): Likewise, from end_block_stmt.
2702 (build_stmt_group): Likewise, from build_block_stmt, also add arg.
2703 (gigi): Don't set discard_file_names or call set_lineno.
2704 Disallow front end ZCX; call gnat_to_gnu, not gnat_to_code.
2705 (tree_transform): Deleted, now renamed to be gnat_to_gnu.
2706 Numerous changes throughout to reflect new names and complete
2707 function-at-a-time implementation.
2708 (gnat_expand_stmt): Delete or comment out all cases.
2709 (process_inlined_subprograms): Use add_stmt.
2710 (process_decls): Use gnat_to_gnu, not gnat_to_code, and don't
2711 call set_lineno; also remove unneeded block handling.
2712 (process_type): Remove unneeded block handling.
2713 (build_unit_elab): Remove calls to deleted functions.
2714 * utils.c (cgraph.h, tree-inline.h, tree-gimple.h): Now include.
2715 (tree-dump.h): Likewise.
2716 (struct ada_binding_level): Add field jmpbuf_decl.
2717 (gnat_define_builtin, gnat_install_builtins): New.
2718 (gnat_gimplify_function, gnat_finalize): Likewise.
2719 (gnat_poplevel): No longer return BLOCK, set it instead.
2720 Remove code dealing with nested functions.
2721 (gnat_init_decl_processing): Also set size_type_node.
2722 Call gnat_install_builtins.
2723 (create_var_decl): Don't set DECL_INIT_BY_ASSIGN.
2724 (create_subprog_decl): Change handling of inline_flag; set TREE_STATIC.
2725 Remove special-case for "main".
2726 (end_subprog_body): Add arg and rework for tree-ssa.
2727 (convert): Don't use GNAT_NOP_EXPR or look for TRANSFORM_EXPR.
2728 Add case for BOOLEAN_TYPE.
2729 * utils2.c (rtl.h): Now include.
2730 (build_call_raise): Test Debug_Flag_NN directly.
2731 (build_call_alloc_dealloc): Don't use local stack allocation for now.
2732 (gnat_mark_addressable, case GNAT_NOP_EXPR): Deleted.
2733 (gnat_mark_addressable, case VAR_DECL): Handle both early & late cases.
2735 2004-06-07 Robert Dewar <dewar@gnat.com>
2737 * a-direct.ads, einfo.ads: Minor comment updates
2739 * s-taprop-lynxos.adb, s-taprop-tru64.adb, s-taprop-irix.adb,
2740 s-taprop-irix-athread.adb, s-taprop-hpux-dce.adb, s-taprop-linux.adb,
2741 s-taprop-dummy.adb, s-taprop-os2.adb, s-taprop-solaris.adb,
2742 s-taprop-vms.adb, s-taprop-mingw.adb, s-taprop-vxworks.adb,
2743 s-taprop-posix.adb, s-taprop.ads, exp_dbug.adb: Minor reformatting.
2745 * s-interr-sigaction.adb: Remove unreferenced variable
2746 (Attached_Interrupts). Minor reformatting.
2747 Avoid use of variable I (replace by J).
2749 * par-ch10.adb: Fix text of one error message
2751 * checks.adb, checks.ads, cstand.adb, vms_data.ads, errout.ads,
2752 exp_aggr.adb, exp_ch3.adb, exp_ch3.ads, exp_ch5.adb, exp_ch6.adb,
2753 exp_ch9.adb, exp_code.adb, gnat1drv.adb, lib-load.adb, lib-writ.adb,
2754 opt.adb, par.adb, opt.ads, par-ch11.adb, par-ch3.adb, par-ch4.adb,
2755 par-ch5.adb, par-ch6.adb, par-ch8.adb, par-ch9.adb, par-prag.adb,
2756 par-util.adb, scng.adb, sem_aggr.adb, sem_attr.adb, sem_cat.adb,
2757 sem_ch10.adb, sem_ch10.adb, sem_ch11.adb, sem_ch12.adb, sem_ch2.adb,
2758 sem_ch3.adb, sem_ch3.ads, sem_ch4.adb, sem_ch5.adb, sem_ch6.adb,
2759 sem_ch7.adb, sem_ch8.adb, sem_ch9.adb, sem_eval.adb, sem_prag.adb,
2760 sem_res.adb, sem_type.adb, sem_util.adb, sinfo.ads, snames.adb,
2761 snames.ads, snames.h, sprint.adb, switch-c.adb: Modifications for Ada
2764 2004-06-07 Doug Rupp <rupp@gnat.com>
2766 * mlib-tgt-vms.adb: Rename mlib-tgt-vms.adb mlib-tgt-vms-alpha.adb
2768 * s-vaflop-vms.adb: Rename s-vaflop-vms.adb to s-vaflop-vms-alpha.adb
2770 * mlib-tgt-vms-ia64.adb: New file.
2772 * Makefile.in: Rename mlib-tgt-vms.adb to mlib-tgt-vms-alpha.adb
2773 Add mlib-tgt-vms-ia64.adb
2774 Rename s-vaflop-vms.adb to s-vaflop-vms-alpha.adb.
2775 Move to alpha specific ifeq section.
2776 Add VMS specific versions of symbols.adb
2777 Renaming of 5q vms files.
2779 * 5qsystem.ads renamed to system-vms_64.ads.
2781 2004-06-07 Vincent Celier <celier@gnat.com>
2783 * a-calend.ads: Add a GNAT Note comment after function Time_Of to
2784 explain that when a time of day corresponding to the non existing hour
2785 on the day switching to DST is specified, Split may return a different
2788 * gnatcmd.adb: Add processing of GNAT METRIC (for gnatmetric), similar
2791 * g-os_lib.adb (OpenVMS): New Boolean value imported from System.
2792 (Normalize_Pathname): Only resolve VMS logical names when on VMS.
2794 * mlib-prj.adb (Build_Library): New flag Gtrasymobj_Needed, initialize
2796 If Gtrasymobj_Needed is True, add the full path of g-trasym.obj to
2797 the linking options.
2798 (Build_Library.Check_Libs): On VMS, if there is a dependency on
2799 g-trasym.ads, set Gtrasymobj_Needed to True.
2801 * prj-attr.adb: Add new package Metrics for gnatmetric
2803 * prj-nmsc.adb (Record_Other_Sources): Put source file names in
2804 canonical case to take into account files with upper case characters on
2806 (Ada_Check): Load the reference symbol file name in the name buffer to
2807 check it, not the symbol file name.
2809 * snames.ads, snames.adb: Add standard name Metrics (name of project
2810 file package for gnatmetric).
2812 * vms_conv.ads: Add Metric to Comment_Type
2814 * vms_conv.adb (Initialize): Add component dor Metric in Command_List
2816 * vms_data.ads: Add qualifiers for GNAT METRIC
2818 * makegpr.adb (Link_Executables): Take into account the switches
2819 specified in package Linker of the main project.
2821 2004-06-07 Thomas Quinot <quinot@act-europe.fr>
2823 * bindgen.adb (Set_Unit_Number): Units is an instance of Table, and so
2824 the index of the last element is Units.Last, not Units.Table'Last
2825 (which is usually not a valid index within the actually allocated
2826 storage for the table).
2828 * exp_ch4.adb (Insert_Dereference_Action): Change predicate that
2829 determines whether to generate a call to a checked storage pool
2831 Generate such a call only for a dereference that either comes from
2832 source, or is the result of rewriting a dereference that comes from
2835 2004-06-07 Romain Berrendonner <berrendo@act-europe.fr>
2837 * bindgen.adb (Gen_Output_File): Add support for GAP builds.
2839 2004-06-07 Eric Botcazou <ebotcazou@act-europe.fr>
2841 (gnat_to_gnu_entity) <E_Array_Subtype>: For multi-dimensional arrays at
2842 file level, elaborate the stride for inner dimensions in alignment
2845 * exp_ch5.adb: Correct wrong reference to Component_May_Be_Bit_Aligned
2848 2004-06-07 Javier Miranda <miranda@gnat.com>
2850 * exp_ch6.adb: Correct wrong modification in previous patch
2852 2004-06-07 Vasiliy Fofanov <fofanov@act-europe.fr>
2854 * g-trasym.ads: Corrected comment to properly reflect level of support
2857 2004-06-07 Hristian Kirtchev <kirtchev@gnat.com>
2859 * lib-xref.adb (Generate_Reference): Add nested function Is_On_LHS. It
2860 includes case of a variable referenced on the left hand side of an
2861 assignment, therefore remove redundant code. Variables and prefixes of
2862 indexed or selected components are now marked as referenced on left
2863 hand side. Warnings are now properly emitted when variables or prefixes
2864 are assigned but not read.
2866 * sem_warn.adb (Output_Unreferenced_Messages): Add additional checks to
2867 left hand side referenced variables. Private access types do not
2868 produce the warning "variable ... is assigned but never read".
2869 Add also additional checks to left hand side referenced variables.
2870 Aliased, renamed objects and access types do not produce the warning
2871 "variable ... is assigned but never read" since other entities may read
2872 the memory location.
2874 2004-06-07 Jerome Guitton <guitton@act-europe.fr>
2876 * Makefile.in: In the powerpc/vxworks-specific section, restore
2877 EXTRA_GNATRTL_NONTASKING_OBJS and EXTRA_GNATRTL_TASKING_OBJS (removed
2880 2004-06-07 Ed Schonberg <schonberg@gnat.com>
2882 * sem_ch4.adb (Remove_Abstract_Operations): Refine the removal of
2883 predefined operators.
2884 Removes spurious type errors from g-trasym-vms.adb.
2886 * sem_res.adb (Rewrite_Renamed_Operator): If intrinsic operator is
2887 distinct from the operator appearing in the source, call appropriate
2888 routine to insert conversions when needed, and complete resolution of
2890 (Resolve_Intrinsic_Operator): Fix cut-and-paste bug on transfer of
2891 interpretations for rewritten right operand.
2892 (Set_Mixed_Mode_Operand): Handle properly a universal real operand when
2893 the other operand is overloaded and the context is a type conversion.
2895 2004-06-07 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
2897 * ada-tree.def (BLOCK_STMT): Now has two operands.
2900 * ada-tree.h: (BLOCK_STMT_BLOCK): New macro.
2902 * gigi.h: (gnat_poplevel): Now returns a tree.
2904 * trans.c (end_block_stmt): Add arg; all callers changed.
2905 (tree_transform, case N_Case_Statement): Make a BLOCK_STMT for a WHEN.
2906 (start_block_stmt): Clear BLOCK_STMT_BLOCK.
2907 (add_stmt): Set TREE_TYPE.
2908 (gnat_expand_stmt, case BLOCK_STMT): Handle BLOCK_STMT_BLOCK.
2909 (gnat_expand_stmt, case BREAK_STMT): New case.
2911 * utils.c (gnat_poplevel): Return a BLOCK, if we made one.
2913 2004-06-07 Jose Ruiz <ruiz@act-europe.fr>
2915 * s-stchop.adsm s-stchop.adb, s-stchop-vxworks.adb: Remove the
2916 procedure Set_Stack_Size that is not needed.
2918 2004-06-07 Sergey Rybin <rybin@act-europe.fr>
2920 * gnat_ugn.texi: Clarify the case when non-standard naming scheme is
2921 used for gnatpp input file and for the files upon which it depends
2923 2004-06-07 Ben Brosgol <brosgol@gnat.com>
2925 * gnat_ugn.texi: Wordsmithing of "GNAT and Libraries" chapter
2927 2004-06-07 Arnaud Charlet <charlet@act-europe.fr>
2929 * gnatvsn.ads: Bump version numbers appropriately.
2932 2004-06-07 Pascal Obry <obry@gnat.com>
2934 * gnat_ugn.texi: Improve comments about imported names and link names
2935 on Windows. Add a note about the requirement to use -k gnatdll's option
2936 when working with a DLL which has stripped stdcall symbols (no @nn
2939 2004-05-27 Vincent Celier <celier@gnat.com>
2941 * vms_data.ads: Add new GNAT PRETTY qualifiers /NO_BACKUP and
2942 COMMENTS_LAYOUT=UNTOUCHED
2944 * symbols-vms.adb, symbols-vms-alpha.adb: Renamed symbols-vms.adb to
2945 symbols-vms-alpha.adb
2947 2004-05-27 Thomas Quinot <quinot@act-europe.fr>
2949 * sem.ads: Clarify documentation on checks suppression.
2951 * einfo.ads (Is_Known_Non_Null): Minor comment typo fix and rephrasing.
2953 2004-05-27 Ed Schonberg <schonberg@gnat.com>
2955 * sem_util.adb (Is_Descendent_Of): Examine properly all ancestors in
2956 the case of multiple derivations.
2957 (Is_Object_Reference): For a selected component, verify that the prefix
2958 is itself an object and not a value.
2960 * sem_ch12.adb (Same_Instantiated_Constant): New name for
2961 Same_Instantiated_Entity.
2962 (Same_Instantiated_Variable): Subsidiary to
2963 Check_Formal_Package_Instance, to recognize actuals for in-out generic
2964 formals that are obtained from a previous formal package.
2965 (Instantiate_Subprogram_Body): Emit proper error when
2966 generating code and the proper body of a stub is missing.
2968 * sem_ch4.adb (Remove_Address_Interpretations): If the operation still
2969 has a universal interpretation, do the disambiguation here.
2971 * exp_ch4.adb (Expand_N_Type_Conversion,
2972 Expand_N_Unchecked_Type_Conversion): Special handling when target type
2973 is Address, to avoid typing anomalies when Address is a visible integer
2976 * exp_ch6.adb (Expand_N_Subprogram_Body): Use Is_Descendent_Of_Address
2977 to determine whether a subprogram should not be marked Pure, even when
2978 declared in a pure package.
2980 2004-05-27 Jose Ruiz <ruiz@act-europe.fr>
2982 * gnat_ugn.texi: Replace pragma Ravenscar by pragma Profile.
2984 * gnat_rm.texi: Replace Max_Entry_Queue_Depth by Max_Entry_Queue_Length
2985 Document No_Dynamic_Attachment, that supersedes No_Dynamic_Interrupts.
2986 Update the documentation about the Ravenscar profile, following the
2987 definition found in AI-249.
2989 * sem_prag.adb: Use FIFO_Within_Priorities and Ceiling_Locking when
2990 setting the Profile (Ravenscar). This must be done in addition to
2991 setting the required restrictions.
2993 * rtsfind.ads: Add the set of operations defined in package
2996 * exp_ch6.adb: Check whether we are violating the No_Dynamic_Attachment
2999 2004-05-27 Eric Botcazou <ebotcazou@act-europe.fr>
3001 lang-specs.h: Always require -c or -S and always redirect to /dev/null
3002 if -gnatc or -gnats is passed.
3004 2004-05-27 Hristian Kirtchev <kirtchev@gnat.com>
3006 * sem_prag.adb (Sig_Flags): A Pragma_Unchecked_Union does not count as
3007 a significant reference. Warnings are now properly emitted when a
3008 discriminated type is not referenced.
3010 * lib-xref.adb (Generate_Reference): A deferred constant completion,
3011 record representation clause or record type discriminant does not
3012 produce a reference to its corresponding entity. Warnings are now
3013 properly emitted when deferred constants and record types are not
3016 2004-05-27 Geert Bosch <bosch@gnat.com>
3018 * Makefile.in: Use long version of libm routines on ia64 gnu/linux.
3019 Fixes ACATS Annex G tests.
3021 2004-05-27 Robert Dewar <dewar@gnat.com>
3023 * rtsfind.adb (RTU_Loaded): Temporary kludge to get past bug of not
3026 2004-05-27 Arnaud Charlet <charlet@act-europe.fr>
3028 * s-interr.adb (Server_Task): Take into account case of early return
3029 from sigwait under e.g. linux.
3031 2004-05-27 Sergey Rybin <rybin@act-europe.fr>
3033 * gnat_ugn.texi: Add description for the new gnatpp options:
3034 -rnb - replace the original source without creating its backup copy
3035 -c0 - do not format comments
3037 2004-05-24 Geert Bosch <bosch@gnat.com>
3039 * a-numaux-x86.adb (Reduce): Reimplement using an approximation of Pi
3040 with 192 bits of precision, sufficient to reduce a double-extended
3041 arguments X with a maximum relative error of T'Machine_Epsilon, for X
3042 in -2.0**32 .. 2.0**32.
3043 (Cos, Sin): Always reduce arguments of 1/4 Pi or larger, to prevent
3044 reduction by the processor, which only uses a 68-bit approximation of
3046 (Tan): Always reduce arguments and compute function either using
3047 the processor's fptan instruction, or by dividing sin and cos as needed.
3049 2004-05-24 Doug Rupp <rupp@gnat.com>
3051 * adaint.c (__gnat_readdir): Cast CRTL function retun value to avoid
3052 gcc error on 32/64 bit VMS.
3054 2004-05-24 Olivier Hainque <hainque@act-europe.fr>
3056 * init.c (__gnat_error_handler): Handle EEXIST as EACCES for SIGSEGVs,
3057 since this is what we get for stack overflows although not documented
3059 Document the issues which may require adjustments to our signal
3062 2004-05-24 Ed Schonberg <schonberg@gnat.com>
3064 * inline.adb (Add_Scope_To_Clean): Do not add cleanup actions to the
3065 enclosing dynamic scope if the instantiation is within a generic unit.
3067 2004-05-24 Arnaud Charlet <charlet@act-europe.fr>
3069 * exp_dbug.ads: Fix typo.
3071 * Makefile.in: s-osinte-linux-ia64.ads was misnamed.
3072 Rename it to its proper name: system-linux-ia64.ads
3073 (stamp-gnatlib1): Remove extra target specific run time files when
3074 setting up the rts directory.
3076 2004-05-24 Javier Miranda <miranda@gnat.com>
3078 * einfo.ads, einfo.adb (Limited_Views): Removed.
3079 (Limited_View): New attribute that replaces the previous one. It is
3080 now a bona fide package with the limited-view list through the
3081 first_entity and first_private attributes.
3083 * sem_ch10.adb (Install_Private_With_Clauses): Give support to
3084 limited-private-with clause.
3085 (Install_Limited_Withed_Unit): Install the private declarations of a
3086 limited-private-withed package. Update the installation of the shadow
3087 entities according to the new structure (see Build_Limited_Views)
3088 (Build_Limited_Views): Replace the previous implementation of the
3089 limited view by a package entity that references the first shadow
3090 entity plus the first shadow private entity (required for limited-
3091 private-with clause)
3092 (New_Internal_Shadow_Entity): Code cleanup.
3093 (Remove_Limited_With_Clause): Update the implementation to undo the
3094 new work carried out by Build_Limited_Views.
3095 (Build_Chain): Complete documentation.
3096 Replace Ada0Y by Ada 0Y in comments
3099 * sem_ch3.adb (Array_Type_Declaration): In case of anonymous access
3100 types the level of accessibility depends on the enclosing type
3103 * sem_ch8.adb (Find_Expanded_Name): Fix condition to detect shadow
3104 entities. Complete documentation of previous change.
3106 2004-05-24 Robert Dewar <dewar@gnat.com>
3108 * namet.adb: Minor reformatting
3109 Avoid use of name I (replace by J)
3110 Minor code restructuring
3112 * sem_ch6.adb: Minor reformatting
3114 * lib-writ.adb: Do not set restriction as active if this is a
3115 Restriction_Warning case.
3117 * sem_prag.adb: Reset restriction warning flag if real pragma
3118 restriction encountered.
3120 * s-htable.adb: Minor reformatting
3121 Change rotate count to 3 in Hash (improves hash for small strings)
3123 * 5qsystem.ads: Add comments for type Address (no literals allowed).
3125 * gnat_ugn.texi: Add new section of documentation "Code Generation
3126 Control", which describes the use of -m switches.
3128 2004-05-24 Eric Botcazou <ebotcazou@act-europe.fr>
3130 trans.c (tree_transform) <N_Identifier>: Do the dereference directly
3131 through the DECL_INITIAL for renamed variables.
3133 2004-05-24 Arnaud Charlet <charlet@act-europe.fr>
3135 * s-osinte-linux-ia64.ads: Renamed system-linux-ia64.ads
3137 2004-05-19 Joel Brobecker <brobecker@gnat.com>
3139 * exp_dbug.ads: Correct comments concerning handling of overloading,
3140 since we no longer use $ anymore.
3142 2004-05-19 Sergey Rybin <rybin@act-europe.fr>
3144 * sem_ch10.adb (Optional_Subunit): When loading a subunit, do not
3145 ignore errors if ASIS_Mode is set. This prevents creating ASIS trees
3146 with illegal subunits.
3148 2004-05-19 Ed Schonberg <schonberg@gnat.com>
3150 * sem_ch6.adb (Check_Following_Pragma): When compiling a subprogram
3151 body with front-end inlining enabled, check whether an inline pragma
3152 appears immediately after the body and applies to it.
3154 * sem_prag.adb (Cannot_Inline): Emit warning if front-end inlining is
3155 enabled and the pragma appears after the body of the subprogram.
3157 2004-05-17 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
3159 Part of function-at-a-time conversion
3161 * misc.c (adjust_decl_rtl): Deleted.
3162 (LANG_HOOKS_PUSHLEVEL, LANG_HOOKS_POPLEVEL, LANG_HOOKS_SET_BLOCK):
3165 * gigi.h: (adjust_decl_rtl, kept_level_p, set_block): Deleted.
3166 (add_decl_stmt, add_stmt, block_has_vars): New functions.
3167 (gnat_pushlevel, gnat_poplevel): Renamed from pushlevel and poplevel.
3169 * decl.c (elaborate_expression, maybe_pad_type): Call add_decl_stmt
3171 (gnat_to_gnu_entity): Likewise.
3172 Use add_stmt to update setjmp buffer.
3173 Set TREE_ADDRESSABLE instead of calling put_var_into_stack and
3175 No longer call adjust_decl_rtl.
3176 (DECL_INIT_BY_ASSIGN_P): New macro.
3177 (DECL_STMT_VAR): Likewise.
3179 * trans.c (gigi): Call start_block_stmt to make the outermost
3181 (gnat_to_code, gnu_to_gnu, tree_transform, process_decls, process_type):
3182 Call start_block_stmt and end_block_stmt temporarily.
3183 Use gnat_expand_stmt instead of expand_expr_stmt.
3184 (add_decl_stmt): New function.
3185 (tree_transform): Call it.
3186 (add_stmt): Also emit initializing assignment for DECL_STMT if needed.
3187 (end_block_stmt): Set type and NULL_STMT.
3188 (gnat_expand_stmt): Make recursize call instead of calling
3190 (gnat_expand_stmt, case DECL_STMT): New case.
3191 (set_lineno_from_sloc): Do nothing if global.
3192 (gnu_block_stmt_node, gnu_block_stmt_free_list): New variables.
3193 (start_block_stmt, add_stmt, end_block_stmt): New functions.
3194 (build_block_stmt): Call them.
3195 (gnat_to_code): Don't expand NULL_STMT.
3196 (build_unit_elab): Rename pushlevel and poplevel to gnat_* and change
3198 (tree_transform): Likewise.
3199 (tree_transform, case N_Null_Statement): Return NULL_STMT.
3200 (gnat_expand_stmt, case NULL_STMT): New case.
3201 (gnat_expand_stmt, case IF_STMT): Allow nested IF_STMT to have no
3204 * utils2.c (gnat_mark_addressable, case VAR_DECL): Do not set
3207 * utils.c (create_var_decl): Do not call expand_decl or
3209 Set TREE_ADDRESSABLE instead of calling gnat_mark_addressable.
3210 Set DECL_INIT_BY_ASSIGN_P when needed and do not generate MODIFY_EXPR
3212 (struct e_stack): Add chain_next to GTY.
3213 (struct binding_level): Deleted.
3214 (struct ada_binding_level): New struct.
3215 (free_block_chain): New.
3216 (global_binding_level, clear_binding_level): Deleted.
3217 (global_bindings_p): Rework to see if no chain.
3218 (kept_level_p, set_block): Deleted.
3219 (gnat_pushlevel): Renamed from pushlevel and extensive reworked to use
3220 new data structure and work directly on BLOCK node.
3221 (gnat_poplevel): Similarly.
3222 (get_decls): Look at BLOCK_VARS.
3223 (insert_block): Work directly on BLOCK node.
3224 (block_has_var): New function.
3225 (pushdecl): Rework for new binding structures.
3226 (gnat_init_decl_processing): Rename and rework calls to pushlevel and
3228 (build_subprog_body): Likewise.
3229 (end_subprog_body): Likewise; also set up BLOCK in DECL_INITIAL.
3231 * ada-tree.def (DECL_STMT, NULL_STMT): New codes.
3233 * ada-tree.h: (DECL_INIT_BY_ASSIGN_P): New macro.
3234 (DECL_STMT_VAR): Likewise.
3236 2004-05-17 Robert Dewar <dewar@gnat.com>
3238 * restrict.ads, restrict.adb (Process_Restriction_Synonym): New
3241 * sem_prag.adb (Analyze_Pragma, case Restrictions): Cleanup handling
3242 of restriction synonyums by using
3243 Restrict.Process_Restriction_Synonyms.
3245 * snames.ads, snames.adb: Add entries for Process_Restriction_Synonym
3247 * s-restri.ads (Tasking_Allowed): Correct missing comment
3249 * s-rident.ads: Add entries for restriction synonyms
3251 * ali.adb: Fix some problems with badly formatted ALI files that can
3252 result in infinite loops.
3254 * s-taprop-lynxos.adb, s-tpopsp-lynxos.adb, s-taprop-tru64.adb,
3255 s-tpopsp-posix-foreign.adb, s-taprop-irix.adb, s-interr-sigaction.adb,
3256 s-taprop-irix-athread.adb, s-taprop-hpux-dce.adb, s-taprop-linux.adb,
3257 s-taprop-dummy.adb, s-interr-dummy.adb, s-taprop-os2.adb,
3258 s-taprop-solaris.adb, s-tpopsp-solaris.adb, s-asthan-vms.adb,
3259 s-inmaop-vms.adb, s-interr-vms.adb, s-taprop-vms.adb,
3260 s-tpopde-vms.adb, s-taprop-mingw.adb, s-interr-vxworks.adb,
3261 s-taprop-vxworks.adb, s-tpopsp-vxworks.adb, s-taprop-posix.adb,
3262 s-tpopsp-posix.adb, s-tratas-default.adb, a-dynpri.adb,
3263 a-tasatt.adb, a-taside.adb, a-taside.ads, exp_attr.adb,
3264 exp_ch9.adb, g-thread.adb, rtsfind.ads, sem_attr.adb,
3265 s-interr.adb, s-interr.ads, s-soflin.ads, s-taasde.adb,
3266 s-taasde.ads, s-taenca.adb, s-taenca.ads, s-taprop.ads,
3267 s-tarest.adb, s-tarest.ads, s-tasdeb.adb, s-tasdeb.ads,
3268 s-tasini.adb, s-tasini.ads, s-taskin.adb, s-taskin.ads,
3269 s-tasque.adb, s-tasque.ads, s-tasren.adb, s-tasren.ads,
3270 s-tassta.adb, s-tassta.ads, s-tasuti.adb, s-tasuti.ads,
3271 s-tataat.adb, s-tataat.ads, s-tpinop.adb, s-tpinop.ads,
3272 s-tpoben.adb, s-tpobop.adb, s-tpobop.ads, s-tporft.adb,
3273 s-tposen.adb, s-tposen.ads, s-tratas.adb, s-tratas.ads: Change Task_ID
3274 to Task_Id (minor cleanup).
3276 2004-05-17 Vincent Celier <celier@gnat.com>
3278 * g-os_lib.adb (Normalize_Pathname.Final_Value): Remove trailing
3279 directory separator.
3281 * prj-proc.adb (Recursive_Process): Inherit attribute Languages from
3282 project being extended, if Languages is not declared in extending
3285 2004-05-17 Javier Miranda <miranda@gnat.com>
3287 * sem_ch10.adb (Install_Limited_Withed_Unit): Do not install the
3288 limited view of a visible sibling.
3290 2004-05-14 Robert Dewar <dewar@gnat.com>
3292 * gnat_ugn.texi: Minor change to -gnatS documentation
3294 * sprint.adb: Remove some instances of Assert (False) and for this
3295 purpose replace them by output of a ??? string.
3297 * checks.adb, exp_aggr.adb, sem_elim.adb: Remove useless pragma
3300 * lib-writ.adb, lib-load.adb, lib.ads, lib.adb: Remove Dependent_Unit
3301 flag processing. This was suppressing required dependencies in
3302 No_Run_Time mode and is not needed since the binder does not generate
3303 references for things in libgnat anyway.
3305 * sem_ch3.adb (Access_Type_Declaration): Reorganize code to avoid GCC
3308 2004-05-14 Thomas Quinot <quinot@act-europe.fr>
3310 * gnat_ugn.texi: Document AIX-specific issue with initialization of
3313 * exp_ch4.adb (Insert_Dereference_Action): Do not generate dereference
3314 action for the case of an actual parameter in an init proc call.
3316 2004-05-14 Ed Schonberg <schonberg@gnat.com>
3318 * sem_ch4.adb (Analyze_Selected_Component): If prefix is a protected
3319 subtype, check visible entities in base type.
3321 * exp_ch7.adb (Clean_Simple_Protected_Objects): Do not generate cleanup
3322 actions if the object is a renaming.
3324 * sem_ch12.adb (Same_Instantiated_Entity): Predicate for
3325 Check_Formal_Package_Instance, to determine more precisely when the
3326 formal and the actual denote the same entity.
3328 2004-05-14 Javier Miranda <miranda@gnat.com>
3330 * par-ch10.adb (P_Context_Clause): Complete documentation on AI-262