1 2001-10-25 Robert Dewar <dewar@gnat.com>
3 * restrict.adb (Set_No_Run_Time_Mode): Set Discard_Names as default
6 2001-10-25 Pascal Obry <obry@gnat.com>
8 * gnatmem.adb (Read_Next): fix Curs2 value to properly handle quiet
9 mode case for ALLOC case.
11 * gnatmem.adb (Read_Next): correctly fix parsing in Quiet mode on
12 all platforms. Improvement of last change.
14 2001-10-25 Robert Dewar <dewar@gnat.com>
16 * exp_ch4.adb (Expand_N_Allocator): Minor reformatting.
18 2001-10-25 Geert Bosch <bosch@gnat.com>
20 * osint.adb (Is_Relative): Remove duplicate.
22 2001-10-25 Pascal Obry <obry@gnat.com>
24 * osint.adb (Read_Default_Search_Dirs): correctly detect relative
25 pathnames in UNIX and DOS style with drive letter.
26 (Is_Relative): new routine.
28 * osint.adb: Minor reformatting
30 * osint.adb (Is_Relative): implementation using
31 GNAT.OS_Lib.Is_Absolute_Path. Better fix.
33 2001-10-25 Pascal Obry <obry@gnat.com>
35 * g-dirope.adb (Basename): correctly compute offset between the
36 original Path and the translated one.
38 * g-dirope.adb: (Base_Name): add some comments.
40 2001-10-25 Robert Dewar <dewar@gnat.com>
42 * exp_imgv.adb (Expand_Image_Attribute): Defend against bad use
43 in HIE mode, avoids compilation abandoned message
45 * exp_imgv.adb: Correct typo in previous change
47 * exp_imgv.adb: Correct typo in previous change (not my day!)
49 2001-10-25 Robert Dewar <dewar@gnat.com>
51 * s-tpinop.ads: Add 2001 to copyright notice. Fix header format.
53 2001-10-25 Pascal Obry <obry@gnat.com>
55 * g-awk.ads: Move all pragma inlines next to the routine
56 declarations. This is more uniform with other GNAT spec.
58 2001-10-22 Geert Bosch <bosch@gnat.com>
60 * Make-lang.in (gnattools, cross-gnattools): Remove gnatmem.
62 2001-10-19 Geert Bosch <bosch@gnat.com>
64 * Makefile.in (tools, gnattools): Remove gnatmem.
66 2001-10-17 Richard Henderson <rth@redhat.com>
68 * Makefile.in (misc.o): Depend on langhooks.h.
70 (LANG_HOOKS_INIT, LANG_HOOKS_INIT_OPTIONS): New.
71 (LANG_HOOKS_DECODE_OPTION): New.
72 (lang_hooks): Use LANG_HOOKS_INITIALIZER.
74 2001-10-16 Florian Weimer <fw@deneb.enyo.de>
76 * trans.c (tree_transform): Adjust to recent change in
77 expand_asm_operands to implement named asm operands.
79 2001-10-11 Ed Schonberg <schonber@gnat.com>
81 * exp_ch8.adb (Expand_N_Object_Renaming_Declaration): Bugfix in
82 renaming of discriminant for mutable record type.
84 2001-10-11 Robert Dewar <dewar@gnat.com>
86 * validsw.adb: Properly save -gnatVn status.
88 2001-10-11 Robert Dewar <dewar@gnat.com>
90 * usage.adb: Add lines for V switch.
92 * gnatcmd.adb (COMPILE): Revise translations for -gnatV
95 2001-10-11 Ed Schonberg <schonber@gnat.com>
97 * sem_type.adb (Add_One_Interp): an operator for a type declared in
98 an extension of System is known to be visible.
100 2001-10-11 Ed Schonberg <schonber@gnat.com>
102 * sem_eval.adb (Compare_Fixup): get the bounds of a String_Literal
103 properly. Fixes regression on ACATS C34005G.
105 2001-10-11 Robert Dewar <dewar@gnat.com>
107 * sem_ch5.adb (Analyze_Iteration_Scheme): Suppress warning on null
108 loop in generic instance, since this is likely not very useful.
110 2001-10-11 Robert Dewar <dewar@gnat.com>
112 * restrict.adb (Disallow in No_Run_Time_Mode): Properly specialize
113 the error message for high integrity mode.
115 * rtsfind.adb (RTE): Give message if we try to find an entity that
116 is not available in high integrity mode.
119 (OK_To_Use_In_HIE_Mode): New array.
120 (RTE): May return Empty in high integrity mode.
122 * rtsfind.ads (OK_To_Use_In_No_Run_Time_Mode): New name for
123 OK_To_Use_In_HIE_Mode, now includes System_FAT_xxx.
125 * sem_ch6.adb (Analyze_Subprogram_Body): Kill body in predefined
126 unit if not inlined always and in no runtime mode. Fixes problem
127 caused by new Rtsfind changes.
129 * sem_ch6.adb (Analyze_Subrogram_Body): Do not Check_References if
132 * rtsfind.adb (RTE): Make sure we do not try to load unit after
133 giving message for entity not available in high integrity mode.
135 2001-10-11 Pascal Obry <obry@gnat.com>
137 * impunit.adb: Add GNAT.CRC32.
139 2001-10-11 Ed Schonberg <schonber@gnat.com>
141 * exp_fixd.adb (Expand_Multiply_Fixed_By_Fixed_Giving_Fixed): handle
142 properly the case where one universal operand in a non-static
143 exponentiation of a real literal.
145 2001-10-11 Ed Schonberg <schonber@gnat.com>
147 * exp_ch7.adb (Find_Final_List): for a type appearing in a with_type
148 clause, return the gobal finalization list, for lack of anthing else.
150 2001-10-11 Ed Schonberg <schonber@gnat.com>
152 * exp_ch7.adb (Make_Transient_Block): if statement is within
153 exception handler, always use new transient scope to place Clean
156 2001-10-11 Pascal Obry <obry@gnat.com>
159 (GNAT_ADA_OBJS): add g-crc32.o, a-tags.o, a-stream.o
160 (GNATBIND_OBJS): add g-crc32.o, a-tags.o, a-stream.o
161 (GNATLS_RTL_OBJS): add g-crc32.o
162 (GNATMAKE_RTL_OBJS): add g-crc32.o
165 (CRC_Match): new function.
166 (Get_File_Checksum): renamed Get_File_CRC. Use the GNAT.CRC32 unit
167 instead of the previous simple checksum algorithm.
168 (Time_Stamp_Mismatch): use CRC_Match for comparison.
169 (Set_Source_Table): idem.
172 (Get_File_Checksum): renamed Get_File_CRC as now we compute CRC
173 instead of simple checksum.
174 (CRC_Match): new function.
175 (CRC_Error): new constant.
177 * ali.adb (Scan_ALI): rename variable Chk to CRC as we are handling
178 a CRC now and not a simple checksum. A CRC uses lower-case hex
179 letters, fixes ambiguity in parsing.
181 * ali.ads (Sdep_Record.Checksum): renamed Sdep_Record.CRC as this
182 is what this variable will store.
184 * bcheck.adb: Change reference to chechsum in comments by CRC.
185 (Check_Consistency): Rename Get_File_Checksum to Get_File_CRC.
186 rename All_Checksum_Match to All_CRC_Match. Change due to API
187 renaming since now GNAT does not use a simple checksum but a
188 CRC using GNAT.CRC32.
190 * gnatls.adb: Rename Checksum to CRC in many places, we use a CRC
191 now and not anymore a simple checksum.
193 * lib-load.adb: Use Source_CRC instead of Source_Checksum in many
196 * lib-writ.adb (Write_ALI): Use Source_CRC instead of Source_Checksum.
199 (Restore_Scan_State): rename Checksum to CRC.
200 (Save_Scan_State): idem.
204 (Checksum): rename to CRC.
205 (Saved_Scan_State): Save_Checksum field renamed to Save_CRC
207 * scn-nlit.adb: Rename many Accumulate_Checksum to Update (from
208 GNAT.CRC32). Update copyright notice.
210 * scn-slit.adb: Rename many Accumulate_Checksum to Update (from
211 GNAT.CRC32). Update copyright notice.
214 (Accumulate_Checksum): removed.
215 (Update): new procedure. Add a wide-character into the CRC.
218 (Complete_Source_File_Entry): use CRC32 instead of simple checksum.
219 (Load_File): fix initialization of S (change Source_Checksum to
222 * sinput-p.adb (Load_Project_File): rename Source_Checksum to
223 Source_CRC in S initialization.
225 * sinput.adb (Source_Checksum): renamed to Source_CRC.
227 * sinput.ads (Source_Checksum): renamed to Source_CRC.
228 Update comments for the CRC.
230 * types.adb (Hex): Use lowercase for the letter part.
232 * types.ads (Get_Hex_String): Returns the hexadecimal representation
233 for a word. This is currently used only for CRC. In previous version,
234 the checksum was using a representation with all letter being
235 upper-case. With the new implementation (using CRC) we do not remove
236 the 32th bit of the CRC, so we can have an upper-case starting letter
237 in the CRC. This is not possible to parse in Scan_ALI (ali.adb).
238 It is ambigous since the CRC was optional and could be followed by
239 options like EB, EE. So now this routines uses lower-case letter for
240 the hexadecimal representation. Strange enough only lower case letters
241 where checked in Scan_ALI (even if this was not a possible case).
243 * gnatvsn.ads (Library_Version): changed to 3.15a.
245 * s-crc32.ads: Initial version from GNAT.CRC32. This is the version
248 * s-crc32.adb: Initial version from GNAT.CRC32. This is the version
251 * ali-util.adb: Redo previous change to avoid using word CRC everywhere
252 Add 2001 to copyright notice
253 (Accumulate_Checksum): Modify to use System.CRC32.
255 * ali-util.ads: Redo changes of previous revision to continue to use
256 the word Checksum. Add 2001 to copyright notice.
258 * ali.adb: Undo some of previous changes, not needed.
259 Keep the change for lower case letters in the checksum.
261 * ali.ads: Undo previous change not needed.
263 * bcheck.adb: Undo most of previous change, not needed.
264 But do use Checksums_Match for checksum comparison.
266 * gnatls.adb: Undo most of previous change, not needed.
267 But do use Checksums_Match for comparing checksums.
269 * lib-load.adb: Undo previous change, not needed.
271 * lib-writ.adb: Undo previous change, not needed.
273 * lib-writ.ads: Document that checksums use lower case,
274 not upper case letters.
276 * scans.adb: Undo previous change, not needed
278 * scans.ads: Undo previous change, not needed.
280 * scn-nlit.adb: Undo previous changes, not needed.
282 * scn-slit.adb: Undo previous change, not needed. Fix header format.
285 (Accumulate_Checksum): Use System.CRC32.
286 (Initialize_Checksum): New procedure.
287 Remove other changes of previous revision.
289 * sinput-p.adb: Undo previous change, not needed.
291 * sinput.adb: Undo previous change, not needed.
293 * sinput-l.adb: Undo previous change, not needed.
295 * sinput.ads: Undo previous change, not needed. Keep only comment
296 on new checksum algorithm
298 * Makefile.in: Add s-crc32 as needed, remove g-crc32.
299 Also remove a-tags and a-stream from GNAT sources.
301 * ali.adb (Scan_ALI): fix typo introduce in latest check-in.
303 * Makefile.in (GNATRTL_NONTASKING_OBJS): Add g-crc32.o.
305 2001-10-11 Geert Bosch <bosch@gnat.com>
307 * einfo.h: Regenerate.
309 * nmake.ads: Regenerate.
311 * nmake.adb: Regenerate.
313 * sinfo.h: Regenerate.
315 * treeprs.adb: Regenerate.
317 2001-10-10 Geert Bosch <bosch@gnat.com>
319 * gnat-style.texi: New file describing coding guidelines for Ada.
321 2001-10-10 Ed Schonberg <schonber@gnat.com>
323 * einfo.adb (Write_Entity_Flags): Elaboration_Entity_Required
326 2001-10-10 Geert Bosch <bosch@gnat.com>
328 * snames.ads: Add new names for project facility.
330 * snames.adb: Update to reflect snames.ads changes.
332 * snames.h: Update to reflect snames.ads changes.
334 2001-10-10 Vincent Celier <celier@gnat.com>
337 (Add_Switches): reflect the changes for the switches attributes
338 Default_Switches indexed by the programming language,
339 Switches indexed by the file name.
340 (Collect_Arguments_And_Compile): Idem.
341 Reflect the attribute name changes.
344 (Initialisation_Data): Change the names of some packages and
346 (Initialize): process case insensitive associative arrays.
349 (Attribute_Kind): Remove Both, add Case_Insensitive_Associative_Array.
352 (Parse_Attribute_Declaration): For case insensitive associative
353 arrays, set the index string to lower case.
356 Reflect the changes of the project attributes.
359 Replace Check_Naming_Scheme by Ada_Check and
360 Language_Independent_Check.
363 Replaced Check_Naming_Scheme by 2 procedures:
364 Ada_Check and Language_Independent_Check.
367 (Process_Declarative_Items): For case-insensitive associative
368 arrays, set the index string to lower case.
369 (Recursive_Check): Call Prj.Nmsc.Ada_Check, instead of
370 Prj.Nmsc.Check_Naming_Scheme.
373 (Case_Insensitive): New function
374 (Set_Case_Insensitive): New procedure
377 (Case_Insensitive): New function
378 (Set_Case_Insensitive): New procedure
379 (Project_Node_Record): New flag Case_Insensitive.
382 (Value_Of): new function to get the string value of a single
383 string variable or attribute.
386 (Value_Of): new function to get the string value of a single
387 string variable or attribute.
390 (Ada_Default_Spec_Suffix): New function
391 (Ada_Default_Impl_Suffix): New function
392 Change definitions of several constants to reflect
393 new components of record types.
396 (Naming_Data): Change several components to reflect new
397 elements of naming schemes.
398 (Project_Data): New flags Sources_Present and
399 Language_Independent_Checked.
400 (Ada_Default_Spec_Suffix): New function.
401 (Ada_Default_Impl_Suffix): New function.
404 Modification of predefined names for project manager: added
405 Implementation, Specification_Exceptions, Implementation_Exceptions,
406 Specification_Suffix, Implementation_Suffix, Separate_Suffix,
407 Default_Switches, _Languages, Builder, Cross_Reference,
408 Finder. Removed Body_Part, Specification_Append, Body_Append,
409 Separate_Append, Gnatmake, Gnatxref, Gnatfind, Gnatbind,
412 * prj.ads: (Ada_Default_Spec_Suffix, Ada_Default_Impl_Suffix):
415 * prj-nmsc.adb (Ada_Check): Test that Separate_Suffix is defaulted,
416 not that it is Nil_Variable_Value.
418 * prj.ads: Add ??? for uncommented declarations
420 2001-10-10 Ed Schonberg <schonber@gnat.com>
422 * sem_prag.adb: (Analyze_Pragma, case External): If entity is a
423 constant, do not indicate possible modification, so that gigi can
424 treat it as a bona fide constant.
426 2001-10-10 Robert Dewar <dewar@gnat.com>
428 * sem_prag.adb: Add processing for pragma External.
430 * snames.ads: Add entry for pragma External.
432 * par-prag.adb: Add pragma External.
434 * snames.adb: Updated to match snames.ads.
436 2001-10-10 Ed Schonberg <schonber@gnat.com>
438 * exp_ch4.adb (Expand_N_Allocator): Generate meaningful names for
439 a dynamic task if the allocator appears in an indexed assignment
440 or selected component assignment.
442 * exp_util.adb (Build_Task_Array_Image, Build_Task_Record_Image):
443 For a dynamic task in an assignment statement, use target of
444 assignment to generate meaningful name.
446 2001-10-10 Ed Schonberg <schonber@gnat.com>
448 * einfo.adb (Write_Field19_Name): Body_Entity is also defined for
451 * einfo.ads: Body_Entity is also defined for generic package.
452 Documentation change only
454 * exp_aggr.adb (Build_Array_Aggr_Code): When expanding an
455 others_choice for a discriminated component initialization,
456 convert discriminant references into the corresponding discriminals.
458 * exp_ch3.adb (Get_Simple_Init_Val): Add qualification to aggregate
459 only if original type is private and expression has to be wrapped
463 (Apply_Constraint_Check): Do not perform length check
464 if expression is an aggregate with only an others_choice.
465 (Length_N_Cond): two references to the same in_parameter
466 (typically the discriminal in an init_proc) denote the same value.
467 Two useful optimization uncovered by bugfixes above.
469 2001-10-10 Robert Dewar <dewar@gnat.com>
471 * xeinfo.adb: Change int to char in translation of enumeration types.
472 This fixes a problem in the C representation of component alignment.
473 Add 2001 to copyright notice
475 2001-10-10 Richard Kenner <kenner@gnat.com>
477 * decl.c: (validate_size): Do check size of object of integral type
478 if it is a packed array type.
480 2001-10-10 Richard Kenner <kenner@gnat.com>
482 * decl.c: (gnat_to_gnu_entity, case object): Also materialize
483 VAR_DECL for constant if not Is_Public but -O0.
485 2001-10-10 Richard Kenner <kenner@gnat.com>
487 * misc.c (struct lang_hooks): Add new initializer to match GCC change.
489 2001-10-10 Geert Bosch <bosch@gnat.com>
491 * xnmake.adb (XNmake): Fix handling of -s/-b options. No longer
492 use '/' as switch character, allowing for absolute file names.
494 2001-10-09 Joseph S. Myers <jsm28@cam.ac.uk>
496 * 4gintnam.ads, Make-lang.in, Makefile.in, config-lang.in: Update
499 2001-10-08 Geert Bosch <bosch@gnat.com>
501 * Makefile.in (treeprs.ads, einfo.h, sinfo.h, nmake.adb, nmake.ads):
502 Automatically build utilities when files need to be regenerated.
504 2001-10-08 Geert Bosch <bosch@gnat.com>
506 * xsnames.adb: New utility for updating snames.ads and snames.adb
508 2001-10-08 Zack Weinberg <zack@codesourcery.com>
510 * Make-lang.in (ADAFLAGS): Add -W -Wall.
511 (ADA_FLAGS_TO_PASS): Set ADA_CFLAGS=$(CFLAGS) also.
512 (gnat1): Also depend on attribs.o.
513 (gnatlib, gnatlib-shared): Set CC and ADAC in recursive make.
514 * Makefile.in (X_ADAFLAGS, T_ADAFLAGS): New.
515 (ADAC): Set to @ADAC@ in stage1, $(CC) later.
516 (ADAFLAGS): Add -W -Wall.
517 (ALL_ADAFLAGS, MOST_ADAFLAGS): Add X_ADAFLAGS and T_ADAFLAGS;
520 (.adb.o, .ads.o, a-numaux.o, a-teioed.o, s-interr.o,
521 s-taskin.o, sdefault.o, s-tasdeb.o, s-vaflop.o, a-except.o,
522 s-assert.o, s-stalib.o, s-memory.o, memtrack.o, mlib-tgt.o):
523 Use $(ADAC), not $(CC), as compilation command.
525 (gnattools): Depend directly on tools to build, don't use
527 (gnatlib): Set ADA_CFLAGS=$(GNATLIBCFLAGS) in recursive make.
529 * einfo.h, sinfo.h: New files (autogenerated).
531 2001-10-08 Richard Henderson <rth@redhat.com>
533 * comperr.adb (Abort_In_Progress): New.
534 (Compiler_Abort): Use it to prevent recursion.
536 2001-10-08 Robert Dewar <dewar@gnat.com>
538 * atree.adb: Set Error_Posted in Error node, helps error recovery.
540 * par-endh.adb (Output_End_Expected): We should also not test
541 Error_Posted on the Error node, since now it is always set.
543 * cstand.adb (Create_Standard): Set Etype of Error to Any_Type
544 to help error recovery. Part of general work on 9407-004.
546 * par.adb: Add ??? for misuse of error
549 (Resolve): Defend against Error, fixes 9407-003.
550 (Resolve_Discrete_Subtype_Indication): Defend against Error.
552 * sinfo.ads (N_Error): Now has Etype field (which will be set
553 to Any_Type to help error recovery).
555 2001-10-08 Richard Kenner (kenner@gnat.com)
557 * misc.c (gnat_expand_expr, case UNCHECKED_CONVERT_EXPR):
558 Consistently set MEM attributes from expression; fixes
559 bootstrap failure on x86.
561 2001-10-08 Geert Bosch (bosch@gnat.com)
563 * 5oosinte.adb: Add 2001 to copyright notice.
565 2001-10-08 Geert Bosch (bosch@gnat.com)
567 * ceinfo.adb: Add utility for consistency checking of einfo.ad[bs].
569 * csinfo.adb: Add utility for consistency checking of sinfo.ad[bs].
571 2001-10-07 Joseph S. Myers <jsm28@cam.ac.uk>
573 * 5oosinte.adb: Fix spelling error of "separate" as "seperate".
575 2001-10-05 Geert Bosch (bosch@gnat.com)
577 * adaint.h: Small formatting fix.
579 2001-10-04 Geert Bosch <bosch@gnat.com>
581 * sysdep.c (__gnat_set_binary_mode, __gnat_set_text_mode):
582 Arg is int, not FILE *, in dummy version of functions.
584 * adaint.h (__gnat_set_binary_mode, __gnat_set_text_mode):
585 Arg is int, not FILE *.
587 2001-10-04 Geert Bosch <bosch@gnat.com>
589 * 3lsoccon.ads: Added file, missed with initial check ins.
591 * 4lintnam.ads: Fix header format.
592 Change Linux to GNU/Linux.
594 * 5iosinte.adb: Change Linux to GNU/Linux.
596 * 5iosinte.ads: Change Linux to GNU/Linux.
598 * 5itaprop.adb: Change Linux to GNU/Linux.
600 * 5itaspri.ads: Change Linux to GNU/Linux.
601 Update copyright notice.
603 * 5lintman.adb: Change Linux to GNU/Linux.
605 * 5lml-tgt.adb: Change Linux to GNU/Linux.
607 * 5losinte.ads: Change Linux to GNU/Linux.
609 * 5lsystem.ads: Change Linux to GNU/Linux.
611 * 5qosinte.adb: Change Linux to GNU/Linux.
613 * 5qosinte.ads: Change Linux to GNU/Linux.
615 * 5qparame.ads: Change Linux to GNU/Linux.
617 * 5qtaprop.adb: Change Linux to GNU/Linux.
619 * 5qtaspri.ads: Change Linux to GNU/Linux.
620 Add 2001 to copyright notice.
622 * 5vintman.ads: Change Linux to GNU/Linux.
623 Fix header format. Add 2001 to copyright notice.
625 * g-soccon.ads: Change Linux to GNU/Linux.
627 * g-trasym.ads: Change Linux to GNU/Linux.
628 Add 2001 to copyright notice.
630 * memtrack.adb: Change Linux to GNU/Linux.
632 * s-intman.ads: Change Linux to GNU/Linux.
633 Add 2001 to copyright notice. Fix header format.
635 * s-stache.adb: Change Linux to GNU/Linux.
637 * adaint.c: Change Linux to GNU/Linux.
639 * cio.c: Change Linux to GNU/Linux.
641 * cstreams.c: Change Linux to GNU/Linux.
643 * init.c: Change Linux to GNU/Linux.
645 * gmem.c: Change Linux to GNU/Linux.
647 * tracebak.c: Change Linux to GNU/Linux.
650 2001-10-02 Geert Bosch <bosch@gnat.com>
652 * misc.c (insert_default_attributes): Add dummy version.