gcc.git
18 years agoMAINTAINERS (Write After Approval): Remove myself.
Francois-Xavier Coudert [Fri, 17 Feb 2006 18:08:57 +0000 (19:08 +0100)]
MAINTAINERS (Write After Approval): Remove myself.

* MAINTAINERS (Write After Approval):  Remove myself.
(Language Front End Maintainers):  Add myself as fortran 95
maintainer.

From-SVN: r111203

18 years agoResync.
Arnaud Charlet [Fri, 17 Feb 2006 16:09:32 +0000 (17:09 +0100)]
Resync.

From-SVN: r111200

18 years agoexpander.adb: Fix typo in comment
Ramon Fernandez [Fri, 17 Feb 2006 16:09:11 +0000 (17:09 +0100)]
expander.adb: Fix typo in comment

2006-02-17  Ramon Fernandez  <fernandez@adacore.com>
    Thomas Quinot  <quinot@adacore.com>
    Robert Dewar  <dewar@adacore.com>
    Javier Miranda  <miranda@adacore.com>

* expander.adb: Fix typo in comment

* exp_pakd.adb: Fix typo
Minor comment reformatting.

* g-dyntab.adb: Minor reformatting

* exp_ch6.adb (Register_Interface_DT_Entry): Traverse the list of
aliased subprograms to look for the abstract interface subprogram.

From-SVN: r111199

18 years agos-wchcnv.adb: Document handling of [ on output (we do not change this to ["5B"] and...
Robert Dewar [Fri, 17 Feb 2006 16:08:58 +0000 (17:08 +0100)]
s-wchcnv.adb: Document handling of [ on output (we do not change this to ["5B"] and the new...

2006-02-17  Robert Dewar  <dewar@adacore.com>

* s-wchcnv.adb: Document handling of [ on output (we do not change
this to ["5B"] and the new comments say why not.

* gnat_ugn.texi:
Add note for -gnatVo that this now includes the cases of type
conversions and qualified expressions.
Add comments on handling of brackets encoding for Text_IO

From-SVN: r111198

18 years agoa-convec.ads, [...]: (operator "&"): handle potential overflow for large index types
Matthew Heaney [Fri, 17 Feb 2006 16:08:48 +0000 (17:08 +0100)]
a-convec.ads, [...]: (operator "&"): handle potential overflow for large index types

2006-02-17  Matthew Heaney  <heaney@adacore.com>

* a-convec.ads, a-convec.adb:
(operator "&"): handle potential overflow for large index types
(Insert): removed Contraint_Error when using large index types
(Insert_Space): removed Constraint_Error for large index types
(Length): moved constraint check from Length to Insert

* a-coinve.ads, a-coinve.adb: Stream attribute procedures are declared
as not null access.
Explicit raise statements now include an exception message.
(operator "&"): handle potential overflow for large index types
(Insert): removed Contraint_Error when using large index types
(Insert_Space): removed Constraint_Error for large index types
(Length): moved constraint check from Length to Insert

From-SVN: r111197

18 years agosnames.ads, snames.adb: New standard names for new project attributes...
Vincent Celier [Fri, 17 Feb 2006 16:08:38 +0000 (17:08 +0100)]
snames.ads, snames.adb: New standard names for new project attributes...

2006-02-17  Vincent Celier  <celier@adacore.com>

* snames.ads, snames.adb: New standard names for new project attributes:
archive_builder, archive_indexer, compiler_pic_option,
config_body_file_name, config_body_file_name_pattern,
config_file_switches, config_file_unique, config_spec_file_name,
config_spec_file_name_pattern, default_builder_switches,
default_global_compiler_switches, default_language,
dependency_file_kind, global_compiler_switches, include_path,
include_path_file, language_kind, linker_executable_option,
linker_lib_dir_option, linker_lib_name_option, mapping_file_switches,
roots, runtime_project.

From-SVN: r111196

18 years agosem_res.adb (Resolve_Type_Conversion): In case of conversion to an abstract interface...
Javier Miranda [Fri, 17 Feb 2006 16:08:28 +0000 (17:08 +0100)]
sem_res.adb (Resolve_Type_Conversion): In case of conversion to an abstract interface type...

2006-02-17  Javier Miranda  <miranda@adacore.com>

* sem_res.adb (Resolve_Type_Conversion): In case of conversion to an
abstract interface type, the static analysis is not enough to know if
the interface is implemented or not by the source tagged type. Hence
we must pass the work to the expander to generate the required code to
evaluate the conversion at run-time.
(Resolve_Equality_Op): Do not apply previous
transformation if expansion is disasbled, to prevent anomalies when
locating global references in a generic unit.

From-SVN: r111195

18 years agosem_ch6.adb (Build_Body_To_Inline): Enforce the rule that in order to inline a functi...
Ed Schonberg [Fri, 17 Feb 2006 16:08:18 +0000 (17:08 +0100)]
sem_ch6.adb (Build_Body_To_Inline): Enforce the rule that in order to inline a function that returns an...

2006-02-17  Ed Schonberg  <schonberg@adacore.com>

* sem_ch6.adb (Build_Body_To_Inline): Enforce the rule that in order
to inline a function that returns an unconstrained type, the return
expression must be the first variable declared in the body of the
function.

From-SVN: r111194

18 years agosem_ch3.adb (Build_Discriminated_Subtype): In case of concurrent type we cannot inher...
Javier Miranda [Fri, 17 Feb 2006 16:08:08 +0000 (17:08 +0100)]
sem_ch3.adb (Build_Discriminated_Subtype): In case of concurrent type we cannot inherit the primitive operations...

2006-02-17  Javier Miranda  <miranda@adacore.com>
    Ed Schonberg  <schonberg@adacore.com>

* sem_ch3.adb (Build_Discriminated_Subtype): In case of concurrent
type we cannot inherit the primitive operations; we inherit the
Corresponding_Record_Type (which has the list of primitive operations).
(Check_Anonymous_Access_Types): When creating anonymous access types for
access components, use Rewrite in order to preserve the tree structure,
for ASIS use.
(Analyze_Object_Declaration): For limited types with access
discriminants with defaults initialized by an aggregate, obtain
subtype from aggregate as for other mutable types.
(Derived_Type_Declaration): If the derived type is a limited interface,
set the corresponding flag (Is_Limited_Record is not sufficient).

From-SVN: r111193

18 years agosem_ch12.adb (Analyze_Package_Instantiation): Inline_Now is false if the current...
Ed Schonberg [Fri, 17 Feb 2006 16:07:56 +0000 (17:07 +0100)]
sem_ch12.adb (Analyze_Package_Instantiation): Inline_Now is false if the current instance is nested within another instance...

2006-02-17  Ed Schonberg  <schonberg@adacore.com>

* sem_ch12.adb (Analyze_Package_Instantiation): Inline_Now is false if
the current instance is nested within another instance in a child unit.

From-SVN: r111192

18 years agosem_ch10.adb (Analyze_With_Clause): If the unit is a subprogram instantiation...
Ed Schonberg [Fri, 17 Feb 2006 16:07:43 +0000 (17:07 +0100)]
sem_ch10.adb (Analyze_With_Clause): If the unit is a subprogram instantiation...

2006-02-17  Ed Schonberg  <schonberg@adacore.com>

* sem_ch10.adb (Analyze_With_Clause): If the unit is a subprogram
instantiation, the corresponding entity is the related_instance of the
wrapper package created for the instance.

From-SVN: r111191

18 years agoMakefile.in: Use VMS64 specialized versions of several units in Interfaces.C hierarch...
Vasiliy Fofanov [Fri, 17 Feb 2006 16:07:32 +0000 (17:07 +0100)]
Makefile.in: Use VMS64 specialized versions of several units in Interfaces.C hierarchy to be...

2006-02-17  Vasiliy Fofanov  <fofanov@adacore.com>

* Makefile.in: Use VMS64 specialized versions of several units in
Interfaces.C hierarchy to be compatible with HP C default size choices.
Use the default version of Ada.Synchronous_Task_Control for VxWorks 653.

From-SVN: r111190

18 years agoinit.c (facility_resignal_table): new array
Vasiliy Fofanov [Fri, 17 Feb 2006 16:07:22 +0000 (17:07 +0100)]
init.c (facility_resignal_table): new array

2006-02-17  Vasiliy Fofanov  <fofanov@adacore.com>

* init.c (facility_resignal_table): new array
(__gnat_default_resignal_p): enhance default predicate to resignal if
VMS condition has one of the predefined facility codes.

From-SVN: r111189

18 years agog-os_lib.adb (Copy_File): Make sure that if From has an Invalid_FD, then we close...
Robert Dewar [Fri, 17 Feb 2006 16:07:10 +0000 (17:07 +0100)]
g-os_lib.adb (Copy_File): Make sure that if From has an Invalid_FD, then we close To if it is valid.

2006-02-17  Robert Dewar  <dewar@adacore.com>

* g-os_lib.adb (Copy_File): Make sure that if From has an Invalid_FD,
then we close To if it is valid.

From-SVN: r111188

18 years agofreeze.adb (Statically_Discriminated_Components): Return false if the bounds of the...
Ed Schonberg [Fri, 17 Feb 2006 16:06:57 +0000 (17:06 +0100)]
freeze.adb (Statically_Discriminated_Components): Return false if the bounds of the type of the discriminant are not static...

2006-02-17  Ed Schonberg  <schonberg@adacore.com>

* freeze.adb (Statically_Discriminated_Components): Return false if
the bounds of the type of the discriminant are not static expressions.

* sem_aggr.adb (Check_Static_Discriminated_Subtype): Return false if
the bounds of the discriminant type are not static.

From-SVN: r111187

18 years agoexp_dbug.adb (Debug_Renaming_Declaration): Indicate that the entity must be materiali...
Ed Schonberg [Fri, 17 Feb 2006 16:06:28 +0000 (17:06 +0100)]
exp_dbug.adb (Debug_Renaming_Declaration): Indicate that the entity must be materialized when...

2006-02-17  Ed Schonberg  <schonberg@adacore.com>

* exp_dbug.adb (Debug_Renaming_Declaration): Indicate that the entity
must be materialized when the renamed expression is an explicit
dereference.

From-SVN: r111186

18 years agoexp_ch4.adb (Expand_N_Allocator): If the allocated object is accessed through an...
Javier Miranda [Fri, 17 Feb 2006 16:06:16 +0000 (17:06 +0100)]
exp_ch4.adb (Expand_N_Allocator): If the allocated object is accessed through an access to class-wide interface...

2006-02-17  Javier Miranda  <miranda@adacore.com>
    Robert Dewar  <dewar@adacore.com>

* exp_ch4.adb (Expand_N_Allocator): If the allocated object is accessed
through an access to class-wide interface we force the displacement of
the pointer to the allocated object to reference the corresponding
secondary dispatch table.
(Expand_N_Op_Divide): Allow 64 bit divisions by small power of 2,
if Long_Shifts are supported on the target, even if 64 bit divides
are not supported (configurable run time mode).
(Expand_N_Type_Conversion): Do validity check if validity checks on
operands are enabled.
(Expand_N_Qualified_Expression): Do validity check if validity checks
on operands are enabled.

From-SVN: r111185

18 years agos-taprop-irix.adb, [...] (Set_False, [...]): Add Abort_Defer/Undefer pairs to avoid...
Jose Ruiz [Fri, 17 Feb 2006 16:06:01 +0000 (17:06 +0100)]
s-taprop-irix.adb, [...] (Set_False, [...]): Add Abort_Defer/Undefer pairs to avoid the possibility of a task being aborted...

2006-02-17  Jose Ruiz  <ruiz@adacore.com>

* s-taprop-irix.adb, s-taprop-hpux-dce.adb, s-taprop-linux.adb,
s-taprop-solaris.adb, s-taprop-vms.adb, s-taprop-mingw.adb,
s-taprop-posix.adb, s-taprop-vxworks.adb, s-taprop-lynxos.adb,
s-taprop-tru64.adb (Set_False, Set_True, Suspend_Until_True): Add
Abort_Defer/Undefer pairs to avoid the possibility of a task being
aborted while owning a lock.

From-SVN: r111184

18 years agore PR ada/26315 (ACATS failures c43208b c85006a c85006d cd92001)
Eric Botcazou [Fri, 17 Feb 2006 16:05:46 +0000 (17:05 +0100)]
re PR ada/26315 (ACATS failures c43208b c85006a c85006d cd92001)

2006-02-17  Eric Botcazou  <botcazou@adacore.com>

PR ada/26315

* utils2.c (find_common_type): If both input types are BLKmode and
have the same constant size, keep using the first one.

* bindgen.adb: (Gen_Versions_Ada): Revert previous workaround.

* decl.c (gnat_to_gnu_entity): Only check TREE_OVERFLOW for a constant.

* misc.c (gnat_handle_option): New case for -Woverlength-strings.

From-SVN: r111183

18 years agosem_ch4.adb (Find_Boolean_Types): If one of the operands is an aggregate...
Ed Schonberg [Fri, 17 Feb 2006 16:05:24 +0000 (17:05 +0100)]
sem_ch4.adb (Find_Boolean_Types): If one of the operands is an aggregate...

2006-02-17  Ed Schonberg  <schonberg@adacore.com>

* sem_ch4.adb (Find_Boolean_Types): If one of the operands is an
aggregate, check the interpretations of the other operand to find one
that may be a boolean array.
(Analyze_Selected_Component): Fix flow-of-control typo in case where
the prefix is a private extension.

From-SVN: r111182

18 years agostacktrace.cc (GetStackTraceElements): Call gnu::gcj::runtime::NameFinder::removeUnkn...
Andrew Haley [Fri, 17 Feb 2006 13:01:40 +0000 (13:01 +0000)]
stacktrace.cc (GetStackTraceElements): Call gnu::gcj::runtime::NameFinder::removeUnknown() to determine if...

2006-02-16  Andrew Haley  <aph@redhat.com>

        * stacktrace.cc (GetStackTraceElements): Call
        gnu::gcj::runtime::NameFinder::removeUnknown() to determine if
        non-Java frames should be removed from a printed stack trace.
        Pass methodName to getLineNumberForFrame().
        (getLineNumberForFrame): Set method_name from info.dli_sname.
        * gnu/gcj/runtime/NameFinder.java (removeUnknown): New method.
        (remove_unknown): New variable.
        * include/java-stack.h (_Jv_StackTrace::getLineNumberForFrame):
        Add methodName arg.

From-SVN: r111181

18 years agotrans-common.c: Include rtl.h earlier.
Richard Sandiford [Fri, 17 Feb 2006 11:06:17 +0000 (11:06 +0000)]
trans-common.c: Include rtl.h earlier.

gcc/fortran/
* trans-common.c: Include rtl.h earlier.
* trans-decl.c: Likewise.

From-SVN: r111178

18 years agore PR libstdc++/26250 (stringbuf::overflow() fails to set egptr() same as epptr())
Paolo Carlini [Fri, 17 Feb 2006 10:46:57 +0000 (10:46 +0000)]
re PR libstdc++/26250 (stringbuf::overflow() fails to set egptr() same as epptr())

2006-02-17  Paolo Carlini  <pcarlini@suse.de>
    Howard Hinnant  <hhinnant@apple.com>

PR libstdc++/26250
* include/bits/sstream.tcc (basic_stringbuf<>::overflow): Tweak
to leave epgtr() just past the new write position, as per the
relevant bits of 27.7.1.3/8 (not changed by DR 432).
* testsuite/27_io/basic_stringbuf/overflow/char/26250.cc: New.
* testsuite/27_io/basic_stringbuf/overflow/wchar_t/26250.cc: Same.

* docs/html/ext/howto.html: Add entries for DR 169 and DR 432.

* include/std/std_sstream.h (basic_stringbuf<>::_M_sync): Move out
of line...
* include/bits/sstream.tcc: ... here.

Co-Authored-By: Howard Hinnant <hhinnant@apple.com>
From-SVN: r111177

18 years agotree-vrp.c (set_value_range_to_nonnegative): New function.
Jeff Law [Fri, 17 Feb 2006 04:15:32 +0000 (21:15 -0700)]
tree-vrp.c (set_value_range_to_nonnegative): New function.

* tree-vrp.c (set_value_range_to_nonnegative): New function.
(vrp_expr_computes_nonnegative, ssa_name_nonnegative_p): Likewise.
(ssa_name_nonzero_p): Likewise.
(get_value_range): Return NULL if VRP is not running.
(extract_range_from_expr): Fallback to tree_expr_XXX_p if
VRP routines do not discover a range.
(vrp_finalize): Clear VR_VALUE to indicate VRP is not running.
* tree.h (ssa_name_nonzero_p, ssa_name_nonnegative_p): Prototype.
* fold-const.c (tree_expr_nonzero_p): For SSA_NAMEs, query VRP.
(tree_expr_nonnegative_p): Similarly.
* tree-ssa-dom.c (nonzero_vars, nonzero_vars_stack): Remove.
(restore_nonzero_vars_to_original_value): Remove.
(unsafe_associative_fp_binop): Remove.
(tree_ssa_dominator_optimize): Remove initialization and
finalization of nonzero_vars and nonzero_vars_stack.
(dom_opt_initialize_block): No longer push marker on
nonzero_vars_stack.
(dom_opt_finalize_block): No longer call
restore_nonzero_vars_to_original_value.
(record_equivalences_from_phis): No longer look for
nonzero PHI arguments.
(cprop_into_successor_phis): No longer propagate nonzero
property into PHI arguments.  Lose unused argument.  Caller
updated.
(record_equivalences_from_stmt): No longer record nonzero
values for SSA_NAMEs.
(lookup_avail_expr): No longer use nonzero_vars.

* gcc.dg/tree-ssa/vrp24.c: Update expected output.
* gcc.dg/tree-ssa/vrp26.c: New test.

From-SVN: r111175

18 years agostor-layout.c (set_sizetype): Set TYPE_MAX_VALUE properly for sizetype when sizetype...
Jeff Law [Fri, 17 Feb 2006 00:18:03 +0000 (17:18 -0700)]
stor-layout.c (set_sizetype): Set TYPE_MAX_VALUE properly for sizetype when sizetype is unsigned.

        * stor-layout.c (set_sizetype): Set TYPE_MAX_VALUE properly
        for sizetype when sizetype is unsigned.

From-SVN: r111170

18 years agoDaily bump.
GCC Administrator [Fri, 17 Feb 2006 00:17:29 +0000 (00:17 +0000)]
Daily bump.

From-SVN: r111168

18 years agore PR target/25603 (Miscompiled FORTRAN program)
Denis Nagorny [Fri, 17 Feb 2006 00:03:06 +0000 (00:03 +0000)]
re PR target/25603 (Miscompiled FORTRAN program)

2006-02-16  Denis Nagorny <denis_nagorny@linux.intel.com>

PR rtl-optimization/25603
* reload.c (reg_inc_found_and_valid_p): New. Check REG_INC note.
(regno_clobbered_p): Use it. Reusing SETS argument for REG_INC case.
* reload1.c (choose_reload_regs): Added call of regno_clobbered_p
with new meaning of SETS.

From-SVN: r111162

18 years agore PR target/20353 (uclibc does not provide C99 math functions)
Joseph Myers [Thu, 16 Feb 2006 23:29:10 +0000 (23:29 +0000)]
re PR target/20353 (uclibc does not provide C99 math functions)

gcc:
PR target/20353
PR target/24578
PR target/24837
* config/linux.opt: New file.
* config/linux.h (CHOOSE_DYNAMIC_LINKER, UCLIBC_DYNAMIC_LINKER,
LINUX_DYNAMIC_LINKER): Define.
(TARGET_C99_FUNCTIONS): Define depending on TARGET_GLIBC.
* config.gcc (*-*-linux*): Define extra_options.
(*-*-*uclibc*): Define UCLIBC_DEFAULT.
(arm*-*-linux-gnueabi): Change to arm*-*-linux-*eabi.
* config/arm/linux-eabi.h (LINUX_TARGET_INTERPRETER): Change to
GLIBC_DYNAMIC_LINKER.
* config/arm/linux-elf.h (LINUX_TARGET_INTERPRETER): Likewise.
(LINUX_TARGET_LINK_SPEC): Use LINUX_DYNAMIC_LINKER.
* config/mips/linux.h (GLIBC_DYNAMIC_LINKER): Define.
(LINK_SPEC): Use LINUX_DYNAMIC_LINKER.
* doc/invoke.texi (GNU/Linux Options): New section.

gcc/testsuite:
* gcc.dg/builtins-config.h (HAVE_C99_RUNTIME): Don't define if
__UCLIBC__ is defined.

libstdc++-v3:
PR libstdc++/14939
* config/os/uclibc/ctype_base.h, config/os/uclibc/ctype_inline.h,
config/os/uclibc/ctype_noninline.h, config/os/uclibc/os_defines.h:
New.
* acinclude.m4 (GLIBCXX_CONFIGURE): Test whether using uClibc.
* configure.host: Use os/uclibc for uClibc.
* crossconfig.m4 (*-linux*): Use link tests.  Don't hardcode
presence of math functions.
* configure: Regenerate.

From-SVN: r111160

18 years agoreturn_dbl.c: New test case.
Andreas Tobler [Thu, 16 Feb 2006 22:29:01 +0000 (23:29 +0100)]
return_dbl.c: New test case.

2006-02-16  Andreas Tobler  <a.tobler@schweiz.ch>

* testsuite/libffi.call/return_dbl.c: New test case.
* testsuite/libffi.call/return_dbl1.c: Likewise.
* testsuite/libffi.call/return_dbl2.c: Likewise.
* testsuite/libffi.call/return_fl.c: Likewise.
* testsuite/libffi.call/return_fl1.c: Likewise.
* testsuite/libffi.call/return_fl2.c: Likewise.
* testsuite/libffi.call/return_fl3.c: Likewise.
* testsuite/libffi.call/closure_fn6.c: Likewise.

From-SVN: r111156

18 years agoenv.c (__gnat_setenv): Use size_t.
Eric Botcazou [Thu, 16 Feb 2006 22:06:06 +0000 (22:06 +0000)]
env.c (__gnat_setenv): Use size_t.

* env.c (__gnat_setenv): Use size_t.
(__gnat_unsetenv): Likewise.
(__gnat_clearenv): Likewise.

From-SVN: r111155

18 years agosparc.md (setjmp): Rewrite.
Eric Botcazou [Thu, 16 Feb 2006 21:41:23 +0000 (22:41 +0100)]
sparc.md (setjmp): Rewrite.

* config/sparc/sparc.md (setjmp): Rewrite.
(setjmp_32): Delete.
(setjmp_64): Likewise.

From-SVN: r111154

18 years agore PR fortran/26224 (ICE in C$OMP SINGLE / END SINGLE COPYPRIVATE( ) block)
Jakub Jelinek [Thu, 16 Feb 2006 21:35:38 +0000 (22:35 +0100)]
re PR fortran/26224 (ICE in C$OMP SINGLE / END SINGLE COPYPRIVATE( ) block)

PR fortran/26224
* parse.c (parse_omp_do, parse_omp_structured_block): Call
gfc_commit_symbols and gfc_warning_check.

* gfortran.dg/gomp/pr26224.f: New test.

From-SVN: r111153

18 years agore PR middle-end/26316 (loop-invariant miscompiles openmp.c)
Jakub Jelinek [Thu, 16 Feb 2006 21:31:20 +0000 (22:31 +0100)]
re PR middle-end/26316 (loop-invariant miscompiles openmp.c)

* openmp.c (resolve_omp_clauses): Add a dummy case label to workaround
PR middle-end/26316.

From-SVN: r111152

18 years agonested_struct2.c: Remove ffi_type_mylong definition.
Andreas Tobler [Thu, 16 Feb 2006 21:03:16 +0000 (22:03 +0100)]
nested_struct2.c: Remove ffi_type_mylong definition.

2006-02-16  Andreas Tobler  <a.tobler@schweiz.ch>

* testsuite/libffi.call/nested_struct2.c: Remove ffi_type_mylong
definition.
* testsuite/libffi.call/ffitest.h: Add ffi_type_mylong definition
here to be used by other test cases too.

* testsuite/libffi.call/nested_struct10.c: New test case.
* testsuite/libffi.call/nested_struct9.c: Likewise.
* testsuite/libffi.call/nested_struct8.c: Likewise.
* testsuite/libffi.call/nested_struct7.c: Likewise.
* testsuite/libffi.call/nested_struct6.c: Likewise.
* testsuite/libffi.call/nested_struct5.c: Likewise.
* testsuite/libffi.call/nested_struct4.c: Likewise.

From-SVN: r111151

18 years agotree-ssa-operands.c (access_can_touch_variable): Fix typo in previous change.
Daniel Berlin [Thu, 16 Feb 2006 20:29:19 +0000 (20:29 +0000)]
tree-ssa-operands.c (access_can_touch_variable): Fix typo in previous change.

2006-02-16  Daniel Berlin <dberlin@dberlin.org>

* tree-ssa-operands.c (access_can_touch_variable): Fix typo in
 previous change.

From-SVN: r111148

18 years agoloop-invariant.c (invariant_for_use, [...]): Fail for read-write uses.
Zdenek Dvorak [Thu, 16 Feb 2006 15:59:00 +0000 (16:59 +0100)]
loop-invariant.c (invariant_for_use, [...]): Fail for read-write uses.

* loop-invariant.c (invariant_for_use, check_dependencies): Fail for
read-write uses.

From-SVN: r111141

18 years agore PR rtl-optimization/26296 (ACATS ICE cxg2007 cxg2012 verify_flow_info failed)
Zdenek Dvorak [Thu, 16 Feb 2006 15:47:20 +0000 (16:47 +0100)]
re PR rtl-optimization/26296 (ACATS ICE cxg2007 cxg2012 verify_flow_info failed)

PR rtl-optimization/26296
* Makefile.in (loop-invariant.c): Add except.h dependency.
* loop-invariant.c: Include except.h.
(find_invariant_insn): Ignore insns satisfying can_throw_internal.

From-SVN: r111139

18 years agoreload1.c (emit_reload_insns): Invalidate dead input registers used for reloads.
Paul Brook [Thu, 16 Feb 2006 15:14:23 +0000 (15:14 +0000)]
reload1.c (emit_reload_insns): Invalidate dead input registers used for reloads.

2005-02-16  Paul Brook  <paul@codesourcery.com>

* reload1.c (emit_reload_insns): Invalidate dead input registers used
for reloads.

From-SVN: r111137

18 years agore PR testsuite/25918 (gcc.dg/vect/vect-reduc-dot-s16.c scan-tree-dump-times vectoriz...
Victor Kaplansky [Thu, 16 Feb 2006 09:59:00 +0000 (09:59 +0000)]
re PR testsuite/25918 (gcc.dg/vect/vect-reduc-dot-s16.c scan-tree-dump-times vectorized 1 loops 1 and gcc.dg/vect/vect-reduc-pattern-2.c scan-tree-dump-times vectorized 2 loops 1 fail)

testsuite/
2006-02-16  Victor Kaplansky  <victork@il.ibm.com>

PR tree-opt/25918
* lib/target-supports.exp
(check_effective_target_vect_short_mult): New.
(check_effective_target_vect_char_mult): New.
(check_effective_target_vect_widen_sum_qi_to_si): New.
(check_effective_target_vect_widen_sum_qi_to_hi): New.
(check_effective_target_vect_widen_sum_hi_to_si): New.
* gcc.dg/vect/vect-reduc-dot-s16.c: Remove, split into
vect-reduc-dot-s16a.c and vect-reduc-dot-s16b.c
* vect-reduc-dot-s16a.c: New, split from vect-reduc-dot-s16.c.
* vect-reduc-dot-s16b.c: New, split from vect-reduc-dot-s16.c.
* gcc.dg/vect/vect-reduc-pattern-2.c: Remove, split into
vect-reduc-pattern-2a.c, vect-reduc-pattern-2b.c and
vect-reduc-pattern-2c.c
* gcc.dg/vect/vect-reduc-pattern-1.c: Remove, split into
vect-reduc-pattern-1a.c, vect-reduc-pattern-1b.c and
vect-reduc-pattern-1c.c

From-SVN: r111135

18 years agoMAINTAINERS (Write After Approval): Add myself.
Victor Kaplansky [Thu, 16 Feb 2006 09:30:51 +0000 (09:30 +0000)]
MAINTAINERS (Write After Approval): Add myself.

        * MAINTAINERS (Write After Approval): Add myself.

From-SVN: r111134

18 years ago* opt.ads (Ada_Version_Default): Set to Ada 2005 by default.
Arnaud Charlet [Thu, 16 Feb 2006 08:54:12 +0000 (08:54 +0000)]
* opt.ads (Ada_Version_Default): Set to Ada 2005 by default.

From-SVN: r111133

18 years agoRemove test which is invalid Ada 2005.
Arnaud Charlet [Thu, 16 Feb 2006 08:48:59 +0000 (09:48 +0100)]
Remove test which is invalid Ada 2005.

From-SVN: r111132

18 years agore PR libfortran/24903 (dotprod should use __builtin_conj)
Francois-Xavier Coudert [Thu, 16 Feb 2006 07:52:22 +0000 (08:52 +0100)]
re PR libfortran/24903 (dotprod should use __builtin_conj)

PR libfortran/24903
* m4/dotprodc.m4: Use __builtin_conj instead of assigning real
and imaginary parts separately.
* generated/dotprod_c4.c: Regenerated.
* generated/dotprod_c8.c: Regenerated.
* generated/dotprod_c10.c: Regenerated.
* generated/dotprod_c16.c: Regenerated.

From-SVN: r111131

18 years agore PR fortran/24557 (ICE: PRINTing function result of size depending on assumed lengt...
Paul Thomas [Thu, 16 Feb 2006 07:04:13 +0000 (07:04 +0000)]
re PR fortran/24557 (ICE: PRINTing function result of size depending on assumed length CHARACTER dummy)

2005-02-16  Paul Thomas  <pault@gcc.gnu.org>

PR fortran/24557
* trans-expr.c (gfc_add_interface_mapping): Use the actual argument
for character(*) arrays, rather than casting to the type and kind
parameters of the formal argument.

2005-02-16  Paul Thomas  <pault@gcc.gnu.org>

PR fortran/24557
        * gfortran.dg/assumed_charlen_needed_1.f90: New test.

From-SVN: r111130

18 years agore PR rtl-optimization/25636 (opts.c is being miscompiled, write to read only memory)
Bernd Schmidt [Thu, 16 Feb 2006 01:26:54 +0000 (01:26 +0000)]
re PR rtl-optimization/25636 (opts.c is being miscompiled, write to read only memory)

PR rtl-optimization/25636
* local-alloc.c (update_equiv_regs): Lose a bogus rtx_equal_p test
when deciding whether an insn is an initializing insn.

From-SVN: r111129

18 years agoDaily bump.
GCC Administrator [Thu, 16 Feb 2006 00:17:27 +0000 (00:17 +0000)]
Daily bump.

From-SVN: r111127

18 years agoAdd a little whitespace
Daniel Berlin [Wed, 15 Feb 2006 22:47:38 +0000 (22:47 +0000)]
Add a little whitespace

From-SVN: r111121

18 years agotree.c (init_ttree): Add STRUCT_FIELD_TAG handling.
Daniel Berlin [Wed, 15 Feb 2006 22:09:45 +0000 (22:09 +0000)]
tree.c (init_ttree): Add STRUCT_FIELD_TAG handling.

2006-02-15 Daniel Berlin  <dberlin@dberlin.org>

* tree.c (init_ttree): Add STRUCT_FIELD_TAG handling.
(tree_code_size): Ditto.
* tree.h (struct tree_memory_tag): Remove parent_var.
(struct tree_struct_field_tag): New.
(SFT_OFFSET): New.
(SFT_SIZE): New.
(union tree_node): Add sft member.
* tree-ssa-alias.c (get_tmt_for): Don't handle TYPE_READONLY
specially here.
(create_sft): Add size and offset argument, set SFT_OFFSET and
SFT_SIZE.
(create_overlap_variables_for): Update for SFT_OFFSET/SFT_SIZE.
* treestruct.def: Add TS_STRUCT_FIELD_TAG.
* tree-flow-inline.h (get_subvar_at): Update for
SFT_OFFSET/SFT_SIZE.
(var_can_have_subvars): Ditto.
(overlap_subvar): Ditto.
* print-tree.c (print_node): Print out interesting things for
SFT's.
* tree-flow.h (struct subvar): Remove offset and size members.
* tree-ssa-operands.c (get_expr_operands): Update for
get_indirect_ref_operands changes.
(get_indirect_ref_operands): Call add_virtual_operand instead of
add_stmt_operand.  Only recurse on base var if requested.
(access_can_touch_variable): New function.
(add_stmt_operand): Split virtual operand handling into ...
(add_virtual_operand): Here.  Add offset, size, and for_clobber
arguments.  Prune alias sets.
(add_call_clobber_ops): Call add_virtual_operand.

From-SVN: r111120

18 years agore PR fortran/26054 (Gratuitous warning about Fortran 2003 features w/o -std=...)
Toon Moene [Wed, 15 Feb 2006 21:06:58 +0000 (22:06 +0100)]
re PR fortran/26054 (Gratuitous warning about Fortran 2003 features w/o -std=...)

2006-02-15  Toon Moene  <toon@moene.indiv.nluug.nl>

PR fortran/26054
* fortran/options.c: Do not warn for Fortran 2003 features
by default.
* testsuite/gfortran.dg/enum_8.f90: Remove check for warning.
* testsuite/gfortran.dg/iomsg_1.f90: Ditto.
* testsuite/gfortran.dg/enum_1.f90: Ditto.
* testsuite/gfortran.dg/enum_9.f90: Ditto.
* testsuite/gfortran.dg/enum_2.f90: Ditto.
* testsuite/gfortran.dg/enum_10.f90: Ditto.
* testsuite/gfortran.dg/enum_3.f90: Ditto.
* testsuite/gfortran.dg/flush_1.f90: Ditto.
* testsuite/gfortran.dg/enum_4.f90: Ditto.
* testsuite/gfortran.dg/array_constructor_1.f90: Ditto.
* testsuite/gfortran.dg/enum_5.f90: Ditto.
* testsuite/gfortran.dg/enum_6.f90: Ditto.
* testsuite/gfortran.dg/enum_7.f90: Ditto.

From-SVN: r111117

18 years agore PR middle-end/26300 (ICE in trunc_int_for_mode)
Jakub Jelinek [Wed, 15 Feb 2006 20:41:03 +0000 (21:41 +0100)]
re PR middle-end/26300 (ICE in trunc_int_for_mode)

PR middle-end/26300
* combine.c (make_extraction): Bail out if ORIG_POS is negative.

* gcc.c-torture/compile/20060215-1.c: New test.

From-SVN: r111116

18 years agotree.h (struct tree_omp_clause): Use OMP_CLAUSE_CODE rather than TREE_CODE as index...
Jakub Jelinek [Wed, 15 Feb 2006 20:38:59 +0000 (21:38 +0100)]
tree.h (struct tree_omp_clause): Use OMP_CLAUSE_CODE rather than TREE_CODE as index into omp_clause_num_ops array.

* tree.h (struct tree_omp_clause): Use OMP_CLAUSE_CODE rather
than TREE_CODE as index into omp_clause_num_ops array.

From-SVN: r111115

18 years agore PR rtl-optimization/26184 (memory leaks in swing modulo scheduling function)
Uttam Pawar [Wed, 15 Feb 2006 19:33:33 +0000 (14:33 -0500)]
re PR rtl-optimization/26184 (memory leaks in swing modulo scheduling function)

2006-02-15  Uttam Pawar  <uttamp@us.ibm.com>

        PR rtl-optimization/26184
        * modulo-sched.c (generate_reg_moves): Free bitmap vector
        uses_of_defs.
        * modulo-sched.c (sms_schedule): Free g_arr pointer.
        * modulo-sched.c (sms_schedule_by_order): Free bitmap pointers
        must_precede, must_follow and tobe_scheduled.

        PR other/26147
        * opts.c (common_handle_option): Free new_option pointer.
        * df-core.c (df_analyze): Free postorder pointer.

From-SVN: r111114

18 years agoMakefile.in: Fix the examples about the use of stamps
Rafael Espindola [Wed, 15 Feb 2006 18:46:57 +0000 (18:46 +0000)]
Makefile.in: Fix the examples about the use of stamps

* gcc/Makefile.in: Fix the examples about the use of stamps

M    gcc/ChangeLog
M    gcc/Makefile.in

From-SVN: r111113

18 years agocheck.c: Update copyright years.
Tobias Schlüter [Wed, 15 Feb 2006 12:42:16 +0000 (13:42 +0100)]
check.c: Update copyright years.

* check.c: Update copyright years.

From-SVN: r111110

18 years agore PR middle-end/22275 (bitfield layout change)
Michael Matz [Wed, 15 Feb 2006 12:19:49 +0000 (12:19 +0000)]
re PR middle-end/22275 (bitfield layout change)

        PR middle-end/22275

        * stor-layout.c (layout_decl): Zero-width bitfields aren't
        influenced by maximum_field_alignment or DECL_PACKED.
        (update_alignment_for_field): Ditto.
        (place_field): Ditto.
        * doc/extend.texi (<#pragma pack>, <Type Attributes>): Document
        this behaviour.

From-SVN: r111109

18 years agocheck.c (gfc_check_minloc_maxloc, [...]): Don't call dim_range_check on not-present...
Tobias Schlüter [Wed, 15 Feb 2006 11:02:21 +0000 (12:02 +0100)]
check.c (gfc_check_minloc_maxloc, [...]): Don't call dim_range_check on not-present optional dim argument.

* check.c (gfc_check_minloc_maxloc, check_reduction): Don't call
dim_range_check on not-present optional dim argument.

From-SVN: r111108

18 years agoResync
Arnaud Charlet [Wed, 15 Feb 2006 09:58:27 +0000 (10:58 +0100)]
Resync

From-SVN: r111107

18 years ago(Eval_Relational_Op): Use new Is_Known_Null flag to deal with case
Arnaud Charlet [Wed, 15 Feb 2006 09:51:54 +0000 (10:51 +0100)]
(Eval_Relational_Op): Use new Is_Known_Null flag to deal with case
of null = null, now known true.

From-SVN: r111106

18 years agoAdd section for gnatcheck.
Arnaud Charlet [Wed, 15 Feb 2006 09:48:56 +0000 (10:48 +0100)]
Add section for gnatcheck.

        Add documentation for restriction No_Dispatching_Calls
        Add documentation for pragma Ada_2005
        Remove mention of obsolete pragma Propagate_Exceptions

From-SVN: r111105

18 years agognat_ugn.texi: Remove limitations with sparc m64 support.
Arnaud Charlet [Wed, 15 Feb 2006 09:47:23 +0000 (10:47 +0100)]
gnat_ugn.texi: Remove limitations with sparc m64 support.

2006-02-13  Arnaud Charlet  <charlet@adacore.com>
    Ben Brosgol  <brosgol@adacore.com>
    Robert Dewar  <dewar@adacore.com>

* gnat_ugn.texi: Remove limitations with sparc m64 support.
Document that gnatbind -M option is for cross environments only.
Added description of using gnatmem to trace gnat rtl allocs and deallocs
Add note on use of $ to label implicit run time calls
Add documentation for -gnatyI (check mode IN)
Updated chapter on compatibility with HP Ada
VMS-oriented edits.
Ran spell and corrected errors
Add documentation for gnatbind -d and rework documentation of -D
at the same time.
Add subprogram/data elimination section.
Minor editing of annex A.
Add section for gnatcheck.
Add documentation for restriction No_Dispatching_Calls
Add documentation for pragma Ada_2005
Remove mention of obsolete pragma Propagate_Exceptions
Document that pragma Unreferenced can appear after DO in ACCEPT
Clarify Pure_Function for library level units
Mention Max/Min in connection with No_Implicit_Conditionals
No_Wide_Characters restriction is no longer partition-wide
Add a nice example for Universal_Literal_String attribute
Document that pragma No_Return can take multiple arguments

* ug_words: Added entry for gnatcheck

* g-ctrl_c.ads (Install_Handler): Enhance comments

* g-os_lib.ads: Add comments to OS_Exit that it is abrupt termination

* g-trasym.ads: Add documentation on how to do off line symbolic
traceback computation.

* s-fatgen.adb: Add comments for Unaligned_Valid

* stand.ads: Fix typo in comment

From-SVN: r111104

18 years agotracebak.c (PPC AIX/Darwin): Define FORCE_CALL to 1.
Eric Botcazou [Wed, 15 Feb 2006 09:47:09 +0000 (10:47 +0100)]
tracebak.c (PPC AIX/Darwin): Define FORCE_CALL to 1.

2006-02-13  Eric Botcazou  <ebotcazou@adacore.com>

* tracebak.c (PPC AIX/Darwin): Define FORCE_CALL to 1.
(PPC VxWorks): Likewise.
(Generic unwinder): Define FORCE_CALL to 0 if not already defined.
(forced_callee): Make non-inlinable and non-pure.
(__gnat_backtrace): Call forced_callee if FORCE_CALL is set to 1.

From-SVN: r111103

18 years agos-wchjis.adb (JIS_To_EUC): Raise Constraint_Error for invalid value
Robert Dewar [Wed, 15 Feb 2006 09:46:58 +0000 (10:46 +0100)]
s-wchjis.adb (JIS_To_EUC): Raise Constraint_Error for invalid value

2006-02-13  Robert Dewar  <dewar@adacore.com>

* s-wchjis.adb (JIS_To_EUC): Raise Constraint_Error for invalid value

From-SVN: r111102

18 years agos-valint.adb (Scan_Integer): Call Scan_Raw_Unsigned instead of Scan_Unsigned...
Bob Duff [Wed, 15 Feb 2006 09:46:41 +0000 (10:46 +0100)]
s-valint.adb (Scan_Integer): Call Scan_Raw_Unsigned instead of Scan_Unsigned...

2006-02-13  Bob Duff  <duff@adacore.com>

* s-valint.adb (Scan_Integer): Call Scan_Raw_Unsigned instead of
Scan_Unsigned, so we do not scan leading blanks and sign twice.
Integer'Value("- 5") and Integer'Value("-+5") now correctly
raise Constraint_Error.

* s-vallli.adb (Scan_Long_Long_Integer): Call
Scan_Raw_Long_Long_Unsigned instead of Scan_Long_Long_Unsigned, so we
do not scan leading blanks and sign twice.
Integer'Value("- 5") and Integer'Value("-+5") now correctly
raise Constraint_Error.

* s-valllu.ads, s-valllu.adb (Scan_Raw_Long_Long_Unsigned,
Scan_Long_Long_Unsigned): Split out most of the processing from
Scan_Long_Long_Unsigned out into
Scan_Raw_Long_Long_Unsigned, so that Val_LLI can call the Raw_ version.
This prevents scanning leading blanks and sign twice.
Also fixed a bug: Modular'Value("-0") should raise Constraint_Error
See RM-3.5(44).

* s-valuns.ads, s-valuns.adb (Scan_Raw_Unsigned, Scan_Unsigned): Split
out most of the processing from Scan_Unsigned out into
Scan_Raw_Unsigned, so that Val_LLI can call the Raw_ version.
This prevents scanning leading blanks and sign twice.

* s-valuti.ads, s-valuti.adb (Scan_Plus_Sign): Add Scan_Plus_Sign, for
use with Modular'Value attribute.
(Scan_Plus_Sign): Add Scan_Plus_Sign, for use with Modular'Value
attribute.

From-SVN: r111101

18 years agos-stausa.adb (Initialize_Analyzer): fixed error in assignment of task name.
Quentin Ochem [Wed, 15 Feb 2006 09:46:17 +0000 (10:46 +0100)]
s-stausa.adb (Initialize_Analyzer): fixed error in assignment of task name.

2006-02-13  Quentin Ochem  <ochem@adacore.com>

* s-stausa.adb (Initialize_Analyzer): fixed error in assignment of
task name.

From-SVN: r111100

18 years agosprint.adb (Write_Itype): Preserve Sloc of declaration...
Ed Schonberg [Wed, 15 Feb 2006 09:46:08 +0000 (10:46 +0100)]
sprint.adb (Write_Itype): Preserve Sloc of declaration...

2006-02-13  Ed Schonberg  <schonberg@adacore.com>
    Robert Dewar  <dewar@adacore.com>

* sprint.adb (Write_Itype): Preserve Sloc of declaration, if any, to
preserve the source unit where the itype is declared, and prevent a
backend abort.
(Note_Implicit_Run_Time_Call): New procedure
(Write_Itype): Handle missing cases (E_Class_Wide_Type and
E_Subprogram_Type)

* sprint.ads: Document use of $ for implicit run time routine call

From-SVN: r111099

18 years agosinput-d.adb (Write_Line): Update the Source_Index_Table after each line.
Thomas Quinot [Wed, 15 Feb 2006 09:45:56 +0000 (10:45 +0100)]
sinput-d.adb (Write_Line): Update the Source_Index_Table after each line.

2006-02-13  Thomas Quinot  <quinot@adacore.com>

* sinput-d.adb (Write_Line): Update the Source_Index_Table after each
line. This is necessary to allow In_Extended_Main_Unit to provide
correct results for itypes while writing out expanded source.
(Close_File): No need to update the source_index_table here since it's
now done for each line.

From-SVN: r111098

18 years agosem_warn.adb (Check_One_Unit): If the unit appears in a limited_with clause...
Ed Schonberg [Wed, 15 Feb 2006 09:45:43 +0000 (10:45 +0100)]
sem_warn.adb (Check_One_Unit): If the unit appears in a limited_with clause...

2006-02-13  Ed Schonberg  <schonberg@adacore.com>

* sem_warn.adb (Check_One_Unit): If the unit appears in a limited_with
clause, use the limited view to determine whether any entity from it
is referenced.

From-SVN: r111097

18 years agosem_type.adb (Write_Overloads): Improve display of candidate interpretations.
Ed Schonberg [Wed, 15 Feb 2006 09:45:29 +0000 (10:45 +0100)]
sem_type.adb (Write_Overloads): Improve display of candidate interpretations.

2006-02-13  Ed Schonberg  <schonberg@adacore.com>
    Javier Miranda  <miranda@adacore.com>

* sem_type.adb (Write_Overloads): Improve display of candidate
interpretations.
(Add_One_Interp): Do not add to the list of interpretations aliased
entities corresponding with an abstract interface type that is an
immediate ancestor of a tagged type; otherwise we have a dummy
conflict between this entity and the aliased entity.
(Disambiguate): The predefined equality on universal_access is not
usable if there is a user-defined equality with the proper signature,
declared in the same declarative part as the designated type.
(Find_Unique_Type): The universal_access equality operator defined under
AI-230 does not cover pool specific access types.
(Covers): If one of the types is a generic actual subtype, check whether
it matches the partial view of the other type.

From-SVN: r111096

18 years agosem_elab.adb (Same_Elaboration_Scope): A package that is a compilation unit is an...
Ed Schonberg [Wed, 15 Feb 2006 09:45:12 +0000 (10:45 +0100)]
sem_elab.adb (Same_Elaboration_Scope): A package that is a compilation unit is an elaboration scope.

2006-02-13  Ed Schonberg  <schonberg@adacore.com>
    Robert Dewar  <dewar@adacore.com>

* sem_elab.adb (Same_Elaboration_Scope): A package that is a
compilation unit is an elaboration scope.
(Add_Task_Proc): Add '\' in 2-line warning message.
(Activate_All_Desirable): Deal with case of unit with'ed by parent

From-SVN: r111095

18 years agosem_ch9.adb (Analyze_Protected_Type, [...]): Check that if this is the full-declarati...
Javier Miranda [Wed, 15 Feb 2006 09:45:00 +0000 (10:45 +0100)]
sem_ch9.adb (Analyze_Protected_Type, [...]): Check that if this is the full-declaration associated with a private...

2006-02-13  Javier Miranda  <miranda@adacore.com>

* sem_ch9.adb (Analyze_Protected_Type, Analyze_Task_Type): Check that
if this is the full-declaration associated with a private declaration
that implement interfaces, then the private type declaration must be
limited.
(Analyze_Single_Protected, Analyze_Single_Task): Do not mark the object
as aliased. The use of the 'access attribute is not available for such
object (for this purpose the object should be explicitly marked as
aliased, but being an anonymous type this is not possible).

From-SVN: r111094

18 years agosem_ch8.adb (Note_Redundant_Use): Suppress unhelpful warning about redundant use...
Bob Duff [Wed, 15 Feb 2006 09:44:48 +0000 (10:44 +0100)]
sem_ch8.adb (Note_Redundant_Use): Suppress unhelpful warning about redundant use clauses.

2006-02-13  Bob Duff  <duff@adacore.com>

* sem_ch8.adb (Note_Redundant_Use): Suppress unhelpful warning about
redundant use clauses.
In particular, if the scope of two use clauses overlaps, but one is not
entirely included in the other, we should not warn.  This can happen
with nested packages.
(Analyze_Subprogram_Renaming): Protect the compiler against previously
reported errors. The bug was reported when the compiler was built
with assertions enabled.
(Find_Type): If the node is a 'Class reference and the prefix is a
synchronized type without a corresponding record, return the type
itself.

From-SVN: r111093

18 years agosem_ch4.adb (Remove_Abstract_Interpretations): Even if there are no abstract interpre...
Ed Schonberg [Wed, 15 Feb 2006 09:44:37 +0000 (10:44 +0100)]
sem_ch4.adb (Remove_Abstract_Interpretations): Even if there are no abstract interpretations on an operator...

2006-02-13  Ed Schonberg  <schonberg@adacore.com>
    Javier Miranda  <miranda@adacore.com>

* sem_ch4.adb (Remove_Abstract_Interpretations): Even if there are no
abstract interpretations on an operator, remove interpretations that
yield Address or a type derived from it, if one of the operands is an
integer literal.
(Try_Object_Operation.Try_Primitive_Operation,
Try_Object_Operation.Try_Class_Wide_Operation): Set proper source
location when creating the new reference to a primitive or class-wide
operation as a part of rewriting a subprogram call.
(Try_Primitive_Operations): If context requires a function, collect all
interpretations after the first match, because there may be primitive
operations of the same type with the same profile and different return
types. From code reading.
(Try_Primitive_Operation): Use the node kind to choose the proper
operation when a function and a procedure have the same parameter
profile.
(Complete_Object_Operation): If formal is an access parameter and prefix
is an object, rewrite as an Access reference, to match signature of
primitive operation.
(Find_Equality_Type, Find_One_Interp): Handle properly equality given
by an expanded name with prefix Standard, when the operands are of an
anonymous access type.
(Remove_Abstract_Operations): If the operation is abstract because it is
inherited by a user-defined type derived from Address, remove it as
well from the set of candidate interpretations of an overloaded node.
(Analyze_Membership_Op): Membership test not applicable to cpp-class
types.

From-SVN: r111092

18 years agosem_ch12.adb (Inline_Instance_Body): Remove erroneous assumption that Scope_Stack...
Thomas Quinot [Wed, 15 Feb 2006 09:44:24 +0000 (10:44 +0100)]
sem_ch12.adb (Inline_Instance_Body): Remove erroneous assumption that Scope_Stack.First = 1.

2006-02-13  Thomas Quinot  <quinot@adacore.com>
    Robert Dewar  <dewar@adacore.com>
    Ed Schonberg  <schonberg@adacore.com>
    Javier Miranda  <miranda@adacore.com>

* sem_ch12.adb (Inline_Instance_Body): Remove erroneous assumption
that Scope_Stack.First = 1.
Properly handle Ada_Version_Explicit and Ada_Version_Config, which
were not always properly handled previously.
(Formal_Entity): Complete rewrite, to handle properly some complex case
with multiple levels of parametrization by formal packages.
(Analyze_Formal_Derived_Type): Propagate Ada 2005 "limited" indicator
to the corresponding derived type declaration for proper semantics.

* sem_prag.adb (Analyze_Pragma): Remove '!' in warning message.
(Check_Component): Enforce restriction on components of
unchecked_unions: a component in a variant cannot contain tasks or
controlled types.
(Unchecked_Union): Allow nested variants and multiple discriminants, to
conform to AI-216.
Add pragma Ada_2005 (synonym for Ada_05)
Properly handle Ada_Version_Explicit and Ada_Version_Config, which
were not always properly handled previously.
Document that pragma Propagate_Exceptions has no effect
(Analyze_Pragma, case Pure): Set new flag Has_Pragma_Pure
(Set_Convention_From_Pragma): Check that if a convention is
specified for a dispatching operation, then it must be
consistent with the existing convention for the operation.
(CPP_Class): Because of the C++ ABI compatibility, the programmer is no
longer required to specify an vtable-ptr component in the record. For
compatibility reasons we leave the support for the previous definition.
(Analyze_Pragma, case No_Return): Allow multiple arguments

* sem_ch3.ads, sem_ch3.adb (Check_Abstract_Overriding): Flag a
non-overrideen inherited operation with a controlling result as
illegal only its implicit declaration comes from the derived type
declaration of its result's type.
(Check_Possible_Deferred_Completion): Relocate the object definition
node of the subtype indication of a deferred constant completion rather
than directly analyzing it. The analysis of the generated subtype will
correctly decorate the GNAT tree.
(Record_Type_Declaration): Check whether this is a declaration for a
limited derived record before analyzing components.
(Analyze_Component_Declaration): Diagnose record types  not explicitly
declared limited when a component has a limited type.
(Build_Derived_Record_Type): Code reorganization to check if some of
the inherited subprograms of a tagged type cover interface primitives.
This check was missing in case of a full-type associated with a private
type declaration.
(Constant_Redeclaration): Check that the subtypes of the partial and the
full view of a constrained deferred constant statically match.
(Mentions_T): A reference to the current type in an anonymous access
component declaration  must be an entity name.
(Make_Incomplete_Type_Declaration): If type is tagged, set type of
class_wide type to refer to full type, not to the incomplete one.
(Add_Interface_Tag_Components): Do nothing if RE_Interface_Tag is not
available. Required to give support to the certified run-time.
(Analyze_Component_Declaration): In case of anonymous access components
perform missing checks for AARM 3.9.2(9) and 3.10.2 (12.2).
(Process_Discriminants): For an access discriminant, use the
discriminant specification as the associated_node_for_itype, to
simplify accessibility checks.

From-SVN: r111091

18 years agosem_ch10.adb (Check_Redundant_Withs): New procedure in Analyze_Compilation_Unit.
Hristian Kirtchev [Wed, 15 Feb 2006 09:44:09 +0000 (10:44 +0100)]
sem_ch10.adb (Check_Redundant_Withs): New procedure in Analyze_Compilation_Unit.

2006-02-13  Hristian Kirtchev  <kirtchev@adacore.com>
    Ed Schonberg  <schonberg@adacore.com>
    Gary Dismukes  <dismukes@adacore.com>

* sem_ch10.adb (Check_Redundant_Withs): New procedure in
Analyze_Compilation_Unit.
Detect and warn on redundant with clauses detected in a package spec
and/or body when -gnatwr is used.
(Analyze_Context): Analyze config pragmas before other items
(Install_Context_Items): Don't analyze config pragmas here
(Install_Limited_Withed_Unit): Set limited entity of package in
with_clause so that cross-reference information or warning messages on
unused packages can be properly generated
(Is_Visible_Through_Renamings): Return false if the limited_with_clause
has Error_Posted set. Prevent infinite loops in illegal programs.
(Check_Private_Child_Unit): Move test for a nonprivate with clause down
to the point of the error test requiring the current unit to be private.
This ensures that private with clauses are not exempted from the basic
checking for being a descendant of the same library unit parent as a
withed private descendant unit.
(Check_Private_Limited_Withed_Unit): Revise the checking algorithm to
handle private with clauses properly, as well as to account for cases
where the withed unit is a public descendant of a private ancestor
(in which case the current unit must be a descendant of the private
ancestor's parent). The spec comments were updated accordingly. Also,
the old error message in this subprogram was replaced with error
messages that mirror the errors tested and reported by
Check_Private_Child_Unit.
Parameter and variable names improved for readability.
(Install_Limited_Context_Clauses): Remove test for a withed unit being
private as the precondition for calling
Check_Private_Limited_Withed_Unit since that subprogram has been
revised to test public units as well as private units.

From-SVN: r111090

18 years agosem_attr.adb (Analyze_Attribute): In case of 'Class applied to an abstract interface...
Javier Miranda [Wed, 15 Feb 2006 09:43:54 +0000 (10:43 +0100)]
sem_attr.adb (Analyze_Attribute): In case of 'Class applied to an abstract interface type call...

2006-02-13  Javier Miranda  <miranda@adacore.com>
    Ed Schonberg  <schonberg@adacore.com>

* sem_attr.adb (Analyze_Attribute): In case of 'Class applied to an
abstract interface type call analyze_and_resolve to expand the type
conversion into the corresponding displacement of the
reference to the base of the object.
(Eval_Attribute, case Width): For systems where IEEE extended precision
is supported, the maximum exponent occupies 4 decimal digits.
(Accessibility_Message): Add '\' in 2-line warning message.
(Resolve_Attribute): Likewise.
(case Attribute_Access): Significantly revise checks
for illegal access-to-subprogram Access attributes to properly enforce
the rules of 3.10.2(32/2).
Diagnose use of current instance with an illegal attribute.

        * sem_util.ads, sem_util.adb (Enclosing_Generic_Body): Change formal
        to a Node_Id.
        (Enclosing_Generic_Unit): New function to return a node's innermost
        enclosing generic declaration node.
        (Compile_Time_Constraint_Error): Remove '!' in warning messages.
        (Type_Access_Level): The accessibility level of anonymous acccess types
        associated with discriminants is that of the current instance of the
        type, and that's deeper than the type itself (AARM 3.10.2 (12.3.21)).
        (Compile_Time_Constraint_Error): Handle case of conditional expression.
        (Kill_Current_Values_For_Entity): New function
        (Enter_Name): Change formal type to Entity_Id

From-SVN: r111089

18 years agosem_aggr.adb (Resolve_Record_Aggregate): Restructure the code that handles default...
Javier Miranda [Wed, 15 Feb 2006 09:43:43 +0000 (10:43 +0100)]
sem_aggr.adb (Resolve_Record_Aggregate): Restructure the code that handles default-initialized components to keep...

2006-02-13  Javier Miranda  <miranda@adacore.com>

* sem_aggr.adb (Resolve_Record_Aggregate): Restructure the code that
handles default-initialized components to keep separate the management
of this feature but also avoid the unrequired resolution and
expansion of components that do not have partially initialized
values.
(Collect_Aggr_Bounds): Add '\' in 2-line warning message.
(Check_Bounds): Likewise.
(Check_Length): Likewise.

From-SVN: r111088

18 years agos-auxdec-vms_64.ads (Short_Address): Wrap it in a type.
Doug Rupp [Wed, 15 Feb 2006 09:43:32 +0000 (10:43 +0100)]
s-auxdec-vms_64.ads (Short_Address): Wrap it in a type.

2006-02-13  Douglas Rupp  <rupp@adacore.com>

* s-auxdec-vms_64.ads (Short_Address): Wrap it in a type.

From-SVN: r111087

18 years agorestrict.ads (No_Dispatching_Calls): New GNAT restriction.
Javier Miranda [Wed, 15 Feb 2006 09:43:23 +0000 (10:43 +0100)]
restrict.ads (No_Dispatching_Calls): New GNAT restriction.

2006-02-13  Javier Miranda  <miranda@adacore.com>
    Gary Dismukes  <dismukes@adacore.com>
    Robert Dewar  <dewar@adacore.com>

* restrict.ads (No_Dispatching_Calls): New GNAT restriction.

* sem_disp.adb (Override_Dispatching_Operation): Traverse the list of
aliased entities to look for the overriden abstract interface
subprogram.
(Is_Interface_Subprogram): Complete documentation.
(Check_Dispatching_Operation): Do not generate code to register the
operation in the dispatch table if the source is compiled with
restriction No_Dispatching_Calls.
(Override_Dispatching_Operation): Check for illegal attempt to override
No_Return procedure with procedure that is not No_Return
(Check_Dispatching_Call): Suppress the check for an abstract operation
when the original node of an actual is a tag-indeterminate attribute
call, since the attribute, which must be 'Input, can never be abstract.
(Is_Tag_Indeterminate): Handle checking of tag indeterminacy of a
call to the Input attribute (even when rewritten).
(Propagate_Tag): Augment comment to indicate the possibility of a call
to an Input attribute.

* sem_disp.ads (Override_Dispatching_Operation): Moved to spec to allow
calling it from Exp_Ch3.Make_Controlling_Function_Wrappers.

* s-rident.ads: (No_Dispatching_Calls): New GNAT restriction.
No_Wide_Characters is no longer partition-wide
No_Implementation_Attributes/Pragmas are now Ada 2005 (AI-257)
rather than GNAT

From-SVN: r111086

18 years agoprj-makr.adb (Make): Preserve the comments from the original project file.
Vincent Celier [Wed, 15 Feb 2006 09:43:11 +0000 (10:43 +0100)]
prj-makr.adb (Make): Preserve the comments from the original project file.

2006-02-13  Vincent Celier  <celier@adacore.com>

* prj-makr.adb (Make): Preserve the comments from the original project
file.
When removing nodes (attributes Source_Dirs, Source_Files,
Source_List_File and package Naming), save the comments and attach the
saved comments to the newly created nodes.
Do not add a with clause for the naming package if one already exists.

From-SVN: r111085

18 years agoprj.ads (Error_Warning): New enumeration type
Vincent Celier [Wed, 15 Feb 2006 09:43:00 +0000 (10:43 +0100)]
prj.ads (Error_Warning): New enumeration type

2006-02-13  Vincent Celier  <celier@adacore.com>

* prj.ads (Error_Warning): New enumeration type

* prj-nmsc.ads, prj-nmsc.adb (Error_Msg): If location parameter is
unknown, use the location of the project to report the error.
(When_No_Sources): New global variable
(Report_No_Ada_Sources): New procedure
(Check): New parameter When_No_Sources. Set value of global variable
When_No_Sources,
(Find_Sources): Call Report_No_Ada_Sources when appropriate
(Get_Sources_From_File): Ditto
(Warn_If_Not_Sources): Better warning messages indicating the unit name
and the file name.

* prj-pars.ads, prj-pars.adb (Parse): New parameter When_No_Sources.
Call Prj.Proc.Process with parameter When_No_Sources.

* prj-proc.ads, prj-proc.adb (Check): New parameter When_No_Sources.
Call Recursive_Check with parameter When_No_Sources.
(Recursive_Check): New parameter When_No_Sources. Call itself and
Prj.Nmsc.Check with parameter When_No_Sources.
(Process): New parameter When_No_Sources. Call Check with parameter
When_No_Sources.
(Copy_Package_Declarations): New procedure to copy renamed parameters
and setting the location of the declared attributes to the location
of the renamed package.
(Process_Declarative_Items): Call Copy_Package_Declarations for renamed
packages.

From-SVN: r111084

18 years agoprj.adb (Reset): Initialize the first element of table Namings with the standard...
Vincent Celier [Wed, 15 Feb 2006 09:42:47 +0000 (10:42 +0100)]
prj.adb (Reset): Initialize the first element of table Namings with the standard naming data.

2006-02-13  Vincent Celier  <celier@adacore.com>

* prj.adb (Reset): Initialize the first element of table Namings with
the standard naming data.

From-SVN: r111083

18 years agopar-endh.adb (Explicit_Start_Label): Add code to protect the parser against source...
Javier Miranda [Wed, 15 Feb 2006 09:42:38 +0000 (10:42 +0100)]
par-endh.adb (Explicit_Start_Label): Add code to protect the parser against source containing syntax errors.

2006-02-13  Javier Miranda  <miranda@adacore.com>

* par-endh.adb (Explicit_Start_Label): Add code to protect the parser
against source containing syntax errors.

From-SVN: r111082

18 years agopar-ch6.adb, [...]: Implement -gnatyI switch (MODE_IN)
Robert Dewar [Wed, 15 Feb 2006 09:42:27 +0000 (10:42 +0100)]
par-ch6.adb, [...]: Implement -gnatyI switch (MODE_IN)

2006-02-13  Robert Dewar  <dewar@adacore.com>

* par-ch6.adb, style.ads, styleg.adb, styleg.ads, stylesw.adb,
stylesw.ads, usage.adb, vms_data.ads: Implement -gnatyI switch
(MODE_IN)

From-SVN: r111081

18 years agore PR ada/23973 (without -gnat05, GNAT warns that interface is new kw, but misses...
Javier Miranda [Wed, 15 Feb 2006 09:42:14 +0000 (10:42 +0100)]
re PR ada/23973 (without -gnat05, GNAT warns that interface is new kw, but misses one frequent occurence)

2006-02-13  Javier Miranda  <miranda@adacore.com>

PR ada/23973

* par-ch3.adb (P_Derived_Type_Def_Or_Private_Ext_Decl): Reorganize the
code to improve the error message reported when the program has
declarations of abstract interface types and it is not compiled with
the -gnat05 switch.
(P_Access_Definition): Reorganize the code to improve the error
message reported when the new Ada 2005 syntax for anonymous
access types is used and the program is not compiled with the
-gnat05 switch.

From-SVN: r111080

18 years agomlib-prj.adb (Index): New function
Vincent Celier [Wed, 15 Feb 2006 09:42:01 +0000 (10:42 +0100)]
mlib-prj.adb (Index): New function

2006-02-13  Vincent Celier  <celier@adacore.com>

* mlib-prj.adb (Index): New function
(Build_Library): When building a shared library, add to the run path
the directory of the shared version of libgcc.
(Build_Library): Output shared decgnat library.
(Process_Binder_File): Test for shared decgnat library.

From-SVN: r111079

18 years agomake.adb (Collect_Arguments_And_Compile): For VMS...
Vincent Celier [Wed, 15 Feb 2006 09:41:49 +0000 (10:41 +0100)]
make.adb (Collect_Arguments_And_Compile): For VMS...

2006-02-13  Vincent Celier  <celier@adacore.com>

* make.adb (Collect_Arguments_And_Compile): For VMS, when compiling the
main source, add switch -mdebug-main=_ada_ so that the executable can
be debugged by the standard VMS debugger.
(Gnatmake): Set No_Main_Subprogram to True when there is no main
subprogram, to avoid issuing -mdebug-main=_ada_ for VMS uselessly.
Exit the Multi_Main_Loop when Unique_Compile is True after compilation
of the last source, as the binding and linking phases are never
performed.
Set all executable obsolete when rebuilding a library.

* makeutl.adb (Linker_Options_Switches): Do not process empty linker
options.

From-SVN: r111078

18 years agolib-xref.adb (Get_Type_Reference): For a private type whose full view is an array...
Ed Schonberg [Wed, 15 Feb 2006 09:41:35 +0000 (10:41 +0100)]
lib-xref.adb (Get_Type_Reference): For a private type whose full view is an array type...

2006-02-13  Ed Schonberg  <schonberg@adacore.com>
    Robert Dewar  <dewar@adacore.com>

* lib-xref.adb (Get_Type_Reference): For a private type whose full
view is an array type, indicate the component type as well, for
navigation purposes.
(Generate_Reference): Don't consider array ref on LHS to be a case
of violating pragma Unreferenced.
Do not give Ada 2005 warning except on real reference.

From-SVN: r111077

18 years agog-spipat.adb (Image, [...]): These two cases were generating incorrect output...
Robert Dewar [Wed, 15 Feb 2006 09:41:22 +0000 (10:41 +0100)]
g-spipat.adb (Image, [...]): These two cases were generating incorrect output...

2006-02-13  Robert Dewar  <dewar@adacore.com>

* g-spipat.adb (Image, case PC_Assign_Imm and case PC_Assign_OnM):
These two cases were generating incorrect output, and if this unit
was built with checks on, generated a discriminant mismatch constraint
error.

From-SVN: r111076

18 years agognatcmd.adb (Rules_Switches): New table
Vincent Celier [Wed, 15 Feb 2006 09:41:11 +0000 (10:41 +0100)]
gnatcmd.adb (Rules_Switches): New table

2006-02-13  Vincent Celier  <celier@adacore.com>

* gnatcmd.adb (Rules_Switches): New table
(Add_To_Rules_Switches): New procedure
(GNATCmd): For command CHECK, put all options following "-rules" in the
Rules_Switches table. Append these -rules switches after the -cargs
switches.

From-SVN: r111075

18 years agognatbind.adb (Scan_Bind_Arg): Replace error by warning on -M and native platforms.
Arnaud Charlet [Wed, 15 Feb 2006 09:41:02 +0000 (10:41 +0100)]
gnatbind.adb (Scan_Bind_Arg): Replace error by warning on -M and native platforms.

* gnatbind.adb (Scan_Bind_Arg): Replace error by warning on -M and
native platforms.
(Gnatbind): Do not call Exit_Program (E_Success) at the end, so that
finalization can occur normally.

From-SVN: r111074

18 years agog-dyntab.adb (Index_Of): conversion from Natural can no longer raise Constraint_Error.
Matthew Heaney [Wed, 15 Feb 2006 09:40:52 +0000 (10:40 +0100)]
g-dyntab.adb (Index_Of): conversion from Natural can no longer raise Constraint_Error.

2006-02-13  Matthew Heaney  <heaney@adacore.com>

*  g-dyntab.adb (Index_Of): conversion from Natural can no longer raise
Constraint_Error.

From-SVN: r111073

18 years agog-catiio.adb (Sec_Number): New type used to compute the number of seconds since 1...
Pascal Obry [Wed, 15 Feb 2006 09:40:43 +0000 (10:40 +0100)]
g-catiio.adb (Sec_Number): New type used to compute the number of seconds since 1-1-1970.

2006-02-13  Pascal Obry  <obry@adacore.com>

* g-catiio.adb (Sec_Number): New type used to compute the number of
seconds since 1-1-1970.
(Image) [Natural]: The parameter was an Integer, as we can't deal with
negative numbers (years, months...) it is better to have a Natural here.
Code clean-up.
(Image) [Number]: Change parameter from Long_Integer to Number.
(Image): Use Number type to compute the seconds since 1-1-1970 to fix an
overflow for dates past year 2038.

From-SVN: r111072

18 years agog-altive.ads (VECTOR_ALIGNMENT): Set to Min (16...
Olivier Hainque [Wed, 15 Feb 2006 09:40:32 +0000 (10:40 +0100)]
g-altive.ads (VECTOR_ALIGNMENT): Set to Min (16...

2006-02-13  Olivier Hainque  <hainque@adacore.com>

* g-altive.ads (VECTOR_ALIGNMENT): Set to Min (16, Max_Alignment),
to avoid useless and space inefficient overalignments on targets where
Max_Alignment is larger than 16.

From-SVN: r111071

18 years agofreeze.adb (Freeze_Entity): Handle subtypes of protected types and task types when...
Javier Miranda [Wed, 15 Feb 2006 09:40:24 +0000 (10:40 +0100)]
freeze.adb (Freeze_Entity): Handle subtypes of protected types and task types when...

2006-02-13  Javier Miranda  <miranda@adacore.com>

* freeze.adb (Freeze_Entity): Handle subtypes of protected types and
task types when accessing to the corresponding record type.
Remove '!' in warning message.

From-SVN: r111070

18 years agore PR ada/18819 (ACATS cdd2a02 fail at runtime)
Ed Schonberg [Wed, 15 Feb 2006 09:40:13 +0000 (10:40 +0100)]
re PR ada/18819 (ACATS cdd2a02 fail at runtime)

2006-02-13  Ed Schonberg  <schonberg@adacore.com>
    Javier Miranda  <miranda@adacore.com>
    Eric Botcazou  <ebotcazou@adacore.com>

* exp_util.ads, exp_util.adb (Find_Prim_Op,
Is_Predefined_Primitive_Operation): When
searching for the predefined equality operator, verify that operands
have the same type.
(Is_Predefined_Dispatching_Operation): Remove the code that looks
for the last entity in the list of aliased subprograms. This code
was wrong in case of renamings.
(Set_Renamed_Subprogram): New procedure
(Remove_Side_Effects): Replace calls to Etype (Exp) with use of the
Exp_Type constant computed when entering this subprogram.
(Known_Null): New function
(OK_To_Do_Constant_Replacement): New function
(Known_Non_Null): Check scope before believing Is_Known_Non_Null flag
(Side_Effect_Free): An attribute reference 'Input is not free of
side effect, unlike other attributes that are functions. (from code
reading).
(Remove_Side_Effects): Expressions that involve packed arrays or records
are copied at the point of reference, and therefore must be marked as
renamings of objects.
(Is_Predefined_Dispatching_Operation): Return false if the operation is
not a dispatching operation.

PR ada/18819
(Remove_Side_Effects): Lift enclosing type conversion nodes for
elementary types in all cases.

From-SVN: r111069

18 years agoexp_pakd.ads: Fix typos in comments.
Thomas Quinot [Wed, 15 Feb 2006 09:39:54 +0000 (10:39 +0100)]
exp_pakd.ads: Fix typos in comments.

2006-02-13  Thomas Quinot  <quinot@adacore.com>

* exp_pakd.ads: Fix typos in comments.

* exp_pakd.adb (Convert_To_PAT_Type): For the case of a bit packed
array reference that is an explicit dereference, mark the converted
(packed) array reference as analyzed to prevent a forthcoming
reanalysis from resetting its type to the original (non-packed) array
type.

From-SVN: r111068

18 years agoexp_intr.adb (Expand_Unc_Deallocation): Correct error of bad analyze call.
Robert Dewar [Wed, 15 Feb 2006 09:39:41 +0000 (10:39 +0100)]
exp_intr.adb (Expand_Unc_Deallocation): Correct error of bad analyze call.

2006-02-13  Robert Dewar  <dewar@adacore.com>

* exp_intr.adb (Expand_Unc_Deallocation): Correct error of bad analyze
call.

From-SVN: r111067

18 years agoexpect.c (__gnat_expect_portable_execvp): New implementation.
Pascal Obry [Wed, 15 Feb 2006 09:39:28 +0000 (10:39 +0100)]
expect.c (__gnat_expect_portable_execvp): New implementation.

2006-02-13  Pascal Obry  <obry@adacore.com>

* expect.c (__gnat_expect_portable_execvp): New implementation. The
previous implementation was using the C runtime spawnve routine but
the corresponding wait was using directly the Win32 API. This was
causing some times a lock when waiting for an event using
WaitForSingleObject in __gnat_waitpid. This new implementation uses
the Win32 CreateProcess routine. Avoiding mixing C runtime and Win32
API fixes this problem.

From-SVN: r111066

18 years agoexp_dist.adb (Copy_Specification): For access parameters...
Ed Schonberg [Wed, 15 Feb 2006 09:39:18 +0000 (10:39 +0100)]
exp_dist.adb (Copy_Specification): For access parameters...

2006-02-13  Ed Schonberg  <schonberg@adacore.com>

* exp_dist.adb (Copy_Specification): For access parameters, copy
Null_Exclusion flag, which will have been set for stream subprograms
in Ada2005 mode.

From-SVN: r111065

18 years agoexp_disp.ads, [...] (Expand_Dispatching_Call): If the controlling argument of the...
Javier Miranda [Wed, 15 Feb 2006 09:39:06 +0000 (10:39 +0100)]
exp_disp.ads, [...] (Expand_Dispatching_Call): If the controlling argument of the dispatching call is an abstract interface...

2006-02-13  Javier Miranda  <miranda@adacore.com>

* exp_disp.ads, exp_disp.adb (Expand_Dispatching_Call): If the
controlling argument of the dispatching call is an abstract interface
class-wide type then we use it directly.
Check No_Dispatching_Calls restriction.
(Default_Prim_Op_Position): Remove the code that looks for the last
entity in the list of aliased subprograms. This code was wrong in
case of renamings.
(Fill_DT_Entry): Add assertion to avoid the use of this subprogram
when the source is compiled with the No_Dispatching_Calls restriction.
(Init_Predefined_Interface_Primitives): No need to inherit primitives
if we are compiling with restriction No_Dispatching_Calls.
(Make_Disp_XXX): Addition of assertion to avoid the use of all these
subprograms if we are compiling under No_Dispatching_Calls restriction.
(Make_DT): Generate a dispatch table with a single dummy entry if
we are compiling with the No_Dispatching_Calls restriction. In
addition, in this case we don't generate code that calls to the
following run-time subprograms: Set_Type_Kind, Inherit_DT.
(Make_Select_Specific_Data_Table): Add assertion to avoid the use
of this subprogram if compiling with the No_Dispatching_Calls
restriction.
(Expand_Type_Conversion): Instead of using the actual parameter,
the argument passed as parameter to the conversion function was
erroneously referenced by the expander.
(Ada_Actions): Addition of Get_Predefined_Prim_Op_Address,
Set_Predefined_Primitive_Op_Address and Set_Signature.
(Expand_Dispatching_Call): Generate call to
Get_Predefined_Prim_Op_Address for predefined primitives.
(Fill_DT_Entry): Generate call to Set_Predefined_Prim_Op_Address for
predefined primitives.
(Make_DT, Make_Secondary_DT): If the tagged type has no user defined
primitives we reserve one dummy entry to ensure that the tag does not
point to some memory that is associated with some other object. In
addition, remove all the old code that generated the assignments
associated with the signature of the dispatch table and replace them
by a call to the new subprogram Set_Signature.
(Set_All_DT_Position): Change the algorithm because now we have a
separate dispatch table associated with predefined primitive operations.
(Expand_Interface_Conversion): In case of non-static offset_to_top
add explicit dereference to get access to the object after the call
to displace the pointer to the object.
(Expand_Interface_Thunk): Modify the generation of the actual used
in the calls to the run-time function Offset_To_Top to fulfil its
new interface.
(Make_DT): Add the new actuals required to call Set_Offset_To_Top.

From-SVN: r111064